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

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

**Used in:** [[george:source:ASSIGN860|ASSIGN860]]

<code - ASTYPE.mac.txt>
 8CRY ...[??? ASTYPE SECT FILE FGN 7 DOC 
 8D3Q    #   
 8DHB    # ASTYPE - FILL IN ABOVE TABLE & APPEND 4 WD ENTRY TO PERIPHERAL DATA   
 8F32    #                                                                  TABLE
 8FGL    #MAC  ASTYPE
 8G2=    #OPT  M1ASTYPE=0?   
 8GFW    #DEF  19?+0=0?  
 8G^G    #TRA  %A/4+M1ASTABLES+1 
 8HF6    #FID  %A&3*6,%A&3+1*6-1,19?+0]-M1ASTYPE+1   
 8HYQ    #TRA  19?+0]
 8JDB          +%C   
 8JY2          +%B   
 8KCL    #FID  7,13,AOLPTLEN+%D  
 8KX=    #STR  %G
 8LBW    #FID  %G,%G,1   
 8LWG    #STR  %H
 8MB6    #FID  %H,%H,1   
 8MTQ    #STR  %I
 8N*B    #FID  %I,%I,1   
 8NT2    #STR  %J
 8P#L    #FID  %J,%J,1   
 8PS=          LINK     %E,%F
 8Q?W    #NOR
</code>