DRUMMASH

(GIN Macro)

Defined in: MISCMACS

Used in:

DRUMMASH.mac.txt
 58H=    [??? DRUMMASH SECT DIAG FGN 4 DOC   
 592W    #MAC  DRUMMASH                     [M.C.D. MANN 
 59GG    [   
 5=26    [   
 5=FQ    [     **************
 5=^B    [     *  DRUMMASH  *
 5?F2    [     **************
 5?YL    [   
 5#D=    [   
 5#XW                                       [CREATED ON DRUM 
 5*CG          FSDESC
 5*X6    #STR  EDS30,%A  
 5BBQ    #SKI
 5BWB          FSFILE   3,6,DASTORE30
 5CB2    #STR  EDS30,%A  
 5CTL          FSFILE   3,6,DASTORE  
 5D*=          FSFILE   4,9,SWAPFILE,,SWAP   
 5DSW          ENDESC
 5F#G    #INT
 5FS6    #ORD
 5G?Q    R     9:#400,+0,12HSWAPFILE 
 5GRB    #STR  %B
 5H?2          +%B*1024                     [SPECIFIED SWAPFILE SIZE 
 5HQL    #STR  %B
 5J==    #SKI
 5JPW          +150000                      [DEFAULT SWAPFILE SIZE   
 5K9G    Z     #7777777  
 5KP6    MESS  35:MESSY  
 5L8Q    MESSY 4H ONL,#71202020,#20202053,23H ALLOCATED FOR SWAPFILE 
 5LNB    NASM  22:NASWD  
 5M82    NASWD 22HRUN #DRUM FOR SWAPFILE 
 5MML    XA    1024000   
 5N7=    XB    +MESSY+1.3
 5NLW    P     PERI  2  R
 5P6G          LDX   1  R+1  
 5PL6          BNG   1  MORE 
 5Q5Q          EXIT  0  0
 5QKB    MORE  ANDX  1  Z
 5R52          BZE   1  NASTY
 5RJL          STO   1  R+5  
 5S4=          PERI  2  R
 5SHW          LDX   1  R+1  
 5T3G          BNG   1  NASTY
 5TH6          LDX   1  R+5  
 5W2Q          LDN   2  0
 5WGB          DVR   1  XA   
 5X22          LDCT  3  #200 
 5XFL          LDX   1  XB   
 5X^=          LDN   4  3
 5YDW          MODE     1
 5YYG    W     CBD   2  0(1) 
 5^D6          BCHX  1  £
 5^XQ          BCT   4  W
 62CB          MODE     0
 62X2          DISTY    MESS 
 63BL          EXIT  0  0
 63W=    NASTY DISTY    NASM 
 64*W          EXIT  0  0
 64TG    #JUM  P 
 65*6    #EXT
 65SQ    #NOR