QSTEPC [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: QSTEPC)}}
====== QSTEPC ======
(GIN Macro)

**Defined in:** [[george:source:ACCESSMACROS|ACCESSMACROS]]

**Used in:** [[george:source:BACKMAP864|BACKMAP864]], [[george:source:BMAPDIR865|BMAPDIR865]], [[george:source:BMAPONE867|BMAPONE867]], [[george:source:BMCNTRL866|BMCNTRL866]], [[george:source:BMINDEX866|BMINDEX866]], [[george:source:BSPRUNE867|BSPRUNE867]], [[george:source:RMTLF864|RMTLF864]]

<code - QSTEPC.mac.txt>
 74SY ...[??? QSTEPC SECT FILE FGN 19 DOC
 754Q    #MAC QSTEPC 
 75JB    [ J.TO %B IF WE HAVE TO COORDINATE TO DO A STEP ON FILE @ DEPTH %A  
 7642    #STR %A 
 76HL    (   
 773=          LDCT  3  %A   
 77GW          CALL  1  (ASTEP13)
 782G    )   
 78G6    #STR %A 
 78^Q    #SKI
 79FB          CALL  1  (ASTEP11)
 79^2          LDX   1  FX1  
 7=DL          LDX   2  FX2  
 7=Y=          BRN      %B   
 7?CW          NULL  
 7?XG    #NOR
</code>