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

**Defined in:** [[george:source:MACROS_RMD10|MACROS RMD10]]

**Used in:** [[george:source:CONCEPT85|CONCEPT85]]

<code - FSCON.mac.txt>
 #FN8 ...[??? FSCON SECT FILE FGN 16 DOC 
 #GX=    #MAC  FSCON 
 #HBW    #STR  %A,0  
 #HWG          LDX   0  %A   
 #JB6          TOPFCB   1
 #JTQ          SBS   0  FSIZE(1) 
 #K*B          MBS      1,BFALTB,BFALTR  
 #KT2          LDX   0  FSIZE(1) 
 #L#L          BPZ   0  M1FSCON  
 #LS=          STOZ     FSIZE(1) 
 #M?W          LDN   0  FBLKS-A1 
 #MRG          STO   0  FBLMOD(1)
 #N?6          BRN      %B   
 #NQQ    M1FSCON 
 #P=B          ADN   0  FBLKS-A1 
 #PQ2          BXGE  0  FBLMOD(1),M2FSCON
 #Q9L          STO   0  FBLMOD(1)
 #QP=    M2FSCON 
 #R8W    #NOR
</code>