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

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

**Used in:** [[george:source:ATTACHC867|ATTACHC867]], [[george:source:COMPROA867|COMPROA867]], [[george:source:IPBLOG866|IPBLOG866]], [[george:source:LOGOUT867|LOGOUT867]], [[george:source:MORNING867|MORNING867]]

<code - MOPCLOSE.mac.txt>
 8*KL    #MAC  MOPCLOSE  
 8B5=          SMO      FX2  
 8BJW          LDX   1  ACTRING  
 8C4G          LDX   2  FX1  
 8CJ6          SBN   1  ACTRING  
 8D3Q    MRET  LDX   1  BPTR(1)  
 8DHB          LDX   0  ATYPE(1) 
 8F32          BXE   0  MLCB(2),MLCB1
 8FGL          BXE   0  MDCB(2),MDCB1
 8G2=          BXU   1  FX2,MRET 
 8GFW          LDX   1  FX1  
 8G^G          LDX   2  FX2  
 8HF6          BRN      MNCB 
 8HYQ    MLCB
 8JDB    #HAL  AMXOR+ALCB,0  
 8JY2    MDCB
 8KCL    #HAL  AMXOR+ADCB,0  
 8KX=    MLCB1 LDX   2  FX2  
 8LBW          LDCH  0  JSOURCE1(2)  
 8LWG          SBN   0  7
 8MB6          BZE   0  MDCB1
 8MTQ          MOPWAIT   
 8N*B          MHUNTW   1,AMXOR,ALCB 
 8NT2    MDCB1 LDX   2  A1+BPTR(1)   
 8P#L          BZE   2  MDCB2
 8PS=          STOZ     BPTR(2)  
 8Q?W          STOZ     A1+BPTR(1)   
 8QRG    MDCB2 FREECORE 1
 8R?6    MNCB
 8RQQ    #NOR
</code>