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

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

**Used in:** [[george:source:LDSTART850|LDSTART850]], [[george:source:LOADERR70|LOADERR70]], [[george:source:LOADPROG865|LOADPROG865]]

<code - FSUD.mac.txt>
 D9J6    #MAC  FSUD  
 D=3Q          LDN   %A BSUD 
 D=HB    MFSUD LDX   %A FPTR(%A) 
 D?32          TXL   %A BIT11
 D?GL          BCS      %C   
 D#2=          TXU   %B HSUDNO(%A)   
 D#FW          BCS      MFSUD
 D#^G    #NOR
</code>