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

**Defined in:** [[george:source:MACROS_LEF|MACROS LEF]]

**Used in:** [[george:source:LISTEND867|LISTEND867]], [[george:source:LISTPROC867|LISTPROC867]]

<code - LFGETPER.mac.txt>
 ?HX4 ...[??? LFGETPER SECT DEVT FGN 2 DOC   
 ?J6W    #MAC  LFGETPER  
 ?JLG    [THIS MACRO ATTEMPTS TO GET A PERIPHERAL AND AN ACTLF TO DRIVE IT   
 ?K66    [FOR A REQUEST IN :SYSTEM.OUTPUT
 ?KKQ    [%A AND %B ARE INDEX KEYS   
 ?L5B    [   
 ?LK2    #ACC  %A
 ?M4L          LDX   0  %A   
 ?MJ=          SMO      FX2  
 ?N3W    #ACC  %A
 ?NHG          STO   0  ACOMMUNE1
 ?P36    #ACC  %A
 ?PGQ    #SKI
 ?Q2B          STO   %A ACOMMUNE1
 ?QG2    #ACC  %B
 ?Q^L          LDX   0  %B   
 ?RF=          SMO      FX2  
 ?RYW    #ACC  %B
 ?SDG          STO   0  ACOMMUNE2
 ?SY6    #ACC  %B
 ?TCQ    #SKI
 ?TXB          STO   %B ACOMMUNE2
 ?WC2          DOWN     LISTFIND,2   
 ?WWL    #NOR
</code>