> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0F 08 01 00 4D 45 4D B2 34 39 31 35 32 00 |......MEM.49152.|
00000010: 2B 08 02 00 4A 42 B2 30 20 3A 8F 20 4A 4F 42 20 |+...JB.0 :. JOB |
00000020: 51 55 45 20 4D 45 4D 20 4C 4F 43 00 4F 08 03 00 |QUE MEM LOC.O...|
00000030: 54 53 B2 36 20 3A 8F 20 4D 45 4D 20 4C 4F 43 20 |TS.6 :. MEM LOC |
00000040: 46 4F 52 20 54 52 2C 53 43 20 54 41 42 4C 45 00 |FOR TR,SC TABLE.|
00000050: 72 08 04 00 45 58 B2 31 34 AC 31 36 20 3A 8F 20 |r...EX.14.16 :. |
00000060: 45 58 49 43 55 54 45 20 43 4F 44 45 20 56 41 4C |EXICUTE CODE VAL|
00000070: 55 45 00 78 08 05 00 3A 00 8E 08 E8 03 97 35 33 |UE.x...:......53|
00000080: 32 38 30 2C 31 3A 97 35 33 32 38 31 2C 30 00 B7 |280,1:.53281,0..|
00000090: 08 F2 03 99 22 93 9A 20 20 20 20 20 20 20 20 20 |....".. |
000000A0: 20 20 20 44 49 53 4B 20 45 52 52 4F 52 20 4D 41 | DISK ERROR MA|
000000B0: 4B 45 52 11 11 11 22 00 E0 08 FC 03 99 22 11 11 |KER..."......"..|
000000C0: 49 4E 53 45 52 54 20 44 49 53 4B 20 54 48 45 4E |INSERT DISK THEN|
000000D0: 20 50 52 45 53 53 20 12 52 45 54 55 52 4E 92 22 | PRESS .RETURN."|
000000E0: 00 F8 08 06 04 A1 41 24 3A 8B 41 24 B3 B1 C7 28 |......A$:.A$...(|
000000F0: 31 33 29 A7 31 30 33 30 00 21 09 10 04 99 22 91 |13).1030.!....".|
00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000120: 22 00 3F 09 1A 04 9F 31 35 2C 38 2C 31 35 2C 22 |".?....15,8,15,"|
00000130: 49 30 22 3A A1 23 31 35 2C 41 3A 8B 41 A7 90 00 |I0":.#15,A:.A...|
00000140: 4F 09 24 04 9F 32 2C 38 2C 32 2C 22 23 30 22 00 |O.$..2,8,2,"#0".|
00000150: 55 09 2E 04 3A 00 73 09 38 04 99 22 93 9A 20 44 |U...:.s.8..".. D|
00000160: 49 53 4B 20 45 52 52 4F 52 20 4D 41 4B 45 52 20 |ISK ERROR MAKER |
00000170: 11 11 22 00 8D 09 40 04 99 22 11 11 11 20 2A 2A |.."...@.."... **|
00000180: 2A 20 4D 45 4E 55 20 2A 2A 2A 11 11 22 00 AA 09 |* MENU ***.."...|
00000190: 42 04 99 22 9F 31 2E 20 20 32 31 2C 45 52 41 53 |B..".1. 21,ERAS|
000001A0: 45 20 41 20 54 52 41 43 4B 22 00 CF 09 4C 04 99 |E A TRACK"...L..|
000001B0: 22 32 2E 20 20 32 32 2C 44 41 54 41 20 42 4C 4F |"2. 22,DATA BLO|
000001C0: 43 4B 20 4E 4F 54 20 50 52 45 53 45 4E 54 22 00 |CK NOT PRESENT".|
000001D0: F4 09 56 04 99 22 33 2E 20 20 32 33 2C 43 48 45 |..V.."3. 23,CHE|
000001E0: 43 4B 53 55 4D 20 45 52 52 4F 52 20 49 4E 20 44 |CKSUM ERROR IN D|
000001F0: 41 54 41 22 00 1B 0A 60 04 99 22 34 2E 20 20 32 |ATA"...`.."4. 2|
00000200: 37 2C 43 48 45 43 4B 53 55 4D 20 45 52 52 4F 52 |7,CHECKSUM ERROR|
00000210: 20 49 4E 20 48 45 41 44 45 52 22 00 42 0A 6A 04 | IN HEADER".B.j.|
00000220: 99 22 35 2E 20 20 20 20 20 20 20 20 20 20 20 20 |."5. |
00000230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000240: 20 22 00 5A 0A 74 04 99 22 36 2E 20 45 58 49 54 | ".Z.t.."6. EXIT|
00000250: 20 54 4F 20 42 41 53 49 43 22 00 75 0A 7E 04 99 | TO BASIC".u.~..|
00000260: 22 11 11 49 4E 50 55 54 20 28 31 2D 36 29 3A 22 |"..INPUT (1-6):"|
00000270: 3A 9F 31 2C 30 00 8C 0A 7F 04 A1 23 31 2C 41 24 |:.1,0......#1,A$|
00000280: 3A 8B 41 24 B2 22 22 A7 31 31 35 31 00 93 0A 80 |:.A$."".1151....|
00000290: 04 A0 31 00 AD 0A D0 07 41 B2 C5 28 41 24 29 3A |..1.....A..(A$):|
000002A0: 8B 41 B3 31 B0 41 B1 37 A7 31 30 38 30 00 BC 0A |.A.1.A.7.1080...|
000002B0: DA 07 8B 41 B3 B1 36 A7 32 34 30 30 00 CD 0A E4 |...A..6.2400....|
000002C0: 07 A0 32 3A A0 31 3A 99 22 93 22 3A 80 00 D6 0A |..2:.1:.".":....|
000002D0: 60 09 4D 4C B2 41 00 03 0B C4 09 3A 99 3A 99 22 |`.ML.A.....:.:."|
000002E0: 49 4E 50 55 54 20 54 52 41 43 4B 23 28 31 2D 33 |INPUT TRACK#(1-3|
000002F0: 35 29 3A 22 3B 3A 9F 31 2C 30 3A 84 31 2C 41 24 |5):";:.1,0:.1,A$|
00000300: 3A A0 31 00 1E 0B CE 09 54 B2 C5 28 41 24 29 3A |:.1.....T..(A$):|
00000310: 8B 54 B3 31 B0 54 B1 33 35 A7 31 30 38 30 00 24 |.T.1.T.35.1080.$|
00000320: 0B D8 09 3A 00 44 0B E2 09 8B 4D 4C B2 31 A7 33 |...:.D....ML.1.3|
00000330: 30 30 30 20 3A 8F 20 49 4E 50 55 54 20 54 52 20 |000 :. INPUT TR |
00000340: 4F 4E 4C 59 00 72 0B 28 0A 3A 99 3A 99 22 49 4E |ONLY.r.(.:.:."IN|
00000350: 50 55 54 20 53 45 43 54 4F 52 23 28 30 2D 32 30 |PUT SECTOR#(0-20|
00000360: 29 3A 22 3B 3A 9F 31 2C 30 3A 84 31 2C 41 24 3A |):";:.1,0:.1,A$:|
00000370: A0 31 00 8D 0B 32 0A 53 B2 C5 28 41 24 29 3A 8B |.1...2.S..(A$):.|
00000380: 53 B3 30 B0 53 B1 32 30 A7 31 30 38 30 00 93 0B |S.0.S.20.1080...|
00000390: B8 0B 3A 00 B0 0B C2 0B 99 3A 99 22 44 55 4D 50 |..:......:."DUMP|
000003A0: 49 4E 47 20 4D 2F 4C 20 54 4F 20 44 49 53 4B 22 |ING M/L TO DISK"|
000003B0: 00 C2 0B C3 0B 98 31 35 2C 22 42 2D 50 3A 32 2C |......15,"B-P:2,|
000003C0: 30 22 00 D4 0B CC 0B 97 4D 45 4D 2C 41 3A 9E 4D |0"......MEM,A:.M|
000003D0: 45 4D AA 32 00 F2 0B D6 0B 3A 99 22 45 58 45 43 |EM.2.....:."EXEC|
000003E0: 55 54 49 4E 47 20 4D 2F 4C 20 49 4E 20 44 49 53 |UTING M/L IN DIS|
000003F0: 4B 22 00 F8 0B E0 0B 3A 00 1C 0C EA 0B 50 4B B2 |K".....:.....PK.|
00000400: 54 53 3A 50 48 B2 B5 28 50 4B AD 32 35 36 29 3A |TS:PH..(PK.256):|
00000410: 50 4C B2 50 4B AB 32 35 36 AC 50 48 00 56 0C F4 |PL.PK.256.PH.V..|
00000420: 0B 98 31 35 2C 22 4D 2D 57 22 3B C7 28 50 4C 29 |..15,"M-W";.(PL)|
00000430: 3B C7 28 50 48 29 3B C7 28 31 29 3B C7 28 54 29 |;.(PH);.(1);.(T)|
00000440: 3B 3A 20 8F 20 53 45 4E 44 20 54 52 41 43 4B 20 |;: . SEND TRACK |
00000450: 4E 55 4D 42 45 52 00 5C 0C FE 0B 3A 00 82 0C 08 |NUMBER.\...:....|
00000460: 0C 50 4B B2 54 53 AA 31 3A 50 48 B2 B5 28 50 4B |.PK.TS.1:PH..(PK|
00000470: AD 32 35 36 29 3A 50 4C B2 50 4B AB 32 35 36 AC |.256):PL.PK.256.|
00000480: 50 48 00 BD 0C 12 0C 98 31 35 2C 22 4D 2D 57 22 |PH......15,"M-W"|
00000490: 3B C7 28 50 4C 29 3B C7 28 50 48 29 3B C7 28 31 |;.(PL);.(PH);.(1|
000004A0: 29 3B C7 28 53 29 3B 3A 20 8F 20 53 45 4E 44 20 |);.(S);: . SEND |
000004B0: 53 45 43 54 4F 52 20 4E 55 4D 42 45 52 00 C3 0C |SECTOR NUMBER...|
000004C0: 1C 0C 3A 00 E7 0C 26 0C 50 4B B2 4A 42 3A 50 48 |..:...&.PK.JB:PH|
000004D0: B2 B5 28 50 4B AD 32 35 36 29 3A 50 4C B2 50 4B |..(PK.256):PL.PK|
000004E0: AB 32 35 36 AC 50 48 00 24 0D 3A 0C 98 31 35 2C |.256.PH.$.:..15,|
000004F0: 22 4D 2D 57 22 3B C7 28 50 4C 29 3B C7 28 50 48 |"M-W";.(PL);.(PH|
00000500: 29 3B C7 28 31 29 3B C7 28 45 58 29 3B 3A 20 8F |);.(1);.(EX);: .|
00000510: 20 45 58 45 43 55 54 45 20 43 4F 44 45 20 4E 55 | EXECUTE CODE NU|
00000520: 4D 42 45 52 00 2A 0D 44 0C 3A 00 61 0D 4E 0C 98 |MBER.*.D.:.a.N..|
00000530: 31 35 2C 22 4D 2D 52 22 3B C7 28 50 4C 29 3B C7 |15,"M-R";.(PL);.|
00000540: 28 50 48 29 3A A1 23 31 35 2C 41 24 3A 8B C6 28 |(PH):.#15,A$:..(|
00000550: 41 24 AA C7 28 30 29 29 B1 31 32 38 A7 33 31 35 |A$..(0)).128.315|
00000560: 30 00 67 0D 58 0C 3A 00 72 0D A0 0F 89 20 31 30 |0.g.X.:.r.... 10|
00000570: 38 30 00 00 00 AA 31 45 B9 86 |80....1E.. |
......MEM.49152.+...JB.0 :. JOB QUE MEM
LOC.O...TS.6 :. MEM LOC FOR TR,SC TABLE.
R...EX.14.16 :. EXICUTE CODE VALUE.X...:
......53280,1:.53281,0......"..
DISK ERROR MAKER..."......"..INSERT D
ISK THEN PRESS .RETURN."......A$:.A$..G(
13).1030.!....".
".?....15,8,15,"I0":.#15,A:.A...
O.$..2,8,2,"#0".U...:.S.8..".. DISK ERRO
R MAKER .."...@.."... *** MENU ***.."...
B..".1. 21,ERASE A TRACK".O.L.."2. 22,
DATA BLOCK NOT PRESENT"...V.."3. 23,CHE
CKSUM ERROR IN DATA"...`.."4. 27,CHECKS
UM ERROR IN HEADER".B.J.."5.
".Z.T.."6. EXIT TO BASI
C".U.~.."..INPUT (1-6):":.1,0.....#1,A$
:.A$."".1151..... 1...P.A.E(A$):.A.1.A.7
.1080...Z..A..6.2400.M... 2: 1:.".":..V.
`.ML.A...D.:.:."INPUT TRACK#(1-35):";:.1
,0:.1,A$: 1...N.T.E(A$):.T.1.T.35.1080.$
.X.:.D....ML.1.3000 :. INPUT TR ONLY.R.(
.:.:."INPUT SECTOR#(0-20):";:.1,0:.1,A$:
1...2.S.E(A$):.S.0.S.20.1080.....:...B.
.:."DUMPING M/L TO DISK".B.C..15,"B-P:2,
0".T.L..MEM,A:.MEM.2...V.:."EXECUTING M/
L IN DISK".....:.....PK.TS:PH..(PK.256):
PL.PK.256.PH.V....15,"M-W";G(PL);G(PH);G
(1);G(T);: . SEND TRACK NUMBER.\...:....
.PK.TS.1:PH..(PK.256):PL.PK.256.PH......
15,"M-W";G(PL);G(PH);G(1);G(S);: . SEND
SECTOR NUMBER.C...:...&.PK.JB:PH..(PK.25
6):PL.PK.256.PH.$.:..15,"M-W";G(PL);G(PH
);G(1);G(EX);: . EXECUTE CODE NUMBER.*.D
.:.A.N..15,"M-R";G(PL);G(PH):.#15,A$:.F(
A$.G(0)).128.3150.G.X.:.R. .. 1080....1E
..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL