RVHOOK [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

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

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

**Used in:** [[george:source:CLEAN867|CLEAN867]], [[george:source:COMPRO867|COMPRO867]], [[george:source:CONTINUE867|CONTINUE867]]

<code - RVHOOK.mac.txt>
 2^=2    #   
 2^PL    #MAC RVHOOK 
 329=          MODD  LDX   0  EXT+9,%B,FX2   
 32NW          SLL   0  11   
 338G          BPZ   0  MRVHOOK1           [J IF NOT HOOK-STARTED
 33N6          FJOCA    1,FX2
 347Q          SPRIVOFF JSSTART,1          [UNSET SYSTEM STARTED STATUS  
 34MB    MRVHOOK1
 3572          NGN   0  8
 35LL          SLC   0  12                 [ #77707777   
 366=          MODD  ANDS  0  EXT+9,%B,FX2   
 36KW          LDN   0  7
 375G          SLC   0  12                 [ #00070000   
 37K6          MOD   ANDX  0  CPBPROGLEV,%A  
 384Q          MODD  ORS   0  EXT+9,%B,FX2   
 38JB          SLL   0  11   
 3942          BPZ   0  MRVHOOK2           [J IF NOT HOOK-STARTED
 39HL          FJOCA    1,FX2
 3=3=          SPRIVON  JSSTART,1          [SET SYSTEM STARTED STATUS
 3=GW    MRVHOOK2
 3?2G          LDX   1  FX1  
 3?G6    #NOR
</code>