> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 8F 20 44 46 00 4B 08 02 00 41 |....... DF.K...A|
00000010: B2 B7 28 30 29 2C 30 2C 31 2C 34 3A 41 B2 B7 28 |..(0),0,1,4:A..(|
00000020: 33 33 29 2C 30 3A 41 B2 B7 28 33 34 29 2C 30 2C |33),0:A..(34),0,|
00000030: 59 2C 36 3A 41 B2 B7 28 33 34 29 2C 58 2C 32 35 |Y,6:A..(34),X,25|
00000040: 35 2C 37 3A 41 B2 B7 28 31 37 29 00 6F 08 03 00 |5,7:A..(17).o...|
00000050: 41 B2 B7 28 31 29 3A 99 C7 28 31 34 29 3B 22 93 |A..(1):..(14);".|
00000060: 22 3A 9F 31 35 2C 44 30 2C 31 35 3A A0 31 35 00 |":.15,D0,15:.15.|
00000070: 87 08 04 00 99 22 11 11 C4 49 53 4B 20 46 55 4E |....."...ISK FUN|
00000080: 43 54 49 4F 4E 53 3A 00 AE 08 05 00 99 22 11 20 |CTIONS:......". |
00000090: 12 20 43 20 92 20 C3 48 41 4E 47 45 20 44 52 49 |. C . .HANGE DRI|
000000A0: 56 45 20 41 53 53 49 47 4E 4D 45 4E 54 53 00 D0 |VE ASSIGNMENTS..|
000000B0: 08 06 00 99 22 20 12 20 53 20 92 20 C3 48 41 4E |...." . S . .HAN|
000000C0: 47 45 20 D3 50 45 45 44 20 30 20 56 41 4C 55 45 |GE .PEED 0 VALUE|
000000D0: 00 F1 08 07 00 99 22 20 12 20 44 20 92 20 C6 49 |......" . D . .I|
000000E0: 4C 45 20 44 49 53 4B 20 44 49 52 45 43 54 4F 52 |LE DISK DIRECTOR|
000000F0: 59 00 19 09 08 00 99 22 20 12 20 3E 20 92 20 D3 |Y......" . > . .|
00000100: 45 4E 44 20 43 4F 4D 4D 41 4E 44 20 54 4F 20 46 |END COMMAND TO F|
00000110: 49 4C 45 20 44 52 49 56 45 00 32 09 09 00 99 22 |ILE DRIVE.2...."|
00000120: 20 12 20 58 20 92 20 C5 58 49 54 20 54 4F 20 C3 | . X . .XIT TO .|
00000130: C1 C4 00 49 09 0A 00 99 3A 99 22 12 28 43 2C 53 |...I....:.".(C,S|
00000140: 2C 44 2C 3E 2C 58 29 3A 92 00 5B 09 0B 00 A1 43 |,D,>,X):..[....C|
00000150: 24 3A 8B 43 24 B2 22 22 A7 31 31 00 6A 09 0C 00 |$:.C$."".11.j...|
00000160: 8B 43 24 B2 22 43 22 A7 33 32 00 79 09 0D 00 8B |.C$."C".32.y....|
00000170: 43 24 B2 22 53 22 A7 34 33 00 8F 09 0E 00 8B 43 |C$."S".43......C|
00000180: 24 B2 22 2E 22 B0 43 24 B2 22 3E 22 A7 31 38 00 |$.".".C$.">".18.|
00000190: A7 09 0F 00 8B 43 24 B2 22 44 22 A7 99 3A 9E 33 |.....C$."D"..:.3|
000001A0: 36 39 30 36 3A 89 34 00 B6 09 10 00 8B 43 24 B2 |6906:.4......C$.|
000001B0: 22 58 22 A7 32 35 00 BD 09 11 00 89 34 00 EE 09 |"X".25......4...|
000001C0: 12 00 43 24 B2 22 22 3A 99 3A 99 44 31 3B 22 3E |..C$."":.:.D1;">|
000001D0: 22 3B 3A 9F 31 35 2C 44 31 2C 31 35 2C 22 49 30 |";:.15,D1,15,"I0|
000001E0: 22 3A 84 31 35 2C 45 2C 45 24 3A A0 31 35 00 01 |":.15,E,E$:.15..|
000001F0: 0A 13 00 8B 45 B3 B1 30 A7 99 45 2C 45 24 3A 89 |....E..0..E,E$:.|
00000200: 34 00 13 0A 14 00 A1 42 24 3A 8B 42 24 B2 22 22 |4......B$:.B$.""|
00000210: A7 32 30 00 29 0A 15 00 99 42 24 3B 3A 8B 42 24 |.20.)....B$;:.B$|
00000220: B2 C7 28 31 33 29 A7 32 33 00 3A 0A 16 00 43 24 |..(13).23.:...C$|
00000230: B2 43 24 AA 42 24 3A 89 32 30 00 49 0A 17 00 8B |.C$.B$:.20.I....|
00000240: C3 28 43 24 29 B3 31 A7 34 00 62 0A 18 00 9F 31 |.(C$).1.4.b....1|
00000250: 35 2C 44 31 2C 31 35 2C 43 24 3A A0 31 35 3A 89 |5,D1,15,C$:.15:.|
00000260: 31 30 00 99 0A 19 00 99 22 93 22 3B 3A 8B 44 30 |10......".";:.D0|
00000270: B2 44 31 A7 99 22 11 11 C9 4E 53 45 52 54 20 D0 |.D1.."...NSERT .|
00000280: D2 CF C7 D2 C1 CD 20 44 49 53 4B 20 49 4E 20 44 |...... DISK IN D|
00000290: 52 49 56 45 20 22 3B 44 30 00 AF 0A 1A 00 99 22 |RIVE ";D0......"|
000002A0: 11 11 D0 52 45 53 53 20 41 20 4B 45 59 2E 22 00 |...RESS A KEY.".|
000002B0: C1 0A 1B 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 |.....A$:.A$."".2|
000002C0: 37 00 F0 0A 1C 00 9F 31 35 2C 44 30 2C 31 35 3A |7......15,D0,15:|
000002D0: 9F 32 2C 44 30 2C 32 2C 22 43 4D 4E 44 2C 50 2C |.2,D0,2,"CMND,P,|
000002E0: 52 22 3A A0 32 3A A1 23 31 35 2C 45 3A A0 31 35 |R":.2:.#15,E:.15|
000002F0: 00 1C 0B 1D 00 8B 45 B3 B1 30 A7 99 22 11 D0 52 |......E..0.."..R|
00000300: 4F 47 52 41 4D 20 44 49 53 4B 20 4E 4F 54 20 50 |OGRAM DISK NOT P|
00000310: 52 45 53 45 4E 54 2E 22 3A 89 32 37 00 50 0B 1E |RESENT.":.27.P..|
00000320: 00 99 22 93 22 3A 41 B2 B7 28 30 29 2C 31 2C 37 |..".":A..(0),1,7|
00000330: 2C 31 34 3A 41 B2 B7 28 31 29 3A 41 B2 B7 28 31 |,14:A..(1):A..(1|
00000340: 36 29 3A 41 B2 B7 28 33 34 29 2C 38 2C 59 2C 36 |6):A..(34),8,Y,6|
00000350: 00 6F 0B 1F 00 41 B2 B7 28 33 34 29 2C 58 2C 32 |.o...A..(34),X,2|
00000360: 33 31 2C 37 3A 93 22 43 4D 4E 44 22 2C 44 30 00 |31,7:."CMND",D0.|
00000370: 9C 0B 20 00 99 22 11 11 D0 52 4F 47 52 41 4D 20 |.. .."...ROGRAM |
00000380: 44 49 53 4B 20 49 53 20 4C 4F 47 47 45 44 20 54 |DISK IS LOGGED T|
00000390: 4F 20 44 52 49 56 45 20 22 3B 44 30 00 BD 0B 21 |O DRIVE ";D0...!|
000003A0: 00 99 22 C5 4E 54 45 52 20 4E 45 57 20 44 52 49 |..".NTER NEW DRI|
000003B0: 56 45 20 4E 55 4D 42 45 52 3A 20 22 3B 00 CF 0B |VE NUMBER: ";...|
000003C0: 22 00 A1 43 24 3A 8B 43 24 B2 22 22 A7 33 34 00 |"..C$:.C$."".34.|
000003D0: E9 0B 23 00 8B 28 43 24 B2 22 39 22 29 AF 28 44 |..#..(C$."9").(D|
000003E0: 30 B2 38 29 A7 44 30 B2 39 00 03 0C 24 00 8B 28 |0.8).D0.9...$..(|
000003F0: 43 24 B2 22 38 22 29 AF 28 44 30 B2 39 29 A7 44 |C$."8").(D0.9).D|
00000400: 30 B2 38 00 3A 0C 25 00 97 33 36 38 36 32 2C 44 |0.8.:.%..36862,D|
00000410: 30 3A 99 44 30 3A 99 22 11 C6 49 4C 45 20 44 49 |0:.D0:."..ILE DI|
00000420: 53 4B 20 49 53 20 4C 4F 47 47 45 44 20 54 4F 20 |SK IS LOGGED TO |
00000430: 44 52 49 56 45 20 22 3B 44 31 00 5B 0C 26 00 99 |DRIVE ";D1.[.&..|
00000440: 22 C5 4E 54 45 52 20 4E 45 57 20 44 52 49 56 45 |".NTER NEW DRIVE|
00000450: 20 4E 55 4D 42 45 52 3A 20 22 3B 00 6D 0C 27 00 | NUMBER: ";.m.'.|
00000460: A1 43 24 3A 8B 43 24 B2 22 22 A7 33 39 00 87 0C |.C$:.C$."".39...|
00000470: 28 00 8B 28 43 24 B2 22 39 22 29 AF 28 44 31 B2 |(..(C$."9").(D1.|
00000480: 38 29 A7 44 31 B2 39 00 A1 0C 29 00 8B 28 43 24 |8).D1.9...)..(C$|
00000490: B2 22 38 22 29 AF 28 44 31 B2 39 29 A7 44 31 B2 |."8").(D1.9).D1.|
000004A0: 38 00 B6 0C 2A 00 97 33 36 38 36 33 2C 44 31 3A |8...*..36863,D1:|
000004B0: 99 44 31 3A 89 34 00 D8 0C 2B 00 99 22 11 11 D3 |.D1:.4...+.."...|
000004C0: 50 45 45 44 20 30 20 49 53 20 50 52 45 53 45 4E |PEED 0 IS PRESEN|
000004D0: 54 4C 59 20 22 3B 53 53 00 ED 0C 2C 00 85 22 CE |TLY ";SS...,..".|
000004E0: 45 57 20 56 41 4C 55 45 3A 22 3B 41 24 00 FC 0C |EW VALUE:";A$...|
000004F0: 2D 00 8B C5 28 41 24 29 B3 31 A7 34 00 0C 0D 2E |-...(A$).1.4....|
00000500: 00 53 53 B2 C5 28 41 24 29 3A 89 34 00 00 00 |.SS..(A$):.4... |
....... DF.K...A..(0),0,1,4:A..(33),0:A.
.(34),0,Y,6:A..(34),X,255,7:A..(17).O...
A..(1):.G(14);".":.15,D0,15: 15......"..
DISK FUNCTIONS:......". . C . CHANGE DRI
VE ASSIGNMENTS.P...." . S . CHANGE SPEED
0 VALUE......" . D . FILE DISK DIRECTOR
Y......" . > . SEND COMMAND TO FILE DRIV
E.2...." . X . EXIT TO CAD.I....:.".(C,S
,D,>,X):..[....C$:.C$."".11.J....C$."C".
32.Y....C$."S".43......C$.".".C$.">".18.
.....C$."D"..:.36906:.4......C$."X".25..
....4.....C$."":.:.D1;">";:.15,D1,15,"I0
":.15,E,E$: 15......E..0..E,E$:.4......B
$:.B$."".20.)....B$;:.B$.G(13).23.:...C$
.C$.B$:.20.I....C(C$).1.4.B....15,D1,15,
C$: 15:.10......".";:.D0.D1.."..INSERT P
ROGRAM DISK IN DRIVE ";D0......"..PRESS
A KEY.".A....A$:.A$."".27......15,D0,15:
.2,D0,2,"CMND,P,R": 2:.#15,E: 15......E.
.0..".PROGRAM DISK NOT PRESENT.":.27.P..
..".":A..(0),1,7,14:A..(1):A..(16):A..(3
4),8,Y,6.O...A..(34),X,231,7:."CMND",D0.
.. .."..PROGRAM DISK IS LOGGED TO DRIVE
";D0...!.."ENTER NEW DRIVE NUMBER: ";.O.
"..C$:.C$."".34...#..(C$."9").(D0.8).D0.
9...$..(C$."8").(D0.9).D0.8.:.%..36862,D
0:.D0:.".FILE DISK IS LOGGED TO DRIVE ";
D1.[.&.."ENTER NEW DRIVE NUMBER: ";.M.'.
.C$:.C$."".39...(..(C$."9").(D1.8).D1.9.
..)..(C$."8").(D1.9).D1.8...*..36863,D1:
.D1:.4.X.+.."..SPEED 0 IS PRESENTLY ";SS
...,.."NEW VALUE:";A$...-..E(A$).1.4....
.SS.E(A$):.4...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL