{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: READDICT)}}
====== READDICT ======
(GIN Macro)

**Defined in:** [[george:source:ACCESSMACROS|ACCESSMACROS]]

**Used in:** [[george:source:ADDICT865|ADDICT865]], [[george:source:ALLOW84|ALLOW84]], [[george:source:BEXTRA83|BEXTRA83]], [[george:source:BEXTSJ84|BEXTSJ84]], [[george:source:BLOGNAL865|BLOGNAL865]], [[george:source:BMAPTWO860|BMAPTWO860]], [[george:source:BMJLIST864|BMJLIST864]], [[george:source:BMOUTPUT867|BMOUTPUT867]], [[george:source:BQUERY84|BQUERY84]], [[george:source:BUDGET84|BUDGET84]], [[george:source:BUDGTWO84|BUDGTWO84]], [[george:source:CHEKPRIV867|CHEKPRIV867]], [[george:source:DICTJOB82|DICTJOB82]], [[george:source:ERASEA867|ERASEA867]], [[george:source:FHOBJIND860|FHOBJIND860]], [[george:source:FREEZE864|FREEZE864]], [[george:source:JDWRITE867|JDWRITE867]], [[george:source:LIST867|LIST867]], [[george:source:LOCATE84|LOCATE84]], [[george:source:NEWDIR867|NEWDIR867]], [[george:source:NEWPASSW867|NEWPASSW867]], [[george:source:PREPREAD867|PREPREAD867]], [[george:source:PRIVLEG84|PRIVLEG84]], [[george:source:SETPR867|SETPR867]]

<code - READDICT.mac.txt>
 =TXY ...[??? READDICT SECT FILE FGN 19 DOC  
 =W7Q    #MAC  READDICT  
 =WMB    #STR  %A
 =X72          LDX   0  %A   
 =XLL    #STR  %A
 =Y6=    #SKI
 =YKW          LDN   0  0
 =^5G          SMO      FX2  
 =^K6          STO   0  ACOMMUNE9
 ?24Q    #STR  %B
 ?2JB    (   
 ?342          LDN   0  %B   
 ?3HL          LDX   2  FX2  
 ?43=          LDN   1  ACOMMUNE1(2) 
 ?4GW          MOVE  0  3
 ?52G    )   
 ?5G6    #STR  %B
 ?5^Q    #SKI
 ?6FB    (   
 ?6^2          LDX   2  FX2  
 ?7DL          STOZ     ACOMMUNE1(2) 
 ?7Y=    )   
 ?8CW    #STR  %C
 ?8XG    (   
 ?9C6          LDCT  0  #400 
 ?9WQ          STO   0  ACOMMUNE7(2) 
 ?=BB    )   
 ?=W2    #STR  %C
 ??*L    #SKI
 ??T=          STOZ     ACOMMUNE7(2) 
 ?##W          DOWN     LOCATE,5 
 ?#SG    #NOR
</code>