GETAREA

(GIN Macro)
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