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

**Defined in:** [[george:source:MACS_MISW|MACS MISW]]

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

<code - SUPNLOUT.mac.txt>
 #^J2    #MAC  SUPNLOUT  
 *23L          LDX   2  FX2  
 *2H=          LDX   1  FX1  
 *32W          LDX   0  AMXMSK(2)
 *3GG          ANDN  0  #12  
 *426          BZE   0  MZUZ 
 *4FQ          LDX   2  ACTRING(2)   
 *4^B          SBN   2  ACTRING  
 *5F2    MRET  LDX   2  BPTR(2)  
 *5YL          BXE   2  FX2,MZUZ 
 *6D=          LDX   0  ATYPE(2) 
 *6XW          BXE   0  MLCB(1),MLCB1
 *7CG          BXU   0  MDCB(1),MRET 
 *7X6          LDX   0  MSPOUTBIT(1) 
 *8BQ          ORS   0  IWAIT(2) 
 *8WB          BRN      MDCB1
 *9B2    MLCB
 *9TL    #HAL  AMXOR+ALCB,0  
 *=*=    MDCB
 *=SW    #HAL  AMXOR+ADCB,0  
 *?#G    MSPOUTBIT      #00020000
 *?S6    MLCB1 LDX   0  MSPOUTBIT(1) 
 *#?Q          ORS   0  GWAIT(2) 
 *#RB    MDCB1 LDX   2  FX2  
 **?2    MZUZ
 **QL    #NOR
</code>