_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

FILE PROTECTOR

FILE INFORMATION

FILENAME(S): FILE PROTECTOR

FILE TYPE(S): PRG

FILE SIZE: 913b

FIRST SEEN: 2025-12-01 01:02:32

APPEARS ON: 1 disk(s)

FILE HASH

d9f5473b9ea2139e8ac1a50513e79b6d1e6dc25b23ca0c1c73a12c01992edfa3

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
ARBETSDISK NR2 FILE PROTECTOR PRG hedning, German ebay 15 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 47 08 64 00 9F 31  35 2C 38 2C 31 35 2C 22  |..G.d..15,8,15,"|
00000010: 49 30 22 3A 9F 32 2C 38  2C 32 2C 22 23 22 3A 50  |I0":.2,8,2,"#":P|
00000020: 24 B2 22 4C 4F 43 4B 22  3A 8F 20 54 4F 20 55 4E  |$."LOCK":. TO UN|
00000030: 4C 4F 43 4B 20 46 49 4C  45 53 2C 20 50 24 3D 22  |LOCK FILES, P$="|
00000040: 55 4E 4C 4F 43 4B 22 00  62 08 6E 00 54 B2 31 38  |UNLOCK".b.n.T.18|
00000050: 3A 53 B2 30 3A 4E 4C 24  B2 C7 28 30 29 3A 8D 32  |:S.0:NL$..(0):.2|
00000060: 33 30 00 77 08 78 00 8B  53 4E B2 32 35 35 A7 A0  |30.w.x..SN.255..|
00000070: 32 3A A0 31 35 3A 80 00  8A 08 82 00 54 B2 54 4E  |2:.15:......T.TN|
00000080: 3A 53 B2 53 4E 3A 8D 32  33 30 00 B6 08 8C 00 81  |:S.SN:.230......|
00000090: 4A B2 30 A4 37 3A 52 28  4A 29 B2 30 3A 82 3A 99  |J.0.7:R(J).0:.:.|
000000A0: 22 93 54 59 50 45 20 4E  55 4D 42 45 52 20 4F 46  |".TYPE NUMBER OF|
000000B0: 20 46 49 4C 45 22 00 D2  08 96 00 99 22 59 4F 55  | FILE"......"YOU|
000000C0: 20 57 49 53 48 20 54 4F  20 12 22 3B 50 24 3B 22  | WISH TO .";P$;"|
000000D0: 92 22 00 15 09 A0 00 81  4A B2 30 A4 37 3A 46 54  |."......J.0.7:FT|
000000E0: 28 4A 29 B2 4A AC 33 32  AA 32 3A 98 31 35 2C 22  |(J).J.32.2:.15,"|
000000F0: 42 2D 50 22 3B 32 3B 46  54 28 4A 29 3A A1 23 32  |B-P";2;FT(J):.#2|
00000100: 2C 50 53 24 3A 50 53 28  4A 29 B2 C6 28 50 53 24  |,PS$:PS(J)..(PS$|
00000110: AA 4E 4C 24 29 00 42 09  AA 00 8B 50 53 28 4A 29  |.NL$).B....PS(J)|
00000120: B3 B1 30 A7 52 28 4A 29  B2 31 3A 8D 32 35 30 3A  |..0.R(J).1:.250:|
00000130: 44 B2 4A 3A 8D 33 36 30  3A 8B 46 4C B2 31 A7 4A  |D.J:.360:.FL.1.J|
00000140: B2 37 00 4E 09 B4 00 82  4A 3A 8D 33 37 30 00 61  |.7.N....J:.370.a|
00000150: 09 BE 00 A1 42 24 3A 8B  42 24 B2 22 22 A7 31 39  |....B$:.B$."".19|
00000160: 30 00 77 09 C8 00 42 B2  C5 28 42 24 29 3A 8B 42  |0.w...B..(B$):.B|
00000170: B2 54 45 A7 31 32 30 00  87 09 D2 00 8B 52 28 42  |.TE.120......R(B|
00000180: 29 B2 30 A7 31 39 30 00  95 09 DC 00 8D 33 30 30  |).0.190......300|
00000190: 3A 89 31 39 30 00 AF 09  E6 00 98 31 35 2C 22 55  |:.190......15,"U|
000001A0: 31 22 3B 32 3B 30 3B 54  3B 53 3A 8D 33 38 30 00  |1";2;0;T;S:.380.|
000001B0: DD 09 F0 00 A1 23 32 2C  54 4E 24 2C 53 4E 24 3A  |.....#2,TN$,SN$:|
000001C0: 54 4E B2 C6 28 54 4E 24  AA 4E 4C 24 29 3A 53 4E  |TN..(TN$.NL$):SN|
000001D0: B2 C6 28 53 4E 24 AA 4E  4C 24 29 3A 8E 00 FC 09  |..(SN$.NL$):....|
000001E0: FA 00 A1 23 32 2C 4A 24  3A A1 23 32 2C 4A 24 3A  |...#2,J$:.#2,J$:|
000001F0: 43 B2 30 3A 46 24 28 4A  29 B2 22 22 00 13 0A 04  |C.0:F$(J).""....|
00000200: 01 A1 23 32 2C 41 24 3A  41 B2 C6 28 41 24 AA 4E  |..#2,A$:A..(A$.N|
00000210: 4C 24 29 00 43 0A 0E 01  8B 41 B3 B1 31 36 30 AF  |L$).C....A..160.|
00000220: 41 B3 B1 30 A7 46 24 28  4A 29 B2 46 24 28 4A 29  |A..0.F$(J).F$(J)|
00000230: AA 41 24 3A 43 B2 43 AA  31 3A 8B 43 B3 31 37 A7  |.A$:C.C.1:.C.17.|
00000240: 32 36 30 00 58 0A 18 01  54 45 B2 4A AA 31 3A 8B  |260.X...TE.J.1:.|
00000250: 41 B2 30 A7 46 4C B2 31  00 5E 0A 22 01 8E 00 74  |A.0.FL.1.^."...t|
00000260: 0A 2C 01 98 31 35 2C 22  42 2D 50 22 3B 32 3B 46  |.,..15,"B-P";2;F|
00000270: 54 28 42 29 00 A9 0A 36  01 8B 50 24 B2 22 4C 4F  |T(B)...6..P$."LO|
00000280: 43 4B 22 A7 50 53 28 42  29 B2 50 53 28 42 29 B0  |CK".PS(B).PS(B).|
00000290: 36 34 3A 98 32 2C C7 28  50 53 28 42 29 29 3B 3A  |64:.2,.(PS(B));:|
000002A0: 8D 33 38 30 3A 89 33 33  30 00 CF 0A 40 01 50 53  |.380:.330...@.PS|
000002B0: 28 42 29 B2 50 53 28 42  29 AF 31 39 31 3A 98 32  |(B).PS(B).191:.2|
000002C0: 2C C7 28 50 53 28 42 29  29 3B 3A 8D 33 38 30 00  |,.(PS(B));:.380.|
000002D0: E9 0A 4A 01 98 31 35 2C  22 55 32 22 3B 32 3B 30  |..J..15,"U2";2;0|
000002E0: 3B 54 3B 53 3A 8D 33 38  30 00 0B 0B 54 01 99 22  |;T;S:.380...T.."|
000002F0: 13 11 22 3A 81 4B B2 30  A4 37 3A 8B 52 28 4B 29  |..":.K.0.7:.R(K)|
00000300: B2 31 A7 44 B2 4B 3A 8D  33 36 30 00 19 0B 5E 01  |.1.D.K:.360...^.|
00000310: 82 4B 3A 8D 33 37 30 3A  8E 00 48 0B 68 01 58 B2  |.K:.370:..H.h.X.|
00000320: 28 50 53 28 44 29 AF 36  34 29 AB 34 3A 58 B2 58  |(PS(D).64).4:X.X|
00000330: AB 28 58 B3 30 29 AC 33  36 3A 99 44 C7 28 58 29  |.(X.0).36:.D.(X)|
00000340: 3B 46 24 28 44 29 3A 8E  00 5B 0B 72 01 99 54 45  |;F$(D):..[.r..TE|
00000350: 22 20 12 4E 45 58 54 92  22 3A 8E 00 70 0B 7C 01  |" .NEXT.":..p.|.|
00000360: 84 31 35 2C 45 4E 2C 45  4D 24 2C 45 54 2C 45 53  |.15,EN,EM$,ET,ES|
00000370: 00 88 0B 86 01 8B 45 4E  A7 99 45 4E 2C 45 4D 24  |......EN..EN,EM$|
00000380: 2C 45 54 2C 45 53 3A 90  00 8E 0B 90 01 8E 00 00  |,ET,ES:.........|
00000390: 00                                                |.               |
..G.D..15,8,15,"I0":.2,8,2,"#":P$."LOCK"
:. TO UNLOCK FILES, P$="UNLOCK".B.N.T.18
:S.0:NL$.G(0):.230.W.X..SN.255. 2: 15:..
....T.TN:S.SN:.230......J.0.7:R(J).0:.:.
".TYPE NUMBER OF FILE".R...."YOU WISH TO
 .";P$;"."... ..J.0.7:FT(J).J.32.2:.15,"
B-P";2;FT(J):.#2,PS$:PS(J).F(PS$.NL$).B.
...PS(J)..0.R(J).1:.250:D.J:.360:.FL.1.J
.7.N....J:.370.A....B$:.B$."".190.W.H.B.
E(B$):.B.TE.120...R..R(B).0.190......300
:.190......15,"U1";2;0;T;S:.380......#2,
TN$,SN$:TN.F(TN$.NL$):SN.F(SN$.NL$):....
...#2,J$:.#2,J$:C.0:F$(J).""......#2,A$:
A.F(A$.NL$).C....A..160.A..0.F$(J).F$(J)
.A$:C.C.1:.C.17.260.X...TE.J.1:.A.0.FL.1
.^."...T.,..15,"B-P";2;FT(B)...6..P$."LO
CK".PS(B).PS(B).64:.2,G(PS(B));:.380:.33
0.O.@.PS(B).PS(B).191:.2,G(PS(B));:.380.
..J..15,"U2";2;0;T;S:.380...T.."..":.K.0
.7:.R(K).1.D.K:.360...^..K:.370:..H.H.X.
(PS(D).64).4:X.X.(X.0).36:.DG(X);F$(D):.
.[.R..TE" .NEXT.":..P.|..15,EN,EM$,ET,ES
......EN..EN,EM$,ET,ES:..........
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL