BASIC-LOCK.C16
FILE INFORMATION
FILENAME(S): BASIC-LOCK.C16
FILE TYPE(S): PRG
FILE SIZE: 1.6K
FIRST SEEN: 2025-11-30 01:12:44
APPEARS ON: 2 disk(s)
FILE HASH
60f535486da437aeae4859d76038bc2445a653086cdfd72631977fae05243ce3
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10705 64ER 5 87 | BASIC-LOCK.C16 | PRG | C64er, DuncanTwain | 28 | 2 | DOWNLOAD FILE |
| 10705 64ER 5 87 | BASIC-LOCK.C16 | PRG | DuncanTwain | 28 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 2B 25 49 25 00 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |+%I%... ********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.| 00000020: 67 25 01 00 8F 20 2A 20 20 42 41 53 49 43 2D 4C |g%... * BASIC-L| 00000030: 4F 43 4B 20 53 59 53 54 45 4D 20 20 2A 00 85 25 |OCK SYSTEM *..%| 00000040: 02 00 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 |... * | 00000050: 20 20 20 20 20 20 20 20 20 20 2A 00 A3 25 03 00 | *..%..| 00000060: 8F 20 2A 2A 2A 2A 2A 2A 20 20 57 52 49 54 54 45 |. ****** WRITTE| 00000070: 4E 20 20 2A 2A 2A 2A 2A 2A 00 C1 25 04 00 8F 20 |N ******..%... | 00000080: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |* | 00000090: 20 20 20 20 20 20 2A 00 DF 25 05 00 8F 20 2A 2A | *..%... **| 000000A0: 2A 2A 2A 2A 2A 2A 20 20 42 59 20 20 20 2A 2A 2A |****** BY ***| 000000B0: 2A 2A 2A 2A 2A 00 FD 25 06 00 8F 20 2A 20 20 20 |*****..%... * | 000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000D0: 20 20 2A 00 1B 26 07 00 8F 20 2A 20 20 4A 55 45 | *..&... * JUE| 000000E0: 52 47 45 4E 20 20 48 45 52 52 4D 41 4E 4E 20 20 |RGEN HERRMANN | 000000F0: 2A 00 39 26 08 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*.9&... ********| 00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.| 00000110: 3F 26 09 00 3A 00 66 26 0A 00 E8 3A E7 20 30 2C |?&..:.f&...:. 0,| 00000120: 31 2C 30 3A E7 20 34 2C 31 2C 30 3A E7 31 2C 32 |1,0:. 4,1,0:.1,2| 00000130: 2C 35 3A 97 36 35 32 38 36 2C 31 31 00 75 26 0B |,5:.65286,11.u&.| 00000140: 00 99 C7 28 31 34 29 C7 28 38 29 00 AD 26 0C 00 |...(14).(8)..&..| 00000150: E0 20 31 2C 30 2C 30 2C 22 12 20 20 20 20 20 20 |. 1,0,0,". | 00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000180: 20 92 22 00 E5 26 0D 00 E0 20 31 2C 30 2C 31 2C | ."..&... 1,0,1,| 00000190: 22 12 20 20 20 20 20 20 20 20 20 20 20 C2 41 53 |". .AS| 000001A0: 49 43 2D CC 4F 43 4B 20 D3 59 53 54 45 4D 20 20 |IC-.OCK .YSTEM | 000001B0: 20 20 20 20 20 20 20 20 20 92 22 00 1D 27 0E 00 | ."..'..| 000001C0: E0 20 31 2C 30 2C 32 2C 22 12 20 20 20 20 20 20 |. 1,0,2,". | 000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001F0: 20 92 22 00 56 27 0F 00 E0 20 31 2C 30 2C 32 34 | .".V'... 1,0,24| 00000200: 2C 22 12 20 20 20 20 20 20 57 52 49 54 54 45 4E |,". WRITTEN| 00000210: 20 42 59 20 CA 55 45 52 47 45 4E 20 C8 45 52 52 | BY .UERGEN .ERR| 00000220: 4D 41 4E 4E 20 20 20 20 20 20 92 22 00 62 27 10 |MANN .".b'.| 00000230: 00 81 49 B2 30 A4 33 39 00 72 27 11 00 3A 97 32 |..I.0.39.r'..:.2| 00000240: 30 34 38 AA 49 2C 34 39 00 82 27 12 00 3A 97 32 |048.I,49..'..:.2| 00000250: 30 38 38 AA 49 2C 36 35 00 92 27 13 00 3A 97 32 |088.I,65..'..:.2| 00000260: 31 32 38 AA 49 2C 38 31 00 A2 27 14 00 3A 97 33 |128.I,81..'..:.3| 00000270: 30 30 38 AA 49 2C 36 35 00 A8 27 15 00 82 00 B6 |008.I,65..'.....| 00000280: 27 16 00 97 36 35 32 38 36 2C 32 37 00 BC 27 17 |'...65286,27..'.| 00000290: 00 3A 00 D7 27 18 00 41 24 28 31 29 B2 22 D6 4F |.:..'..A$(1).".O| 000002A0: 52 47 41 4E 47 53 57 45 49 53 45 3A 22 00 F2 27 |RGANGSWEISE:"..'| 000002B0: 19 00 41 24 28 32 29 B2 22 A3 A3 A3 A3 A3 A3 A3 |..A$(2).".......| 000002C0: A3 A3 A3 A3 A3 A3 A3 22 00 23 28 1A 00 41 24 28 |.......".#(..A$(| 000002D0: 33 29 B2 22 31 2E 20 C4 41 53 20 5A 55 20 53 43 |3)."1. .AS ZU SC| 000002E0: 48 55 45 54 5A 45 4E 44 45 20 C2 41 53 49 43 2D |HUETZENDE .ASIC-| 000002F0: D0 52 4F 47 52 41 4D 4D 22 00 39 28 1B 00 41 24 |.ROGRAMM".9(..A$| 00000300: 28 34 29 B2 22 20 20 20 4C 41 44 45 4E 2E 22 00 |(4)." LADEN.".| 00000310: 67 28 1C 00 41 24 28 35 29 B2 22 32 2E 20 C4 45 |g(..A$(5)."2. .E| 00000320: 4E 20 D3 50 45 49 43 48 45 52 20 41 55 46 20 24 |N .PEICHER AUF $| 00000330: 31 30 30 31 20 5A 55 52 55 45 43 4B 22 00 8C 28 |1001 ZURUECK"..(| 00000340: 1D 00 41 24 28 36 29 B2 22 20 20 20 53 45 54 5A |..A$(6)." SETZ| 00000350: 45 4E 2E 3D 3D 3E 20 D0 4F 4B 45 20 34 33 2C 31 |EN.==> .OKE 43,1| 00000360: 2E 22 00 BB 28 1E 00 41 24 28 37 29 B2 22 33 2E |."..(..A$(7)."3.| 00000370: 20 C4 41 4E 41 43 48 20 44 41 53 20 47 45 53 43 | .ANACH DAS GESC| 00000380: 48 55 45 54 5A 54 45 20 D0 52 4F 47 52 41 4D 4D |HUETZTE .ROGRAMM| 00000390: 22 00 D5 28 1F 00 41 24 28 38 29 B2 22 20 20 20 |"..(..A$(8)." | 000003A0: 53 50 45 49 43 48 45 52 4E 2E 22 00 FB 28 20 00 |SPEICHERN."..( .| 000003B0: 41 24 28 39 29 B2 22 20 20 C2 49 54 54 45 20 3C |A$(9)." .ITTE <| 000003C0: D3 D0 C1 C3 C5 3E 20 44 52 55 45 43 4B 45 4E 21 |.....> DRUECKEN!| 000003D0: 22 00 01 29 21 00 3A 00 12 29 22 00 81 49 B2 31 |"..)!.:..)"..I.1| 000003E0: A4 39 3A 53 B2 53 AA 32 00 25 29 23 00 3A 81 5A |.9:S.S.2.%)#.:.Z| 000003F0: B2 30 A4 C3 28 41 24 28 49 29 29 00 3C 29 24 00 |.0..(A$(I)).<)$.| 00000400: 3A 3A 42 24 28 49 29 B2 C9 28 41 24 28 49 29 2C |::B$(I)..(A$(I),| 00000410: 5A 29 00 52 29 25 00 3A 3A E0 20 31 2C 31 2C 34 |Z).R)%.::. 1,1,4| 00000420: AA 53 2C 42 24 28 49 29 00 59 29 26 00 3A 82 00 |.S,B$(I).Y)&.:..| 00000430: 5F 29 27 00 82 00 68 29 28 00 A1 F9 54 24 00 7D |_)'...h)(...T$.}| 00000440: 29 29 00 97 32 30 32 31 2C 32 33 3A 97 32 30 32 |))..2021,23:.202| 00000450: 32 2C 33 00 83 29 2A 00 E8 00 89 29 2B 00 3A 00 |2,3..)*....)+.:.| 00000460: 9A 29 2C 00 81 49 B2 31 36 33 30 A4 31 37 32 34 |.),..I.1630.1724| 00000470: 00 A4 29 2D 00 3A 87 20 5A 24 00 B1 29 2E 00 3A |..)-.:. Z$..)..:| 00000480: 5A B2 D1 28 5A 24 29 00 BC 29 2F 00 3A 56 B2 56 |Z..(Z$)..)/.:V.V| 00000490: AA 5A 00 C7 29 30 00 3A 97 20 49 2C 5A 00 CD 29 |.Z..)0.:. I,Z..)| 000004A0: 31 00 82 00 F7 29 32 00 8B 20 56 B3 B1 38 33 30 |1....)2.. V..830| 000004B0: 38 20 A7 20 99 22 46 45 48 4C 45 52 20 49 4E 20 |8 . ."FEHLER IN | 000004C0: 44 41 54 41 27 53 20 21 21 21 22 3A 90 00 02 2A |DATA'S !!!":...*| 000004D0: 33 00 9E 20 31 37 30 35 00 20 2A 34 00 83 20 31 |3.. 1705. *4.. 1| 000004E0: 39 2C 31 30 2C 44 31 2C 30 37 2C 39 45 2C 32 30 |9,10,D1,07,9E,20| 000004F0: 2C 33 34 2C 33 31 00 3E 2A 35 00 83 20 33 32 2C |,34,31.>*5.. 32,| 00000500: 33 34 2C 31 34 2C 31 34 2C 31 34 2C 31 34 2C 31 |34,14,14,14,14,1| 00000510: 34 2C 31 34 00 5C 2A 36 00 83 20 31 34 2C 31 34 |4,14.\*6.. 14,14| 00000520: 2C 34 32 2C 32 45 2C 34 43 2C 32 45 2C 35 33 2C |,42,2E,4C,2E,53,| 00000530: 32 45 00 6B 2A 37 00 83 20 30 30 2C 30 30 2C 30 |2E.k*7.. 00,00,0| 00000540: 30 00 89 2A 38 00 83 20 41 39 2C 34 43 2C 38 35 |0..*8.. A9,4C,85| 00000550: 2C 32 42 2C 41 39 2C 31 30 2C 38 35 2C 32 43 00 |,2B,A9,10,85,2C.| 00000560: A7 2A 39 00 83 20 32 30 2C 38 42 2C 44 38 2C 41 |.*9.. 20,8B,D8,A| 00000570: 39 2C 30 33 2C 38 35 2C 45 46 2C 41 39 00 C5 2A |9,03,85,EF,A9..*| 00000580: 3A 00 83 20 35 32 2C 38 44 2C 32 37 2C 30 35 2C |:.. 52,8D,27,05,| 00000590: 41 39 2C 44 35 2C 38 44 2C 32 38 00 E3 2A 3B 00 |A9,D5,8D,28..*;.| 000005A0: 83 20 30 35 2C 41 39 2C 30 44 2C 38 44 2C 32 39 |. 05,A9,0D,8D,29| 000005B0: 2C 30 35 2C 41 39 2C 37 33 00 01 2B 3C 00 83 20 |,05,A9,73..+<.. | 000005C0: 38 44 2C 32 36 2C 30 33 2C 41 39 2C 46 39 2C 38 |8D,26,03,A9,F9,8| 000005D0: 44 2C 30 36 2C 30 33 00 1F 2B 3D 00 83 20 41 39 |D,06,03..+=.. A9| 000005E0: 2C 46 46 2C 38 44 2C 30 37 2C 30 33 2C 36 30 2C |,FF,8D,07,03,60,| 000005F0: 30 30 2C 30 30 00 3D 2B 3E 00 83 20 37 38 2C 41 |00,00.=+>.. 78,A| 00000600: 32 2C 30 30 2C 42 44 2C 35 45 2C 30 36 2C 39 44 |2,00,BD,5E,06,9D| 00000610: 2C 30 31 00 5B 2B 3F 00 83 20 31 30 2C 45 38 2C |,01.[+?.. 10,E8,| 00000620: 45 30 2C 35 34 2C 44 30 2C 46 35 2C 41 39 2C 34 |E0,54,D0,F5,A9,4| 00000630: 43 00 6D 2B 40 00 83 20 38 35 2C 32 42 2C 35 38 |C.m+@.. 85,2B,58| 00000640: 2C 36 30 00 00 00 |,60... |
+%I%... ***********************.G%... *
BASIC-LOCK SYSTEM *..%... *
*..%... ****** WRITTEN *****
*.A%... * *..%... **
****** BY ********..%... *
*..&... * JUERGEN HERRMANN
*.9&... ***********************.?&..:.F&
...:. 0,1,0:. 4,1,0:.1,2,5:.65286,11.U&.
..G(14)G(8)..&... 1,0,0,".
."..&... 1,0,1,
". BASIC-LOCK SYSTEM
."..'... 1,0,2,".
.".V'... 1,0,24,".
WRITTEN BY JUERGEN HERRMANN .".B'.
..I.0.39.R'..:.2048.I,49..'..:.2088.I,65
..'..:.2128.I,81..'..:.3008.I,65..'.....
'...65286,27..'..:.W'..A$(1)."VORGANGSWE
ISE:"..'..A$(2)."..............".#(..A$(
3)."1. DAS ZU SCHUETZENDE BASIC-PROGRAMM
".9(..A$(4)." LADEN.".G(..A$(5)."2. DE
N SPEICHER AUF $1001 ZURUECK"..(..A$(6).
" SETZEN.==> POKE 43,1."..(..A$(7)."3.
DANACH DAS GESCHUETZTE PROGRAMM".U(..A$
(8)." SPEICHERN."..( .A$(9)." BITTE <
SPACE> DRUECKEN!"..)!.:..)"..I.1.9:S.S.2
.%)#.:.Z.0.C(A$(I)).<)$.::B$(I).I(A$(I),
Z).R)%.::. 1,1,4.S,B$(I).Y)&.:.._)'...H)
(...T$.}))..2021,23:.2022,3..)*....)+.:.
.),..I.1630.1724..)-.:. Z$..)..:Z.Q(Z$).
.)/.:V.V.Z.G)0.:. I,Z.M)1....)2.. V..830
8 . ."FEHLER IN DATA'S !!!":...*3.. 1705
. *4.. 19,10,D1,07,9E,20,34,31.>*5.. 32,
34,14,14,14,14,14,14.\*6.. 14,14,42,2E,4
C,2E,53,2E.K*7.. 00,00,00..*8.. A9,4C,85
,2B,A9,10,85,2C..*9.. 20,8B,D8,A9,03,85,
EF,A9.E*:.. 52,8D,27,05,A9,D5,8D,28..*;.
. 05,A9,0D,8D,29,05,A9,73..+<.. 8D,26,03
,A9,F9,8D,06,03..+=.. A9,FF,8D,07,03,60,
00,00.=+>.. 78,A2,00,BD,5E,06,9D,01.[+?.
. 10,E8,E0,54,D0,F5,A9,4C.M+@.. 85,2B,58
,60...
> CLICK IMAGE PREVIEW FOR FULL MODAL