0 'DSKMGR v3.02 (c)1986 J.K. Heilman 10 M=PEEK(64642) :POKE 64208,M :IF M<1 THEN MAXFILES=1 11 CLEAR 256,60700 :CK=0 :ON ERROR GOTO 80 :M=PEEK(64208) 15 FOR PC=60700 TO 62799 16 READ A :POKE PC,A :CK=CK+A 17 PRINT@0,"PC ="PC :NEXT PC 18 READ A 19 IF CK<>A THEN PRINT"Checksum Error!" :END 20 CLS :PRINT@11,"***USER OPTIONS***" :PRINT 22 PRINT"Self-Clearing ?"; :GOSUB 90 23 IF R=78 THEN POKE 60950,151 :POKE 60951,87 24 PRINT"Sound ?"; :GOSUB 90 25 IF R=78 THEN POKE 60873,0 :POKE 60874,0 :POKE 60875,0 :POKE 61110,201 :POKE 61111,0 :POKE 61112,0 30 PRINT "High-Speed ?"; :GOSUB 90 32 IF R=78 THEN POKE 61073,56 50 OPEN "DRIVER" FOR OUTPUT AS 1 :PRINT#1,"1 CLEAR0,60700"CHR$(58)"RUNM"CHR$(34)"DSKMGR" :CLOSE :MAXFILES=M 60 SAVEM"DSKMGR",60700,62799,60700 :MENU 80 PRINT "Error #" ERR "in Line" ERL :END 90 PRINT" (Y or N)"; :R$=INPUT$(1) :R=ASC(R$) AND 223 :PRINT R$ :RETURN 100 DATA 205,121,90,33,101,245,17,91,246,62,6,205,98,90,33,255,255,34,122,246,35,57,34,90,245,205,85,238,42,90,245,249,205,63,66,175,50,173,250,205,49,66,6,54,33,161,253,34,215,253 101 DATA 54,255,35,5,194,78,237,104,14,192,205,112,89,14,128,205,112,89,14,160,205,112,89,125,61,50,239,253,245,254,18,202,141,237,205,201,89,229,33,26,91,205,88,90,225,44,125,254,19,194 102 DATA 112,237,241,250,141,237,175,50,238,253,205,224,244,33,7,24,205,124,66,205,172,126,33,8,1,205,124,66,33,105,238,205,88,90,33,1,28,205,124,66,33,92,238,205,88,90,175,48,50,170 103 DATA 255,205,112,93,205,66,114,218,221,237,254,13,202,219,237,254,32,218,38,238,202,36,238,205,41,66,195,179,237,202,56,237,205,160,238,205,232,238,195,56,237,62,2,245,33,56,237,34,82,246 104 DATA 241,33,207,237,229,33,0,0,57,34,92,245,61,250,53,239,202,24,242,61,61,250,235,240,202,29,245,61,61,250,128,244,202,239,244,61,202,169,244,61,194,201,237,205,70,238,33,24,238,195 105 DATA 58,8,49,58,167,48,44,183,82,65,77,58,186,0,62,28,245,58,238,253,95,241,214,28,1,179,237,197,248,1,195,88,197,202,235,88,61,202,226,88,193,61,202,219,88,195,182,88,33,101 106 DATA 245,126,254,77,218,230,23,35,22,2,195,230,23,33,145,238,55,195,230,23,68,83,75,77,71,82,32,118,51,46,48,50,0,76,105,115,116,32,76,111,97,100,32,83,97,118,101,32,83,118 107 DATA 97,108,32,69,114,97,115,32,75,105,108,108,32,70,114,109,116,32,77,101,110,117,0,57,56,78,49,68,0,38,46,43,124,181,194,153,238,201,245,205,229,244,241,33,3,239,79,126,35,167 108 DATA 194,169,238,13,194,169,238,205,88,90,195,41,66,62,3,33,62,2,33,62,1,33,62,4,33,62,5,33,62,6,33,62,7,33,62,8,33,62,9,33,62,10,33,62,11,33,62,12,33,62 109 DATA 13,42,92,245,249,111,175,48,181,201,58,58,246,254,4,200,33,44,239,205,88,90,33,75,95,205,88,90,33,3,0,205,88,90,195,47,95,0,79,107,32,0,78,82,0,67,77,0,65,66 110 DATA 0,70,70,0,65,69,0,79,77,0,87,80,0,72,84,0,73,79,0,78,68,0,66,70,0,70,69,0,32,69,114,114,111,114,33,32,0,205,101,239,62,1,50,108,245,79,205,49,66,205 111 DATA 145,240,6,10,197,205,107,240,193,14,2,5,194,70,239,33,8,1,205,124,66,33,199,240,205,131,241,14,2,202,62,239,195,36,242,205,151,238,205,221,239,33,7,0,205,165,239,205,92,118 112 DATA 205,159,239,48,205,109,109,202,188,238,79,33,136,245,205,126,109,194,185,238,119,35,13,194,130,239,58,136,245,254,18,200,254,67,194,209,238,1,49,77,205,104,244,205,216,239,195,151,238,34 113 DATA 106,245,33,106,245,229,126,35,134,71,126,245,35,167,202,192,239,79,120,134,35,13,194,185,239,71,120,47,87,1,90,90,205,104,244,193,4,4,225,126,205,218,239,35,5,194,205,239,122,33 114 DATA 62,13,205,50,110,219,187,230,32,200,195,188,238,33,106,245,205,92,118,229,205,20,240,205,20,240,79,205,20,240,65,121,167,202,3,240,205,20,240,13,194,252,239,225,4,4,175,48,134,35 115 DATA 5,194,8,240,47,190,194,185,238,201,205,221,239,205,126,109,218,194,238,194,185,238,119,35,201,33,136,245,205,232,239,58,138,245,167,201,205,101,239,14,0,97,46,70,34,132,245,33,0,26 116 DATA 205,165,239,205,35,240,79,58,136,245,254,18,121,192,230,240,202,191,238,254,16,202,197,238,254,64,202,212,238,254,80,202,206,238,254,96,202,203,238,254,112,202,215,238,195,209,238,205,51,240 117 DATA 175,50,150,245,33,138,245,182,202,154,240,205,88,90,58,58,246,245,42,163,245,124,101,111,205,212,57,241,198,7,254,30,218,150,240,205,34,66,62,3,50,58,246,201,205,34,66,58,165,245 118 DATA 111,38,0,17,128,0,205,37,55,205,212,57,62,48,231,33,152,127,205,88,90,33,8,1,205,124,66,33,199,240,205,131,241,202,56,237,195,36,242,78,97,109,101,32,111,110,32,100,105,115 119 DATA 107,58,0,58,238,253,33,161,253,17,2,0,183,202,231,240,25,61,195,222,240,205,228,90,201,205,213,240,34,96,245,205,190,241,120,177,202,221,238,197,33,199,240,205,123,241,218,250,240,42 120 DATA 96,245,202,15,241,17,133,246,195,20,241,84,93,19,19,19,1,9,0,9,205,232,243,205,46,240,167,202,50,241,205,72,244,202,56,237,205,28,244,205,49,240,167,194,200,238,62,1,205,250 121 DATA 241,42,96,245,205,227,90,193,175,50,94,245,17,108,245,126,18,35,19,11,58,94,245,60,50,94,245,245,120,177,202,94,241,241,254,128,218,69,241,254,241,229,103,46,4,213,197,205,32,244 122 DATA 193,209,225,120,177,194,62,241,205,118,241,195,191,238,46,2,195,30,244,17,7,1,235,205,124,66,235,205,93,66,205,88,90,205,68,70,218,194,238,33,187,241,229,33,133,246,126,79,167,200 123 DATA 254,59,216,254,97,218,170,241,254,123,210,170,241,230,223,119,35,126,167,200,254,58,194,181,241,55,201,254,32,216,195,157,241,12,13,201,229,205,227,90,209,26,230,32,194,232,241,26,230,64 124 DATA 194,220,241,229,205,243,5,193,125,145,79,124,152,71,11,201,62,26,1,255,255,190,35,3,194,225,241,201,26,230,16,194,197,238,35,35,78,35,70,3,3,3,3,3,3,201,50,108,245,33 125 DATA 1,1,205,165,239,205,35,240,200,195,74,240,78,97,109,101,32,102,111,114,32,82,65,77,58,0,33,199,240,205,123,241,218,24,242,202,24,242,205,203,243,194,218,238,205,46,240,167,202,197 126 DATA 238,33,10,242,205,123,241,218,49,242,17,133,246,194,67,242,17,108,245,33,147,252,205,4,244,42,115,245,76,69,125,50,94,245,205,169,32,202,99,242,229,213,205,72,244,209,225,200,205,250 127 DATA 242,42,163,245,124,101,111,34,96,245,205,49,243,209,17,191,242,213,34,98,245,34,216,250,229,62,3,205,250,241,33,3,0,205,165,239,205,229,239,33,106,245,126,35,35,78,205,70,240,225 128 DATA 58,107,245,79,17,108,245,26,119,19,35,229,42,96,245,43,34,96,245,124,181,225,202,184,242,13,194,155,242,229,34,216,250,195,128,242,60,50,95,245,195,238,242,50,95,245,33,244,242,229 129 DATA 58,94,245,254,67,202,238,242,218,223,242,42,96,245,68,77,42,216,250,205,159,107,195,238,242,42,98,245,205,243,5,35,235,42,206,250,223,196,52,33,205,70,33,205,118,241,58,95,245,195 130 DATA 210,237,58,94,245,214,68,202,191,31,60,202,217,31,60,195,23,32,205,39,243,235,42,174,251,9,34,174,251,235,201,235,42,176,251,229,235,205,39,243,235,225,34,176,251,235,201,205,109,107 131 DATA 208,205,118,241,195,203,238,205,34,78,205,70,33,42,178,251,34,180,251,34,182,251,33,175,249,1,11,0,9,126,60,202,203,238,61,250,70,243,229,58,94,245,214,68,202,153,243,60,202,122 132 DATA 243,60,194,218,238,14,2,205,177,243,42,154,249,205,10,243,205,186,243,62,128,235,225,213,27,205,57,34,225,201,79,205,177,243,42,176,251,205,23,243,205,186,243,229,35,35,11,11,11,11 133 DATA 11,11,113,35,112,62,160,225,195,113,243,14,1,205,177,243,42,174,251,205,39,243,205,186,243,229,9,43,54,26,62,192,195,149,243,6,0,42,96,245,9,68,77,201,197,229,175,119,35,11 134 DATA 120,177,194,188,243,34,206,250,225,193,201,17,133,246,98,107,1,0,6,126,12,254,46,202,229,243,120,185,216,126,35,167,194,211,243,60,201,54,0,35,78,35,70,197,33,108,245,205,4,244 135 DATA 54,46,35,193,113,35,112,35,14,15,54,32,35,13,194,252,243,201,1,252,243,197,14,6,26,167,200,254,46,200,254,32,200,19,119,35,13,194,10,244,193,201,46,5,38,0,205,165,239,205 136 DATA 35,240,200,195,74,240,70,105,108,101,32,101,120,105,115,116,115,46,32,32,0,80,114,111,99,101,101,100,63,32,40,89,47,78,41,0,205,229,244,33,42,244,17,57,244,205,88,90,235,205 137 DATA 88,90,205,203,18,205,233,15,254,78,200,254,89,194,88,244,167,201,120,205,218,239,121,195,218,239,70,105,108,101,32,116,111,32,100,101,108,101,116,101,58,0,33,112,244,205,123,241,218,128 138 DATA 244,202,128,244,205,203,243,194,218,238,205,46,240,167,202,197,238,205,229,244,33,23,242,205,78,244,200,205,28,244,195,191,238,205,229,244,33,196,244,205,78,244,202,56,237,205,101,239,33,6 139 DATA 0,205,165,239,205,229,239,195,191,238,70,79,82,77,65,84,32,119,105,108,108,32,101,114,97,115,101,32,100,105,115,107,33,32,0,58,238,253,111,205,229,89,201,33,7,1,205,124,66,205 140 DATA 93,66,201,205,229,244,33,57,244,205,85,244,33,56,237,229,200,205,213,240,229,175,50,167,252,205,34,78,205,70,33,225,205,204,32,230,32,194,217,31,126,230,64,202,23,32,195,191,31,33 141 DATA 53,245,229,33,0,0,57,34,92,245,205,221,244,175,50,238,253,205,221,244,205,235,240,254,1,194,210,237,205,221,244,58,238,253,33,239,253,60,190,218,44,245,202,44,245,62,1,195,210,237 142 DATA 286936