PURGE UTILITY

FILE INFORMATION

FILENAME(S): PURGE UTILITY

FILE TYPE(S): PRG

FILE SIZE: 1.5K

FIRST SEEN: 2025-12-01 19:06:41

APPEARS ON: 2 disk(s)

FILE HASH

c78678833ea24a8cb09f5fa52c8ec3aae5440d71047b7be27b96e99171bf63b4

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
M I R A G E	PURGE UTILITY	PRG	Icebreaker	15	2	DOWNLOAD FILE
C BASE 1 MIRAGE	PURGE UTILITY	PRG	Icebreaker	13	11	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 29 08 01 00 51 B2  35 33 32 38 30 3A 97 51  |..)...Q.53280:.Q|
00000010: 2C 30 3A 97 51 AA 31 2C  30 3A 44 56 B2 C2 28 31  |,0:.Q.1,0:DV..(1|
00000020: 38 36 29 3A 99 22 93 05  0E 00 36 08 02 00 51 B2  |86):."....6...Q.|
00000030: 32 3A 46 4C B2 30 00 66  08 05 00 4F 24 B2 22 05  |2:FL.0.f...O$.".|
00000040: DD 12 20 92 DD C3 2D C2  C1 D3 C5 20 D5 53 45 52  |.. ...-.... .SER|
00000050: 4C 4F 47 20 D0 55 52 47  45 20 D5 54 49 4C 49 54  |LOG .URGE .TILIT|
00000060: 59 DD 12 20 92 DD 00 77  08 06 00 99 22 93 22 3A  |Y.. ...w....".":|
00000070: 99 A3 33 29 3B 4F 24 00  AF 08 07 00 4F 24 B2 22  |..3);O$.....O$."|
00000080: 9B D7 52 49 54 54 45 4E  20 42 59 20 05 A7 1F 12  |..RITTEN BY ....|
00000090: 20 9A 20 9F 20 92 05 C6  52 45 44 12 96 20 81 20  | . . ...RED.. . |
000000A0: 1C 20 05 92 A5 22 3A 99  A3 34 39 29 3B 4F 24 00  |. ...":..49);O$.|
000000B0: B7 08 08 00 99 3A 99 00  F0 08 32 00 85 22 9F CC  |.....:....2.."..|
000000C0: 41 53 54 20 43 41 4C 4C  20 44 41 54 45 20 54 4F  |AST CALL DATE TO|
000000D0: 20 50 55 52 47 45 05 20  20 31 30 2F 32 36 2F 38  | PURGE.  10/26/8|
000000E0: 38 9D 9D 9D 9D 9D 9D 9D  9D 9D 9D 22 3B 50 44 24  |8..........";PD$|
000000F0: 00 1B 09 37 00 85 22 9F  11 CD 41 58 49 4D 55 4D  |...7.."...AXIMUM|
00000100: 20 D3 45 43 55 52 49 54  59 20 CC 45 56 45 4C 20  | .ECURITY .EVEL |
00000110: 20 05 37 9D 9D 9D 22 3B  50 53 24 00 21 09 38 00  | .7...";PS$.!.8.|
00000120: 99 00 50 09 3C 00 44 44  24 B2 C8 28 50 44 24 2C  |..P.<.DD$..(PD$,|
00000130: 32 29 AA CA 28 50 44 24  2C 34 2C 32 29 AA C9 28  |2)..(PD$,4,2)..(|
00000140: 50 44 24 2C 32 29 3A 50  44 B2 C5 28 44 44 24 29  |PD$,2):PD..(DD$)|
00000150: 00 5E 09 3D 00 50 53 B2  C5 28 50 53 24 29 00 70  |.^.=.PS..(PS$).p|
00000160: 09 46 00 A0 31 35 3A 9F  31 35 2C 44 56 2C 31 35  |.F..15:.15,DV,15|
00000170: 00 8D 09 47 00 A0 38 3A  9F 38 2C 44 56 2C 38 2C  |...G..8:.8,DV,8,|
00000180: 22 30 3A 53 54 41 54 53  2C 53 2C 52 22 00 AA 09  |"0:STATS,S,R"...|
00000190: 48 00 8D 39 39 30 3A 42  B2 31 3A 8B 41 B2 37 34  |H..990:B.1:.A.74|
000001A0: B0 41 B2 36 32 A7 89 39  39 37 00 B5 09 49 00 84  |.A.62..997...I..|
000001B0: 38 2C 43 4E 24 00 DA 09  4A 00 A1 23 38 2C 56 24  |8,CN$...J..#8,V$|
000001C0: 3A 8B 56 24 B3 B1 C7 28  31 33 29 A7 53 59 24 B2  |:.V$...(13).SY$.|
000001D0: 53 59 24 AA 56 24 3A 89  37 34 00 F1 09 4B 00 84  |SY$.V$:.74...K..|
000001E0: 38 2C 44 41 24 2C 44 52  2C 4E 4D 2C 4D 4D 2C 4E  |8,DA$,DR,NM,MM,N|
000001F0: 55 00 F8 09 4D 00 A0 38  00 14 0A 5B 00 A0 39 3A  |U...M..8...[..9:|
00000200: 9F 39 2C 44 56 2C 39 2C  22 30 3A 50 55 52 47 45  |.9,DV,9,"0:PURGE|
00000210: 44 2C 53 22 00 2B 0A 5C  00 42 B2 32 3A 8D 39 39  |D,S".+.\.B.2:.99|
00000220: 30 3A 8B 41 B2 36 32 A7  39 37 30 00 47 0A 5D 00  |0:.A.62.970.G.].|
00000230: A0 39 3A 9F 39 2C 44 56  2C 39 2C 22 30 3A 50 55  |.9:.9,DV,9,"0:PU|
00000240: 52 47 45 44 2C 41 22 00  50 0A 5E 00 8D 39 39 30  |RGED,A".P.^..990|
00000250: 00 75 0A 65 00 A0 38 3A  9F 38 2C 44 56 2C 38 2C  |.u.e..8:.8,DV,8,|
00000260: 22 30 3A 55 53 45 52 4C  4F 47 2C 4C 2C 22 AA C7  |"0:USERLOG,L,"..|
00000270: 28 31 38 30 29 00 91 0A  66 00 42 B2 33 3A 8D 39  |(180)...f.B.3:.9|
00000280: 39 30 3A 8B 41 B2 36 32  B0 41 B2 32 31 A7 39 39  |90:.A.62.A.21.99|
00000290: 37 00 B3 0A 6A 00 98 31  35 2C 22 50 22 AA C7 28  |7...j..15,"P"..(|
000002A0: 31 30 34 29 AA C7 28 51  29 AA C7 28 30 29 AA C7  |104)..(Q)..(0)..|
000002B0: 28 32 29 00 BC 0A 6B 00  8D 39 39 30 00 E2 0A 6C  |(2)...k..990...l|
000002C0: 00 A1 23 38 2C 56 24 3A  8B 56 24 B3 B1 C7 28 34  |..#8,V$:.V$...(4|
000002D0: 34 29 A7 4E 41 24 B2 4E  41 24 AA 56 24 3A 89 31  |4).NA$.NA$.V$:.1|
000002E0: 30 38 00 F3 0A 6D 00 8B  4E 41 24 B2 22 30 22 A7  |08...m..NA$."0".|
000002F0: 31 35 35 00 19 0B 6E 00  A1 23 38 2C 56 24 3A 8B  |155...n..#8,V$:.|
00000300: 56 24 B3 B1 C7 28 34 34  29 A7 50 57 24 B2 50 57  |V$...(44).PW$.PW|
00000310: 24 AA 56 24 3A 89 31 31  30 00 3F 0B 70 00 A1 23  |$.V$:.110.?.p..#|
00000320: 38 2C 56 24 3A 8B 56 24  B3 B1 C7 28 34 34 29 A7  |8,V$:.V$...(44).|
00000330: 53 4C 24 B2 53 4C 24 AA  56 24 3A 89 31 31 32 00  |SL$.SL$.V$:.112.|
00000340: 4D 0B 71 00 56 53 B2 C5  28 53 4C 24 29 00 71 0B  |M.q.VS..(SL$).q.|
00000350: 72 00 A1 23 38 2C 56 24  3A 8B 56 24 B3 B1 C7 28  |r..#8,V$:.V$...(|
00000360: 34 34 29 A7 41 24 B2 41  24 AA 56 24 3A 89 31 31  |44).A$.A$.V$:.11|
00000370: 34 00 97 0B 74 00 A1 23  38 2C 56 24 3A 8B 56 24  |4...t..#8,V$:.V$|
00000380: B3 B1 C7 28 34 34 29 A7  4C 43 24 B2 4C 43 24 AA  |...(44).LC$.LC$.|
00000390: 56 24 3A 89 31 31 36 00  C6 0B 75 00 58 44 24 B2  |V$:.116...u.XD$.|
000003A0: C8 28 4C 43 24 2C 32 29  AA CA 28 4C 43 24 2C 34  |.(LC$,2)..(LC$,4|
000003B0: 2C 32 29 AA C9 28 4C 43  24 2C 32 29 3A 56 44 B2  |,2)..(LC$,2):VD.|
000003C0: C5 28 58 44 24 29 00 E8  0B 76 00 98 31 35 2C 22  |.(XD$)...v..15,"|
000003D0: 50 22 AA C7 28 31 30 34  29 AA C7 28 51 29 AA C7  |P"..(104)..(Q)..|
000003E0: 28 30 29 AA C7 28 32 29  00 01 0C 96 00 8B 4C 44  |(0)..(2)......LD|
000003F0: B3 50 44 AF 56 53 B3 28  50 53 AA 31 29 A7 32 30  |.PD.VS.(PS.1).20|
00000400: 30 00 15 0C 9B 00 51 B2  51 AA 31 3A 8B 51 B1 4E  |0.....Q.Q.1:.Q.N|
00000410: 55 A7 33 39 39 00 40 0C  9C 00 4E 41 24 B2 22 22  |U.399.@...NA$.""|
00000420: 3A 50 57 24 B2 22 22 3A  53 4C 24 B2 22 22 3A 41  |:PW$."":SL$."":A|
00000430: 24 B2 22 22 3A 4C 43 24  B2 22 22 3A 89 31 30 36  |$."":LC$."":.106|
00000440: 00 67 0C C8 00 41 24 B2  22 30 2C 30 2C 30 2C 30  |.g...A$."0,0,0,0|
00000450: 2C 2C 2C 2C 2C 2C 2C 2C  2C 30 2C 30 2C 30 2C 30  |,,,,,,,,,0,0,0,0|
00000460: 22 3A 98 38 2C 41 24 00  7A 0C C9 00 98 39 2C 22  |":.8,A$.z....9,"|
00000470: 96 22 51 22 20 9A 22 4E  41 24 00 8B 0C CA 00 99  |."Q" ."NA$......|
00000480: 22 96 22 51 22 20 9A 22  4E 41 24 00 9A 0C CB 00  |"."Q" ."NA$.....|
00000490: 49 B2 49 AA 31 3A 89 31  35 35 00 A8 0C 8F 01 A0  |I.I.1:.155......|
000004A0: 38 3A A0 39 3A A0 31 35  00 C9 0C 90 01 99 22 11  |8:.9:.15......".|
000004B0: 96 22 3B 49 3B 22 9A D5  53 45 52 53 20 D7 45 52  |.";I;"..SERS .ER|
000004C0: 45 20 D0 55 52 47 45 44  22 00 E8 0C 91 01 99 22  |E .URGED"......"|
000004D0: 11 05 D0 52 45 53 53 20  C1 4E 59 20 CB 45 59 20  |...RESS .NY .EY |
000004E0: D4 4F 20 C5 58 49 54 22  00 FB 0C 92 01 A1 41 24  |.O .XIT"......A$|
000004F0: 3A 8B 41 24 B2 22 22 A7  34 30 32 00 06 0D 93 01  |:.A$."".402.....|
00000500: 9E 36 34 37 33 38 00 24  0D CA 03 A0 39 3A 9F 39  |.64738.$....9:.9|
00000510: 2C 44 56 2C 39 2C 22 30  3A 50 55 52 47 45 44 2C  |,DV,9,"0:PURGED,|
00000520: 53 2C 57 22 00 50 0D CB  03 5A 24 B2 22 20 20 20  |S,W".P...Z$."   |
00000530: 20 20 20 20 20 20 20 20  05 DD 12 20 92 DD D5 53  |        ... ...S|
00000540: 45 52 53 20 D0 55 52 47  45 44 DD 12 20 92 DD 22  |ERS .URGED.. .."|
00000550: 00 61 0D CC 03 98 39 2C  5A 24 3A 98 39 2C 22 20  |.a....9,Z$:.9," |
00000560: 22 00 68 0D CD 03 A0 39  00 70 0D CE 03 89 39 33  |".h....9.p....93|
00000570: 00 79 0D DD 03 89 39 38  39 00 8A 0D DE 03 84 31  |.y....989......1|
00000580: 35 2C 41 2C 42 24 2C 43  2C 44 00 9D 0D DF 03 8B  |5,A,B$,C,D......|
00000590: 41 B3 B1 36 32 B0 41 B3  B1 32 31 A7 8E 00 B1 0D  |A..62.A..21.....|
000005A0: E3 03 99 22 11 C4 C9 D3  CB 20 C5 D2 D2 CF D2 21  |..."..... .....!|
000005B0: 11 00 DA 0D E4 03 45 52  24 B2 C4 28 41 29 AA 22  |......ER$..(A)."|
000005C0: 20 22 AA 42 24 AA C4 28  43 29 AA 22 20 22 AA C4  | ".B$..(C)." "..|
000005D0: 28 44 29 3A 99 45 52 24  3A 90 00 EA 0D E5 03 85  |(D):.ER$:.......|
000005E0: 22 11 44 49 53 4B 22 3B  5A 24 00 02 0E E6 03 8B  |".DISK";Z$......|
000005F0: 5A 24 B2 22 22 A7 91 42  89 37 31 2C 39 33 2C 31  |Z$.""..B.71,93,1|
00000600: 30 31 00 00 00                                    |01...           |

..)...Q.53280:.Q,0:.Q.1,0:DV.B(186):."..
..6...Q.2:FL.0.F...O$."... ..C-BASE USER
LOG PURGE UTILITY.. ...W....".":..3);O$.
....O$.".WRITTEN BY .... . . ..FRED.. . 
. ...":..49);O$......:....2..".LAST CALL
 DATE TO PURGE.  10/26/88..........";PD$
...7.."..MAXIMUM SECURITY LEVEL  .7...";
PS$.!.8...P.<.DD$.H(PD$,2).J(PD$,4,2).I(
PD$,2):PD.E(DD$).^.=.PS.E(PS$).P.F. 15:.
15,DV,15...G. 8:.8,DV,8,"0:STATS,S,R"...
H..990:B.1:.A.74.A.62..997...I..8,CN$.Z.
J..#8,V$:.V$..G(13).SY$.SY$.V$:.74...K..
8,DA$,DR,NM,MM,NU...M. 8...[. 9:.9,DV,9,
"0:PURGED,S".+.\.B.2:.990:.A.62.970.G.].
 9:.9,DV,9,"0:PURGED,A".P.^..990.U.E. 8:
.8,DV,8,"0:USERLOG,L,".G(180)...F.B.3:.9
90:.A.62.A.21.997...J..15,"P".G(104).G(Q
).G(0).G(2)...K..990...L..#8,V$:.V$..G(4
4).NA$.NA$.V$:.108...M..NA$."0".155...N.
.#8,V$:.V$..G(44).PW$.PW$.V$:.110.?.P..#
8,V$:.V$..G(44).SL$.SL$.V$:.112.M.Q.VS.E
(SL$).Q.R..#8,V$:.V$..G(44).A$.A$.V$:.11
4...T..#8,V$:.V$..G(44).LC$.LC$.V$:.116.
F.U.XD$.H(LC$,2).J(LC$,4,2).I(LC$,2):VD.
E(XD$)...V..15,"P".G(104).G(Q).G(0).G(2)
......LD.PD.VS.(PS.1).200.....Q.Q.1:.Q.N
U.399.@...NA$."":PW$."":SL$."":A$."":LC$
."":.106.G.H.A$."0,0,0,0,,,,,,,,,0,0,0,0
":.8,A$.Z.I..9,"."Q" ."NA$...J.."."Q" ."
NA$...K.I.I.1:.155..... 8: 9: 15.I....".
.";I;".USERS WERE PURGED"......"..PRESS 
ANY KEY TO EXIT"......A$:.A$."".402.....
.64738.$.J. 9:.9,DV,9,"0:PURGED,S,W".P.K
.Z$."           ... ..USERS PURGED.. .."
.A.L..9,Z$:.9," ".H.M. 9.P.N..93.Y....98
9......15,A,B$,C,D......A..62.A..21.....
...".DISK ERROR!..Z...ER$.D(A)." ".B$.D(
C)." ".D(D):.ER$:.......".DISK";Z$......
Z$.""..B.71,93,101...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL