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

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

**Used in:** [[george:source:BEXTSJ84|BEXTSJ84]], [[george:source:LOCATE84|LOCATE84]]

<code - READDICU.mac.txt>
 ?*4# ...[??? READDICU SECT FILE FGN 19 DOC  
 ?*#6    #MAC  READDICU  
 ?*RQ    #STR  %A
 ?B?B    #SKI
 ?BR2          LDN   0  0
 ?C=L    #STR  %A
 ?CQ=          LDX   0  %A   
 ?D9W          SMO      FX2  
 ?DPG          STO   0  ACOMMUNE9
 ?F96    #ACC  %B
 ?FNQ    (   
 ?G8B          LDX   0  %B   
 ?GN2          SMO      FX2  
 ?H7L          STO   0  ACOMMUNE7
 ?HM=    )   
 ?J6W    #ACC  %B
 ?JLG    #STR
 ?K66    (   
 ?KKQ          SMO      FX2  
 ?L5B          STO   %B ACOMMUNE7
 ?LK2    )   
 ?M4L          DOWN     LOCATE,2 
 ?MJ=    #NOR
</code>