00000000: 61 5C 86 5C 64 00 2E 90 24 42 30 30 3B 20 49 4D |a\.\d...$B00; IM|
00000010: 20 52 53 2D 32 33 32 2D 50 55 46 46 45 52 20 41 | RS-232-PUFFER A|
00000020: 42 4C 45 47 45 4E 00 8C 5C 6E 00 3B 00 B5 5C 78 |BLEGEN..\n.;..\x|
00000030: 00 3B 20 2A 2A 2A 20 48 49 4C 46 53 52 4F 55 54 |.; *** HILFSROUT|
00000040: 49 4E 45 4E 20 46 55 45 52 20 27 4D 45 52 47 45 |INEN FUER 'MERGE|
00000050: 27 20 2A 2A 2A 00 DE 5C 82 00 3B 20 2A 2A 2A 20 |' ***..\..; *** |
00000060: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000070: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 20 2A 2A 2A 00 E4 |========== ***..|
00000080: 5C 8C 00 3B 00 06 5D 96 00 2E 8F 42 41 53 49 43 |\..;..]....BASIC|
00000090: 41 4E 46 41 4E 47 3D 24 32 44 3B 20 5A 45 49 47 |ANFANG=$2D; ZEIG|
000000A0: 45 52 20 44 45 53 00 30 5D A0 00 2E 8F 42 41 53 |ER DES.0]....BAS|
000000B0: 49 43 45 4E 44 45 3D 24 31 32 31 30 3B 20 42 41 |ICENDE=$1210; BA|
000000C0: 53 49 43 2D 49 4E 54 45 52 50 52 45 54 45 52 53 |SIC-INTERPRETERS|
000000D0: 00 36 5D AA 00 3B 00 58 5D B4 00 20 81 42 41 53 |.6]..;.X].. .BAS|
000000E0: 49 43 41 4E 46 41 4E 47 3B 20 5A 57 45 49 54 45 |ICANFANG; ZWEITE|
000000F0: 20 52 4F 55 54 49 4E 45 00 79 5D BE 00 20 82 4C | ROUTINE.y].. .L|
00000100: 4F 57 42 59 54 45 2B 31 3B 20 47 45 4D 41 45 53 |OWBYTE+1; GEMAES|
00000110: 53 20 20 41 4E 46 41 4E 47 00 A1 5D C8 00 20 81 |S ANFANG..].. .|
00000120: 42 41 53 49 43 41 4E 46 41 4E 47 2B 31 3B 20 44 |BASICANFANG+1; D|
00000130: 45 53 20 42 41 53 49 43 50 52 4F 47 52 41 4D 4D |ES BASICPROGRAMM|
00000140: 53 00 C0 5D D2 00 20 82 48 49 47 48 42 59 54 45 |S..].. .HIGHBYTE|
00000150: 2B 31 3B 20 4D 4F 44 49 46 49 5A 49 45 52 45 4E |+1; MODIFIZIEREN|
00000160: 00 C6 5D DC 00 3B 00 E3 5D E6 00 20 81 42 41 53 |..]..;..].. .BAS|
00000170: 49 43 45 4E 44 45 3B 20 42 41 53 49 43 45 4E 44 |ICENDE; BASICEND|
00000180: 45 2D 32 00 F8 5D F0 00 20 A7 3B 20 57 49 52 44 |E-2..].. .; WIRD|
00000190: 20 4E 55 4E 20 41 4C 53 00 11 5E FA 00 20 92 23 | NUN ALS..^.. .#|
000001A0: 3C 28 32 29 3B 20 42 41 53 49 43 41 4E 46 41 4E |<(2); BASICANFAN|
000001B0: 47 00 2B 5E 04 01 20 82 42 41 53 49 43 41 4E 46 |G.+^.. .BASICANF|
000001C0: 41 4E 47 3B 20 49 4E 20 44 49 45 00 45 5E 0E 01 |ANG; IN DIE.E^..|
000001D0: 20 81 42 41 53 49 43 45 4E 44 45 2B 31 3B 20 44 | .BASICENDE+1; D|
000001E0: 41 46 55 45 52 00 5F 5E 18 01 20 92 23 3E 28 32 |AFUER._^.. .#>(2|
000001F0: 29 3B 20 56 4F 52 47 45 53 45 48 45 4E 45 4E 00 |); VORGESEHENEN.|
00000200: 87 5E 22 01 20 82 42 41 53 49 43 41 4E 46 41 4E |.^". .BASICANFAN|
00000210: 47 2B 31 3B 20 5A 45 49 47 45 52 20 47 45 53 43 |G+1; ZEIGER GESC|
00000220: 48 52 49 45 42 45 4E 00 8D 5E 2C 01 3B 00 A4 5E |HRIEBEN..^,.;..^|
00000230: 36 01 20 84 23 32 3B 20 32 20 41 4C 53 20 4F 46 |6. .#2; 2 ALS OF|
00000240: 46 53 45 54 00 B5 5E 40 01 20 81 23 30 3B 20 30 |FSET..^@. .#0; 0|
00000250: 2D 42 59 54 45 00 D6 5E 4A 01 20 82 28 42 41 53 |-BYTE..^J. .(BAS|
00000260: 49 43 41 4E 46 41 4E 47 29 2C 59 3B 20 53 43 48 |ICANFANG),Y; SCH|
00000270: 52 45 49 42 45 4E 00 F6 5E 54 01 20 A4 3B 20 45 |REIBEN..^T. .; E|
00000280: 4E 44 45 20 44 45 52 20 45 52 53 54 45 4E 20 52 |NDE DER ERSTEN R|
00000290: 4F 55 54 49 4E 45 00 FC 5E 5E 01 3B 00 2A 5F 68 |OUTINE..^^.;.*_h|
000002A0: 01 4C 4F 57 42 59 54 45 20 81 23 30 3B 20 30 20 |.LOWBYTE .#0; 0 |
000002B0: 3D 20 44 55 4D 4D 59 20 28 57 49 52 44 20 4D 4F |= DUMMY (WIRD MO|
000002C0: 44 49 46 49 5A 49 45 52 54 29 00 54 5F 72 01 20 |DIFIZIERT).T_r. |
000002D0: 82 42 41 53 49 43 41 4E 46 41 4E 47 3B 20 42 41 |.BASICANFANG; BA|
000002E0: 53 49 43 41 4E 46 41 4E 47 20 56 4F 52 20 41 55 |SICANFANG VOR AU|
000002F0: 46 52 55 46 00 7B 5F 7C 01 48 49 47 48 42 59 54 |FRUF.{_|.HIGHBYT|
00000300: 45 20 81 23 30 3B 20 44 45 52 20 31 2E 20 4D 45 |E .#0; DER 1. ME|
00000310: 52 47 45 2D 52 4F 55 54 49 4E 45 00 A0 5F 86 01 |RGE-ROUTINE.._..|
00000320: 20 82 42 41 53 49 43 41 4E 46 41 4E 47 2B 31 3B | .BASICANFANG+1;|
00000330: 57 49 45 44 45 52 48 45 52 53 54 45 4C 4C 45 4E |WIEDERHERSTELLEN|
00000340: 00 C1 5F 90 01 20 A4 3B 20 45 4E 44 45 20 44 45 |.._.. .; ENDE DE|
00000350: 52 20 5A 57 45 49 54 45 4E 20 52 4F 55 54 49 4E |R ZWEITEN ROUTIN|
00000360: 45 00 C7 5F 9A 01 3B 00 00 00 |E.._..;... |
A\.\D...$B00; IM RS-232-PUFFER ABLEGEN..
\N.;..\X.; *** HILFSROUTINEN FUER 'MERGE
' ***..\..; *** ========================
== ***..\..;..]....BASICANFANG=$2D; ZEIG
ER DES.0] ...BASICENDE=$1210; BASIC-INTE
RPRETERS.6]..;.X].. .BASICANFANG; ZWEITE
ROUTINE.Y].. .LOWBYTE+1; GEMAESS ANFAN
G..]H. .BASICANFANG+1; DES BASICPROGRAMM
S..]R. .HIGHBYTE+1; MODIFIZIEREN.F]..;..
].. .BASICENDE; BASICENDE-2..].. .; WIRD
NUN ALS..^.. .#<(2); BASICANFANG.+^.. .
BASICANFANG; IN DIE.E^.. .BASICENDE+1; D
AFUER._^.. .#>(2); VORGESEHENEN..^". .BA
SICANFANG+1; ZEIGER GESCHRIEBEN..^,.;..^
6. .#2; 2 ALS OFFSET..^@. .#0; 0-BYTE.V^
J. .(BASICANFANG),Y; SCHREIBEN..^T. .; E
NDE DER ERSTEN ROUTINE..^^.;.*_H.LOWBYTE
.#0; 0 = DUMMY (WIRD MODIFIZIERT).T_R.
.BASICANFANG; BASICANFANG VOR AUFRUF.{_|
.HIGHBYTE .#0; DER 1. MERGE-ROUTINE. _..
.BASICANFANG+1;WIEDERHERSTELLEN.A_.. .;
ENDE DER ZWEITEN ROUTINE.G_..;...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL