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

**Defined in:** [[george:source:MACS_CONC|MACS CONC]]

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

<code - IPBATTACH.mac.txt>
 37K6    #MAC  IPBATTACH 
 384Q          LDN   0  #400 
 38JB          ANDX  0  IDSTATUS(%A) 
 3942          BNZ   0  %B   
 39HL          SMO      %C   
 3=3=          LDX   0  IPBSW
 3=GW          ANDX  0  GSIGN
 3?2G          SRL   0  14   
 3?G6          ORS   0  IDSTATUS(%A) 
 3?^Q          MODD     LDX   0  A1,%D,2 
 3#FB          SRL   0  12   
 3#^2          STO   0  IDNUM(%A)
 3*DL    #NOR
</code>