DISK PROTECTOR
FILE INFORMATION
FILENAME(S): DISK PROTECTOR
FILE TYPE(S): PRG
FILE SIZE: 1.4K
FIRST SEEN: 2025-11-30 21:18:35
APPEARS ON: 1 disk(s)
FILE HASH
509dfc5f10fe12c9194c70ae325848fae547c61b2f6307d67c784f927609b239
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LEO DE HAAN | DISK PROTECTOR | PRG | DuncanTwain | 17 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 05 00 97 38 30 38 2C 32 33 34 00 2C |.......808,234.,| 00000010: 08 0A 00 97 35 33 32 38 30 2C 30 3A 97 35 33 32 |....53280,0:.532| 00000020: 38 31 2C 30 3A 97 35 36 2C 32 30 37 00 57 08 14 |81,0:.56,207.W..| 00000030: 00 99 22 93 9F 20 20 20 20 20 20 20 2A 2A 2A 20 |..".. *** | 00000040: 54 48 45 20 44 49 53 4B 20 50 52 4F 54 45 43 54 |THE DISK PROTECT| 00000050: 4F 52 20 2A 2A 2A 22 00 85 08 1E 00 99 22 11 1D |OR ***"......"..| 00000060: 1D 9E 20 20 43 4F 50 59 52 49 47 48 54 20 28 43 |.. COPYRIGHT (C| 00000070: 29 20 31 39 38 36 20 48 45 41 52 54 20 43 4F 4D |) 1986 HEART COM| 00000080: 50 41 4E 59 22 00 A3 08 28 00 99 22 11 11 11 1D |PANY"...(.."....| 00000090: 1D 9B 12 20 31 20 92 20 20 44 49 52 45 43 54 4F |... 1 . DIRECTO| 000000A0: 52 59 22 00 C5 08 32 00 99 22 11 1D 1D 12 20 32 |RY"...2..".... 2| 000000B0: 20 92 20 20 50 52 4F 54 45 43 54 20 44 49 53 4B | . PROTECT DISK| 000000C0: 45 54 54 45 22 00 E9 08 3C 00 99 22 11 1D 1D 12 |ETTE"...<.."....| 000000D0: 20 33 20 92 20 20 44 45 50 52 4F 54 45 43 54 20 | 3 . DEPROTECT | 000000E0: 44 49 53 4B 45 54 54 45 22 00 12 09 41 00 99 22 |DISKETTE"...A.."| 000000F0: 11 1D 1D 12 20 34 20 92 20 20 43 48 41 4E 47 45 |.... 4 . CHANGE| 00000100: 20 4E 41 4D 45 2F 49 44 20 28 50 52 45 53 45 54 | NAME/ID (PRESET| 00000110: 29 22 00 32 09 43 00 99 22 11 1D 1D 12 20 35 20 |)".2.C..".... 5 | 00000120: 92 20 20 43 48 41 4E 47 45 20 4E 41 4D 45 2F 49 |. CHANGE NAME/I| 00000130: 44 22 00 51 09 46 00 99 22 11 11 1D 1D 9A 45 4E |D".Q.F..".....EN| 00000140: 54 45 52 20 59 4F 55 52 20 43 48 4F 49 43 45 2E |TER YOUR CHOICE.| 00000150: 22 00 6B 09 50 00 A1 41 24 3A 8B 41 24 B3 22 31 |".k.P..A$:.A$."1| 00000160: 22 B0 41 24 B1 22 35 22 A7 38 30 00 96 09 5A 00 |".A$."5".80...Z.| 00000170: 99 22 91 05 22 A3 32 31 29 41 24 3A 91 C5 28 41 |."..".21)A$:..(A| 00000180: 24 29 89 34 30 30 2C 31 30 30 2C 33 30 30 2C 32 |$).400,100,300,2| 00000190: 30 30 2C 35 30 30 00 B3 09 64 00 9F 31 35 2C 38 |00,500...d..15,8| 000001A0: 2C 31 35 2C 22 49 30 22 3A 9F 32 2C 38 2C 32 2C |,15,"I0":.2,8,2,| 000001B0: 22 23 22 00 CF 09 6E 00 98 31 35 2C 22 55 31 3A |"#"...n..15,"U1:| 000001C0: 22 3B 32 3B 30 3B 31 38 3B 30 3A 8D 36 30 30 00 |";2;0;18;0:.600.| 000001D0: E2 09 78 00 98 31 35 2C 22 42 2D 50 3A 22 3B 32 |..x..15,"B-P:";2| 000001E0: 3B 32 00 EF 09 82 00 98 32 2C C7 28 37 37 29 00 |;2......2,.(77).| 000001F0: 0B 0A 8C 00 98 31 35 2C 22 55 32 3A 22 3B 32 3B |.....15,"U2:";2;| 00000200: 30 3B 31 38 3B 30 3A 8D 36 30 30 00 18 0A 96 00 |0;18;0:.600.....| 00000210: A0 32 3A A0 31 35 3A 8A 00 35 0A C8 00 9F 31 35 |.2:.15:..5....15| 00000220: 2C 38 2C 31 35 2C 22 49 30 22 3A 9F 32 2C 38 2C |,8,15,"I0":.2,8,| 00000230: 32 2C 22 23 22 00 51 0A D2 00 98 31 35 2C 22 55 |2,"#".Q....15,"U| 00000240: 31 3A 22 3B 32 3B 30 3B 31 38 3B 30 3A 8D 36 30 |1:";2;0;18;0:.60| 00000250: 30 00 78 0A DC 00 4E 44 24 B2 22 48 45 41 52 54 |0.x...ND$."HEART| 00000260: 20 43 4F 4D 50 41 4E 59 20 20 20 22 3A 4E 49 24 | COMPANY ":NI$| 00000270: B2 22 28 43 29 38 36 22 00 94 0A E6 00 98 31 35 |."(C)86"......15| 00000280: 2C 22 42 2D 50 3A 22 3B 32 3B 31 34 34 3A 98 32 |,"B-P:";2;144:.2| 00000290: 2C 4E 44 24 00 B0 0A F0 00 98 31 35 2C 22 42 2D |,ND$......15,"B-| 000002A0: 50 3A 22 3B 32 3B 31 36 32 3A 98 32 2C 4E 49 24 |P:";2;162:.2,NI$| 000002B0: 00 CC 0A FA 00 98 31 35 2C 22 55 32 3A 22 3B 32 |......15,"U2:";2| 000002C0: 3B 30 3B 31 38 3B 30 3A 8D 36 30 30 00 E2 0A 04 |;0;18;0:.600....| 000002D0: 01 98 31 35 2C 22 49 30 22 3A A0 32 3A A0 31 35 |..15,"I0":.2:.15| 000002E0: 3A 8A 00 FF 0A 2C 01 9F 31 35 2C 38 2C 31 35 2C |:....,..15,8,15,| 000002F0: 22 49 30 22 3A 9F 32 2C 38 2C 32 2C 22 23 22 00 |"I0":.2,8,2,"#".| 00000300: 16 0B 36 01 98 31 35 2C 22 55 31 3A 22 3B 32 3B |..6..15,"U1:";2;| 00000310: 30 3B 31 38 3B 30 00 29 0B 40 01 98 31 35 2C 22 |0;18;0.).@..15,"| 00000320: 42 2D 50 3A 22 3B 32 3B 32 00 36 0B 4A 01 98 32 |B-P:";2;2.6.J..2| 00000330: 2C C7 28 36 35 29 00 59 0B 54 01 98 31 35 2C 22 |,.(65).Y.T..15,"| 00000340: 4D 2D 57 22 3B C7 28 31 29 3B C7 28 31 29 3B C7 |M-W";.(1);.(1);.| 00000350: 28 31 29 3B C7 28 36 35 29 00 7C 0B 5E 01 98 31 |(1);.(65).|.^..1| 00000360: 35 2C 22 4D 2D 57 22 3B C7 28 32 29 3B C7 28 37 |5,"M-W";.(2);.(7| 00000370: 29 3B C7 28 31 29 3B C7 28 36 35 29 00 98 0B 68 |);.(1);.(65)...h| 00000380: 01 98 31 35 2C 22 55 32 3A 22 3B 32 3B 30 3B 31 |..15,"U2:";2;0;1| 00000390: 38 3B 30 3A 8D 36 30 30 00 A5 0B 72 01 A0 32 3A |8;0:.600...r..2:| 000003A0: A0 31 35 3A 8A 00 C3 0B 90 01 99 22 93 9F 22 3A |.15:......."..":| 000003B0: 9E 33 34 38 39 3A 9F 31 35 2C 38 2C 31 35 3A 8D |.3489:.15,8,15:.| 000003C0: 36 30 30 00 DA 0B 9A 01 A0 31 35 3A A1 44 24 3A |600......15:.D$:| 000003D0: 8B 44 24 B2 22 22 A7 34 31 30 00 E0 0B A4 01 8A |.D$."".410......| 000003E0: 00 FD 0B F4 01 85 22 11 11 1D 1D 1E 45 4E 54 45 |......".....ENTE| 000003F0: 52 20 4E 41 4D 45 3A 9B 20 22 3B 4E 24 00 18 0C |R NAME:. ";N$...| 00000400: F9 01 8B C3 28 4E 24 29 B1 31 36 A7 99 22 91 91 |....(N$).16.."..| 00000410: 91 91 22 3A 89 35 30 30 00 39 0C FB 01 4E 24 B2 |..":.500.9...N$.| 00000420: C8 28 4E 24 AA 22 20 20 20 20 20 20 20 20 20 20 |.(N$." | 00000430: 20 20 20 20 22 2C 31 36 29 00 5B 0C FE 01 85 22 | ",16).[...."| 00000440: 11 1D 1D 1E 45 4E 54 45 52 20 49 44 20 28 4D 41 |....ENTER ID (MA| 00000450: 58 20 35 29 3A 9B 20 22 3B 49 24 00 74 0C 03 02 |X 5):. ";I$.t...| 00000460: 8B C3 28 49 24 29 B1 35 A7 99 22 91 91 91 22 3A |..(I$).5.."...":| 00000470: 89 35 31 30 00 87 0C 05 02 49 24 B2 C8 28 49 24 |.510.....I$..(I$| 00000480: AA 22 20 22 2C 35 29 00 A4 0C 08 02 9F 31 35 2C |." ",5)......15,| 00000490: 38 2C 31 35 2C 22 49 30 22 3A 9F 32 2C 38 2C 32 |8,15,"I0":.2,8,2| 000004A0: 2C 22 23 22 00 C0 0C 12 02 98 31 35 2C 22 55 31 |,"#"......15,"U1| 000004B0: 3A 22 3B 32 3B 30 3B 31 38 3B 30 3A 8D 36 30 30 |:";2;0;18;0:.600| 000004C0: 00 DB 0C 1C 02 98 31 35 2C 22 42 2D 50 3A 22 3B |......15,"B-P:";| 000004D0: 32 3B 31 34 34 3A 98 32 2C 4E 24 00 F6 0C 26 02 |2;144:.2,N$...&.| 000004E0: 98 31 35 2C 22 42 2D 50 3A 22 3B 32 3B 31 36 32 |.15,"B-P:";2;162| 000004F0: 3A 98 32 2C 49 24 00 12 0D 30 02 98 31 35 2C 22 |:.2,I$...0..15,"| 00000500: 55 32 3A 22 3B 32 3B 30 3B 31 38 3B 30 3A 8D 36 |U2:";2;0;18;0:.6| 00000510: 30 30 00 28 0D 3A 02 98 31 35 2C 22 49 30 22 3A |00.(.:..15,"I0":| 00000520: A0 32 3A A0 31 35 3A 8A 00 40 0D 58 02 84 31 35 |.2:.15:..@.X..15| 00000530: 2C 46 31 24 2C 46 32 24 2C 46 33 24 2C 46 34 24 |,F1$,F2$,F3$,F4$| 00000540: 00 50 0D 62 02 8B 46 31 24 B2 22 30 30 22 A7 8E |.P.b..F1$."00"..| 00000550: 00 7D 0D 6C 02 99 22 11 11 1D 1D 9B 4E 52 3A 22 |.}.l..".....NR:"| 00000560: 3B 46 31 24 3B 22 2C 1C 20 22 3B 46 32 24 2C 22 |;F1$;",. ";F2$,"| 00000570: 9B 22 46 33 24 3B 22 2C 22 3B 46 34 24 00 90 0D |."F3$;",";F4$...| 00000580: 76 02 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 36 33 30 |v..Z$:.Z$."".630| 00000590: 00 9D 0D 80 02 A0 32 3A A0 31 35 3A 8A 00 00 00 |......2:.15:....|
.......808,234.,....53280,0:.53281,0:.56 ,207.W....".. *** THE DISK PROTECT OR ***"......".... COPYRIGHT (C) 1986 H EART COMPANY"...(.."....... 1 . DIRECTO RY".E.2..".... 2 . PROTECT DISKETTE"... <..".... 3 . DEPROTECT DISKETTE"...A.." .... 4 . CHANGE NAME/ID (PRESET)".2.C.. ".... 5 . CHANGE NAME/ID".Q.F..".....EN TER YOUR CHOICE.".K.P..A$:.A$."1".A$."5" .80...Z.."..".21)A$:.E(A$).400,100,300,2 00,500...D..15,8,15,"I0":.2,8,2,"#".O.N. .15,"U1:";2;0;18;0:.600...X..15,"B-P:";2 ;2......2,G(77)......15,"U2:";2;0;18;0:. 600..... 2: 15:..5.H..15,8,15,"I0":.2,8, 2,"#".Q.R..15,"U1:";2;0;18;0:.600.X...ND $."HEART COMPANY ":NI$."(C)86"......15 ,"B-P:";2;144:.2,ND$......15,"B-P:";2;16 2:.2,NI$.L....15,"U2:";2;0;18;0:.600.... ..15,"I0": 2: 15:....,..15,8,15,"I0":.2, 8,2,"#"...6..15,"U1:";2;0;18;0.).@..15," B-P:";2;2.6.J..2,G(65).Y.T..15,"M-W";G(1 );G(1);G(1);G(65).|.^..15,"M-W";G(2);G(7 );G(1);G(65)...H..15,"U2:";2;0;18;0:.600 ...R. 2: 15:..C...."..":.3489:.15,8,15:. 600.Z... 15:.D$:.D$."".410............". ....ENTER NAME:. ";N$......C(N$).16..".. ..":.500.9...N$.H(N$." ",16 ).[...."....ENTER ID (MAX 5):. ";I$.T... .C(I$).5.."...":.510.....I$.H(I$." ",5). .....15,8,15,"I0":.2,8,2,"#"......15,"U1 :";2;0;18;0:.600......15,"B-P:";2;144:.2 ,N$...&..15,"B-P:";2;162:.2,I$...0..15," U2:";2;0;18;0:.600.(.:..15,"I0": 2: 15:. .@.X..15,F1$,F2$,F3$,F4$.P.B..F1$."00".. .}.L..".....NR:";F1$;",. ";F2$,"."F3$;", ";F4$...V..Z$:.Z$."".630..... 2: 15:....
> CLICK IMAGE PREVIEW FOR FULL MODAL