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

**Defined in:** [[george:source:MACROS_SHFS|MACROS SHFS]]

**Used in:** 

<code - FSHACTNO.mac.txt>
 8*62    [???  FSHACTNO SECT FILE FGN 1 DOC  
 8*KL    #MAC  FSHACTNO  
 8B5=          STO   1  GEN0 
 8BJW          LDX   1  FSHINPTR 
 8C4G          BZE   1  MFSHACTNO4   
 8CJ6          LDX   1  FSHRINGA+BPTR(1) 
 8D3Q          LDX   1  BPTR(1)  
 8DHB          SBN   1  FSHRINGA 
 8F32          LDX   0  FSHMARKPTR(1)
 8FGL          BZE   0  MFSHACTNO3   
 8G2=          ADN   0  FSHMARKLIST(1)   
 8GFW          STO   0  GEN1 
 8G^G          LDX   0  %A   
 8HF6    MFSHACTNO1  
 8HYQ    #STR  %C
 8JDB          BXE   0  FSHMARKLIST+1(1),MFSHACTNO2  
 8JY2    #STR  %C
 8KCL    #STR
 8KX=          BXE   0  FSHMARKLIST(1),MFSHACTNO2
 8LBW          ADN   1  FSHMARKELEM  
 8LWG          BXU   1  GEN1,MFSHACTNO1  
 8MB6    MFSHACTNO4  
 8MTQ          LDN   0  0
 8N*B          BRN      MFSHACTNO3   
 8NT2    MFSHACTNO2  
 8P#L    #STR  %C
 8PS=          LDX   0  FSHMARKLIST(1)   
 8Q?W    #STR  %C
 8QRG    #STR
 8R?6          LDX   0  FSHMARKLIST+1(1) 
 8RQQ    MFSHACTNO3  
 8S=B          LDX   1  GEN0 
 8SQ2    #SKI  %B
 8T9L          LDX   %B 0
 8TP=    #NOR
</code>