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

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

**Used in:** [[george:source:IPBLISTB867|IPBLISTB867]], [[george:source:IPBLISTE867|IPBLISTE867]], [[george:source:LISTFIND867|LISTFIND867]], [[george:source:LISTINIT867|LISTINIT867]], [[george:source:LISTLOOP867|LISTLOOP867]], [[george:source:LISTNEXT867|LISTNEXT867]], [[george:source:LISTNIP865|LISTNIP865]], [[george:source:LISTOPEN867|LISTOPEN867]], [[george:source:LISTPREP865|LISTPREP865]], [[george:source:LISTPROC867|LISTPROC867]], [[george:source:LISTSEAR867|LISTSEAR867]], [[george:source:LISTTPCP867|LISTTPCP867]], [[george:source:RENGAGE851|RENGAGE851]]

<code - LFBITCLR.mac.txt>
 5KF# ...[??? LFBITCLR SECT DEVT FGN 2 DOC   
 5KP6    #MAC  LFBITCLR  
 5L8Q          LDBIT    ALFBIT%A,0   
 5LNB    #MOD  %B
 5M82    (   
 5MML          SMO      %B   
 5N7=          ORS   0  ALFLAG   
 5NLW          SMO      %B   
 5P6G          ERS   0  ALFLAG   
 5PL6    )   
 5Q5Q    #MOD  %B
 5QKB    #SKI
 5R52    (   
 5RJL          ORS   0  ALFLAG(%B)   
 5S4=          ERS   0  ALFLAG(%B)   
 5SHW    )   
 5T3G    #NOR
</code>