WRITE PROTECT
FILE INFORMATION
FILENAME(S): WRITE PROTECT
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-12-02 00:01:53
APPEARS ON: 2 disk(s)
FILE HASH
9fe33c7b4ee3f6fc9f45304b33d15901b90002b45e06d851cc118406d32e177b
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | WRITE PROTECT | PRG | earthshaker | 19 | 1 | DOWNLOAD FILE |
| DE GROOT | WRITE PROTECT | PRG | earthshaker | 8 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 01 00 8F 20 53 4F 46 54 20 50 52 4F |....... SOFT PRO| 00000010: 54 45 43 54 20 56 45 52 20 32 2E 31 00 31 08 02 |TECT VER 2.1.1..| 00000020: 00 8F 20 43 48 41 52 4C 45 53 20 43 4F 4E 4C 4F |.. CHARLES CONLO| 00000030: 57 00 45 08 03 00 8F 20 4E 4F 56 45 4D 42 45 52 |W.E.... NOVEMBER| 00000040: 20 31 39 38 34 00 4B 08 04 00 3A 00 6C 08 05 00 | 1984.K...:.l...| 00000050: 97 35 33 32 38 30 2C 31 31 3A 97 35 33 32 38 31 |.53280,11:.53281| 00000060: 2C 30 3A 97 35 33 32 37 32 2C 32 33 00 AB 08 06 |,0:.53272,23....| 00000070: 00 54 54 24 B2 22 93 11 1D 95 12 A0 A0 A0 A0 A0 |.TT$."..........| 00000080: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |................| 00000090: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 92 20 9A |.............. .| 000000A0: D3 A0 1F 2F 22 AA C7 28 31 33 29 00 EA 08 07 00 |.../"..(13).....| 000000B0: 54 54 24 B2 54 54 24 AA 22 95 1D 12 A0 D3 CF C6 |TT$.TT$.".......| 000000C0: D4 20 D0 D2 CF D4 C5 C3 D4 20 2D 20 C3 3D 36 34 |. ....... - .=64| 000000D0: A0 20 56 45 52 53 49 4F 4E 20 32 2E 31 20 92 A0 |. VERSION 2.1 ..| 000000E0: A0 1F 2F 22 AA C7 28 31 33 29 00 26 09 08 00 54 |../"..(13).&...T| 000000F0: 54 24 B2 54 54 24 AA 22 1D 95 12 A0 A0 A0 A0 A0 |T$.TT$."........| 00000100: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |................| 00000110: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 92 1F A0 |................| 00000120: 2F A0 9A D0 98 22 00 2F 09 09 00 99 54 54 24 00 |/...."./....TT$.| 00000130: 5F 09 0A 00 99 22 11 11 1D D4 48 49 53 20 49 53 |_...."....HIS IS| 00000140: 20 52 45 4C 45 41 53 45 44 20 54 4F 20 54 48 45 | RELEASED TO THE| 00000150: 20 D0 55 42 4C 49 43 20 C4 4F 4D 41 49 4E 22 00 | .UBLIC .OMAIN".| 00000160: 81 09 0B 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |....."..........| 00000170: 1D 1D 42 59 20 54 48 45 20 41 55 54 48 4F 52 3A |..BY THE AUTHOR:| 00000180: 22 00 A7 09 0C 00 99 22 11 11 1D 1D 1D 1D 1D 1D |"......"........| 00000190: 1D 1D 1D 1D 1D 1D 96 C3 48 41 52 4C 45 53 20 C3 |........HARLES .| 000001A0: 4F 4E 4C 4F 57 98 22 00 CB 09 0D 00 99 22 1D 1D |ONLOW."......"..| 000001B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1C D7 41 53 48 49 |............ASHI| 000001C0: 4E 47 54 4F 4E 2C 20 C4 C3 98 22 00 EF 09 0E 00 |NGTON, ...".....| 000001D0: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 97 CE |."..............| 000001E0: CF D6 C5 CD C2 C5 D2 20 20 31 39 38 34 98 22 00 |....... 1984.".| 000001F0: 11 0A 0F 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |....."..........| 00000200: 1D 1D 1D 1D 9C 37 34 31 31 36 2E 33 30 36 37 98 |.....74116.3067.| 00000210: 22 00 39 0A 10 00 99 22 11 11 1D 5B 20 1F D3 98 |".9...."...[ ...| 00000220: A0 5D 20 53 54 41 52 54 53 20 54 48 45 20 50 52 |.] STARTS THE PR| 00000230: 4F 47 52 41 4D 2E 2E 2E 22 00 62 0A 11 00 99 22 |OGRAM...".b...."| 00000240: 11 1D 5B 20 95 C8 98 A0 5D 20 45 58 50 4C 41 49 |..[ ....] EXPLAI| 00000250: 4E 53 20 54 48 45 20 50 52 4F 47 52 41 4D 2E 2E |NS THE PROGRAM..| 00000260: 2E 22 00 84 0A 12 00 99 22 11 1D 5B 20 9C D1 98 |."......"..[ ...| 00000270: A0 5D 20 53 54 4F 50 53 20 49 54 20 48 45 52 45 |.] STOPS IT HERE| 00000280: 2E 2E 2E 22 00 AC 0A 13 00 99 22 11 1D 1D 1D 1D |..."......".....| 00000290: 1D 1D 1D 1D 1D 1D 1D 1D 50 52 45 53 53 20 1F D3 |........PRESS ..| 000002A0: 20 95 C8 A0 98 4F 52 20 9C D1 98 22 00 D3 0A 14 | ....OR ..."....| 000002B0: 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D A0 |..".............| 000002C0: A0 A0 A0 A0 A0 1F A3 20 95 A3 A0 98 A0 A0 20 9C |....... ...... .| 000002D0: A3 98 22 00 E5 0A 15 00 A1 4B 24 3A 8B 4B 24 B2 |.."......K$:.K$.| 000002E0: 22 22 A7 32 31 00 FB 0A 16 00 8B 4B 24 B2 22 53 |"".21......K$."S| 000002F0: 22 B0 4B 24 B2 22 D3 22 A7 32 36 00 11 0B 17 00 |".K$.".".26.....| 00000300: 8B 4B 24 B2 22 48 22 B0 4B 24 B2 22 C8 22 A7 35 |.K$."H".K$.".".5| 00000310: 32 00 26 0B 18 00 8B 4B 24 B2 22 51 22 B0 4B 24 |2.&....K$."Q".K$| 00000320: B2 22 D1 22 A7 80 00 2E 0B 19 00 89 32 31 00 40 |."."........21.@| 00000330: 0B 1A 00 8F 20 48 45 52 45 20 57 45 20 47 4F 21 |.... HERE WE GO!| 00000340: 00 49 0B 1B 00 99 54 54 24 00 65 0B 1C 00 99 22 |.I....TT$.e...."| 00000350: 11 1D D3 4F 46 54 20 D0 52 4F 54 45 43 54 49 4E |...OFT .ROTECTIN| 00000360: 47 2E 2E 2E 22 00 86 0B 1D 00 85 22 11 1D 44 45 |G..."......"..DE| 00000370: 56 49 43 45 20 4E 55 4D 42 45 52 20 20 38 9D 9D |VICE NUMBER 8..| 00000380: 9D 22 3B 44 56 24 00 94 0B 1E 00 44 56 B2 C5 28 |.";DV$.....DV..(| 00000390: 44 56 24 29 00 AF 0B 1F 00 8B 44 56 B3 38 B0 44 |DV$)......DV.8.D| 000003A0: 56 B1 31 31 A7 99 22 91 91 91 22 3A 89 32 39 00 |V.11.."...":.29.| 000003B0: D0 0B 20 00 85 22 11 1D A0 44 52 49 56 45 20 4E |.. .."...DRIVE N| 000003C0: 55 4D 42 45 52 20 20 30 9D 9D 9D 22 3B 44 52 24 |UMBER 0...";DR$| 000003D0: 00 DE 0B 21 00 44 52 B2 C5 28 44 52 24 29 00 FA |...!.DR..(DR$)..| 000003E0: 0B 22 00 8B 44 52 B3 B1 30 AF 44 56 B3 B1 31 A7 |."..DR..0.DV..1.| 000003F0: 99 22 91 91 91 22 3A 89 33 32 00 2A 0C 23 00 99 |."...":.32.*.#..| 00000400: 22 11 11 1D 50 4C 41 43 45 20 54 48 45 20 44 49 |"...PLACE THE DI| 00000410: 53 4B 20 49 4E 54 4F 20 54 48 45 20 44 52 49 56 |SK INTO THE DRIV| 00000420: 45 20 28 41 42 4F 56 45 29 22 00 4C 0C 24 00 99 |E (ABOVE)".L.$..| 00000430: 22 11 1D 54 48 45 4E 20 50 52 45 53 53 20 12 1F |"..THEN PRESS ..| 00000440: A0 D2 C5 D4 D5 D2 CE A0 92 98 2E 22 00 5E 0C 25 |...........".^.%| 00000450: 00 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 33 37 00 70 |..K$:.K$."".37.p| 00000460: 0C 26 00 8B 4B 24 B3 B1 C7 28 31 33 29 A7 33 37 |.&..K$...(13).37| 00000470: 00 8A 0C 27 00 9F 31 35 2C 44 56 2C 31 35 2C 22 |...'..15,DV,15,"| 00000480: 49 22 AA 44 52 24 AA 22 3A 22 00 C8 0C 28 00 84 |I".DR$.":"...(..| 00000490: 31 35 2C 45 2C 45 24 2C 54 2C 53 3A 8B 45 B3 B1 |15,E,E$,T,S:.E..| 000004A0: 30 A7 99 54 54 24 3A 99 22 11 1D 96 44 49 53 4B |0..TT$:."...DISK| 000004B0: 20 45 52 52 4F 52 21 A0 98 22 3B 45 3B 45 24 3A | ERROR!..";E;E$:| 000004C0: A0 38 3A A0 31 35 3A 80 00 D8 0C 29 00 9F 38 2C |.8:.15:....)..8,| 000004D0: 44 56 2C 38 2C 22 23 22 00 F4 0C 2A 00 98 31 35 |DV,8,"#"...*..15| 000004E0: 2C 22 55 41 3A 38 2C 22 AA 44 56 24 AA 22 2C 31 |,"UA:8,".DV$.",1| 000004F0: 38 2C 30 22 00 32 0D 2B 00 84 31 35 2C 45 2C 45 |8,0".2.+..15,E,E| 00000500: 24 2C 54 2C 53 3A 8B 45 B3 B1 30 A7 99 54 54 24 |$,T,S:.E..0..TT$| 00000510: 3A 99 22 11 1D 96 44 49 53 4B 20 45 52 52 4F 52 |:."...DISK ERROR| 00000520: 21 A0 98 22 3B 45 3B 45 24 3A A0 38 3A A0 31 35 |!..";E;E$:.8:.15| 00000530: 3A 80 00 44 0D 2C 00 98 31 35 2C 22 42 2D 50 3A |:..D.,..15,"B-P:| 00000540: 38 2C 32 22 00 82 0D 2D 00 84 31 35 2C 45 2C 45 |8,2"...-..15,E,E| 00000550: 24 2C 54 2C 53 3A 8B 45 B3 B1 30 A7 99 54 54 24 |$,T,S:.E..0..TT$| 00000560: 3A 99 22 11 1D 96 44 49 53 4B 20 45 52 52 4F 52 |:."...DISK ERROR| 00000570: 21 A0 98 22 3B 45 3B 45 24 3A A0 38 3A A0 31 35 |!..";E;E$:.8:.15| 00000580: 3A 80 00 90 0D 2E 00 98 38 2C C7 28 31 29 3B 3A |:.......8,.(1);:| 00000590: 00 AC 0D 2F 00 98 31 35 2C 22 55 42 3A 38 2C 22 |.../..15,"UB:8,"| 000005A0: AA 44 56 24 AA 22 2C 31 38 2C 30 22 00 EA 0D 30 |.DV$.",18,0"...0| 000005B0: 00 84 31 35 2C 45 2C 45 24 2C 54 2C 53 3A 8B 45 |..15,E,E$,T,S:.E| 000005C0: B3 B1 30 A7 99 54 54 24 3A 99 22 11 1D 96 44 49 |..0..TT$:."...DI| 000005D0: 53 4B 20 45 52 52 4F 52 21 A0 98 22 3B 45 3B 45 |SK ERROR!..";E;E| 000005E0: 24 3A A0 38 3A A0 31 35 3A 80 00 FE 0D 31 00 98 |$:.8:.15:....1..| 000005F0: 31 35 2C 22 49 22 AA 44 56 24 AA 22 3A 22 00 3C |15,"I".DV$.":".<| 00000600: 0E 32 00 84 31 35 2C 45 2C 45 24 2C 54 2C 53 3A |.2..15,E,E$,T,S:| 00000610: 8B 45 B3 B1 30 A7 99 54 54 24 3A 99 22 11 1D 96 |.E..0..TT$:."...| 00000620: 44 49 53 4B 20 45 52 52 4F 52 21 A0 98 22 3B 45 |DISK ERROR!..";E| 00000630: 3B 45 24 3A A0 38 3A A0 31 35 3A 80 00 5A 0E 33 |;E$:.8:.15:..Z.3| 00000640: 00 A0 38 3A A0 31 35 3A 99 22 11 1D 1E 41 4C 4C |..8:.15:."...ALL| 00000650: 20 44 4F 4E 45 21 98 22 3A 80 00 6C 0E 34 00 8F | DONE!.":..l.4..| 00000660: 20 48 45 4C 50 20 53 43 52 45 45 4E 00 75 0E 35 | HELP SCREEN.u.5| 00000670: 00 99 54 54 24 00 9F 0E 36 00 99 22 11 1D C9 4E |..TT$...6.."...N| 00000680: 46 4F 52 4D 41 54 49 4F 4E 20 41 42 4F 55 54 20 |FORMATION ABOUT | 00000690: 54 48 49 53 20 50 52 4F 47 52 41 4D 20 2D 22 00 |THIS PROGRAM -".| 000006A0: D0 0E 37 00 99 22 11 1D D4 48 45 20 50 52 4F 47 |..7.."...HE PROG| 000006B0: 52 41 4D 20 55 53 45 53 20 9A C4 C9 D2 C5 C3 D4 |RAM USES .......| 000006C0: A0 C1 C3 C3 C5 D3 D3 20 C2 D5 C6 C6 C5 D2 98 22 |....... ......."| 000006D0: 00 FD 0E 38 00 99 22 1D 54 45 43 48 4E 49 51 55 |...8..".TECHNIQU| 000006E0: 45 20 54 4F 20 43 48 41 4E 47 45 20 41 20 53 49 |E TO CHANGE A SI| 000006F0: 4E 47 4C 45 20 42 59 54 45 20 4F 4E 22 00 2F 0F |NGLE BYTE ON"./.| 00000700: 39 00 99 22 1D 54 52 41 43 4B 20 1C 31 38 98 2C |9..".TRACK .18.,| 00000710: 20 53 45 43 54 4F 52 20 1C 30 98 20 4F 46 20 54 | SECTOR .0. OF T| 00000720: 48 45 20 44 49 53 4B 20 49 4E 20 41 4E 59 22 00 |HE DISK IN ANY".| 00000730: 5C 0F 3A 00 99 22 1D 31 35 34 30 2D 31 35 34 31 |\.:..".1540-1541| 00000740: 2D 34 30 34 30 20 46 4F 52 4D 41 54 2E 20 20 D9 |-4040 FORMAT. .| 00000750: 4F 55 20 43 41 4E 20 52 45 41 44 22 00 8B 0F 3B |OU CAN READ"...;| 00000760: 00 99 22 1D 46 52 4F 4D 20 54 48 45 20 44 49 53 |..".FROM THE DIS| 00000770: 4B 2C 20 41 4E 44 20 43 4F 50 59 20 49 54 2C 20 |K, AND COPY IT, | 00000780: 42 55 54 20 54 52 59 20 54 4F 22 00 BA 0F 3C 00 |BUT TRY TO"...<.| 00000790: 99 22 1D 57 52 49 54 45 20 54 4F 20 49 54 2C 20 |.".WRITE TO IT, | 000007A0: 41 4E 44 20 59 4F 55 20 57 49 4C 4C 20 47 45 54 |AND YOU WILL GET| 000007B0: 20 41 4E 20 45 52 52 4F 52 22 00 E1 0F 3D 00 99 | AN ERROR"...=..| 000007C0: 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 96 37 |"..............7| 000007D0: 33 20 20 C4 CF D3 20 CD C9 D3 CD C1 D4 C3 C8 98 |3 ... .........| 000007E0: 22 00 10 10 3E 00 99 22 11 11 1D D4 48 45 20 4F |"...>.."....HE O| 000007F0: 4E 4C 59 20 57 41 59 20 54 4F 20 52 45 56 45 52 |NLY WAY TO REVER| 00000800: 53 45 20 54 48 49 53 20 50 52 4F 43 45 53 53 22 |SE THIS PROCESS"| 00000810: 00 3E 10 3F 00 99 22 1D 49 53 20 54 4F 20 43 4F |.>.?..".IS TO CO| 00000820: 50 59 20 54 48 45 20 46 49 4C 45 53 20 54 4F 20 |PY THE FILES TO | 00000830: 41 4E 4F 54 48 45 52 20 44 49 53 4B 2C 22 00 6D |ANOTHER DISK,".m| 00000840: 10 40 00 99 22 1D 41 4E 44 20 54 48 45 4E 20 54 |.@..".AND THEN T| 00000850: 4F 20 46 4F 52 4D 41 54 20 28 57 49 54 48 20 54 |O FORMAT (WITH T| 00000860: 48 45 20 CE C5 D7 A0 43 4D 44 29 2E 22 00 96 10 |HE ....CMD)."...| 00000870: 41 00 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 95 50 52 |A.."..........PR| 00000880: 45 53 53 20 41 4E 59 20 4B 45 59 20 46 4F 52 20 |ESS ANY KEY FOR | 00000890: 4D 45 4E 55 98 22 00 A8 10 42 00 A1 4B 24 3A 8B |MENU."...B..K$:.| 000008A0: 4B 24 B2 22 22 A7 36 36 00 AF 10 43 00 89 39 00 |K$."".66...C..9.| 000008B0: 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................| 000008C0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................| 000008D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................| 000008E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................| 000008F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A |................|
....... SOFT PROTECT VER 2.1.1.... CHARL
ES CONLOW.E.... NOVEMBER 1984.K...:.L...
.53280,11:.53281,0:.53272,23.....TT$."..
... . .
S ./".G(13).....TT$.TT$."... SOFT PROTEC
T - C=64 VERSION 2.1 . ./".G(13).&...T
T$.TT$."...
.. / .P."./....TT$._...."...THIS IS
RELEASED TO THE PUBLIC DOMAIN"......"..
..........BY THE AUTHOR:"......"........
.......CHARLES CONLOW.".K...."..........
...WASHINGTON, DC."......".............N
OVEMBER 1984."......"...............741
16.3067.".9...."...[ .S. ] STARTS THE PR
OGRAM...".B...."..[ .H. ] EXPLAINS THE P
ROGRAM..."......"..[ .Q. ] STOPS IT HERE
..."......".............PRESS .S .H .OR
.Q.".S...."............ .. .. . .
.."......K$:.K$."".21......K$."S".K$."S"
.26......K$."H".K$."H".52.&....K$."Q".K$
."Q"........21.@.... HERE WE GO!.I....TT
$.E...."..SOFT PROTECTING..."......"..DE
VICE NUMBER 8...";DV$.....DV.E(DV$)....
..DV.8.DV.11.."...":.29.P. ..".. DRIVE N
UMBER 0...";DR$...!.DR.E(DR$)..."..DR..
0.DV..1.."...":.32.*.#.."...PLACE THE DI
SK INTO THE DRIVE (ABOVE)".L.$.."..THEN
PRESS .. RETURN ...".^.%..K$:.K$."".37.P
.&..K$..G(13).37...'..15,DV,15,"I".DR$."
:".H.(..15,E,E$,T,S:.E..0..TT$:."...DISK
ERROR! .";E;E$: 8: 15:..X.)..8,DV,8,"#"
...*..15,"UA:8,".DV$.",18,0".2.+..15,E,E
$,T,S:.E..0..TT$:."...DISK ERROR! .";E;E
$: 8: 15:..D.,..15,"B-P:8,2"...-..15,E,E
$,T,S:.E..0..TT$:."...DISK ERROR! .";E;E
$: 8: 15:.......8,G(1);:.../..15,"UB:8,"
.DV$.",18,0"...0..15,E,E$,T,S:.E..0..TT$
:."...DISK ERROR! .";E;E$: 8: 15:....1..
15,"I".DV$.":".<.2..15,E,E$,T,S:.E..0..T
T$:."...DISK ERROR! .";E;E$: 8: 15:..Z.3
. 8: 15:."...ALL DONE!.":..L.4.. HELP SC
REEN.U.5..TT$...6.."..INFORMATION ABOUT
THIS PROGRAM -".P.7.."..THE PROGRAM USES
.DIRECT ACCESS BUFFER."...8..".TECHNIQU
E TO CHANGE A SINGLE BYTE ON"./.9..".TRA
CK .18., SECTOR .0. OF THE DISK IN ANY".
\.:..".1540-1541-4040 FORMAT. YOU CAN R
EAD"...;..".FROM THE DISK, AND COPY IT,
BUT TRY TO"...<..".WRITE TO IT, AND YOU
WILL GET AN ERROR"...=.."..............7
3 DOS MISMATCH."...>.."...THE ONLY WAY
TO REVERSE THIS PROCESS".>.?..".IS TO CO
PY THE FILES TO ANOTHER DISK,".M.@..".AN
D THEN TO FORMAT (WITH THE NEW CMD)."...
A.."..........PRESS ANY KEY FOR MENU."..
.B..K$:.K$."".66...C..9.................
........................................
........................
> CLICK IMAGE PREVIEW FOR FULL MODAL