GETAREA [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

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

**Defined in:** [[george:source:MACROS_EWDAS|MACROS EWDAS]]

**Used in:** [[george:source:EXINONE867|EXINONE867]], [[george:source:NEXTUNIT867|NEXTUNIT867]]

<code - GETAREA.mac.txt>
 NYTL    #   
 N^*=    [???                                GETAREA 
 N^SW    #                                   ******* 
 P2#G    #MAC  GETAREA   
 P2S6    #   
 P3?Q          LDX   0  %A   
 P3RB          LDX   1  FX2  
 P4?2          STO   0  ACOMMUNE9(1) 
 P4QL          MFINDSU  1,ACOMMUNE9(1)   
 P5==          LADDP    HUNIT(1),1   
 P5PW          LDX   2  FX2  
 P69G          JDED     1,MGETAREA1  
 P6P6          STOZ     ACOMMUNE8(2) 
 P78Q          LDCT  0  #400 
 P7NB          ORN   0  GCHA 
 P882          STO   0  ACOMMUNE7(2) 
 P8ML          DOWN     TWINSETB,3   
 P97=    MGETAREA1   
 P9LW          LDX   1  FX1  
 P=6G          BRN      MGETAREA2
 P=L6          BRN      %B   
 P?5Q    MGETAREA2   
 P?KB    #NOR
</code>