BOOKSS

(GIN Macro)

Defined in: MACROS JSRG4

Used in: LOADPROG865, TPINS861

BOOKSS.mac.txt

 K6?Q    #MAC  BOOKSS   [JSRAYNER           G4 ONLY  
 K6RB    MBOOKSS1
 K7?2          LDX   0  %A   
 K7QL          ADX   0  EBSWAPSP 
 K8==          TXL   0  EFSWAPSP 
 K8PW          BCS      MBOOKSS2 
 K99G          BSON     G4SUDBIT,%B           [EXIT IF NO SUD TO DELETE  
 K9P6          DOWN     PROGDEL,5       [OTHERWISE FREE SUD & TRY AGAIN  
 K=8Q          BRN      MBOOKSS1 
 K=NB    MBOOKSS2
 K?82          STO   0  EBSWAPSP 
 K?ML    #NOR