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

**Defined in:** [[george:source:MACS_SPC|MACS SPC]]

**Used in:** [[george:source:ACCESS867|ACCESS867]], [[george:source:CLOSBAC867|CLOSBAC867]], [[george:source:CLOSDEL867|CLOSDEL867]], [[george:source:GETON867|GETON867]], [[george:source:NETOFLNE867|NETOFLNE867]], [[george:source:OLMTB867|OLMTB867]], [[george:source:ONLINEA867|ONLINEA867]], [[george:source:OPCA867|OPCA867]], [[george:source:PUTPER85|PUTPER85]], [[george:source:RELCOM|RELCOM]]

<code - RELPERENT.mac.txt>
 HGHG    #MAC  RELPERENT 
 HH36    #STR  %A,0  
 HHGQ          LDX   0  %A   
 HJ2B    #STR  %B,1  
 HJG2          LDX   1  %B   
 HJ^L          LDX   2  FX2  
 HKF=          STO   0  ACOMMUNE7(2) 
 HKYW    #STR  %B
 HLDG          STO   1  ACOMMUNE9(2) 
 HLY6    #STR  %B
 HMCQ    #SKI
 HMXB          STOZ     ACOMMUNE9(2) 
 HNC2          DOWN     RELPER,1 
 HNWL    #NOR
</code>