{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: DRUMMASH)}}
====== DRUMMASH ======
(GIN Macro)
**Defined in:** [[george:source:MISCMACS|MISCMACS]]
**Used in:**
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