> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 13 08 64 00 8F 20 45 52 52 4F 52 20 43 48 |....d.. ERROR CH|
00000010: 45 43 4B 00 42 08 6E 00 99 22 93 11 11 20 20 54 |ECK.B.n.."... T|
00000020: 48 49 53 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C |HIS PROGRAM WILL|
00000030: 20 43 48 45 43 4B 20 46 4F 52 20 45 52 52 4F 52 | CHECK FOR ERROR|
00000040: 53 22 00 59 08 78 00 99 22 20 20 4F 4E 20 54 48 |S".Y.x.." ON TH|
00000050: 45 20 44 49 53 4B 2E 20 22 00 69 08 82 00 81 54 |E DISK. ".i....T|
00000060: B2 30 A4 31 30 30 30 3A 82 00 84 08 8C 00 85 22 |.0.1000:......."|
00000070: 11 11 20 20 57 48 49 43 48 20 20 54 52 41 43 4B |.. WHICH TRACK|
00000080: 22 3B 54 52 00 A0 08 96 00 85 22 11 11 20 20 57 |";TR......".. W|
00000090: 48 49 43 48 20 20 53 45 43 54 4F 52 22 3B 53 45 |HICH SECTOR";SE|
000000A0: 00 DB 08 A0 00 9F 31 35 2C 38 2C 31 35 2C 22 49 |......15,8,15,"I|
000000B0: 30 3A 22 3A 8F 20 4F 50 45 4E A0 45 52 52 4F 52 |0:":. OPEN.ERROR|
000000C0: 20 43 48 41 4E 4E 45 4C 20 26 20 49 4E 49 54 49 | CHANNEL & INITI|
000000D0: 41 4C 49 5A 45 20 44 52 49 56 45 00 16 09 AA 00 |ALIZE DRIVE.....|
000000E0: 9F 35 2C 38 2C 35 2C 22 23 22 3A 8F 20 4F 50 45 |.5,8,5,"#":. OPE|
000000F0: 4E A0 43 48 41 4E 4E 45 4C 20 46 4F 52 20 44 41 |N.CHANNEL FOR DA|
00000100: 54 41 2C 20 55 53 45 20 41 4E 59 20 42 55 46 46 |TA, USE ANY BUFF|
00000110: 45 52 20 28 23 29 00 4B 09 B4 00 98 31 35 2C 22 |ER (#).K....15,"|
00000120: 55 31 22 3B 35 3B 30 3B 54 52 3B 53 45 3A 8F 20 |U1";5;0;TR;SE:. |
00000130: 50 45 52 46 4F 52 4D 20 55 53 45 52 20 31 20 28 |PERFORM USER 1 (|
00000140: 42 4C 4F 43 4B 20 52 45 41 44 29 00 74 09 BE 00 |BLOCK READ).t...|
00000150: 84 31 35 2C 41 24 2C 42 24 2C 43 24 2C 44 24 3A |.15,A$,B$,C$,D$:|
00000160: 8F 20 52 45 41 44 20 45 52 52 4F 52 20 43 48 41 |. READ ERROR CHA|
00000170: 4E 4E 45 4C 00 B1 09 C8 00 99 22 11 11 20 20 22 |NNEL......".. "|
00000180: 41 24 22 2C 22 42 24 22 2C 22 43 24 22 2C 22 44 |A$","B$","C$","D|
00000190: 24 3A 8F 20 50 52 49 4E 54 20 45 52 52 4F 52 20 |$:. PRINT ERROR |
000001A0: 43 48 41 4E 4E 45 4C 20 54 4F 20 53 43 52 45 45 |CHANNEL TO SCREE|
000001B0: 4E 00 BC 09 D2 00 A0 35 3A A0 31 35 00 D7 09 DC |N......5:.15....|
000001C0: 00 85 22 11 20 20 41 47 41 49 4E 20 28 59 2F 4E |..". AGAIN (Y/N|
000001D0: 29 20 22 3B 59 4E 24 00 E8 09 E6 00 8B 59 4E 24 |) ";YN$......YN$|
000001E0: B2 22 59 22 A7 31 31 30 00 00 00 |."Y".110... |
....D.. ERROR CHECK.B.N.."... THIS PROG
RAM WILL CHECK FOR ERRORS".Y.X.." ON TH
E DISK. ".I....T.0.1000:.......".. WHIC
H TRACK";TR. ....".. WHICH SECTOR";SE
... ..15,8,15,"I0:":. OPEN ERROR CHANNEL
& INITIALIZE DRIVE......5,8,5,"#":. OPE
N CHANNEL FOR DATA, USE ANY BUFFER (#).K
....15,"U1";5;0;TR;SE:. PERFORM USER 1 (
BLOCK READ).T....15,A$,B$,C$,D$:. READ E
RROR CHANNEL...H..".. "A$","B$","C$","D
$:. PRINT ERROR CHANNEL TO SCREEN...R. 5
: 15.W....". AGAIN (Y/N) ";YN$......YN$
."Y".110...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL