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

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

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

<code - LDNBIT.mac.txt>
 7WP4 ...[??? LDNBIT SECT CENT FGN 9 DOC 
 7WYW    #   
 7XDG    #     THIS MACRO SETS ALL BITS EXCEPT BIT %A OF WORD %B 
 7XY6    #   
 7YCQ    #MAC  LDNBIT
 7YXB    #SKIP %A>23-23  
 7^C2    !     %A EXCEEDS 23 OR IS UNDEFINED 
 7^WL    #ACC  %B
 82B=    (   
 82TW          LDNBITZ  %A,0 
 83*G          STO   0  %B   
 83T6    )   
 84#Q    #ACC  %B
 84SB    #SKIP   
 85#2          LDNBITZ  %A,%B
 85RL    #NOR
</code>