DELETE ALL

00000000: 01 04 0A 04 0A 00 89 20  33 30 00 37 04 14 00 94  |....... 30.7....|
00000010: 22 40 31 3A 44 45 4C 45  54 45 20 41 4C 4C 22 2C  |"@1:DELETE ALL",|
00000020: 38 20 3A 95 22 31 3A 44  45 4C 45 54 45 20 41 4C  |8 :."1:DELETE AL|
00000030: 4C 22 2C 38 20 3A 80 00  51 04 1E 00 99 22 93 12  |L",8 :..Q...."..|
00000040: 44 49 53 4B 20 44 45 4C  45 54 45 20 41 4C 4C 11  |DISK DELETE ALL.|
00000050: 22 00 90 04 28 00 99 22  4D 4F 44 49 46 49 45 44  |"...(.."MODIFIED|
00000060: 20 46 52 4F 4D 20 41 20  42 55 54 54 45 52 46 49  | FROM A BUTTERFI|
00000070: 45 4C 44 20 4D 41 53 54  45 52 50 49 45 43 45 20  |ELD MASTERPIECE |
00000080: 42 59 20 50 45 54 45 52  20 53 50 45 4E 43 45 52  |BY PETER SPENCER|
00000090: 00 AE 04 32 00 86 20 4C  25 28 32 33 32 29 2C 4E  |...2.. L%(232),N|
000000A0: 24 28 32 33 32 29 2C 54  25 28 32 33 32 29 00 C7  |$(232),T%(232)..|
000000B0: 04 3C 00 85 22 46 52 4F  4D 20 55 4E 49 54 20 20  |.<.."FROM UNIT  |
000000C0: 38 9D 9D 9D 22 3B 46 00  D0 04 46 00 8D 36 32 30  |8...";F...F..620|
000000D0: 00 DA 04 50 00 46 24 B2  44 24 00 E2 04 5A 00 54  |...P.F$.D$...Z.T|
000000E0: B2 38 00 EC 04 64 00 54  24 B2 46 24 00 F2 04 6E  |.8...d.T$.F$...n|
000000F0: 00 8F 00 FB 04 78 00 8D  36 38 30 00 1B 05 82 00  |.....x..680.....|
00000100: A0 31 3A A0 31 35 3A 9F  20 31 35 2C 46 2C 31 35  |.1:.15:. 15,F,15|
00000110: 3A 98 31 35 2C 22 49 22  AA 46 24 00 31 05 8C 00  |:.15,"I".F$.1...|
00000120: 8D 36 35 30 3A 8B 20 45  20 A7 20 90 3A 89 31 33  |.650:. E . .:.13|
00000130: 30 00 5B 05 96 00 99 22  48 4F 4C 44 20 44 4F 57  |0.[...."HOLD DOW|
00000140: 4E 20 27 59 27 20 4F 52  20 27 4E 27 20 4B 45 59  |N 'Y' OR 'N' KEY|
00000150: 20 54 4F 20 53 45 4C 45  43 54 22 00 7C 05 A0 00  | TO SELECT".|...|
00000160: 99 22 50 52 4F 47 52 41  4D 53 20 54 4F 20 42 45  |."PROGRAMS TO BE|
00000170: 20 44 45 4C 45 54 45 44  2E 2E 2E 22 00 8F 05 AA  | DELETED..."....|
00000180: 00 9F 20 31 2C 46 2C 30  2C 22 24 22 AA 46 24 00  |.. 1,F,0,"$".F$.|
00000190: A2 05 B4 00 8D 36 35 30  3A 8B 45 A7 90 3A 89 31  |.....650:.E..:.1|
000001A0: 33 30 00 BF 05 BE 00 4E  B2 30 3A 52 B2 32 35 35  |30.....N.0:R.255|
000001B0: 3A 5A B2 38 39 3A 8D 37  35 30 3A 89 32 31 30 00  |:Z.89:.750:.210.|
000001C0: C8 05 C8 00 8D 37 37 30  00 D7 05 D2 00 4C 25 B2  |.....770.....L%.|
000001D0: 58 AA 59 AC 32 35 36 00  ED 05 DC 00 A1 23 31 2C  |X.Y.256......#1,|
000001E0: 58 24 3A 8B 58 24 B2 22  22 89 34 30 30 00 00 06  |X$:.X$."".400...|
000001F0: E6 00 8B 58 24 B3 B1 C7  28 33 34 29 89 32 32 30  |...X$...(34).220|
00000200: 00 0A 06 F0 00 4E 24 B2  22 22 00 23 06 FA 00 A1  |.....N$."".#....|
00000210: 23 31 2C 58 24 3A 8B 58  24 B2 C7 28 33 34 29 89  |#1,X$:.X$..(34).|
00000220: 32 37 30 00 35 06 04 01  4E 24 B2 4E 24 AA 58 24  |270.5...N$.N$.X$|
00000230: 3A 89 32 35 30 00 4B 06  0E 01 A1 23 31 2C 58 24  |:.250.K....#1,X$|
00000240: 3A 8B 58 24 B2 22 22 89  32 30 30 00 67 06 18 01  |:.X$."".200.g...|
00000250: 58 B2 C6 28 58 24 29 3A  8B 28 58 AF 31 32 37 29  |X..(X$):.(X.127)|
00000260: B2 33 32 89 32 37 30 00  7E 06 22 01 A1 23 31 2C  |.32.270.~."..#1,|
00000270: 58 24 3A 8B 58 24 B3 B1  22 22 89 32 39 30 00 AE  |X$:.X$.."".290..|
00000280: 06 2C 01 8B 20 28 20 58  B3 B1 38 30 AF 58 B3 B1  |.,.. ( X..80.X..|
00000290: 38 33 20 29 20 AF 20 28  20 58 B3 B1 38 32 20 AF  |83 ) . ( X..82 .|
000002A0: 20 58 B3 B1 38 35 20 29  20 89 20 32 30 30 00 C0  | X..85 ) . 200..|
000002B0: 06 36 01 99 4E 24 3B A3  31 38 29 3B C7 28 58 29  |.6..N$;.18);.(X)|
000002C0: 00 CF 06 40 01 50 B2 C2  28 31 35 31 29 AF 52 00  |...@.P..(151).R.|
000002D0: E8 06 4A 01 A1 5A 24 3A  8B 5A 24 B2 22 22 AF 50  |..J..Z$:.Z$."".P|
000002E0: B3 32 35 35 89 33 37 30  00 0E 07 54 01 8B 5A 24  |.255.370...T..Z$|
000002F0: B2 22 59 22 B0 5A 24 B2  22 4E 22 A7 5A B2 C6 28  |."Y".Z$."N".Z..(|
00000300: 5A 24 29 3A 52 B2 32 35  35 3A 89 33 37 30 00 25  |Z$):R.255:.370.%|
00000310: 07 5E 01 8B 5A 24 B2 C7  28 31 33 29 A7 52 B2 30  |.^..Z$..(13).R.0|
00000320: 3A 89 33 37 30 00 2E 07  68 01 89 33 33 30 00 58  |:.370...h..330.X|
00000330: 07 72 01 8B 5A B3 38 30  A7 99 22 91 20 20 20 20  |.r..Z.80..".    |
00000340: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000350: 20 91 22 3A 89 32 30 30  00 7C 07 7C 01 4E B2 4E  | .":.200.|.|.N.N|
00000360: AA 31 3A 4C 25 28 4E 29  B2 4C 25 3A 4E 24 28 4E  |.1:L%(N).L%:N$(N|
00000370: 29 B2 4E 24 3A 54 25 28  4E 29 B2 58 00 85 07 86  |).N$:T%(N).X....|
00000380: 01 89 32 30 30 00 9E 07  90 01 A0 31 3A A0 31 35  |..200......1:.15|
00000390: 3A 99 22 20 2A 20 2A 20  2A 20 2A 20 2A 22 00 A4  |:." * * * * *"..|
000003A0: 07 9A 01 3A 00 AF 07 A4  01 81 4A B2 31 A4 4E 00  |...:......J.1.N.|
000003B0: CF 07 AE 01 4C 25 B2 4C  25 28 4A 29 3A 54 25 B2  |....L%.L%(J):T%.|
000003C0: 54 25 28 4A 29 3A 8B 4C  B1 4C 25 89 34 38 30 00  |T%(J):.L.L%.480.|
000003D0: EB 07 B8 01 99 22 2A 2A  2A 20 4F 55 54 50 55 54  |....."*** OUTPUT|
000003E0: 20 44 49 53 4B 20 46 55  4C 4C 22 00 0B 08 C2 01  | DISK FULL".....|
000003F0: 85 22 44 4F 20 59 4F 55  20 48 41 56 45 20 41 20  |."DO YOU HAVE A |
00000400: 4E 45 57 20 4F 4E 45 22  3B 5A 24 00 1C 08 CC 01  |NEW ONE";Z$.....|
00000410: 8B C6 28 5A 24 29 B3 B1  38 39 A7 80 00 2A 08 D6  |..(Z$)..89...*..|
00000420: 01 8D 36 38 30 3A 89 34  33 30 00 40 08 E0 01 9F  |..680:.430.@....|
00000430: 31 34 2C 46 2C 31 35 3A  9F 31 35 2C 54 2C 31 35  |14,F,15:.15,T,15|
00000440: 00 6E 08 EA 01 99 4E 24  28 4A 29 3B C8 28 22 20  |.n....N$(J);.(" |
00000450: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
00000460: 2C 31 37 AB C3 28 4E 24  28 4A 29 29 29 3B 00 87  |,17..(N$(J)));..|
00000470: 08 F4 01 98 31 35 2C 22  53 22 AA 46 24 AA 22 3A  |....15,"S".F$.":|
00000480: 22 AA 4E 24 28 4A 29 00  92 08 FE 01 4C B2 4C AB  |".N$(J).....L.L.|
00000490: 4C 25 00 AD 08 08 02 8D  36 35 30 3A 8B 45 A7 99  |L%......650:.E..|
000004A0: 20 45 24 3B 45 31 20 3A  89 20 35 36 30 00 BA 08  | E$;E1 :. 560...|
000004B0: 12 02 4E 24 28 4A 29 B2  22 22 00 DA 08 1C 02 8D  |..N$(J).""......|
000004C0: 36 35 30 3A 8B 45 A7 99  20 45 24 3B 45 3B 45 31  |650:.E.. E$;E;E1|
000004D0: 3B 45 32 20 3A 89 20 35  36 30 00 E3 08 26 02 99  |;E2 :. 560...&..|
000004E0: 22 91 22 00 F5 08 30 02  A0 34 3A A0 33 3A A0 31  |"."...0..4:.3:.1|
000004F0: 35 3A A0 31 34 00 FC 08  3A 02 82 4A 00 06 09 44  |5:.14...:..J...D|
00000500: 02 8D 20 36 38 30 00 2A  09 4E 02 58 B2 B8 28 30  |.. 680.*.N.X..(0|
00000510: 29 3A 85 22 41 4E 4F 54  48 45 52 20 44 49 53 4B  |):."ANOTHER DISK|
00000520: 20 52 45 41 44 59 22 3B  5A 24 00 3E 09 58 02 8B  | READY";Z$.>.X..|
00000530: C6 28 5A 24 29 B2 38 39  20 89 20 31 32 30 00 44  |.(Z$).89 . 120.D|
00000540: 09 62 02 80 00 59 09 6C  02 85 22 44 52 49 56 45  |.b...Y.l.."DRIVE|
00000550: 20 20 30 9D 9D 9D 22 3B  44 00 69 09 76 02 8B 44  |  0...";D.i.v..D|
00000560: AC 44 B3 B1 44 89 36 32  30 00 7A 09 80 02 44 24  |.D..D.620.z...D$|
00000570: B2 C7 28 44 AA 34 38 29  3A 8E 00 8D 09 8A 02 84  |..(D.48):.......|
00000580: 31 35 2C 45 2C 45 24 2C  45 31 2C 45 32 00 AD 09  |15,E,E$,E1,E2...|
00000590: 94 02 8B 45 B2 30 A7 45  B2 28 53 54 20 AF 20 31  |...E.0.E.(ST . 1|
000005A0: 39 31 29 3A 45 24 B2 22  2A 53 54 2A 22 00 B3 09  |91):E$."*ST*"...|
000005B0: 9E 02 8E 00 B9 09 A8 02  8F 00 C7 09 B2 02 9F 20  |............... |
000005C0: 31 35 2C 54 2C 31 35 00  ED 09 BC 02 98 31 35 2C  |15,T,15......15,|
000005D0: 22 49 22 AA 54 24 3A 9F  31 2C 54 2C 30 2C 22 24  |"I".T$:.1,T,0,"$|
000005E0: 22 AA 54 24 AA 22 3A 21  23 24 25 26 22 00 00 0A  |".T$.":!#$%&"...|
000005F0: C6 02 8D 36 35 30 3A 8B  45 A7 90 3A 89 36 38 30  |...650:.E..:.680|
00000600: 00 09 0A D0 02 8D 37 35  30 00 2E 0A DA 02 4C B2  |......750.....L.|
00000610: 58 AA 59 AC 32 35 36 3A  99 22 28 22 3B 4C 3B 22  |X.Y.256:."(";L;"|
00000620: 42 4C 4F 43 4B 53 20 46  52 45 45 20 29 22 00 3B  |BLOCKS FREE )".;|
00000630: 0A E4 02 A0 31 3A A0 31  35 3A 8E 00 55 0A EE 02  |....1:.15:..U...|
00000640: A1 23 31 2C 58 24 2C 58  24 2C 58 24 2C 58 24 2C  |.#1,X$,X$,X$,X$,|
00000650: 58 24 2C 58 24 00 6C 0A  F8 02 A1 23 31 2C 58 24  |X$,X$.l....#1,X$|
00000660: 3A 8B 58 24 B3 B1 22 22  89 37 36 30 00 7D 0A 02  |:.X$.."".760.}..|
00000670: 03 A1 23 31 2C 58 24 2C  58 24 2C 58 24 00 94 0A  |..#1,X$,X$,X$...|
00000680: 0C 03 58 B2 C3 28 58 24  29 3A 8B 58 A7 58 B2 C6  |..X..(X$):.X.X..|
00000690: 28 58 24 29 00 B2 0A 16  03 A1 23 31 2C 58 24 3A  |(X$)......#1,X$:|
000006A0: 59 B2 C3 28 58 24 29 3A  8B 59 A7 59 B2 C6 28 58  |Y..(X$):.Y.Y..(X|
000006B0: 24 29 00 B8 0A 20 03 8E  00 00 00                 |$)... .....     |

....... 30.7...."@1:DELETE ALL",8 :."1:D
ELETE ALL",8 :..Q...."..DISK DELETE ALL.
"...(.."MODIFIED FROM A BUTTERFIELD MAST
ERPIECE BY PETER SPENCER...2.. L%(232),N
$(232),T%(232).G.<.."FROM UNIT  8...";F.
P.F..620.Z.P.F$.D$...Z.T.8...D.T$.F$...N
.....X..680..... 1: 15:. 15,F,15:.15,"I"
.F$.1....650:. E . .:.130.[...."HOLD DOW
N 'Y' OR 'N' KEY TO SELECT".|. .."PROGRA
MS TO BE DELETED..."...... 1,F,0,"$".F$.
.....650:.E..:.130.....N.0:R.255:Z.89:.7
50:.210.H.H..770.W.R.L%.X.Y.256......#1,
X$:.X$."".400......X$..G(34).220.....N$.
"".#....#1,X$:.X$.G(34).270.5...N$.N$.X$
:.250.K....#1,X$:.X$."".200.G...X.F(X$):
.(X.127).32.270.~."..#1,X$:.X$.."".290..
.,.. ( X..80.X..83 ) . ( X..82 . X..85 )
 . 200...6..N$;.18);G(X).O.@.P.B(151).R.
..J..Z$:.Z$."".P.255.370...T..Z$."Y".Z$.
"N".Z.F(Z$):R.255:.370.%.^..Z$.G(13).R.0
:.370...H..330.X.R..Z.80..".            
         .":.200.|.|.N.N.1:L%(N).L%:N$(N
).N$:T%(N).X......200..... 1: 15:." * * 
* * *".....:......J.1.N.O...L%.L%(J):T%.
T%(J):.L.L%.480......"*** OUTPUT DISK FU
LL"...B.."DO YOU HAVE A NEW ONE";Z$...L.
.F(Z$)..89...*.V..680:.430.@....14,F,15:
.15,T,15.N....N$(J);H("                "
,17.C(N$(J)));......15,"S".F$.":".N$(J).
....L.L.L%......650:.E.. E$;E1 :. 560...
..N$(J)."".Z....650:.E.. E$;E;E1;E2 :. 5
60...&.."."...0. 4: 3: 15: 14...:..J...D
.. 680.*.N.X..(0):."ANOTHER DISK READY";
Z$.>.X..F(Z$).89 . 120.D.B...Y.L.."DRIVE
  0...";D.I.V..D.D..D.620.Z...D$.G(D.48)
:.......15,E,E$,E1,E2......E.0.E.(ST . 1
91):E$."*ST*".............G.... 15,T,15.
.....15,"I".T$:.1,T,0,"$".T$.":!#$%&"...
F..650:.E..:.680...P..750...Z.L.X.Y.256:
."(";L;"BLOCKS FREE )".;... 1: 15:..U...
.#1,X$,X$,X$,X$,X$,X$.L....#1,X$:.X$..""
.760.}....#1,X$,X$,X$.....X.C(X$):.X.X.F
(X$)......#1,X$:Y.C(X$):.Y.Y.F(X$)... ..
...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL