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

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

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

<code - FAILCLEAR.mac.txt>
 CYH4 ...[??? FAILCLEA SECT FILE FGN 9 DOC   
 CYQW    #MAC  FAILCLEAR 
 C^=G          STO   3   BSL1
 C^Q6          LDX   0  %B   
 D29Q          ANDX  0  BSTSMASK 
 D2PB          STO   0  GEN0 
 D392          FINDFAIL 3,GEN0,%A,CFL,M3FAILCLEAR
 D3NL          NGN   1  1
 D48=    M1FAILCLEAR 
 D4MW          LDX   0  2(3) 
 D57G          STO   0  0(3) 
 D5M6          TXU   0  1
 D66Q          BCC      M2FAILCLEAR  
 D6LB          ADN   3  1
 D762          BRN      M1FAILCLEAR  
 D7KL    M3FAILCLEAR 
 D85=          GEOERR   1,NO REC 
 D8JW    M2FAILCLEAR 
 D94G          HUNT2     1,BSTB,BFAIL,BSP12  
 D9J6          LDN   0  1
 D=3Q          SBS   0  A1(1)
 D=HB          UNSETFB   1,BSP12 
 D?32          LDX   3   BSL1
 D?GL    #NOR
</code>