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

**Defined in:** [[george:source:MACROS_VB|MACROS VB]]

**Used in:** [[george:source:ADDICT865|ADDICT865]], [[george:source:ARCHIVE867|ARCHIVE867]], [[george:source:BACKMAP864|BACKMAP864]], [[george:source:BMAPDIR865|BMAPDIR865]], [[george:source:BMAPONE867|BMAPONE867]], [[george:source:BMAPTAPE865|BMAPTAPE865]], [[george:source:BMAPTWO860|BMAPTWO860]], [[george:source:BMCNTRL866|BMCNTRL866]], [[george:source:BMFIXIT864|BMFIXIT864]], [[george:source:BMOUTPUT867|BMOUTPUT867]], [[george:source:BMPRCHEK860|BMPRCHEK860]], [[george:source:BMQUEST866|BMQUEST866]], [[george:source:BMQUESTB866|BMQUESTB866]], [[george:source:BMSAVJOB864|BMSAVJOB864]], [[george:source:BSPRUNE867|BSPRUNE867]], [[george:source:BSUNJAM867|BSUNJAM867]], [[george:source:CARTCONT867|CARTCONT867]], [[george:source:CLOSFREZ867|CLOSFREZ867]], [[george:source:CONNECT867|CONNECT867]], [[george:source:CONNECTA867|CONNECTA867]], [[george:source:DEWELL867|DEWELL867]], [[george:source:DIRENT867|DIRENT867]], [[george:source:DSCNCT867|DSCNCT867]], [[george:source:DTREST860|DTREST860]], [[george:source:ENGAGE867|ENGAGE867]], [[george:source:ENWELL867|ENWELL867]], [[george:source:ENWELLB867|ENWELLB867]], [[george:source:INCMON865|INCMON865]], [[george:source:INCTAPES867|INCTAPES867]], [[george:source:IPBERROR867|IPBERROR867]], [[george:source:LISTNEXT867|LISTNEXT867]], [[george:source:LOGACC863|LOGACC863]], [[george:source:LOGOUT867|LOGOUT867]], [[george:source:MOPCOM867|MOPCOM867]], [[george:source:MOPCOMB865|MOPCOMB865]], [[george:source:OPER864|OPER864]], [[george:source:OPERIN867|OPERIN867]], [[george:source:REGEN865|REGEN865]], [[george:source:REPERT867|REPERT867]], [[george:source:SETUPB867|SETUPB867]], [[george:source:WLD864|WLD864]], [[george:source:WLOUT865|WLOUT865]], [[george:source:WSPERIS867|WSPERIS867]]

<code - OUTPACKX.mac.txt>
 8JN8 ...[??? OUTPACKX SECT CENT FGN 7 DOC   
 8JY2    #MAC  OUTPACKX  
 8KCL          LDX   0  %A   
 8KX=    #STR  V,%B  
 8LBW    #SKI
 8LWG          ADN   0  1
 8MB6          STO   0  GEN2 
 8MTQ          LDX   0  %C   
 8N*B          ORX   0  GSIGN
 8NT2          STO   0  GEN4 
 8P#L    #STR  %D
 8PS=          LDN   0  1
 8Q?W    #STR  %D
 8QRG    #SKI
 8R?6          NGN   0  1
 8RQQ          STO   0  GEN6 
 8S=B    #STR  V,%B  
 8SQ2    #SKI
 8T9L    (   
 8TP=          SMO      %A   
 8W8W          LDX   0  0
 8WNG    )   
 8X86    #STR  V,%B  
 8XMQ    (   
 8Y7B          LDX   0  %B   
 8YM2          ADN   0  1
 8^6L    )   
 8^L=          CALL  1  (AOUT4)  
 925W    #STR  %D
 92KG    (   
 9356          DOWN SETMON,11
 93JQ          BRN      %D   
 944B    )   
 94J2    #STR  %D
 953L    #SKI
 95H=    (   
 962W          DOWN  SETMON,12   
 96GG          NULL  
 9726    )   
 97FQ    #NOR
</code>