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

**Defined in:** [[george:source:MACROS_EWDAS|MACROS EWDAS]]

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

<code - PHOLD.mac.txt>
 Q=*Q    #   
 Q=TB    [???                                PHOLD   
 Q?*2    #                                   *****   
 Q?SL    #MAC  PHOLD                        [%A=UNIT NO. %B-IPB FAIL %C - G.DOWN 
 Q##=    #   
 Q#RW          LDX   0  %A   
 Q*?G          SMO      FX2  
 Q*R6          STO   0  ACOMMUNE9
 QB=Q          DOWN  TWINSETB,5  
 QBQB          BRN      %B   
 QC=2          BRN      %C   
 QCPL    #NOR
</code>