00000000: 01 10 1F 10 0A 00 F3 3A 92 20 52 41 4D 3A D9 20 |.......:. RAM:. |
00000010: 55 50 50 45 52 43 41 53 45 20 A4 20 52 41 4D 00 |UPPERCASE . RAM.|
00000020: 4C 10 14 00 99 22 93 22 3A 81 54 B2 30 A4 32 35 |L....".":.T.0.25|
00000030: 35 3A 97 31 30 32 34 AA 54 2C 54 3A 97 35 35 32 |5:.1024.T,T:.552|
00000040: 39 36 AA 54 2C 31 3A 82 3A CC 20 30 00 7F 10 1E |96.T,1:.:. 0....|
00000050: 00 99 22 05 11 11 11 11 11 11 11 11 50 52 4F 47 |..".........PROG|
00000060: 52 41 4D 20 54 4F 20 43 4F 50 59 20 43 48 41 52 |RAM TO COPY CHAR|
00000070: 41 43 54 45 52 20 53 45 54 53 20 46 52 4F 4D 00 |ACTER SETS FROM.|
00000080: A9 10 28 00 99 22 48 45 53 46 4F 4E 54 20 49 4E |..(.."HESFONT IN|
00000090: 54 4F 20 47 52 41 50 48 49 43 53 20 42 41 53 49 |TO GRAPHICS BASI|
000000A0: 43 20 46 4F 52 4D 41 54 2E 00 C6 10 32 00 99 22 |C FORMAT....2.."|
000000B0: 11 50 52 45 53 53 20 52 45 54 55 52 4E 20 54 4F |.PRESS RETURN TO|
000000C0: 20 41 42 4F 52 54 00 F3 10 3C 00 85 22 11 46 49 | ABORT...<..".FI|
000000D0: 4C 45 20 4E 41 4D 45 20 54 4F 20 4C 4F 41 44 20 |LE NAME TO LOAD |
000000E0: 20 2A 9D 9D 9D 22 3B 46 24 3A 8B 46 24 B2 22 2A | *...";F$:.F$."*|
000000F0: 22 A7 80 00 09 11 46 00 42 55 46 46 45 52 B2 31 |".....F.BUFFER.1|
00000100: 34 33 33 36 AB 33 32 AC 38 00 1D 11 50 00 9F 38 |4336.32.8...P..8|
00000110: 2C 38 2C 38 2C 46 24 AA 22 2C 50 2C 52 00 43 11 |,8,8,F$.",P,R.C.|
00000120: 5A 00 A1 23 38 2C 52 24 2C 54 24 3A 8F 20 44 49 |Z..#8,R$,T$:. DI|
00000130: 53 43 41 52 44 20 53 54 41 52 54 20 41 44 44 52 |SCARD START ADDR|
00000140: 45 53 53 00 67 11 64 00 A1 23 38 2C 52 24 3A 8B |ESS.g.d..#8,R$:.|
00000150: 53 54 B2 36 34 20 A7 20 31 33 30 3A D8 20 8B 20 |ST.64 . 130:. . |
00000160: 53 54 20 A7 31 36 30 00 A0 11 6E 00 8B 20 58 20 |ST .160...n.. X |
00000170: B1 20 28 42 55 46 46 45 52 AA 32 35 35 AC 38 29 |. (BUFFER.255.8)|
00000180: 20 A7 20 31 33 30 3A 8F 20 43 48 45 43 4B 20 46 | . 130:. CHECK F|
00000190: 4F 52 20 32 35 35 20 43 48 41 52 53 20 4D 41 58 |OR 255 CHARS MAX|
000001A0: 00 C4 11 78 00 97 42 55 46 46 45 52 AA 58 2C C6 |...x..BUFFER.X,.|
000001B0: 28 52 24 AA C7 28 30 29 29 3A 58 B2 58 AA 31 3A |(R$..(0)):X.X.1:|
000001C0: 89 31 30 30 00 EF 11 82 00 A0 38 3A 99 22 11 59 |.100......8:.".Y|
000001D0: 4F 55 20 4D 41 59 20 53 41 56 45 20 54 48 45 20 |OU MAY SAVE THE |
000001E0: 46 49 4C 45 20 4E 4F 57 20 55 53 49 4E 47 3A 00 |FILE NOW USING:.|
000001F0: 21 12 8C 00 99 22 11 11 43 48 41 52 20 53 41 56 |!...."..CHAR SAV|
00000200: 45 20 22 C7 28 33 34 29 22 46 49 4C 45 4E 41 4D |E ".(34)"FILENAM|
00000210: 45 22 C7 28 33 34 29 22 2C 44 45 56 49 43 45 23 |E".(34)",DEVICE#|
00000220: 22 00 53 12 96 00 81 54 4A B2 31 A4 35 3A 92 20 |".S....TJ.1.5:. |
00000230: 52 4F 4D 3A 81 4E B2 31 A4 31 35 30 30 3A 82 3A |ROM:.N.1.1500:.:|
00000240: 92 20 52 41 4D 3A 81 4E B2 31 A4 31 35 30 30 3A |. RAM:.N.1.1500:|
00000250: 82 3A 82 00 8C 12 A0 00 9F 31 35 2C 38 2C 31 35 |.:.......15,8,15|
00000260: 3A 84 31 35 2C 45 24 2C 52 24 2C 54 24 2C 59 24 |:.15,E$,R$,T$,Y$|
00000270: 3A 99 22 11 11 22 20 45 24 22 20 22 52 24 22 20 |:.".." E$" "R$" |
00000280: 22 54 24 22 20 22 59 24 3A A0 31 35 00 96 12 AA |"T$" "Y$:.15....|
00000290: 00 92 20 52 4F 4D 00 00 00 54 00 86 70 00 00 00 |.. ROM...T..p...|
000002A0: 46 80 03 FD 5B 00 00 52 80 0E E5 5B 00 00 54 80 |F...[..R...[..T.|
000002B0: 02 E3 5B 00 00 45 80 02 F3 5B 00 00 59 80 02 E1 |..[..E...[..Y...|
000002C0: 5B 00 00 54 00 88 7A 00 00 00 |[..T..z... |
.......:. RAM:Y UPPERCASE . RAM.L...."."
:.T.0.255:.1024.T,T:.55296.T,1:.:L 0...
..".........PROGRAM TO COPY CHARACTER SE
TS FROM...(.."HESFONT INTO GRAPHICS BASI
C FORMAT..F.2..".PRESS RETURN TO ABORT..
.<..".FILE NAME TO LOAD *...";F$:.F$."*
".....F.BUFFER.14336.32.8...P..8,8,8,F$.
",P,R.C.Z..#8,R$,T$:. DISCARD START ADDR
ESS.G.D..#8,R$:.ST.64 . 130:X . ST .160.
.N.. X . (BUFFER.255.8) . 130:. CHECK F
OR 255 CHARS MAX.D.X..BUFFER.X,F(R$.G(0)
):X.X.1:.100..... 8:.".YOU MAY SAVE THE
FILE NOW USING:.!...."..CHAR SAVE "G(34)
"FILENAME"G(34)",DEVICE#".S....TJ.1.5:.
ROM:.N.1.1500:.:. RAM:.N.1.1500:.:.... .
.15,8,15:.15,E$,R$,T$,Y$:.".." E$" "R$"
"T$" "Y$: 15...... ROM...T..P...F...[..R
...[..T...[..E...[..Y...[..T..Z...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL