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

**Defined in:** [[george:source:MACROSIPC|MACROSIPC]]

**Used in:** [[george:source:GETNO865|GETNO865]], [[george:source:IPCONA864|IPCONA864]], [[george:source:IPQUAKE83|IPQUAKE83]]

<code - STOPHANGER.mac.txt>
 *9KS ...[??? STOPHANG SECT COMM FGN 19 DOC  
 *9TL    #   
 *=*=    #MAC  STOPHANGER
 *=SW          LDX   0  %A   
 *?#G          LDX   2  FX2  
 *?S6          STO   0  ACOMMUNE1(2) 
 *#?Q          LDX   1  FX2  
 *#RB    MSTHR FINDACTFB 1,1,IPCA,HANGER,,FPTR   
 **?2          LDX   0  HLINKIPC(1)  
 **QL          TXU   0  ACOMMUNE1(2) 
 *B==          BCS      MSTHR
 *BPW          LDN   0  #2000
 *C9G          ANDX  0  ATYPE(1) 
 *CP6          BZE   0  MSTHRX   
 *D8Q          LDN   0  1
 *DNB          ADJUSTLK 1
 *F82          FON      ATTRIBUTE
 *FML    MSTHRX LDX  1  FX1  
 *G7=    #NOR
</code>