00000000: D8 1F E6 1F 64 00 2E 4C 49 20 31 2C 33 2C 30 00 |....d..LI 1,3,0.|
00000010: EC 1F 6E 00 3B 00 0D 20 78 00 3B 20 54 45 58 54 |..n.;.. x.; TEXT|
00000020: 41 55 53 47 41 42 45 20 28 55 45 42 45 52 20 42 |AUSGABE (UEBER B|
00000030: 41 53 4F 55 54 29 00 13 20 82 00 3B 00 34 20 8C |ASOUT).. ..;.4 .|
00000040: 00 2E 42 41 20 24 43 30 30 30 20 3B 20 53 54 41 |..BA $C000 ; STA|
00000050: 52 54 3A 20 53 59 53 20 34 39 31 35 32 00 3A 20 |RT: SYS 49152.: |
00000060: 96 00 3B 00 51 20 A0 00 2E 47 4C 20 42 41 53 4F |..;.Q ...GL BASO|
00000070: 55 54 20 3D 20 24 46 46 44 32 00 57 20 AA 00 3B |UT = $FFD2.W ..;|
00000080: 00 62 20 B4 00 20 4C 44 58 23 30 00 88 20 BE 00 |.b .. LDX#0.. ..|
00000090: 53 43 48 4C 45 49 46 45 20 4C 44 41 54 45 58 54 |SCHLEIFE LDATEXT|
000000A0: 2C 58 3B 20 5A 45 49 43 48 45 4E 20 4C 45 53 45 |,X; ZEICHEN LESE|
000000B0: 4E 00 91 20 C8 00 20 49 4E 58 00 AE 20 D2 00 20 |N.. .. INX.. .. |
000000C0: 4A 53 52 42 41 53 4F 55 54 3B 20 55 4E 44 20 41 |JSRBASOUT; UND A|
000000D0: 55 53 47 45 42 45 4E 00 D5 20 DC 00 20 42 4E 45 |USGEBEN.. .. BNE|
000000E0: 53 43 48 4C 45 49 46 45 3B 20 53 43 48 4F 4E 20 |SCHLEIFE; SCHON |
000000F0: 45 4E 44 4D 41 52 4B 49 45 52 55 4E 47 3F 00 DB |ENDMARKIERUNG?..|
00000100: 20 E6 00 3B 00 FC 20 F0 00 3B 20 54 45 58 54 41 | ..;.. ..; TEXTA|
00000110: 55 53 47 41 42 45 20 28 55 45 42 45 52 20 53 54 |USGABE (UEBER ST|
00000120: 52 4F 55 54 29 00 02 21 FA 00 3B 00 19 21 04 01 |ROUT)..!..;..!..|
00000130: 2E 47 4C 20 53 54 52 4F 55 54 20 3D 20 24 41 42 |.GL STROUT = $AB|
00000140: 31 45 00 1F 21 0E 01 3B 00 42 21 18 01 20 4C 44 |1E..!..;.B!.. LD|
00000150: 41 23 3C 28 54 45 58 54 29 3B 20 4C 4F 57 2D 42 |A#<(TEXT); LOW-B|
00000160: 59 54 45 20 49 4E 20 41 4B 4B 55 00 63 21 22 01 |YTE IN AKKU.c!".|
00000170: 20 4C 44 59 23 3E 28 54 45 58 54 29 3B 20 48 49 | LDY#>(TEXT); HI|
00000180: 47 48 2D 42 59 54 45 20 49 4E 20 59 00 88 21 2C |GH-BYTE IN Y..!,|
00000190: 01 20 4A 4D 50 53 54 52 4F 55 54 3B 20 54 45 58 |. JMPSTROUT; TEX|
000001A0: 54 41 55 53 47 41 42 45 20 55 4E 44 20 45 4E 44 |TAUSGABE UND END|
000001B0: 45 00 8E 21 36 01 3B 00 AE 21 40 01 54 45 58 54 |E..!6.;..!@.TEXT|
000001C0: 20 2E 54 58 22 44 41 53 20 49 53 54 20 44 45 52 | .TX"DAS IST DER|
000001D0: 20 54 45 58 54 21 22 00 D3 21 4A 01 2E 42 59 20 | TEXT!"..!J..BY |
000001E0: 30 20 3B 20 45 4E 44 4D 41 52 4B 49 45 52 55 4E |0 ; ENDMARKIERUN|
000001F0: 47 20 44 45 53 20 54 45 58 54 45 53 00 00 00 |G DES TEXTES... |
X...D..LI 1,3,0...N.;.. X.; TEXTAUSGABE
(UEBER BASOUT).. ..;.4 ...BA $C000 ; STA
RT: SYS 49152.: ..;.Q ..GL BASOUT = $FF
D2.W ..;.B .. LDX#0.. ..SCHLEIFE LDATEXT
,X; ZEICHEN LESEN.. H. INX.. R. JSRBASOU
T; UND AUSGEBEN.U .. BNESCHLEIFE; SCHON
ENDMARKIERUNG?.. ..;.. ..; TEXTAUSGABE (
UEBER STROUT)..!..;..!...GL STROUT = $AB
1E..!..;.B!.. LDA#<(TEXT); LOW-BYTE IN A
KKU.C!". LDY#>(TEXT); HIGH-BYTE IN Y..!,
. JMPSTROUT; TEXTAUSGABE UND ENDE..!6.;.
.!@.TEXT .TX"DAS IST DER TEXT!".S!J..BY
0 ; ENDMARKIERUNG DES TEXTES...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL