00000000: D8 1F F4 1F 64 00 3B 20 20 5A 45 49 43 48 45 4E |....d.; ZEICHEN|
00000010: 53 41 54 5A 20 4B 4F 50 49 45 52 45 4E 00 11 20 |SATZ KOPIEREN.. |
00000020: 65 00 3B 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |e.; ------------|
00000030: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 28 20 66 00 3B |----------.( f.;|
00000040: 20 41 55 46 52 55 46 20 3A 20 53 59 53 20 38 32 | AUFRUF : SYS 82|
00000050: 38 00 2E 20 67 00 3B 00 50 20 68 00 3B 20 56 45 |8.. g.;.P h.; VE|
00000060: 52 53 43 48 49 45 42 54 20 5A 45 49 43 48 45 4E |RSCHIEBT ZEICHEN|
00000070: 53 41 54 5A 20 4E 41 43 48 00 71 20 69 00 3B 20 |SATZ NACH.q i.; |
00000080: 20 24 45 30 30 30 2D 24 46 30 30 30 20 28 35 37 | $E000-$F000 (57|
00000090: 33 33 34 2D 36 31 34 34 30 29 00 77 20 6A 00 3B |334-61440).w j.;|
000000A0: 00 7D 20 6B 00 3B 00 89 20 6D 00 2E 42 41 20 38 |.} k.;.. m..BA 8|
000000B0: 32 38 00 98 20 6E 00 20 4C 44 41 35 36 33 33 34 |28.. n. LDA56334|
000000C0: 3B 00 A9 20 6F 00 20 41 4E 44 23 32 35 34 3B 49 |;.. o. AND#254;I|
000000D0: 52 51 00 BB 20 70 00 20 53 54 41 35 36 33 33 34 |RQ.. p. STA56334|
000000E0: 3B 41 42 2D 00 CC 20 71 00 20 4C 44 41 31 3B 53 |;AB-.. q. LDA1;S|
000000F0: 43 48 41 4C 2D 00 DD 20 72 00 20 41 4E 44 23 32 |CHAL-.. r. AND#2|
00000100: 35 31 3B 54 45 4E 00 E7 20 73 00 20 53 54 41 31 |51;TEN.. s. STA1|
00000110: 00 ED 20 74 00 3B 00 06 21 78 00 20 4C 44 58 23 |.. t.;..!x. LDX#|
00000120: 3C 28 35 33 32 34 38 29 3B 42 4C 4F 43 4B 2D 00 |<(53248);BLOCK-.|
00000130: 1C 21 82 00 20 4C 44 59 23 3E 28 35 33 32 34 38 |.!.. LDY#>(53248|
00000140: 29 3B 41 4E 2D 00 2D 21 8C 00 20 53 54 58 24 35 |);AN-.-!.. STX$5|
00000150: 46 3B 46 41 4E 47 00 39 21 96 00 20 53 54 59 24 |F;FANG.9!.. STY$|
00000160: 36 30 00 3F 21 A0 00 3B 00 57 21 AA 00 20 4C 44 |60.?!..;.W!.. LD|
00000170: 58 23 3C 28 35 37 33 33 35 29 3B 41 4C 54 45 53 |X#<(57335);ALTES|
00000180: 00 70 21 B4 00 20 4C 44 59 23 3E 28 35 37 33 33 |.p!.. LDY#>(5733|
00000190: 35 29 3B 42 4C 4F 43 4B 2D 00 84 21 BE 00 20 53 |5);BLOCK-..!.. S|
000001A0: 54 58 24 35 41 3B 45 4E 44 45 20 2B 31 00 90 21 |TX$5A;ENDE +1..!|
000001B0: C8 00 20 53 54 59 24 35 42 00 96 21 D2 00 3B 00 |.. STY$5B..!..;.|
000001C0: AE 21 DC 00 20 4C 44 58 23 3C 28 36 31 34 33 31 |.!.. LDX#<(61431|
000001D0: 29 3B 4E 45 55 45 53 00 C7 21 E6 00 20 4C 44 59 |);NEUES..!.. LDY|
000001E0: 23 3E 28 36 31 34 33 31 29 3B 42 4C 4F 43 4B 2D |#>(61431);BLOCK-|
000001F0: 00 DB 21 F0 00 20 53 54 58 24 35 38 3B 45 4E 44 |..!.. STX$58;END|
00000200: 45 20 2B 31 00 E7 21 FA 00 20 53 54 59 24 35 39 |E +1..!.. STY$59|
00000210: 00 ED 21 04 01 3B 00 00 22 0E 01 20 4A 53 52 24 |..!..;..".. JSR$|
00000220: 41 33 42 46 3B 43 4F 50 59 00 06 22 18 01 3B 00 |A3BF;COPY.."..;.|
00000230: 14 22 22 01 20 4C 44 41 31 3B 49 52 51 00 23 22 |."". LDA1;IRQ.#"|
00000240: 23 01 20 4F 52 41 23 34 3B 45 49 4E 00 2D 22 24 |#. ORA#4;EIN.-"$|
00000250: 01 20 53 54 41 31 00 3B 22 25 01 20 4C 44 41 35 |. STA1.;"%. LDA5|
00000260: 36 33 33 34 00 46 22 26 01 20 4F 52 41 23 31 00 |6334.F"&. ORA#1.|
00000270: 54 22 27 01 20 53 54 41 35 36 33 33 34 00 5A 22 |T"'. STA56334.Z"|
00000280: 28 01 3B 00 6C 22 2C 01 20 4C 44 41 23 32 30 34 |(.;.l",. LDA#204|
00000290: 3B 5A 45 49 2D 00 7E 22 36 01 20 53 54 41 36 34 |;ZEI-.~"6. STA64|
000002A0: 38 3B 43 48 45 4E 2D 00 8F 22 40 01 20 4C 44 41 |8;CHEN-.."@. LDA|
000002B0: 23 35 36 3B 53 41 54 5A 00 A2 22 4A 01 20 53 54 |#56;SATZ.."J. ST|
000002C0: 41 35 33 32 37 32 3B 45 49 4E 2D 00 B4 22 54 01 |A53272;EIN-.."T.|
000002D0: 20 4C 44 41 23 30 3B 53 43 48 41 4C 2D 00 C6 22 | LDA#0;SCHAL-.."|
000002E0: 5E 01 20 53 54 41 35 36 35 37 36 3B 54 45 4E 00 |^. STA56576;TEN.|
000002F0: CC 22 68 01 3B 00 DB 22 72 01 20 52 54 53 3B 42 |."h.;.."r. RTS;B|
00000300: 41 53 49 43 00 00 00 |ASIC... |
X...D.; ZEICHENSATZ KOPIEREN.. E.; ----
------------------.( F.; AUFRUF : SYS 82
8.. G.;.P H.; VERSCHIEBT ZEICHENSATZ NAC
H.Q I.; $E000-$F000 (57334-61440).W J.;
.} K.;.. M..BA 828.. N. LDA56334;.. O. A
ND#254;IRQ.. P. STA56334;AB-.L Q. LDA1;S
CHAL-.. R. AND#251;TEN.. S. STA1.. T.;..
!X. LDX#<(53248);BLOCK-..!.. LDY#>(53248
);AN-.-!.. STX$5F;FANG.9!.. STY$60.?! .;
.W!.. LDX#<(57335);ALTES.P!.. LDY#>(5733
5);BLOCK-..!.. STX$5A;ENDE +1..!H. STY$5
B..!R.;..!.. LDX#<(61431);NEUES.G!.. LDY
#>(61431);BLOCK-..!.. STX$58;ENDE +1..!.
. STY$59..!..;..".. JSR$A3BF;COPY.."..;.
."". LDA1;IRQ.#"#. ORA#4;EIN.-"$. STA1.;
"%. LDA56334.F"&. ORA#1.T"'. STA56334.Z"
(.;.L",. LDA#204;ZEI-.~"6. STA648;CHEN-.
."@. LDA#56;SATZ.."J. STA53272;EIN-.."T.
LDA#0;SCHAL-.F"^. STA56576;TEN.L"H.;.."
R. RTS;BASIC...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL