DISK PURGE
FILE INFORMATION
FILENAME(S): DISK PURGE
FILE TYPE(S): PRG
FILE SIZE: 1.2K
FIRST SEEN: 2025-10-19 22:48:32
APPEARS ON: 6 disk(s)
FILE HASH
eee07fb6e381e9b26650bb45f88e5bd706703610ab2f919d7e11380f2e520982
FOUND ON DISKS (6 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| M M UTILITY | DISK PURGE | PRG | Radd Maxx | 19 | 4 | DOWNLOAD FILE |
| GAZETTE AUG84 | DISK PURGE | PRG | Xii | 14 | 5 | DOWNLOAD FILE |
| MANDATORY DS | DISK PURGE | PRG | Sailor, Ganheden | 14 | 5 | DOWNLOAD FILE |
| DISK 41 2 | DISK PURGE | PRG | Curtcool, Frank | 27 | 1 | DOWNLOAD FILE |
| HJ LPEDISK A4 2 | DISK PURGE | PRG | Curtcool, Frank | 17 | 17 | DOWNLOAD FILE |
| GAZETTE AUG 84 | DISK PURGE | PRG | DuncanTwain | 14 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 1E 00 8F 20 46 4F 52 20 34 30 34 30 |....... FOR 4040|
00000010: 2F 32 30 33 31 2F 31 35 34 30 2F 31 35 34 31 00 |/2031/1540/1541.|
00000020: 34 08 28 00 99 20 22 93 12 44 49 53 4B 20 50 55 |4.(.. "..DISK PU|
00000030: 52 47 45 22 00 56 08 32 00 99 3A 99 22 57 48 49 |RGE".V.2..:."WHI|
00000040: 43 48 20 44 52 49 56 45 20 28 30 2F 31 29 20 3F |CH DRIVE (0/1) ?|
00000050: 12 20 92 9D 22 3B 00 7B 08 3C 00 A1 20 44 52 24 |. ..";.{.<.. DR$|
00000060: 3A 8B 20 44 52 24 B3 B1 22 30 22 20 AF 20 44 52 |:. DR$.."0" . DR|
00000070: 24 B3 B1 22 31 22 20 A7 20 36 30 00 8E 08 46 00 |$.."1" . 60...F.|
00000080: 99 20 44 52 24 3A 44 B2 C5 28 44 52 24 29 00 AD |. DR$:D..(DR$)..|
00000090: 08 50 00 44 52 24 B2 20 22 49 22 AA 44 52 24 3A |.P.DR$. "I".DR$:|
000000A0: 9F 20 31 35 2C 38 2C 31 35 2C 44 52 24 00 B7 08 |. 15,8,15,DR$...|
000000B0: 5A 00 8D 20 34 35 30 00 CD 08 64 00 9F 20 31 2C |Z.. 450...d.. 1,|
000000C0: 38 2C 33 2C 22 23 22 3A 8D 20 34 36 30 00 EF 08 |8,3,"#":. 460...|
000000D0: 6E 00 99 3A 99 20 22 50 52 45 53 53 27 12 59 92 |n..:. "PRESS'.Y.|
000000E0: 27 54 4F 20 44 45 4C 20 46 49 4C 45 22 3A 99 00 |'TO DEL FILE":..|
000000F0: FB 08 78 00 5A 24 B2 C7 28 30 29 00 08 09 82 00 |..x.Z$..(0).....|
00000100: 54 B2 31 38 3A 53 B2 31 00 1D 09 8C 00 98 31 35 |T.18:S.1......15|
00000110: 2C 22 55 31 3A 22 33 3B 44 3B 54 3B 53 00 34 09 |,"U1:"3;D;T;S.4.|
00000120: 96 00 98 31 35 2C 22 42 2D 50 3A 22 33 3B 32 AA |...15,"B-P:"3;2.|
00000130: 33 32 AC 52 00 4F 09 A0 00 A1 23 31 2C 41 24 3A |32.R.O....#1,A$:|
00000140: 8B 20 41 24 B2 22 22 20 A7 20 41 24 B2 5A 24 00 |. A$."" . A$.Z$.|
00000150: 65 09 AA 00 8B 20 C6 28 41 24 29 B3 31 32 39 20 |e.... .(A$).129 |
00000160: A7 20 32 37 30 00 7E 09 B4 00 81 20 4B B2 35 AA |. 270.~.... K.5.|
00000170: 33 32 AC 52 20 A4 20 32 30 AA 33 32 AC 52 00 90 |32.R . 20.32.R..|
00000180: 09 BE 00 98 31 35 2C 22 42 2D 50 3A 22 33 3B 4B |....15,"B-P:"3;K|
00000190: 00 B3 09 C8 00 A1 23 31 2C 41 24 3A 8B 20 41 24 |......#1,A$:. A$|
000001A0: B2 22 22 20 A7 20 99 22 12 20 92 22 3B 3A 89 20 |."" . .". .";:. |
000001B0: 32 32 30 00 BD 09 D2 00 99 20 41 24 3B 00 C3 09 |220...... A$;...|
000001C0: DC 00 82 00 DB 09 E6 00 99 20 2C 2C 22 50 55 52 |......... ,,"PUR|
000001D0: 47 45 20 3F 20 12 20 92 9D 22 3B 00 FB 09 F0 00 |GE ? . ..";.....|
000001E0: A1 41 24 3A 8B 41 24 B3 B1 22 59 22 20 AF 20 41 |.A$:.A$.."Y" . A|
000001F0: 24 B3 B1 22 4E 22 20 A7 32 34 30 00 04 0A FA 00 |$.."N" .240.....|
00000200: 99 20 41 24 00 19 0A 04 01 8B 20 41 24 B2 22 59 |. A$...... A$."Y|
00000210: 22 20 A7 20 8D 20 33 36 30 00 2F 0A 0E 01 52 B2 |" . . 360./...R.|
00000220: 52 AA 31 3A 8B 20 52 B3 38 20 A7 20 31 34 30 00 |R.1:. R.8 . 140.|
00000230: 41 0A 18 01 98 31 35 2C 22 42 2D 50 3A 22 33 3B |A....15,"B-P:"3;|
00000240: 30 00 5A 0A 22 01 A1 23 31 2C 41 24 3A 8B 41 24 |0.Z."..#1,A$:.A$|
00000250: B2 22 22 20 A7 41 24 B2 5A 24 00 8C 0A 2C 01 54 |."" .A$.Z$...,.T|
00000260: B2 C6 28 41 24 29 3A 8B 20 54 B2 30 20 A7 20 99 |..(A$):. T.0 . .|
00000270: 3A 99 20 22 45 4E 44 20 4F 46 20 44 49 52 45 43 |:. "END OF DIREC|
00000280: 54 4F 52 59 2E 22 3A 89 20 34 30 30 00 9E 0A 36 |TORY.":. 400...6|
00000290: 01 98 31 35 2C 22 42 2D 50 3A 22 33 3B 31 00 B6 |..15,"B-P:"3;1..|
000002A0: 0A 40 01 A1 23 31 2C 41 24 3A 8B 41 24 B2 22 22 |.@..#1,A$:.A$.""|
000002B0: A7 41 24 B2 5A 24 00 EA 0A 4A 01 53 B2 C6 28 41 |.A$.Z$...J.S..(A|
000002C0: 24 29 3A 99 3A 99 20 22 2A 2A 2A 20 4E 45 58 54 |$):.:. "*** NEXT|
000002D0: 20 54 52 41 43 4B 3A 20 22 3B 3A 4E 55 B2 54 3A | TRACK: ";:NU.T:|
000002E0: 8D 35 32 30 3A 99 20 4E 24 3B 00 1F 0B 54 01 99 |.520:. N$;...T..|
000002F0: 20 A3 32 30 29 3B 22 4E 45 58 54 20 53 45 43 54 | .20);"NEXT SECT|
00000300: 4F 52 3A 20 22 3B 3A 4E 55 B2 53 3A 8D 20 35 32 |OR: ";:NU.S:. 52|
00000310: 30 3A 99 20 4E 24 3B 22 20 2A 2A 2A 22 3A 99 00 |0:. N$;" ***":..|
00000320: 2C 0B 5E 01 52 B2 30 3A 89 31 34 30 00 45 0B 68 |,.^.R.0:.140.E.h|
00000330: 01 98 31 35 2C 22 42 2D 50 3A 22 33 3B 35 AA 33 |..15,"B-P:"3;5.3|
00000340: 32 AC 52 AB 33 00 52 0B 72 01 98 31 2C C7 28 30 |2.R.3.R.r..1,.(0|
00000350: 29 3B 00 67 0B 7C 01 98 31 35 2C 22 55 32 3A 22 |);.g.|..15,"U2:"|
00000360: 33 3B 44 3B 54 3B 53 00 72 0B 86 01 8D 34 36 30 |3;D;T;S.r....460|
00000370: 3A 8E 00 7A 0B 90 01 A0 20 31 00 97 0B 95 01 99 |:..z.... 1......|
00000380: 20 22 56 41 4C 49 44 41 54 45 20 44 49 53 4B 20 | "VALIDATE DISK |
00000390: 59 20 4F 52 20 4E 22 00 AD 0B 96 01 A1 20 56 24 |Y OR N"...... V$|
000003A0: 3A 8B 20 56 24 B2 22 59 22 A7 34 31 30 00 BE 0B |:. V$."Y".410...|
000003B0: 97 01 8B 20 56 24 B2 22 22 A7 20 34 30 36 00 C8 |... V$."". 406..|
000003C0: 0B 98 01 A0 31 35 3A 80 00 E4 0B 9A 01 99 3A 99 |....15:.......:.|
000003D0: 20 22 12 56 41 4C 49 44 41 54 49 4E 47 20 44 49 | ".VALIDATING DI|
000003E0: 53 4B 92 22 00 F6 0B A4 01 98 31 35 2C 28 22 56 |SK."......15,("V|
000003F0: 22 AA 44 52 24 29 00 04 0C AE 01 8D 34 36 30 3A |".DR$)......460:|
00000400: A0 20 31 35 00 0A 0C B8 01 80 00 22 0C C2 01 8F |. 15......."....|
00000410: 20 43 48 45 43 4B 20 44 49 53 4B 20 53 54 41 54 | CHECK DISK STAT|
00000420: 55 53 00 37 0C CC 01 84 31 35 2C 45 52 2C 45 52 |US.7....15,ER,ER|
00000430: 24 2C 54 52 2C 53 45 00 46 0C D6 01 8B 20 45 52 |$,TR,SE.F.... ER|
00000440: B2 30 20 A7 20 8E 00 53 0C E0 01 A0 20 31 35 3A |.0 . ..S.... 15:|
00000450: A0 20 31 00 6C 0C EA 01 99 3A 99 20 22 11 44 49 |. 1.l....:. ".DI|
00000460: 53 4B 20 45 52 52 4F 52 21 20 22 3B 00 7F 0C F4 |SK ERROR! ";....|
00000470: 01 99 20 45 52 3B 45 52 24 3B 54 52 3B 53 45 00 |.. ER;ER$;TR;SE.|
00000480: 85 0C FE 01 90 00 95 0C 08 02 8F 20 46 4F 52 4D |........... FORM|
00000490: 41 54 20 DD 53 00 A7 0C 12 02 4E 24 B2 CA 28 C4 |AT .S.....N$..(.|
000004A0: 28 4E 55 29 2C 32 29 00 C1 0C 1C 02 8B 20 C3 28 |(NU),2)...... .(|
000004B0: 4E 24 29 B3 32 20 A7 20 4E 24 B2 22 30 22 AA 4E |N$).2 . N$."0".N|
000004C0: 24 00 C7 0C 26 02 8E 00 00 00 |$...&..... |
....... FOR 4040/2031/1540/1541.4.(.. ".
.DISK PURGE".V.2..:."WHICH DRIVE (0/1) ?
. ..";.{.<.. DR$:. DR$.."0" . DR$.."1" .
60...F.. DR$:D.E(DR$)...P.DR$. "I".DR$:
. 15,8,15,DR$...Z.. 450.M.D.. 1,8,3,"#":
. 460...N..:. "PRESS'.Y.'TO DEL FILE":..
..X.Z$.G(0).....T.18:S.1......15,"U1:"3;
D;T;S.4....15,"B-P:"3;2.32.R.O. ..#1,A$:
. A$."" . A$.Z$.E.... F(A$).129 . 270.~.
... K.5.32.R . 20.32.R......15,"B-P:"3;K
...H..#1,A$:. A$."" . .". .";:. 220...R.
. A$;.C.......... ,,"PURGE ? . ..";.....
.A$:.A$.."Y" . A$.."N" .240...... A$....
.. A$."Y" . . 360./...R.R.1:. R.8 . 140.
A....15,"B-P:"3;0.Z."..#1,A$:.A$."" .A$.
Z$...,.T.F(A$):. T.0 . .:. "END OF DIREC
TORY.":. 400...6..15,"B-P:"3;1...@..#1,A
$:.A$."".A$.Z$...J.S.F(A$):.:. "*** NEXT
TRACK: ";:NU.T:.520:. N$;...T.. .20);"N
EXT SECTOR: ";:NU.S:. 520:. N$;" ***":..
,.^.R.0:.140.E.H..15,"B-P:"3;5.32.R.3.R.
R..1,G(0);.G.|..15,"U2:"3;D;T;S.R....460
:..Z... 1...... "VALIDATE DISK Y OR N".
..... V$:. V$."Y".410...... V$."". 406.H
... 15:.......:. ".VALIDATING DISK."....
..15,("V".DR$)......460: 15.......".B..
CHECK DISK STATUS.7.L..15,ER,ER$,TR,SE.
F.V.. ER.0 . ..S... 15: 1.L....:. ".DI
SK ERROR! ";..... ER;ER$;TR;SE.........
... FORMAT .S.....N$.J(D(NU),2).A.... C(
N$).2 . N$."0".N$.G.&.....
> CLICK IMAGE PREVIEW FOR FULL MODAL