PROTECTION

FILE INFORMATION

FILENAME(S): PROTECTION

FILE TYPE(S): PRG

FILE SIZE: 914b

FIRST SEEN: 2025-12-01 01:09:58

APPEARS ON: 1 disk(s)

FILE HASH

f439860fa6f54e42fcf62589ede375674485c13b6f613391c43aeaf73ea51d19

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
CA EN NYTTO DISK	PROTECTION	PRG	hedning, Martin L0fgren	23	12	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 3E 08 0A 00 99 22  93 12 20 20 20 20 20 50  |..>...."..     P|
00000010: 52 4F 54 45 43 54 49 4F  4E 21 20 20 20 20 20 20  |ROTECTION!      |
00000020: 11 22 3A 99 22 11 31 2E  20 53 4B 52 49 56 2F 4C  |.":.".1. SKRIV/L|
00000030: 49 53 54 53 4B 59 44 44  20 50 5D 2E 11 22 00 5D  |ISTSKYDD P]..".]|
00000040: 08 0F 00 99 22 32 2E 20  53 4B 52 49 56 2F 4C 49  |...."2. SKRIV/LI|
00000050: 53 54 53 4B 59 44 44 20  41 56 2E 11 22 00 9D 08  |STSKYDD AV.."...|
00000060: 14 00 99 22 33 2E 20 4F  5B 4E 44 4C 49 47 20 44  |..."3. O[NDLIG D|
00000070: 49 52 20 50 5D 2E 11 22  3A 99 22 34 2E 20 4F 5B  |IR P]..":."4. O[|
00000080: 4E 44 4C 49 47 20 44 49  52 20 41 56 2E 11 22 3A  |NDLIG DIR AV..":|
00000090: 85 22 41 4E 47 45 20 44  45 4C 22 3B 44 00 DD 08  |."ANGE DEL";D...|
000000A0: 1E 00 9F 31 35 2C 38 2C  31 35 2C 22 49 22 3A 9F  |...15,8,15,"I":.|
000000B0: 32 2C 38 2C 32 2C 22 23  22 3A 91 44 8D 31 30 30  |2,8,2,"#":.D.100|
000000C0: 2C 32 30 30 2C 33 30 30  2C 33 30 30 3A 98 31 35  |,200,300,300:.15|
000000D0: 2C 22 49 22 3A A0 32 3A  A0 31 35 3A 80 00 20 09  |,"I":.2:.15:.. .|
000000E0: 64 00 98 31 35 2C 22 55  31 3A 22 32 3B 30 3B 31  |d..15,"U1:"2;0;1|
000000F0: 38 3B 30 3A 81 49 B2 30  A4 31 34 33 3A 41 24 B2  |8;0:.I.0.143:A$.|
00000100: 41 24 AA C7 28 30 29 3A  82 3A 81 49 B2 31 34 34  |A$..(0):.:.I.144|
00000110: A4 31 34 36 3A 41 24 B2  41 24 AA C7 28 32 30 29  |.146:A$.A$..(20)|
00000120: 00 58 09 6E 00 82 3A 81  49 B2 31 34 37 A4 32 35  |.X.n..:.I.147.25|
00000130: 34 3A 41 24 B2 41 24 AA  C7 28 30 29 3A 82 3A 98  |4:A$.A$..(0):.:.|
00000140: 32 2C 41 24 3A 98 31 35  2C 22 55 32 3A 22 32 3B  |2,A$:.15,"U2:"2;|
00000150: 30 3B 31 38 3B 30 3A 8E  00 8A 09 C8 00 8D 31 30  |0;18;0:.......10|
00000160: 30 30 3A 85 22 11 44 49  53 4B 4E 41 4D 4E 22 3B  |00:.".DISKNAMN";|
00000170: 4E 24 3A 85 22 11 49 44  22 3B 49 24 3A 81 49 B2  |N$:.".ID";I$:.I.|
00000180: 31 A4 31 38 AB C3 28 4E  24 29 00 C4 09 D2 00 4E  |1.18..(N$).....N|
00000190: 24 B2 4E 24 AA C7 28 31  36 30 29 3A 82 3A 4E 24  |$.N$..(160):.:N$|
000001A0: B2 4E 24 AA 49 24 AA C7  28 31 36 30 29 AA 22 32  |.N$.I$..(160)."2|
000001B0: 41 22 3A 98 31 35 2C 22  55 31 3A 22 32 3B 30 3B  |A":.15,"U1:"2;0;|
000001C0: 31 38 3B 30 00 FA 09 DC  00 4E 31 24 B2 C7 28 30  |18;0.....N1$..(0|
000001D0: 29 AA C7 28 30 29 AA C7  28 36 35 29 3A 98 32 2C  |)..(0)..(65):.2,|
000001E0: 4E 31 24 3A 98 31 35 2C  22 42 2D 50 3A 22 32 3B  |N1$:.15,"B-P:"2;|
000001F0: 31 34 34 3A 98 32 2C 4E  24 3B 00 31 0A E6 00 98  |144:.2,N$;.1....|
00000200: 31 35 2C 22 55 32 3A 22  32 3B 30 3B 31 38 3B 30  |15,"U2:"2;0;18;0|
00000210: 3A 85 22 11 56 41 4C 49  44 41 54 45 20 28 4A 2F  |:.".VALIDATE (J/|
00000220: 4E 29 22 3B 41 24 3A 8B  41 24 B3 B1 22 4A 22 A7  |N)";A$:.A$.."J".|
00000230: 8E 00 3F 0A F0 00 98 31  35 2C 22 56 22 3A 8E 00  |..?....15,"V":..|
00000240: 56 0A 2C 01 8D 31 30 30  30 3A 42 B2 31 3A 8B 44  |V.,..1000:B.1:.D|
00000250: B2 34 A7 34 30 30 00 90  0A 36 01 98 31 35 2C 22  |.4.400...6..15,"|
00000260: 55 31 3A 22 32 3B 30 3B  31 38 3B 42 3A A1 23 32  |U1:"2;0;18;B:.#2|
00000270: 2C 41 24 2C 42 24 3A 41  24 B2 41 24 AA C7 28 30  |,A$,B$:A$.A$..(0|
00000280: 29 3A 8B C6 28 41 24 29  B3 B1 31 38 A7 33 33 30  |):..(A$)..18.330|
00000290: 00 AD 0A 40 01 42 B2 C6  28 42 24 29 3A 41 24 B2  |...@.B..(B$):A$.|
000002A0: 22 22 3A 42 24 B2 22 22  3A 89 33 31 30 00 E2 0A  |"":B$."":.310...|
000002B0: 4A 01 98 31 35 2C 22 42  2D 50 3A 22 32 3B 30 3A  |J..15,"B-P:"2;0:|
000002C0: 98 32 2C C7 28 31 38 29  3B C7 28 42 29 3B 3A 98  |.2,.(18);.(B);:.|
000002D0: 31 35 2C 22 55 32 3A 22  32 3B 30 3B 31 38 3B 42  |15,"U2:"2;0;18;B|
000002E0: 3A 8E 00 1A 0B 90 01 98  31 35 2C 22 55 31 3A 22  |:.......15,"U1:"|
000002F0: 32 3B 30 3B 31 38 3B 42  3A A1 23 32 2C 41 24 2C  |2;0;18;B:.#2,A$,|
00000300: 42 24 3A 42 24 B2 42 24  AA C7 28 30 29 3A 8B C6  |B$:B$.B$..(0):..|
00000310: 28 42 24 29 B2 42 A7 34  32 30 00 37 0B 9A 01 42  |(B$).B.420.7...B|
00000320: B2 C6 28 42 24 29 3A 41  24 B2 22 22 3A 42 24 B2  |..(B$):A$."":B$.|
00000330: 22 22 3A 89 34 30 30 00  6D 0B A4 01 98 31 35 2C  |"":.400.m....15,|
00000340: 22 42 2D 50 3A 22 32 3B  30 3A 98 32 2C C7 28 30  |"B-P:"2;0:.2,.(0|
00000350: 29 3B C7 28 32 35 35 29  3B 3A 98 31 35 2C 22 55  |);.(255);:.15,"U|
00000360: 32 3A 22 32 3B 30 3B 31  38 3B 42 3A 8E 00 8E 0B  |2:"2;0;18;B:....|
00000370: E8 03 98 31 35 2C 22 4D  2D 57 22 C7 28 31 29 C7  |...15,"M-W".(1).|
00000380: 28 31 29 C7 28 31 29 C7  28 36 35 29 3A 8E 00 00  |(1).(1).(65):...|
00000390: 00 20                                             |.               |

..>...."..     PROTECTION!      .":.".1.
 SKRIV/LISTSKYDD P]..".]...."2. SKRIV/LI
STSKYDD AV.."......"3. O[NDLIG DIR P].."
:."4. O[NDLIG DIR AV..":."ANGE DEL";D...
...15,8,15,"I":.2,8,2,"#":.D.100,200,300
,300:.15,"I": 2: 15:.. .D..15,"U1:"2;0;1
8;0:.I.0.143:A$.A$.G(0):.:.I.144.146:A$.
A$.G(20).X.N..:.I.147.254:A$.A$.G(0):.:.
2,A$:.15,"U2:"2;0;18;0:....H..1000:.".DI
SKNAMN";N$:.".ID";I$:.I.1.18.C(N$).D.R.N
$.N$.G(160):.:N$.N$.I$.G(160)."2A":.15,"
U1:"2;0;18;0.....N1$.G(0).G(0).G(65):.2,
N1$:.15,"B-P:"2;144:.2,N$;.1....15,"U2:"
2;0;18;0:.".VALIDATE (J/N)";A$:.A$.."J".
..?....15,"V":..V.,..1000:B.1:.D.4.400..
.6..15,"U1:"2;0;18;B:.#2,A$,B$:A$.A$.G(0
):.F(A$)..18.330...@.B.F(B$):A$."":B$.""
:.310...J..15,"B-P:"2;0:.2,G(18);G(B);:.
15,"U2:"2;0;18;B:.......15,"U1:"2;0;18;B
:.#2,A$,B$:B$.B$.G(0):.F(B$).B.420.7...B
.F(B$):A$."":B$."":.400.M....15,"B-P:"2;
0:.2,G(0);G(255);:.15,"U2:"2;0;18;B:....
...15,"M-W"G(1)G(1)G(1)G(65):....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL