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

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

**Used in:** [[george:source:DRUM852|DRUM852]], [[george:source:LISTFIND867|LISTFIND867]], [[george:source:LISTPROC867|LISTPROC867]]

<code - GETPER7.mac.txt>
 ?SDG    #MAC  GETPER7   
 ?SY6    #ACC  %A
 ?TCQ    (   
 ?TXB          LDX   0  %A   
 ?WC2          SMO      FX2  
 ?WWL          STO   0  ACOMMUNE7
 ?XB=    )   
 ?XTW    #ACC  %A
 ?Y*G    #SKI
 ?YT6    (   
 ?^#Q          SMO      FX2  
 ?^SB          STO   %A ACOMMUNE7
 #2#2    )   
 #2RL          DOWN     GETFREE,2
 #3?=          BRN      %B   
 #3QW          BRN      %C   
 #4=G    #NOR
</code>