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

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

**Used in:** [[george:source:ARCHIVE867|ARCHIVE867]], [[george:source:BMINDEX866|BMINDEX866]], [[george:source:BMSTREAM853|BMSTREAM853]], [[george:source:BSPRUNE867|BSPRUNE867]], [[george:source:CANCRVX864|CANCRVX864]], [[george:source:CLOSEALT864|CLOSEALT864]], [[george:source:CLOSEFUL867|CLOSEFUL867]], [[george:source:CLOSEND867|CLOSEND867]], [[george:source:CLOSFREZ867|CLOSFREZ867]], [[george:source:DTREST860|DTREST860]], [[george:source:DTSCAN860|DTSCAN860]], [[george:source:DTSTART867|DTSTART867]], [[george:source:DTSUBS867|DTSUBS867]], [[george:source:DTSUBSS867|DTSUBSS867]], [[george:source:LINECTRL864|LINECTRL864]], [[george:source:LISTFILE867|LISTFILE867]], [[george:source:LISTRING864|LISTRING864]], [[george:source:OPER864|OPER864]], [[george:source:OPERIN867|OPERIN867]], [[george:source:PCTLISTA867|PCTLISTA867]], [[george:source:PCTLISTB867|PCTLISTB867]], [[george:source:PERFLOGS866|PERFLOGS866]], [[george:source:RENGAGE851|RENGAGE851]], [[george:source:RESTMERG864|RESTMERG864]], [[george:source:RMTLF864|RMTLF864]], [[george:source:RMTLFEND864|RMTLFEND864]], [[george:source:SCHEDENX860|SCHEDENX860]], [[george:source:SCHEDMTX867|SCHEDMTX867]], [[george:source:SHOWCOMM864|SHOWCOMM864]], [[george:source:WHATPERB867|WHATPERB867]]

<code - LF.mac.txt>
 CK6F ...[   
 CK94 ...[   
 CK?N ...[??? LF SECT FILE FGN 24 DOC
 CKHG    #MAC           LF                  [P,F,A  A=0 BY DEFAULT   
 CL36    #SKI           %B&#37-23
 CLGQ    (   
 CM2B    [              %B LS BIT NOT BIT23  
 CMG2          OP       %A,%B,LDX,%C 
 CM^L    #DEF           20?=(%B&#37)-(%B@L-19+1)+1   
 CNF=    #STR           %C   
 CNYW    (   
 CPDG    #SKI           20?  
 CPY6          SLL   %C 20?                 [KNOCK OUT TOP BITS  
 CQCQ          SRL   %C 20?+23-(%B&#37)     [PUT IN LS BITS  
 CQXB    #EXI
 CRC2    )   
 CRWL    #SKI           20?  
 CSB=          SLL   0  20?  
 CSTW          SRL   0  20?+23-(%B&#37)  
 CT*G    #EXI
 CTT6    )   
 CW#Q          LFUN     %A,%B,%C 
 CWSB    #NOR
</code>