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

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

**Used in:** [[george:source:BSBLFAIL867|BSBLFAIL867]], [[george:source:RITEFAIL864|RITEFAIL864]], [[george:source:TRANFAIL866|TRANFAIL866]]

<code - OPTRAN.mac.txt>
 2K3B ...[??? OPTRAN SECT FILE FGN 9 DOC 
 2L2L    #MAC  OPTRAN
 2L7S ...#SKI  BSOPT 
 2L*2 ...(   
 2LG=          LDN   0  CHAINADD(%A) 
 2L^W          STO   0  EX6  
 2MFG          LDX   0  %B   
 2M^6          ANDX  0  GMIN4
 2NDQ          STO   0  EX5  
 2NYB          LDX   3  %C   
 2PD2          CALL  0  (BSTS13) 
 2PMS ...)   
 2PXL    #NOR
</code>