> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 64 00 8F 20 43 52 45 41 54 45 20 43 |.. .d.. CREATE C|
00000010: 48 41 52 41 43 54 45 52 20 53 45 54 20 46 4F 52 |HARACTER SET FOR|
00000020: 00 40 08 6E 00 8F 20 27 48 49 2D 52 45 53 20 50 |.@.n.. 'HI-RES P|
00000030: 52 49 4E 54 27 20 4D 4C 20 52 4F 55 54 49 4E 45 |RINT' ML ROUTINE|
00000040: 00 6B 08 78 00 99 20 C7 28 31 34 32 29 3A 8F 20 |.k.x.. .(142):. |
00000050: 55 53 45 20 43 48 52 24 28 31 34 29 20 46 4F 52 |USE CHR$(14) FOR|
00000060: 20 20 4C 4F 57 45 52 43 41 53 45 00 9A 08 82 00 | LOWERCASE.....|
00000070: 99 20 C7 28 38 29 3A 8F 20 44 49 53 41 42 4C 45 |. .(8):. DISABLE|
00000080: 20 43 41 53 45 20 43 48 41 4E 47 45 20 46 52 4F | CASE CHANGE FRO|
00000090: 4D 20 4B 45 59 42 4F 41 52 44 00 BE 08 8C 00 85 |M KEYBOARD......|
000000A0: 20 22 4C 4F 43 41 54 49 4F 4E 20 4F 46 20 43 48 | "LOCATION OF CH|
000000B0: 41 52 41 43 54 45 52 20 53 45 54 22 3B 4E 00 DF |ARACTER SET";N..|
000000C0: 08 96 00 41 B2 4E AB B5 28 4E AD 32 35 36 29 AC |...A.N..(N.256).|
000000D0: 32 35 36 3A 20 42 B2 B5 28 4E AD 32 35 36 29 00 |256: B..(N.256).|
000000E0: F3 08 A0 00 85 20 22 46 49 4C 45 4E 41 4D 45 22 |..... "FILENAME"|
000000F0: 3B 46 24 00 07 09 AA 00 8B 20 C3 28 46 24 29 B2 |;F$...... .(F$).|
00000100: 30 20 A7 20 31 36 30 00 1A 09 B4 00 99 20 22 57 |0 . 160...... "W|
00000110: 4F 52 4B 49 4E 47 2E 2E 2E 22 00 50 09 BE 00 8F |ORKING...".P....|
00000120: 20 43 4F 50 59 20 46 49 52 53 54 20 36 34 20 43 | COPY FIRST 64 C|
00000130: 48 41 52 41 43 54 45 52 53 20 46 52 4F 4D 20 52 |HARACTERS FROM R|
00000140: 4F 4D 20 43 48 41 52 41 43 54 45 52 20 53 45 54 |OM CHARACTER SET|
00000150: 00 6C 09 C8 00 97 20 35 36 33 33 34 2C 20 C2 28 |.l.... 56334, .(|
00000160: 35 36 33 33 34 29 20 AF 20 32 35 34 00 80 09 D2 |56334) . 254....|
00000170: 00 97 20 31 2C 20 C2 28 31 29 20 AF 20 32 35 31 |.. 1, .(1) . 251|
00000180: 00 90 09 DC 00 81 20 4A B2 30 20 A4 20 35 31 31 |...... J.0 . 511|
00000190: 00 A6 09 E6 00 97 20 4A AA 4E 2C 20 C2 28 35 33 |...... J.N, .(53|
000001A0: 32 34 38 AA 4A 29 00 AE 09 F0 00 82 20 4A 00 C0 |248.J)...... J..|
000001B0: 09 FA 00 97 20 31 2C 20 C2 28 31 29 20 B0 20 34 |.... 1, .(1) . 4|
000001C0: 00 DA 09 04 01 97 20 35 36 33 33 34 2C 20 C2 28 |...... 56334, .(|
000001D0: 35 36 33 33 34 29 20 B0 20 31 00 F5 09 0E 01 A0 |56334) . 1......|
000001E0: 20 31 35 3A 9F 20 31 35 2C 20 38 2C 20 31 35 2C | 15:. 15, 8, 15,|
000001F0: 20 22 49 30 22 00 FF 09 18 01 8D 20 34 31 30 00 | "I0"...... 410.|
00000200: 1A 0A 22 01 9F 20 32 2C 20 38 2C 20 32 2C 20 46 |..".. 2, 8, 2, F|
00000210: 24 20 AA 20 22 2C 50 2C 57 22 00 24 0A 2C 01 8D |$ . ",P,W".$.,..|
00000220: 20 34 31 30 00 3C 0A 36 01 98 32 2C 20 C7 28 41 | 410.<.6..2, .(A|
00000230: 29 3B 3A 98 32 2C 20 C7 28 42 29 3B 00 46 0A 40 |);:.2, .(B);.F.@|
00000240: 01 8D 20 34 31 30 00 56 0A 4A 01 81 20 4A B2 30 |.. 410.V.J.. J.0|
00000250: 20 A4 20 35 31 31 00 69 0A 54 01 98 32 2C 20 C7 | . 511.i.T..2, .|
00000260: 28 C2 28 4A AA 4E 29 29 3B 00 71 0A 5E 01 82 20 |(.(J.N));.q.^.. |
00000270: 4A 00 7B 0A 68 01 8D 20 34 31 30 00 88 0A 72 01 |J.{.h.. 410...r.|
00000280: A0 20 32 3A A0 20 31 35 00 B6 0A 7C 01 99 20 C7 |. 2:. 15...|.. .|
00000290: 28 39 29 3A 8F 20 45 4E 41 42 4C 45 20 43 41 53 |(9):. ENABLE CAS|
000002A0: 45 20 43 48 41 4E 47 45 20 46 52 4F 4D 20 4B 45 |E CHANGE FROM KE|
000002B0: 59 42 4F 41 52 44 00 BC 0A 86 01 80 00 E0 0A 90 |YBOARD..........|
000002C0: 01 8F 20 43 48 45 43 4B 20 44 49 53 4B 20 44 52 |.. CHECK DISK DR|
000002D0: 49 56 45 20 45 52 52 4F 52 20 53 54 41 54 55 53 |IVE ERROR STATUS|
000002E0: 00 F5 0A 9A 01 84 31 35 2C 45 58 2C 45 58 24 2C |......15,EX,EX$,|
000002F0: 54 52 2C 53 45 00 04 0B A4 01 8B 20 45 58 B2 30 |TR,SE...... EX.0|
00000300: 20 A7 20 8E 00 1D 0B AE 01 99 20 C7 28 31 38 29 | . ....... .(18)|
00000310: 20 22 44 49 53 4B 20 45 52 52 4F 52 22 00 30 0B | "DISK ERROR".0.|
00000320: B8 01 99 20 45 58 3B 45 58 24 3B 54 52 3B 53 45 |... EX;EX$;TR;SE|
00000330: 00 3A 0B C2 01 89 20 33 37 30 00 00 00 |.:.... 370... |
.. .D.. CREATE CHARACTER SET FOR.@.N.. '
HI-RES PRINT' ML ROUTINE.K.X.. G(142):.
USE CHR$(14) FOR LOWERCASE...... G(8):.
DISABLE CASE CHANGE FROM KEYBOARD......
"LOCATION OF CHARACTER SET";N.....A.N..
(N.256).256: B..(N.256)... .. "FILENAME"
;F$...... C(F$).0 . 160...... "WORKING..
.".P.... COPY FIRST 64 CHARACTERS FROM R
OM CHARACTER SET.L.H.. 56334, B(56334) .
254...R.. 1, B(1) . 251...... J.0 . 511
...... J.N, B(53248.J)...... J...... 1,
B(1) . 4.Z.... 56334, B(56334) . 1.....
15:. 15, 8, 15, "I0"...... 410...".. 2,
8, 2, F$ . ",P,W".$.,.. 410.<.6..2, G(A
);:.2, G(B);.F.@.. 410.V.J.. J.0 . 511.I
.T..2, G(B(J.N));.Q.^.. J.{.H.. 410...R.
2: 15...|.. G(9):. ENABLE CASE CHANGE
FROM KEYBOARD............ CHECK DISK DR
IVE ERROR STATUS......15,EX,EX$,TR,SE...
... EX.0 . ....... G(18) "DISK ERROR".0.
... EX;EX$;TR;SE.:.B.. 370...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL