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

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

**Used in:** [[george:source:INLOOP84|INLOOP84]], [[george:source:INPCT84|INPCT84]], [[george:source:INPUTJDF82|INPUTJDF82]], [[george:source:INPUTMOP82|INPUTMOP82]], [[george:source:PREPREAD867|PREPREAD867]], [[george:source:READBULK867|READBULK867]], [[george:source:SETPRAMA867|SETPRAMA867]], [[george:source:TIDYREAD850|TIDYREAD850]]

<code - INFINB.mac.txt>
 *YJ8 ...[??? INFINB SECT FILE FGN 16 DOC
 *YS2    #   
 *^?L    #     INPUT MACRO TO SET OR UNSET BIT FOR FINISH COMMAND
 *^R=    #   
 B2=W    #MAC  INFINB
 B2QG          LDX   2  FX2  
 B3PQ          BRUSEN   M1INFINB,2   
 B49B          CJOBLOCK 1
 B4P2          LDCT  0  #40  
 B58L          ERS   0  JMISC(1) 
 B5N=          LDX   1  FX1  
 B776          BRN      M2INFINB 
 B7LQ    M1INFINB
 B86B          LDN   0  #2000
 B8L2          ERS   0  EXT+11(2)
 B95L ...M2INFINB
 B=4W    #NOR
</code>