> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 00 00 9C 3A 99 22 93 11 11 22 3B C7 |.......:."...";.|
00000010: 28 31 34 29 00 36 08 01 00 99 22 20 20 20 20 20 |(14).6...." |
00000020: 20 20 20 20 20 31 3D C1 44 44 20 41 20 D0 41 53 | 1=.DD A .AS|
00000030: 53 57 4F 52 44 22 00 5C 08 02 00 99 22 20 20 20 |SWORD".\...." |
00000040: 20 20 20 20 20 20 20 32 3D D3 43 52 41 54 43 48 | 2=.CRATCH|
00000050: 20 41 20 D0 41 53 53 57 4F 52 44 22 00 81 08 03 | A .ASSWORD"....|
00000060: 00 99 22 20 20 20 20 20 20 20 20 20 20 33 3D C3 |.." 3=.|
00000070: 48 41 4E 47 45 20 D5 53 45 52 20 CC 45 56 45 4C |HANGE .SER .EVEL|
00000080: 22 00 A8 08 04 00 99 22 20 20 20 20 20 20 20 20 |"......" |
00000090: 20 20 34 3D D2 45 54 55 52 4E 20 54 4F 20 CD 41 | 4=.ETURN TO .A|
000000A0: 49 4E 20 CD 45 4E 55 22 00 B8 08 05 00 8D 31 31 |IN .ENU"......11|
000000B0: 3A 42 B2 C5 28 49 24 29 00 C4 08 06 00 8B 42 B1 |:B..(I$)......B.|
000000C0: 34 A7 89 30 00 D7 08 07 00 91 42 89 34 37 2C 33 |4..0......B.47,3|
000000D0: 31 2C 31 34 2C 37 33 00 DE 08 08 00 89 30 00 FE |1,14,73......0..|
000000E0: 08 09 00 8F 20 2A 20 2A 20 2A 20 2A 20 2A 20 2A |.... * * * * * *|
000000F0: 20 2A 20 2A 20 2A 20 2A 20 2A 20 2A 20 2A 00 1C | * * * * * * *..|
00000100: 09 0A 00 AC 20 AC 20 AC 20 AC 20 AC 20 AC 20 AC |.... . . . . . .|
00000110: 20 AC 20 AC 20 AC 20 AC 20 AC 20 AC 00 27 09 0B | . . . . . ..'..|
00000120: 00 97 31 39 38 2C 30 00 39 09 0C 00 A1 49 24 3A |..198,0.9....I$:|
00000130: 8B 49 24 B2 22 22 A7 31 32 00 3F 09 0D 00 8E 00 |.I$."".12.?.....|
00000140: 65 09 0E 00 9F 32 2C 38 2C 32 2C 22 55 53 4C 22 |e....2,8,2,"USL"|
00000150: 3A 9F 33 2C 38 2C 38 2C 22 40 30 3A 41 55 53 4C |:.3,8,8,"@0:AUSL|
00000160: 2C 53 2C 57 22 00 7E 09 0F 00 81 54 B2 31 A4 33 |,S,W".~....T.1.3|
00000170: 3A 84 32 2C 54 24 28 54 29 3A 4B B2 53 54 00 8C |:.2,T$(T):K.ST..|
00000180: 09 10 00 8B 4B B3 B1 30 A7 54 B2 33 00 9D 09 11 |....K..0.T.3....|
00000190: 00 82 54 3A 8B 4D 4B B2 31 A7 89 32 38 00 B6 09 |..T:.MK.1..28...|
000001A0: 12 00 99 22 93 22 3A 81 54 B2 31 A4 33 3A 99 54 |...".":.T.1.3:.T|
000001B0: 24 28 54 29 3A 82 00 D2 09 13 00 99 22 20 20 20 |$(T):......." |
000001C0: C3 48 41 4E 47 45 20 4C 45 56 45 4C 20 3F 3F 3F |.HANGE LEVEL ???|
000001D0: 22 3B 00 DB 09 14 00 8D 31 31 3A 00 01 0A 15 00 |";......11:.....|
000001E0: 8B 49 24 B2 22 2A 22 A7 99 C7 28 31 33 29 3B 22 |.I$."*"...(13);"|
000001F0: D7 4F 52 4B 49 4E 47 22 3A 4D 4B B2 31 3A 89 32 |.ORKING":MK.1:.2|
00000200: 38 00 19 0A 16 00 8B 49 24 B2 22 4E 22 A7 99 22 |8......I$."N".."|
00000210: 20 20 CE CF 22 3A 89 32 38 00 2A 0A 17 00 8B 49 | ..":.28.*....I|
00000220: 24 B3 B1 22 59 22 A7 89 32 30 00 38 0A 18 00 99 |$.."Y"..20.8....|
00000230: 22 20 D9 C5 D3 22 3A 99 00 5C 0A 19 00 85 22 20 |" ...":..\...." |
00000240: 20 45 4E 54 45 52 20 4E 45 57 20 CC 45 56 45 4C | ENTER NEW .EVEL|
00000250: 20 22 3B 54 24 28 33 29 3A 89 32 38 00 70 0A 1A | ";T$(3):.28.p..|
00000260: 00 8B 4B B3 B1 30 A7 A0 32 3A A0 33 3A 89 32 39 |..K..0..2:.3:.29|
00000270: 00 78 0A 1B 00 89 31 35 00 92 0A 1C 00 81 54 B2 |.x....15......T.|
00000280: 31 A4 33 3A 98 33 2C 54 24 28 54 29 3A 82 3A 89 |1.3:.3,T$(T):.:.|
00000290: 32 36 00 CD 0A 1D 00 9F 31 2C 38 2C 31 35 3A 98 |26......1,8,15:.|
000002A0: 31 2C 22 53 30 3A 55 53 4C 22 3A 98 31 2C 22 52 |1,"S0:USL":.1,"R|
000002B0: 30 3A 55 53 4C 3D 30 3A 41 55 53 4C 22 3A 98 31 |0:USL=0:AUSL":.1|
000002C0: 2C 22 53 30 3A 41 55 53 4C 22 3A A0 31 00 D9 0A |,"S0:AUSL":.1...|
000002D0: 1E 00 4D 4B B2 2E 3A 89 30 00 FC 0A 1F 00 9F 32 |..MK..:.0......2|
000002E0: 2C 38 2C 32 2C 22 55 53 4C 22 3A 9F 33 2C 38 2C |,8,2,"USL":.3,8,|
000002F0: 38 2C 22 41 55 53 4C 2C 53 2C 57 22 00 15 0B 20 |8,"AUSL,S,W"... |
00000300: 00 81 54 B2 31 A4 33 3A 84 32 2C 54 24 28 54 29 |..T.1.3:.2,T$(T)|
00000310: 3A 4B B2 53 54 00 23 0B 21 00 8B 4B B3 B1 30 A7 |:K.ST.#.!..K..0.|
00000320: 54 B2 33 00 34 0B 22 00 82 54 3A 8B 4D 4B B2 31 |T.3.4."..T:.MK.1|
00000330: A7 89 34 34 00 4D 0B 23 00 99 22 93 22 3A 81 54 |..44.M.#..".":.T|
00000340: B2 31 A4 33 3A 99 54 24 28 54 29 3A 82 00 72 0B |.1.3:.T$(T):..r.|
00000350: 24 00 99 22 20 20 20 53 43 52 41 54 43 48 20 54 |$.." SCRATCH T|
00000360: 48 49 53 20 4F 4E 45 20 3F 3F 3F 20 22 3B 3A 8D |HIS ONE ??? ";:.|
00000370: 31 31 00 89 0B 25 00 8B 49 24 B2 22 4E 22 A7 99 |11...%..I$."N"..|
00000380: 22 20 CE CF 22 3A 89 34 34 00 AF 0B 26 00 8B 49 |" ..":.44...&..I|
00000390: 24 B2 22 2A 22 A7 99 C7 28 31 33 29 3B 22 D7 4F |$."*"...(13);".O|
000003A0: 52 4B 49 4E 47 22 3A 4D 4B B2 31 3A 89 34 34 00 |RKING":MK.1:.44.|
000003B0: C0 0B 27 00 8B 49 24 B3 B1 22 59 22 A7 89 33 36 |..'..I$.."Y"..36|
000003C0: 00 CC 0B 28 00 99 22 20 D9 C5 D3 22 00 D2 0B 29 |...(.." ..."...)|
000003D0: 00 3A 00 E6 0B 2A 00 8B 4B B3 B1 30 A7 A0 32 3A |.:...*..K..0..2:|
000003E0: A0 33 3A 89 34 35 00 EE 0B 2B 00 89 33 32 00 08 |.3:.45...+..32..|
000003F0: 0C 2C 00 81 54 B2 31 A4 33 3A 98 33 2C 54 24 28 |.,..T.1.3:.3,T$(|
00000400: 54 29 3A 82 3A 89 34 32 00 43 0C 2D 00 9F 31 2C |T):.:.42.C.-..1,|
00000410: 38 2C 31 35 3A 98 31 2C 22 53 30 3A 55 53 4C 22 |8,15:.1,"S0:USL"|
00000420: 3A 98 31 2C 22 52 30 3A 55 53 4C 3D 30 3A 41 55 |:.1,"R0:USL=0:AU|
00000430: 53 4C 22 3A 98 31 2C 22 53 30 3A 41 55 53 4C 22 |SL":.1,"S0:AUSL"|
00000440: 3A A0 31 00 4F 0C 2E 00 4D 4B B2 2E 3A 89 30 00 |:.1.O...MK..:.0.|
00000450: 5B 0C 2F 00 8D 34 39 3A 89 35 34 00 67 0C 30 00 |[./..49:.54.g.0.|
00000460: 8D 35 31 3A 89 35 34 00 7D 0C 31 00 9F 34 2C 38 |.51:.54.}.1..4,8|
00000470: 2C 37 2C 22 55 53 45 52 2C 53 2C 41 22 00 AF 0C |,7,"USER,S,A"...|
00000480: 32 00 9F 33 2C 38 2C 38 2C 22 55 53 4C 2C 53 2C |2..3,8,8,"USL,S,|
00000490: 41 22 3A 9F 32 2C 38 2C 32 2C 22 41 50 4C 59 22 |A":.2,8,2,"APLY"|
000004A0: 3A 81 54 B2 31 A4 36 3A 84 32 2C 54 24 3A 82 00 |:.T.1.6:.2,T$:..|
000004B0: C8 0C 33 00 81 54 B2 31 A4 36 3A 84 32 2C 54 24 |..3..T.1.6:.2,T$|
000004C0: 28 54 29 3A 4B B2 53 54 00 D6 0C 34 00 8B 4B B3 |(T):K.ST...4..K.|
000004D0: B1 30 A7 54 B2 36 00 DF 0C 35 00 82 54 3A 8E 00 |.0.T.6...5..T:..|
000004E0: E5 0C 36 00 8F 00 FE 0C 37 00 99 22 93 22 3A 81 |..6.....7..".":.|
000004F0: 54 B2 31 A4 36 3A 99 54 24 28 54 29 3A 82 00 1E |T.1.6:.T$(T):...|
00000500: 0D 38 00 99 22 20 20 20 C1 C4 C4 20 54 48 49 53 |.8.." ... THIS|
00000510: 20 4F 4E 45 20 3F 3F 3F 20 22 3A 8D 31 31 00 36 | ONE ??? ":.11.6|
00000520: 0D 39 00 8B 49 24 B2 22 59 22 A7 99 22 20 D9 C5 |.9..I$."Y".." ..|
00000530: D3 22 3A 89 36 36 00 47 0D 3A 00 8B 49 24 B3 B1 |.":.66.G.:..I$..|
00000540: 22 4E 22 A7 89 35 36 00 52 0D 3B 00 99 22 20 CE |"N"..56.R.;.." .|
00000550: CF 22 00 5F 0D 3C 00 8B 4B B2 30 A7 89 34 38 00 |."._.<..K.0..48.|
00000560: 70 0D 3D 00 A0 33 3A A0 34 3A A0 32 3A 89 37 31 |p.=..3:.4:.2:.71|
00000570: 00 8C 0D 3E 00 99 3A 99 3A 85 22 20 D7 48 41 54 |...>..:.:." .HAT|
00000580: 20 4C 45 56 45 4C 20 3F 20 22 3B 41 00 9B 0D 3F | LEVEL ? ";A...?|
00000590: 00 54 24 28 33 29 B2 C4 28 41 29 00 A1 0D 40 00 |.T$(3)..(A)...@.|
000005A0: 8E 00 A9 0D 41 00 89 36 30 00 C3 0D 42 00 8D 36 |....A..60...B..6|
000005B0: 32 3A 81 54 B2 31 A4 33 3A 98 33 2C 54 24 28 54 |2:.T.1.3:.3,T$(T|
000005C0: 29 3A 82 00 D3 0D 43 00 81 54 B2 31 A4 35 30 30 |):....C..T.1.500|
000005D0: 3A 82 3A 00 E9 0D 44 00 81 54 B2 31 A4 36 3A 98 |:.:...D..T.1.6:.|
000005E0: 34 2C 54 24 28 54 29 3A 82 00 F1 0D 45 00 89 36 |4,T$(T):....E..6|
000005F0: 30 00 12 0E 46 00 42 B2 C3 28 49 24 29 3A 42 B2 |0...F.B..(I$):B.|
00000600: 42 AB 31 3A 49 24 B2 CA 28 49 24 2C 31 2C 42 29 |B.1:I$..(I$,1,B)|
00000610: 3A 8E 00 47 0E 47 00 A0 31 3A 9F 31 2C 38 2C 31 |:..G.G..1:.1,8,1|
00000620: 35 2C 22 53 30 3A 41 50 4C 59 22 3A A0 31 3A 9F |5,"S0:APLY":.1:.|
00000630: 31 2C 38 2C 32 2C 22 41 50 4C 59 2C 53 2C 57 22 |1,8,2,"APLY,S,W"|
00000640: 3A 81 54 B2 31 A4 36 00 5F 0E 48 00 98 31 2C 22 |:.T.1.6._.H..1,"|
00000650: 44 55 4D 4D 59 22 3A 82 54 3A A0 31 3A 89 30 00 |DUMMY":.T:.1:.0.|
00000660: 91 0E 49 00 99 22 93 11 11 D0 D5 D4 20 D0 D2 CF |..I.."...... ...|
00000670: C7 D2 C1 CD 20 C4 C9 D3 CB 20 C9 CE 20 C4 D2 C9 |.... .... .. ...|
00000680: D6 C5 20 D0 D2 C5 D3 D3 20 C1 CE D9 20 CB C5 D9 |.. ..... ... ...|
00000690: 22 00 A5 0E 4A 00 8D 31 31 3A 93 22 4D 41 49 4E |"...J..11:."MAIN|
000006A0: 22 2C 38 2C 31 00 00 00 |",8,1... |
.......:."...";G(14).6...." 1=A
DD A PASSWORD".\...." 2=SCRATCH
A PASSWORD"......" 3=CHANGE US
ER LEVEL"......" 4=RETURN TO MA
IN MENU"......11:B.E(I$).D....B.4..0.W..
..B.47,31,14,73......0...... * * * * * *
* * * * * * *...... . . . . . . . . . .
. ..'....198,0.9....I$:.I$."".12.?.....
E....2,8,2,"USL":.3,8,8,"@0:AUSL,S,W".~.
...T.1.3:.2,T$(T):K.ST......K..0.T.3....
..T:.MK.1..28......".":.T.1.3:.T$(T):..R
...." CHANGE LEVEL ???";......11:.....
.I$."*"..G(13);"WORKING":MK.1:.28......I
$."N".." NO":.28.*....I$.."Y"..20.8....
" YES":..\...." ENTER NEW LEVEL ";T$(3)
:.28.P....K..0. 2: 3:.29.X....15......T.
1.3:.3,T$(T):.:.26.M....1,8,15:.1,"S0:US
L":.1,"R0:USL=0:AUSL":.1,"S0:AUSL": 1.Y.
..MK..:.0......2,8,2,"USL":.3,8,8,"AUSL,
S,W"... ..T.1.3:.2,T$(T):K.ST.#.!..K..0.
T.3.4."..T:.MK.1..44.M.#..".":.T.1.3:.T$
(T):..R.$.." SCRATCH THIS ONE ??? ";:.
11...%..I$."N".." NO":.44...&..I$."*"..G
(13);"WORKING":MK.1:.44...'..I$.."Y"..36
.L.(.." YES".R.).:...*..K..0. 2: 3:.45..
.+..32...,..T.1.3:.3,T$(T):.:.42.C.-..1,
8,15:.1,"S0:USL":.1,"R0:USL=0:AUSL":.1,"
S0:AUSL": 1.O...MK..:.0.[./..49:.54.G.0.
.51:.54.}.1..4,8,7,"USER,S,A"...2..3,8,8
,"USL,S,A":.2,8,2,"APLY":.T.1.6:.2,T$:..
H.3..T.1.6:.2,T$(T):K.ST.V.4..K..0.T.6..
.5..T:....6.....7..".":.T.1.6:.T$(T):...
.8.." ADD THIS ONE ??? ":.11.6.9..I$."
Y".." YES":.66.G.:..I$.."N"..56.R.;.." N
O"._.<..K.0..48.P.=. 3: 4: 2:.71...>..:.
:." WHAT LEVEL ? ";A...?.T$(3).D(A)...@.
....A..60.C.B..62:.T.1.3:.3,T$(T):..S.C.
.T.1.500:.:...D..T.1.6:.4,T$(T):....E..6
0...F.B.C(I$):B.B.1:I$.J(I$,1,B):..G.G.
1:.1,8,15,"S0:APLY": 1:.1,8,2,"APLY,S,W"
:.T.1.6._.H..1,"DUMMY":.T: 1:.0...I.."..
.PUT PROGRAM DISK IN DRIVE PRESS ANY KEY
"...J..11:."MAIN",8,1...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL