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

**Defined in:** [[george:source:MACROS_IH|MACROS IH]]

**Used in:** [[george:source:COMHOOK867|COMHOOK867]], [[george:source:DOMONOP867|DOMONOP867]]

<code - SETHOOK.mac.txt>
 2CMG    #   
 2D76    #MAC SETHOOK
 2DLQ          LDN   0  4
 2F6B          SLC   0  12   
 2FL2          MODD  ORS   0  EXT+9,%A,FX2   
 2G5L          MODD  LDX   0  EXT+9,%A,FX2   
 2GK=          SLL   0  11   
 2H4W          BPZ   0  MSETHOOK1      [ J IF NOT HOOK-STARTED   
 2HJG          FJOCA    1,FX2
 2J46          SPRIVON  JSSTART,1
 2JHQ          LDX   1  FX1  
 2K3B    MSETHOOK1   
 2KH2    #NOR
</code>