S/P-SUPPORT .SRC
FILE INFORMATION
FILENAME(S): S/P-SUPPORT .SRC
FILE TYPE(S): PRG
FILE SIZE: 14.4K
FIRST SEEN: 2025-11-02 16:39:49
APPEARS ON: 1 disk(s)
FILE HASH
ec675faba0b7d3b77113d60a83d750341c4395b5405bb22762855534c64b74a3
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RUN O THEK 1 88 | S/P-SUPPORT .SRC | PRG | Treasure Chest - Plattfuss | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 5A 2A A9 2A 10 27 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A |Z*.*.';*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000050: 00 AF 2A 1A 27 3B 00 F9 2A 24 27 3B 20 20 20 20 |..*.';..*$'; |
00000060: 20 D3 20 C3 20 D2 20 C9 20 D0 20 D4 20 2F 20 D0 | . . . . . . / .|
00000070: 20 CC 20 D5 20 D3 20 20 2D 20 20 D3 20 D5 20 D0 | . . . - . . .|
00000080: 20 D0 20 CF 20 D2 20 D4 20 20 20 20 D6 20 C5 20 | . . . . . . |
00000090: D2 20 D3 20 C9 20 CF 20 CE 20 20 32 20 2E 20 31 |. . . . . 2 . 1|
000000A0: 00 FF 2A 2E 27 3B 00 4E 2B 38 27 3B 2A 2A 2A 2A |..*.';.N+8';****|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000F0: 2A 2A 2A 2A 2A 00 54 2B 42 27 3B 00 5A 2B 4C 27 |*****.T+B';.Z+L'|
00000100: 3B 00 84 2B 56 27 3B 20 20 20 20 20 20 20 20 2E |;..+V'; .|
00000110: 4F 42 20 22 40 30 3A 53 2F 50 2D 53 55 50 50 4F |OB "@0:S/P-SUPPO|
00000120: 52 54 20 56 32 2E 31 2C 50 2C 57 00 96 2B 60 27 |RT V2.1,P,W..+`'|
00000130: 2E 44 50 31 35 2C 34 36 2C 30 2C 32 30 00 A9 2B |.DP15,46,0,20..+|
00000140: 6A 27 2E 42 41 24 31 30 30 31 2C 24 44 45 30 30 |j'.BA$1001,$DE00|
00000150: 00 AF 2B 74 27 3B 00 FE 2B 7E 27 3B 2D 2D 2D 2D |..+t';..+~';----|
00000160: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000170: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000180: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000190: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000001A0: 2D 2D 2D 2D 2D 00 04 2C 88 27 3B 00 29 2C 92 27 |-----..,.';.),.'|
000001B0: 3B 20 2A 2A 20 20 20 20 C6 41 52 42 45 49 4E 53 |; ** .ARBEINS|
000001C0: 54 45 4C 4C 55 4E 47 45 4E 3A 20 20 20 20 2A 2A |TELLUNGEN: **|
000001D0: 00 2F 2C 9C 27 3B 00 5E 2C A6 27 2E 45 51 46 41 |./,.';.^,.'.EQFA|
000001E0: 52 42 45 30 3D 24 38 44 3B 20 C5 44 49 54 4F 52 |RBE0=$8D; .DITOR|
000001F0: 4D 4F 44 55 53 20 20 20 43 4F 4C 4F 52 30 2B 34 |MODUS COLOR0+4|
00000200: 2C 31 34 2C 30 00 8D 2C B0 27 2E 45 51 46 41 52 |,14,0..,.'.EQFAR|
00000210: 42 45 31 3D 24 37 31 3B 20 DA 45 49 43 48 45 4E |BE1=$71; .EICHEN|
00000220: 46 41 52 42 45 20 20 43 4F 4C 4F 52 31 20 20 2C |FARBE COLOR1 ,|
00000230: 20 32 2C 37 00 BC 2C BA 27 2E 45 51 46 41 52 42 | 2,7..,.'.EQFARB|
00000240: 45 32 3D 24 38 31 3B 20 C1 55 53 47 41 42 45 4D |E2=$81; .USGABEM|
00000250: 4F 44 55 53 20 20 43 4F 4C 4F 52 30 2B 34 2C 20 |ODUS COLOR0+4, |
00000260: 32 2C 30 00 EB 2C C4 27 2E 45 51 46 41 52 42 45 |2,0..,.'.EQFARBE|
00000270: 33 3D 24 38 30 3B 20 D2 41 48 4D 45 4E 42 4C 49 |3=$80; .AHMENBLI|
00000280: 4E 4B 45 4E 20 43 4F 4C 4F 52 34 20 20 2C 20 31 |NKEN COLOR4 , 1|
00000290: 2C 30 00 F1 2C CE 27 3B 00 40 2D D8 27 3B 2D 2D |,0..,.';.@-.';--|
000002A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000002B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000002C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000002D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000002E0: 2D 2D 2D 2D 2D 2D 2D 00 46 2D E2 27 3B 00 6B 2D |-------.F-.';.k-|
000002F0: EC 27 3B 20 2A 2A 20 20 20 20 C2 41 53 49 43 2D |.'; ** .ASIC-|
00000300: D0 52 4F 47 52 41 4D 4D 4B 4F 50 46 20 20 20 20 |.ROGRAMMKOPF |
00000310: 2A 2A 00 71 2D F6 27 3B 00 84 2D 00 28 2E 57 4F |**.q-.';..-.(.WO|
00000320: 4C 49 4E 45 45 4E 44 2B 31 2C 30 00 8F 2D 0A 28 |LINEEND+1,0..-.(|
00000330: 2E 42 59 53 59 53 00 A1 2D 14 28 2E 42 59 4D 43 |.BYSYS..-.(.BYMC|
00000340: 2F 31 30 30 30 2B 4F 46 00 C8 2D 1E 28 2E 42 59 |/1000+OF..-.(.BY|
00000350: 28 4D 43 2D 28 4D 43 2F 31 30 30 30 21 41 21 4D |(MC-(MC/1000!A!M|
00000360: 41 29 2A 31 30 30 30 29 2F 31 30 30 2B 4F 46 00 |A)*1000)/100+OF.|
00000370: EC 2D 28 28 2E 42 59 28 4D 43 2D 28 4D 43 2F 31 |.-((.BY(MC-(MC/1|
00000380: 30 30 21 41 21 4D 41 29 2A 31 30 30 29 2F 31 30 |00!A!MA)*100)/10|
00000390: 2B 4F 46 00 09 2E 32 28 2E 42 59 4D 43 2D 28 4D |+OF...2(.BYMC-(M|
000003A0: 43 2F 31 30 21 41 21 4D 41 29 2A 31 30 2B 4F 46 |C/10!A!MA)*10+OF|
000003B0: 00 24 2E 3C 28 2E 42 59 33 34 2C 31 33 2C 31 39 |.$.<(.BY34,13,19|
000003C0: 2C 31 39 2C 31 34 37 2C 31 33 30 00 38 2E 46 28 |,19,147,130.8.F(|
000003D0: 4C 4F 47 4F 20 2E 42 59 39 2C 31 34 2C 31 38 00 |LOGO .BY9,14,18.|
000003E0: 69 2E 50 28 2E 54 58 22 B0 C0 C0 C0 C0 C0 C0 C0 |i.P(.TX"........|
000003F0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000400: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE |................|
00000410: 00 9A 2E 5A 28 2E 54 58 22 DD 20 20 20 D3 43 52 |...Z(.TX". .CR|
00000420: 49 50 54 2F 50 4C 55 53 2D D3 55 50 50 4F 52 54 |IPT/PLUS-.UPPORT|
00000430: 20 A0 D6 45 52 53 49 4F 4E 20 32 2E 31 20 20 20 | ..ERSION 2.1 |
00000440: DD 00 CB 2E 64 28 2E 54 58 22 DD 20 20 20 20 20 |....d(.TX". |
00000450: 20 20 20 20 D6 4F 4E 20 CF 4C 55 46 20 C8 45 49 | .ON .LUF .EI|
00000460: 4E 52 49 43 48 53 45 4E 20 20 20 20 20 20 20 20 |NRICHSEN |
00000470: 20 DD 00 FC 2E 6E 28 2E 54 58 22 DD D4 41 4E 4E | ....n(.TX"..ANN|
00000480: 45 4E 42 41 55 4D 45 52 20 D7 45 47 20 39 37 2C |ENBAUMER .EG 97,|
00000490: 20 35 36 30 30 20 D7 55 50 50 45 52 54 41 4C 20 | 5600 .UPPERTAL |
000004A0: 32 31 DD 00 2D 2F 78 28 2E 54 58 22 AD C0 C0 C0 |21..-/x(.TX"....|
000004B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000004C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000004D0: C0 C0 C0 BD 00 3A 2F 82 28 2E 42 59 31 33 2C 31 |.....:/.(.BY13,1|
000004E0: 33 00 4B 2F 8C 28 2E 54 58 22 5B CE 4F 56 2E 38 |3.K/.(.TX"[.OV.8|
000004F0: 37 5D 00 60 2F 96 28 4C 49 4E 45 45 4E 44 20 2E |7].`/.(LINEEND .|
00000500: 42 59 30 2C 30 2C 30 00 70 2F A0 28 4D 43 20 4A |BY0,0,0.p/.(MC J|
00000510: 4D 50 53 54 41 52 54 00 76 2F AA 28 3B 00 C5 2F |MPSTART.v/.(;../|
00000520: B4 28 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.(;-------------|
00000530: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000540: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000550: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000560: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 CB 2F BE |------------../.|
00000570: 28 3B 00 F0 2F C8 28 3B 20 2A 2A 20 20 20 20 20 |(;../.(; ** |
00000580: 20 20 C4 45 46 49 4E 49 54 49 4F 4E 45 4E 3A 20 | .EFINITIONEN: |
00000590: 20 20 20 20 20 2A 2A 00 F6 2F D2 28 3B 00 06 30 | **../.(;..0|
000005A0: DC 28 2E 45 51 42 41 4E 4B 3D 24 46 42 00 1E 30 |.(.EQBANK=$FB..0|
000005B0: E6 28 2E 45 51 42 41 4E 4B 53 57 49 54 43 48 3D |.(.EQBANKSWITCH=|
000005C0: 24 46 44 44 30 00 2F 30 F0 28 2E 45 51 42 41 53 |$FDD0./0.(.EQBAS|
000005D0: 3D 24 30 46 45 38 00 43 30 FA 28 2E 45 51 42 53 |=$0FE8.C0.(.EQBS|
000005E0: 4F 55 54 31 3D 24 46 46 44 32 00 57 30 04 29 2E |OUT1=$FFD2.W0.).|
000005F0: 45 51 42 53 4F 55 54 32 3D 24 38 31 36 32 00 8A |EQBSOUT2=$8162..|
00000600: 30 0E 29 2E 45 51 42 55 53 59 3D 24 46 44 30 31 |0.).EQBUSY=$FD01|
00000610: 3B 20 D2 45 47 49 53 54 45 52 20 31 20 C1 C3 C9 |; .EGISTER 1 ...|
00000620: C1 20 36 35 35 31 20 20 20 28 D0 CC D5 D3 2F 34 |. 6551 (..../4|
00000630: 29 00 A4 30 18 29 2E 45 51 43 4F 4C 4F 52 30 3D |)..0.).EQCOLOR0=|
00000640: 52 45 47 49 53 54 45 52 2B 32 31 00 B8 30 22 29 |REGISTER+21..0")|
00000650: 2E 45 51 43 4F 4C 4F 52 31 3D 24 30 35 33 42 00 |.EQCOLOR1=$053B.|
00000660: D2 30 2C 29 2E 45 51 43 4F 4C 4F 52 34 3D 52 45 |.0,).EQCOLOR4=RE|
00000670: 47 49 53 54 45 52 2B 32 35 00 07 31 36 29 2E 45 |GISTER+25..16).E|
00000680: 51 44 27 50 4F 52 54 3D 24 46 44 31 30 3B 20 C4 |QD'PORT=$FD10; .|
00000690: 41 54 45 4E 52 45 47 49 53 54 45 52 20 35 32 32 |ATENREGISTER 522|
000006A0: 39 20 C2 20 20 20 28 D0 CC D5 D3 2F 34 29 00 39 |9 . (..../4).9|
000006B0: 31 40 29 2E 45 51 43 45 4E 54 52 4F 4E 3D 37 3B |1@).EQCENTRON=7;|
000006C0: 20 C3 45 4E 54 52 4F 4E 49 43 53 2D C4 45 56 49 | .ENTRONICS-.EVI|
000006D0: 43 45 2D CE 52 2E 37 20 28 D0 CC D5 D3 2F 34 29 |CE-.R.7 (..../4)|
000006E0: 00 4D 31 4A 29 2E 45 51 45 52 52 4F 52 33 3D 24 |.M1J).EQERROR3=$|
000006F0: 46 32 37 39 00 61 31 54 29 2E 45 51 45 52 52 4F |F279.a1T).EQERRO|
00000700: 52 35 3D 24 46 32 37 46 00 74 31 5E 29 2E 45 51 |R5=$F27F.t1^).EQ|
00000710: 46 27 4B 45 59 3D 24 30 35 35 46 00 87 31 68 29 |F'KEY=$055F..1h)|
00000720: 2E 45 51 46 49 4C 45 31 3D 24 45 45 45 38 00 9A |.EQFILE1=$EEE8..|
00000730: 31 72 29 2E 45 51 46 49 4C 45 32 3D 24 45 45 46 |1r).EQFILE2=$EEF|
00000740: 38 00 AE 31 7C 29 2E 45 51 46 49 4C 45 4F 4B 3D |8..1|).EQFILEOK=|
00000750: 24 45 44 38 31 00 C2 31 86 29 2E 45 51 49 52 51 |$ED81..1.).EQIRQ|
00000760: 4C 4F 57 3D 24 30 35 46 35 00 D2 31 90 29 2E 45 |LOW=$05F5..1.).E|
00000770: 51 4D 41 3D 24 46 46 46 46 00 E6 31 9A 29 2E 45 |QMA=$FFFF..1.).E|
00000780: 51 4D 4F 44 55 4C 31 3D 24 30 35 45 44 00 FA 31 |QMODUL1=$05ED..1|
00000790: A4 29 2E 45 51 4D 4F 44 55 4C 32 3D 24 30 35 45 |.).EQMODUL2=$05E|
000007A0: 45 00 08 32 AE 29 2E 45 51 4F 46 3D 24 33 30 00 |E..2.).EQOF=$30.|
000007B0: 1C 32 B8 29 2E 45 51 50 52 49 4E 54 31 3D 24 46 |.2.).EQPRINT1=$F|
000007C0: 46 34 46 00 33 32 C2 29 2E 45 51 52 41 4D 3D 52 |F4F.32.).EQRAM=R|
000007D0: 45 47 49 53 54 45 52 2B 36 33 00 49 32 CC 29 2E |EGISTER+63.I2.).|
000007E0: 45 51 52 45 47 49 53 54 45 52 3D 24 46 46 30 30 |EQREGISTER=$FF00|
000007F0: 00 60 32 D6 29 2E 45 51 52 4F 4D 3D 52 45 47 49 |.`2.).EQROM=REGI|
00000800: 53 54 45 52 2B 36 32 00 74 32 E0 29 2E 45 51 53 |STER+62.t2.).EQS|
00000810: 45 54 54 49 4D 3D 24 46 46 44 42 00 87 32 EA 29 |ETTIM=$FFDB..2.)|
00000820: 2E 45 51 53 4F 55 4E 44 3D 24 42 44 43 31 00 98 |.EQSOUND=$BDC1..|
00000830: 32 F4 29 2E 45 51 53 54 4B 45 59 3D 24 39 31 00 |2.).EQSTKEY=$91.|
00000840: AD 32 FE 29 2E 45 51 53 54 27 4C 49 4E 45 3D 24 |.2.).EQST'LINE=$|
00000850: 30 43 30 30 00 E2 32 08 2A 2E 45 51 53 54 52 4F |0C00..2.*.EQSTRO|
00000860: 42 45 3D 24 46 44 30 32 3B 20 D2 45 47 49 53 54 |BE=$FD02; .EGIST|
00000870: 45 52 20 32 20 C1 C3 C9 C1 20 36 35 35 31 20 20 |ER 2 .... 6551 |
00000880: 20 28 D0 CC D5 D3 2F 34 29 00 F1 32 12 2A 2E 45 | (..../4)..2.*.E|
00000890: 51 53 59 53 3D 24 39 45 00 01 33 1C 2A 2E 45 51 |QSYS=$9E..3.*.EQ|
000008A0: 54 49 4D 45 3D 24 41 33 00 13 33 26 2A 2E 45 51 |TIME=$A3..3&*.EQ|
000008B0: 54 4D 41 58 3D 24 30 35 33 46 00 2A 33 30 2A 2E |TMAX=$053F.*30*.|
000008C0: 45 51 56 45 43 27 42 53 4F 55 54 3D 24 30 33 32 |EQVEC'BSOUT=$032|
000008D0: 34 00 42 33 3A 2A 2E 45 51 56 45 43 27 43 48 4B |4.B3:*.EQVEC'CHK|
000008E0: 4F 55 54 3D 24 30 33 31 45 00 59 33 44 2A 2E 45 |OUT=$031E.Y3D*.E|
000008F0: 51 56 45 43 27 47 45 54 49 4E 3D 24 30 33 32 38 |QVEC'GETIN=$0328|
00000900: 00 6F 33 4E 2A 2E 45 51 56 45 43 27 49 4E 46 4F |.o3N*.EQVEC'INFO|
00000910: 3D 24 31 34 30 38 00 85 33 58 2A 2E 45 51 56 45 |=$1408..3X*.EQVE|
00000920: 43 27 49 52 51 31 3D 24 30 33 31 34 00 9B 33 62 |C'IRQ1=$0314..3b|
00000930: 2A 2E 45 51 56 45 43 27 49 52 51 32 3D 24 30 33 |*.EQVEC'IRQ2=$03|
00000940: 31 32 00 A1 33 6C 2A 3B 00 F0 33 76 2A 3B 2D 2D |12..3l*;..3v*;--|
00000950: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000960: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000970: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000980: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000990: 2D 2D 2D 2D 2D 2D 2D 00 F6 33 80 2A 3B 00 1B 34 |-------..3.*;..4|
000009A0: 8A 2A 3B 20 2A 2A 20 D4 41 53 54 45 4E 42 45 4C |.*; ** .ASTENBEL|
000009B0: 45 47 55 4E 47 20 41 4C 54 20 2D 20 4E 45 55 20 |EGUNG ALT - NEU |
000009C0: 2A 2A 00 21 34 94 2A 3B 00 47 34 9E 2A 2E 45 51 |**.!4.*;.G4.*.EQ|
000009D0: 54 41 42 27 31 3D 31 38 3B 20 C1 4E 5A 41 48 4C |TAB'1=18; .NZAHL|
000009E0: 20 C1 45 4E 44 45 52 55 4E 47 45 4E 2D 31 00 4D | .ENDERUNGEN-1.M|
000009F0: 34 A8 2A 3B 00 8F 34 B2 2A 54 41 42 45 4C 4C 45 |4.*;..4.*TABELLE|
00000A00: 31 20 2E 42 59 22 3B 22 2C 22 3A 22 2C 22 40 22 |1 .BY";",":","@"|
00000A10: 2C 22 5D 22 2C 22 5B 22 3B 20 57 45 4E 4E 20 DA |,"]","["; WENN .|
00000A20: 45 49 43 48 45 4E 20 28 41 4C 54 29 2C 20 44 41 |EICHEN (ALT), DA|
00000A30: 4E 4E 20 2E 2E 2E 00 AA 34 BC 2A 2E 42 59 24 42 |NN .....4.*.BY$B|
00000A40: 41 2C 22 5C 22 2C 24 38 32 2C 24 38 34 2C 22 3C |A,"\",$82,$84,"<|
00000A50: 22 00 C5 34 C6 2A 2E 42 59 22 3E 22 2C 22 23 22 |"..4.*.BY">","#"|
00000A60: 2C 22 59 22 2C 22 5A 22 2C 24 41 39 00 DC 34 D0 |,"Y","Z",$A9..4.|
00000A70: 2A 2E 42 59 24 41 38 2C 24 44 46 2C 22 DA 22 2C |*.BY$A8,$DF,".",|
00000A80: 22 D9 22 00 E2 34 DA 2A 3B 00 24 35 E4 2A 54 41 |"."..4.*;.$5.*TA|
00000A90: 42 45 4C 4C 45 32 20 2E 42 59 22 5B 22 2C 22 5C |BELLE2 .BY"[","\|
00000AA0: 22 2C 22 5D 22 2C 22 DB 22 2C 24 42 41 3B 20 44 |","]",".",$BA; D|
00000AB0: 55 52 43 48 20 DA 45 49 43 48 45 4E 20 28 4E 45 |URCH .EICHEN (NE|
00000AC0: 55 29 20 45 52 53 45 54 5A 45 4E 00 3F 35 EE 2A |U) ERSETZEN.?5.*|
00000AD0: 2E 42 59 22 DD 22 2C 24 42 46 2C 22 3C 22 2C 22 |.BY".",$BF,"<","|
00000AE0: 3E 22 2C 22 3B 22 00 5A 35 F8 2A 2E 42 59 22 3A |>",";".Z5.*.BY":|
00000AF0: 22 2C 22 40 22 2C 22 5A 22 2C 22 59 22 2C 22 23 |","@","Z","Y","#|
00000B00: 22 00 71 35 02 2B 2E 42 59 22 5B 22 2C 22 5D 22 |".q5.+.BY"[","]"|
00000B10: 2C 22 D9 22 2C 22 DA 22 00 77 35 0C 2B 3B 00 C6 |,".",".".w5.+;..|
00000B20: 35 16 2B 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |5.+;------------|
00000B30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000B40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000B50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000B60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 CC 35 |-------------..5|
00000B70: 20 2B 3B 00 F1 35 2A 2B 3B 20 2A 2A 20 45 52 47 | +;..5*+; ** ERG|
00000B80: 41 45 4E 5A 45 4E 44 45 20 C4 52 55 43 4B 45 52 |AENZENDE .RUCKER|
00000B90: 53 54 45 55 2D 20 2A 2A 00 16 36 34 2B 3B 20 2A |STEU- **..64+; *|
00000BA0: 2A 20 20 20 20 20 20 20 20 45 52 5A 45 49 43 48 |* ERZEICH|
00000BB0: 45 4E 20 20 20 20 20 20 20 20 20 2A 2A 00 1C 36 |EN **..6|
00000BC0: 3E 2B 3B 00 42 36 48 2B 2E 45 51 54 41 42 27 32 |>+;.B6H+.EQTAB'2|
00000BD0: 3D 33 3B 20 C1 4E 5A 41 48 4C 20 C5 52 47 41 45 |=3; .NZAHL .RGAE|
00000BE0: 4E 5A 55 4E 47 45 4E 2D 31 00 64 36 52 2B 3B 20 |NZUNGEN-1.d6R+; |
00000BF0: 20 20 20 20 20 20 20 57 45 4E 4E 20 3C C5 D3 C3 | WENN <...|
00000C00: 3E 2B 43 48 52 24 28 2E 2E 2E 29 00 93 36 5C 2B |>+CHR$(...)..6\+|
00000C10: 54 41 42 45 4C 4C 45 33 20 2E 42 59 38 33 3B 20 |TABELLE3 .BY83; |
00000C20: C8 4F 43 48 2D 20 4F 44 45 52 20 D4 49 45 46 53 |.OCH- ODER .IEFS|
00000C30: 43 48 52 49 46 54 20 C5 C9 CE 00 B9 36 66 2B 2E |CHRIFT .....6f+.|
00000C40: 42 59 38 34 3B 20 C8 4F 43 48 2D 20 4F 44 45 52 |BY84; .OCH- ODER|
00000C50: 20 D4 49 45 46 53 43 48 52 49 46 54 20 C1 D5 D3 | .IEFSCHRIFT ...|
00000C60: 00 D6 36 70 2B 2E 42 59 36 39 3B 20 D3 43 48 41 |..6p+.BY69; .CHA|
00000C70: 54 54 45 4E 44 52 55 43 4B 20 C5 C9 CE 00 F3 36 |TTENDRUCK .....6|
00000C80: 7A 2B 2E 42 59 37 30 3B 20 D3 43 48 41 54 54 45 |z+.BY70; .CHATTE|
00000C90: 4E 44 52 55 43 4B 20 C1 D5 D3 00 0A 37 84 2B 2E |NDRUCK .....7.+.|
00000CA0: 42 59 30 2C 30 2C 30 3B 20 C6 52 45 49 52 41 55 |BY0,0,0; .REIRAU|
00000CB0: 4D 00 38 37 8E 2B 3B 20 20 20 20 20 20 20 20 44 |M.87.+; D|
00000CC0: 41 4E 4E 20 5A 55 53 41 45 54 5A 4C 49 43 48 20 |ANN ZUSAETZLICH |
00000CD0: 3C C5 D3 C3 3E 2B 43 48 52 24 28 2E 2E 2E 29 00 |<...>+CHR$(...).|
00000CE0: 5E 37 98 2B 54 41 42 45 4C 4C 45 34 20 2E 42 59 |^7.+TABELLE4 .BY|
00000CF0: 31 35 3B 20 D3 43 48 4D 41 4C 53 43 48 52 49 46 |15; .CHMALSCHRIF|
00000D00: 54 20 C5 C9 CE 00 72 37 A2 2B 2E 42 59 38 30 3B |T ....r7.+.BY80;|
00000D10: 20 D0 C9 C3 C1 20 C5 C9 CE 00 8C 37 AC 2B 2E 42 | .... .....7.+.B|
00000D20: 59 35 32 3B 20 CB 55 52 53 49 56 20 CE CC D1 20 |Y52; .URSIV ... |
00000D30: C5 C9 CE 00 A6 37 B6 2B 2E 42 59 35 33 3B 20 CB |.....7.+.BY53; .|
00000D40: 55 52 53 49 56 20 CE CC D1 20 C1 D5 D3 00 BD 37 |URSIV ... .....7|
00000D50: C0 2B 2E 42 59 30 2C 30 2C 30 3B 20 C6 52 45 49 |.+.BY0,0,0; .REI|
00000D60: 52 41 55 4D 00 C3 37 CA 2B 3B 00 12 38 D4 2B 3B |RAUM..7.+;..8.+;|
00000D70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000D80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000D90: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000DA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000DB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 18 38 DE 2B 3B 00 |---------..8.+;.|
00000DC0: 3C 38 E8 2B 56 45 43 54 4F 52 31 20 2E 57 4F 24 |<8.+VECTOR1 .WO$|
00000DD0: 43 45 30 45 3B 20 C9 D2 D1 20 31 20 28 C4 55 4D |CE0E; ... 1 (.UM|
00000DE0: 4D 59 29 00 42 38 F2 2B 3B 00 77 38 FC 2B 56 45 |MY).B8.+;.w8.+VE|
00000DF0: 43 54 4F 52 32 20 2E 57 4F 54 41 42 45 4C 4C 45 |CTOR2 .WOTABELLE|
00000E00: 39 2D 54 41 42 45 4C 4C 45 38 2B 24 44 33 46 46 |9-TABELLE8+$D3FF|
00000E10: 3B 20 D4 4F 4B 45 4E 54 41 42 45 4C 4C 45 00 7D |; .OKENTABELLE.}|
00000E20: 38 06 2C 3B 00 CC 38 10 2C 3B 2D 2D 2D 2D 2D 2D |8.,;..8.,;------|
00000E30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000E40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000E50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000E60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000E70: 2D 2D 2D 00 D2 38 1A 2C 3B 00 F7 38 24 2C 3B 20 |---..8.,;..8$,; |
00000E80: 2A 2A 20 4D 4F 44 49 46 49 5A 49 45 52 54 45 20 |** MODIFIZIERTE |
00000E90: 20 C9 4E 54 45 52 52 55 50 54 2D 20 2A 2A 00 1C | .NTERRUPT- **..|
00000EA0: 39 2E 2C 3B 20 2A 2A 20 20 20 20 20 52 4F 55 54 |9.,; ** ROUT|
00000EB0: 49 4E 45 20 28 D4 45 49 4C 20 31 29 20 20 20 20 |INE (.EIL 1) |
00000EC0: 20 2A 2A 00 22 39 38 2C 3B 00 42 39 42 2C 49 52 | **."98,;.B9B,IR|
00000ED0: 51 31 20 4C 44 41 24 35 46 30 3B 20 CB 4F 52 52 |Q1 LDA$5F0; .ORR|
00000EE0: 45 4B 54 55 52 20 28 C1 29 00 4F 39 4C 2C 20 43 |EKTUR (.).O9L, C|
00000EF0: 4D 50 23 24 44 34 00 5A 39 56 2C 20 42 4E 45 41 |MP#$D4.Z9V, BNEA|
00000F00: 30 00 67 39 60 2C 20 4C 44 41 24 35 46 31 00 74 |0.g9`, LDA$5F1.t|
00000F10: 39 6A 2C 20 43 4D 50 23 24 44 38 00 7F 39 74 2C |9j, CMP#$D8..9t,|
00000F20: 20 42 4E 45 41 30 00 8C 39 7E 2C 20 4C 44 41 23 | BNEA0..9~, LDA#|
00000F30: 24 43 31 00 99 39 88 2C 20 53 54 41 24 35 46 30 |$C1..9., STA$5F0|
00000F40: 00 9F 39 92 2C 3B 00 BD 39 9C 2C 41 30 20 4C 44 |..9.,;..9.,A0 LD|
00000F50: 41 23 24 38 44 3B 20 CB 4F 52 52 45 4B 54 55 52 |A#$8D; .ORREKTUR|
00000F60: 20 28 C2 29 00 CE 39 A6 2C 20 53 54 41 56 45 43 | (.)..9., STAVEC|
00000F70: 27 49 4E 46 4F 00 DB 39 B0 2C 20 4C 44 41 23 24 |'INFO..9., LDA#$|
00000F80: 30 35 00 EE 39 BA 2C 20 53 54 41 56 45 43 27 49 |05..9., STAVEC'I|
00000F90: 4E 46 4F 2B 31 00 F4 39 C4 2C 3B 00 1F 3A CE 2C |NFO+1..9.,;..:.,|
00000FA0: 20 4C 44 41 24 31 41 3B 20 DA 45 49 43 48 45 4E | LDA$1A; .EICHEN|
00000FB0: 2D 20 55 4E 44 20 C8 49 4E 54 45 52 47 52 55 4E |- UND .INTERGRUN|
00000FC0: 44 46 41 52 42 45 00 2C 3A D8 2C 20 43 4D 50 23 |DFARBE.,:., CMP#|
00000FD0: 24 31 42 00 37 3A E2 2C 20 42 4E 45 41 31 00 43 |$1B.7:., BNEA1.C|
00000FE0: 3A EC 2C 20 4C 44 41 24 31 39 00 50 3A F6 2C 20 |:., LDA$19.P:., |
00000FF0: 43 4D 50 23 24 32 30 00 5B 3A 00 2D 20 42 45 51 |CMP#$20.[:.- BEQ|
00001000: 41 32 00 68 3A 0A 2D 20 43 4D 50 23 24 46 45 00 |A2.h:.- CMP#$FE.|
00001010: 73 3A 14 2D 20 42 45 51 41 32 00 80 3A 1E 2D 20 |s:.- BEQA2..:.- |
00001020: 43 4D 50 23 24 46 39 00 8B 3A 28 2D 20 42 45 51 |CMP#$F9..:(- BEQ|
00001030: 41 32 00 9D 3A 32 2D 20 4C 44 58 53 54 27 4C 49 |A2..:2- LDXST'LI|
00001040: 4E 45 2B 36 00 A8 3A 3C 2D 20 42 4D 49 58 32 00 |NE+6..:<- BMIX2.|
00001050: B8 3A 46 2D 20 4C 44 41 23 46 41 52 42 45 33 00 |.:F- LDA#FARBE3.|
00001060: C7 3A 50 2D 20 43 4D 50 43 4F 4C 4F 52 34 00 D2 |.:P- CMPCOLOR4..|
00001070: 3A 5A 2D 20 42 45 51 41 33 00 DD 3A 64 2D 20 42 |:Z- BEQA3..:d- B|
00001080: 4E 45 41 34 00 EC 3A 6E 2D 41 31 20 4C 44 41 23 |NEA4..:n-A1 LDA#|
00001090: 24 30 38 00 FF 3A 78 2D 20 53 54 41 52 45 47 49 |$08..:x- STAREGI|
000010A0: 53 54 45 52 2B 37 00 11 3B 82 2D 58 32 20 4C 44 |STER+7..;.-X2 LD|
000010B0: 41 23 46 41 52 42 45 30 00 1C 3B 8C 2D 20 42 4E |A#FARBE0..;.- BN|
000010C0: 45 58 31 00 2B 3B 96 2D 41 32 20 4C 44 41 23 24 |EX1.+;.-A2 LDA#$|
000010D0: 38 38 00 3E 3B A0 2D 20 53 54 41 52 45 47 49 53 |88.>;.- STAREGIS|
000010E0: 54 45 52 2B 37 00 4E 3B AA 2D 20 4C 44 41 23 46 |TER+7.N;.- LDA#F|
000010F0: 41 52 42 45 32 00 5F 3B B4 2D 58 31 20 43 4D 50 |ARBE2._;.-X1 CMP|
00001100: 43 4F 4C 4F 52 34 00 6A 3B BE 2D 20 42 45 51 41 |COLOR4.j;.- BEQA|
00001110: 33 00 79 3B C8 2D 20 53 54 41 43 4F 4C 4F 52 30 |3.y;.- STACOLOR0|
00001120: 00 8A 3B D2 2D 41 34 20 53 54 41 43 4F 4C 4F 52 |..;.-A4 STACOLOR|
00001130: 34 00 90 3B DC 2D 3B 00 C1 3B E6 2D 41 33 20 4C |4..;.-;..;.-A3 L|
00001140: 44 41 53 54 27 4C 49 4E 45 2B 31 31 3B 20 C1 45 |DAST'LINE+11; .E|
00001150: 4E 44 45 52 55 4E 47 45 4E 20 49 4E 20 D3 54 41 |NDERUNGEN IN .TA|
00001160: 54 55 53 5A 45 49 4C 45 00 CE 3B F0 2D 20 43 4D |TUSZEILE..;.- CM|
00001170: 50 23 24 43 36 00 D9 3B FA 2D 20 42 4E 45 41 35 |P#$C6..;.- BNEA5|
00001180: 00 EC 3B 04 2E 20 4C 44 41 53 54 27 4C 49 4E 45 |..;.. LDAST'LINE|
00001190: 2B 31 32 00 F9 3B 0E 2E 20 43 4D 50 23 24 43 36 |+12..;.. CMP#$C6|
000011A0: 00 04 3C 18 2E 20 42 4E 45 41 35 00 20 3C 22 2E |..<.. BNEA5. <".|
000011B0: 20 4C 44 41 23 24 43 31 3B 20 C1 D5 D3 20 53 54 | LDA#$C1; ... ST|
000011C0: 41 54 54 20 CF C6 C6 00 33 3C 2C 2E 20 53 54 41 |ATT ....3<,. STA|
000011D0: 53 54 27 4C 49 4E 45 2B 31 30 00 40 3C 36 2E 20 |ST'LINE+10.@<6. |
000011E0: 4C 44 41 23 24 44 35 00 53 3C 40 2E 20 53 54 41 |LDA#$D5.S<@. STA|
000011F0: 53 54 27 4C 49 4E 45 2B 31 31 00 60 3C 4A 2E 20 |ST'LINE+11.`<J. |
00001200: 4C 44 41 23 24 44 33 00 73 3C 54 2E 20 53 54 41 |LDA#$D3.s<T. STA|
00001210: 53 54 27 4C 49 4E 45 2B 31 32 00 88 3C 5E 2E 41 |ST'LINE+12..<^.A|
00001220: 35 20 4C 44 41 53 54 27 4C 49 4E 45 2B 31 34 00 |5 LDAST'LINE+14.|
00001230: 95 3C 68 2E 20 43 4D 50 23 24 44 37 00 A0 3C 72 |.<h. CMP#$D7..<r|
00001240: 2E 20 42 4E 45 41 36 00 B8 3C 7C 2E 20 4C 44 41 |. BNEA6..<|. LDA|
00001250: 23 24 44 35 3B 20 D5 20 53 54 41 54 54 20 D7 00 |#$D5; . STATT ..|
00001260: CB 3C 86 2E 20 53 54 41 53 54 27 4C 49 4E 45 2B |.<.. STAST'LINE+|
00001270: 31 34 00 E0 3C 90 2E 41 36 20 4C 44 41 53 54 27 |14..<..A6 LDAST'|
00001280: 4C 49 4E 45 2B 31 36 00 ED 3C 9A 2E 20 43 4D 50 |LINE+16..<.. CMP|
00001290: 23 24 43 39 00 F8 3C A4 2E 20 42 4E 45 41 37 00 |#$C9..<.. BNEA7.|
000012A0: 10 3D AE 2E 20 4C 44 41 23 24 43 35 3B 20 C5 20 |.=.. LDA#$C5; . |
000012B0: 53 54 41 54 54 20 C9 00 23 3D B8 2E 20 53 54 41 |STATT ..#=.. STA|
000012C0: 53 54 27 4C 49 4E 45 2B 31 36 00 38 3D C2 2E 41 |ST'LINE+16.8=..A|
000012D0: 37 20 4C 44 41 53 54 27 4C 49 4E 45 2B 32 30 00 |7 LDAST'LINE+20.|
000012E0: 45 3D CC 2E 20 43 4D 50 23 24 43 33 00 50 3D D6 |E=.. CMP#$C3.P=.|
000012F0: 2E 20 42 4E 45 41 38 00 68 3D E0 2E 20 4C 44 41 |. BNEA8.h=.. LDA|
00001300: 23 24 43 37 3B 20 C7 20 53 54 41 54 54 20 C3 00 |#$C7; . STATT ..|
00001310: 7B 3D EA 2E 20 53 54 41 53 54 27 4C 49 4E 45 2B |{=.. STAST'LINE+|
00001320: 32 30 00 90 3D F4 2E 41 38 20 4C 44 41 53 54 27 |20..=..A8 LDAST'|
00001330: 4C 49 4E 45 2B 32 39 00 9D 3D FE 2E 20 43 4D 50 |LINE+29..=.. CMP|
00001340: 23 24 43 43 00 A8 3D 08 2F 20 42 4E 45 41 39 00 |#$CC..=./ BNEA9.|
00001350: C0 3D 12 2F 20 4C 44 41 23 24 44 41 3B 20 DA 20 |.=./ LDA#$DA; . |
00001360: 53 54 41 54 54 20 CC 00 D3 3D 1C 2F 20 53 54 41 |STATT ...=./ STA|
00001370: 53 54 27 4C 49 4E 45 2B 32 39 00 E8 3D 26 2F 41 |ST'LINE+29..=&/A|
00001380: 39 20 4C 44 41 53 54 27 4C 49 4E 45 2B 33 35 00 |9 LDAST'LINE+35.|
00001390: F5 3D 30 2F 20 43 4D 50 23 24 43 33 00 00 3E 3A |.=0/ CMP#$C3..>:|
000013A0: 2F 20 42 4E 45 41 41 00 18 3E 44 2F 20 4C 44 41 |/ BNEAA..>D/ LDA|
000013B0: 23 24 44 33 3B 20 D3 20 53 54 41 54 54 20 C3 00 |#$D3; . STATT ..|
000013C0: 2B 3E 4E 2F 20 53 54 41 53 54 27 4C 49 4E 45 2B |+>N/ STAST'LINE+|
000013D0: 33 35 00 3F 3E 58 2F 41 41 20 4A 4D 50 28 56 45 |35.?>X/AA JMP(VE|
000013E0: 43 54 4F 52 31 29 00 45 3E 62 2F 3B 00 94 3E 6C |CTOR1).E>b/;..>l|
000013F0: 2F 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |/;--------------|
00001400: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001410: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001420: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001430: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 9A 3E 76 2F |-----------..>v/|
00001440: 3B 00 BF 3E 80 2F 3B 20 2A 2A 20 4D 4F 44 49 46 |;..>./; ** MODIF|
00001450: 49 5A 49 45 52 54 45 20 20 C9 4E 54 45 52 52 55 |IZIERTE .NTERRU|
00001460: 50 54 2D 20 2A 2A 00 E4 3E 8A 2F 3B 20 2A 2A 20 |PT- **..>./; ** |
00001470: 20 20 20 20 52 4F 55 54 49 4E 45 20 28 D4 45 49 | ROUTINE (.EI|
00001480: 4C 20 32 29 20 20 20 20 20 2A 2A 00 EA 3E 94 2F |L 2) **..>./|
00001490: 3B 00 FC 3E 9E 2F 49 52 51 32 20 4A 53 52 24 43 |;..>./IRQ2 JSR$C|
000014A0: 46 42 46 00 0A 3F A8 2F 20 4A 53 52 24 43 45 43 |FBF..?./ JSR$CEC|
000014B0: 44 00 17 3F B2 2F 20 4C 44 41 42 41 4E 4B 00 20 |D..?./ LDABANK. |
000014C0: 3F BC 2F 20 50 48 41 00 2D 3F C6 2F 20 4C 44 41 |?./ PHA.-?./ LDA|
000014D0: 23 24 30 30 00 3A 3F D0 2F 20 53 54 41 42 41 4E |#$00.:?./ STABAN|
000014E0: 4B 00 43 3F DA 2F 20 50 48 50 00 4C 3F E4 2F 20 |K.C?./ PHP.L?./ |
000014F0: 43 4C 49 00 5A 3F EE 2F 20 4A 53 52 24 44 42 31 |CLI.Z?./ JSR$DB1|
00001500: 31 00 66 3F F8 2F 20 4C 44 58 24 45 46 00 71 3F |1.f?./ LDX$EF.q?|
00001510: 02 30 20 42 45 51 42 30 00 97 3F 0C 30 20 4C 44 |.0 BEQB0..?.0 LD|
00001520: 58 23 54 41 42 27 31 3B 20 4E 45 55 45 20 D4 41 |X#TAB'1; NEUE .A|
00001530: 53 54 41 54 55 52 42 45 4C 45 47 55 4E 47 00 AC |STATURBELEGUNG..|
00001540: 3F 16 30 42 32 20 43 4D 50 54 41 42 45 4C 4C 45 |?.0B2 CMPTABELLE|
00001550: 31 2C 58 00 B7 3F 20 30 20 42 45 51 42 31 00 C0 |1,X..? 0 BEQB1..|
00001560: 3F 2A 30 20 44 45 58 00 CB 3F 34 30 20 42 50 4C |?*0 DEX..?40 BPL|
00001570: 42 32 00 D6 3F 3E 30 20 42 4D 49 42 30 00 EB 3F |B2..?>0 BMIB0..?|
00001580: 48 30 42 31 20 4C 44 41 54 41 42 45 4C 4C 45 32 |H0B1 LDATABELLE2|
00001590: 2C 58 00 F7 3F 52 30 20 4C 44 58 24 45 46 00 06 |,X..?R0 LDX$EF..|
000015A0: 40 5C 30 20 53 54 41 24 35 32 36 2C 58 00 16 40 |@\0 STA$526,X..@|
000015B0: 66 30 42 30 20 4A 4D 50 24 43 45 35 34 00 1C 40 |f0B0 JMP$CE54..@|
000015C0: 70 30 3B 00 6B 40 7A 30 3B 2D 2D 2D 2D 2D 2D 2D |p0;.k@z0;-------|
000015D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000015E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000015F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001600: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001610: 2D 2D 00 71 40 84 30 3B 00 96 40 8E 30 3B 20 2A |--.q@.0;..@.0; *|
00001620: 2A 20 4D 4F 44 49 46 49 5A 49 45 52 54 45 20 D2 |* MODIFIZIERTE .|
00001630: 4F 55 54 49 4E 45 20 5A 55 52 20 2A 2A 00 BB 40 |OUTINE ZUR **..@|
00001640: 98 30 3B 20 2A 2A 20 20 20 20 20 20 DA 45 49 43 |.0; ** .EIC|
00001650: 48 45 4E 41 55 53 47 41 42 45 20 20 20 20 20 20 |HENAUSGABE |
00001660: 2A 2A 00 C1 40 A2 30 3B 00 CF 40 AC 30 42 53 4F |**..@.0;..@.0BSO|
00001670: 55 54 20 50 48 41 00 D5 40 B6 30 3B 00 FE 40 C0 |UT PHA..@.0;..@.|
00001680: 30 20 4C 44 41 24 31 39 3B 20 4B 45 49 4E 45 20 |0 LDA$19; KEINE |
00001690: DA 45 49 43 48 45 4E 57 41 4E 44 4C 55 4E 47 20 |.EICHENWANDLUNG |
000016A0: 46 41 4C 4C 53 00 2D 41 CA 30 20 41 4E 44 23 24 |FALLS.-A.0 AND#$|
000016B0: 37 46 3B 20 D3 41 56 45 4D 4F 44 55 53 20 4F 44 |7F; .AVEMODUS OD|
000016C0: 45 52 20 C2 49 4C 44 53 43 48 49 52 4D 41 55 53 |ER .ILDSCHIRMAUS|
000016D0: 47 41 42 45 00 3A 41 D4 30 20 43 4D 50 23 24 34 |GABE.:A.0 CMP#$4|
000016E0: 30 00 45 41 DE 30 20 42 45 51 43 30 00 52 41 E8 |0.EA.0 BEQC0.RA.|
000016F0: 30 20 43 4D 50 23 24 34 36 00 5D 41 F2 30 20 42 |0 CMP#$46.]A.0 B|
00001700: 45 51 43 30 00 6A 41 FC 30 20 43 4D 50 23 24 35 |EQC0.jA.0 CMP#$5|
00001710: 31 00 75 41 06 31 20 42 4E 45 43 31 00 85 41 10 |1.uA.1 BNEC1..A.|
00001720: 31 43 30 20 4A 4D 50 24 45 43 34 43 00 8B 41 1A |1C0 JMP$EC4C..A.|
00001730: 31 3B 00 BA 41 24 31 43 31 20 4C 44 41 24 44 30 |1;..A$1C1 LDA$D0|
00001740: 3B 20 C4 52 55 43 4B 45 52 53 54 45 55 45 52 5A |; .RUCKERSTEUERZ|
00001750: 45 49 43 48 45 4E 20 41 55 53 46 49 4C 54 45 52 |EICHEN AUSFILTER|
00001760: 4E 00 C7 41 2E 31 20 43 4D 50 23 24 31 42 00 D2 |N..A.1 CMP#$1B..|
00001770: 41 38 31 20 42 45 51 43 32 00 DB 41 42 31 20 50 |A81 BEQC2..AB1 P|
00001780: 4C 41 00 E7 41 4C 31 20 53 54 41 24 44 30 00 F4 |LA..AL1 STA$D0..|
00001790: 41 56 31 20 43 4D 50 23 24 31 42 00 FF 41 60 31 |AV1 CMP#$1B..A`1|
000017A0: 20 42 4E 45 43 33 00 08 42 6A 31 20 43 4C 43 00 | BNEC3..Bj1 CLC.|
000017B0: 11 42 74 31 20 52 54 53 00 17 42 7E 31 3B 00 22 |.Bt1 RTS..B~1;."|
000017C0: 42 88 31 43 33 20 50 48 41 00 2E 42 92 31 20 4C |B.1C3 PHA..B.1 L|
000017D0: 44 41 24 30 42 00 39 42 9C 31 20 42 4E 45 43 34 |DA$0B.9B.1 BNEC4|
000017E0: 00 62 42 A6 31 20 50 4C 41 3B 20 C3 4F 4D 4D 4F |.bB.1 PLA; .OMMO|
000017F0: 44 4F 52 45 2D C1 D3 C3 C9 C9 20 28 C4 52 55 43 |DORE-..... (.RUC|
00001800: 4B 45 52 54 59 50 20 30 29 00 6F 42 B0 31 20 43 |KERTYP 0).oB.1 C|
00001810: 4D 50 23 24 35 42 00 7A 42 BA 31 20 42 43 43 43 |MP#$5B.zB.1 BCCC|
00001820: 35 00 87 42 C4 31 20 43 4D 50 23 24 43 30 00 92 |5..B.1 CMP#$C0..|
00001830: 42 CE 31 20 42 43 43 43 36 00 9F 42 D8 31 20 43 |B.1 BCCC6..B.1 C|
00001840: 4D 50 23 24 44 42 00 AA 42 E2 31 20 42 43 43 43 |MP#$DB..B.1 BCCC|
00001850: 37 00 B7 42 EC 31 20 41 4E 44 23 24 37 46 00 C2 |7..B.1 AND#$7F..|
00001860: 42 F6 31 20 42 4E 45 43 35 00 CD 42 00 32 43 37 |B.1 BNEC5..B.2C7|
00001870: 20 53 45 43 00 DA 42 0A 32 20 53 42 43 23 24 36 | SEC..B.2 SBC#$6|
00001880: 30 00 E5 42 14 32 20 42 4E 45 43 35 00 F4 42 1E |0..B.2 BNEC5..B.|
00001890: 32 43 36 20 43 4D 50 23 24 35 45 00 FF 42 28 32 |2C6 CMP#$5E..B(2|
000018A0: 20 42 43 53 43 38 00 08 43 32 32 20 43 4C 43 00 | BCSC8..C22 CLC.|
000018B0: 15 43 3C 32 20 41 44 43 23 24 32 30 00 20 43 46 |.C<2 ADC#$20. CF|
000018C0: 32 20 42 4E 45 43 35 00 26 43 50 32 3B 00 52 43 |2 BNEC5.&CP2;.RC|
000018D0: 5A 32 43 34 20 50 4C 41 3B 20 D3 54 41 4E 44 41 |Z2C4 PLA; .TANDA|
000018E0: 52 44 2D C1 D3 C3 C9 C9 20 28 C4 52 55 43 4B 45 |RD-..... (.RUCKE|
000018F0: 52 54 59 50 20 31 2D 34 29 00 5F 43 64 32 20 43 |RTYP 1-4)._Cd2 C|
00001900: 4D 50 23 24 34 31 00 6A 43 6E 32 20 42 43 43 43 |MP#$41.jCn2 BCCC|
00001910: 35 00 77 43 78 32 20 43 4D 50 23 24 35 45 00 82 |5.wCx2 CMP#$5E..|
00001920: 43 82 32 20 42 43 53 43 39 00 8F 43 8C 32 20 41 |C.2 BCSC9..C.2 A|
00001930: 44 43 23 24 32 30 00 9A 43 96 32 20 42 4E 45 43 |DC#$20..C.2 BNEC|
00001940: 35 00 A9 43 A0 32 43 39 20 43 4D 50 23 24 43 30 |5..C.2C9 CMP#$C0|
00001950: 00 B4 43 AA 32 20 42 43 43 43 38 00 C1 43 B4 32 |..C.2 BCCC8..C.2|
00001960: 20 43 4D 50 23 24 45 30 00 CC 43 BE 32 20 42 43 | CMP#$E0..C.2 BC|
00001970: 53 43 35 00 D9 43 C8 32 20 41 4E 44 23 24 37 46 |SC5..C.2 AND#$7F|
00001980: 00 E8 43 D2 32 43 38 20 43 4D 50 23 24 42 41 00 |..C.2C8 CMP#$BA.|
00001990: F3 43 DC 32 20 42 4E 45 43 41 00 00 44 E6 32 20 |.C.2 BNECA..D.2 |
000019A0: 4C 44 41 23 24 35 43 00 0B 44 F0 32 20 42 4E 45 |LDA#$5C..D.2 BNE|
000019B0: 43 35 00 1A 44 FA 32 43 41 20 43 4D 50 23 24 42 |C5..D.2CA CMP#$B|
000019C0: 46 00 25 44 04 33 20 42 4E 45 43 35 00 32 44 0E |F.%D.3 BNEC5.2D.|
000019D0: 33 20 4C 44 41 23 24 37 45 00 3D 44 18 33 20 42 |3 LDA#$7E.=D.3 B|
000019E0: 4E 45 43 35 00 43 44 22 33 3B 00 4E 44 2C 33 43 |NEC5.CD"3;.ND,3C|
000019F0: 32 20 50 4C 41 00 5B 44 36 33 20 41 4E 44 23 24 |2 PLA.[D63 AND#$|
00001A00: 37 46 00 67 44 40 33 20 53 54 41 24 44 30 00 95 |7F.gD@3 STA$D0..|
00001A10: 44 4A 33 20 43 4D 50 23 24 35 39 3B 20 D0 52 4F |DJ3 CMP#$59; .RO|
00001A20: 42 4C 45 4D 46 41 4C 4C 3A 20 D0 46 55 4E 44 5A |BLEMFALL: .FUNDZ|
00001A30: 45 49 43 48 45 4E 20 49 4E 20 4F 45 00 A0 44 54 |EICHEN IN OE..DT|
00001A40: 33 20 42 4E 45 43 42 00 AD 44 5E 33 20 4C 44 41 |3 BNECB..D^3 LDA|
00001A50: 23 24 37 43 00 B8 44 68 33 20 42 4E 45 43 35 00 |#$7C..Dh3 BNEC5.|
00001A60: BE 44 72 33 3B 00 E8 44 7C 33 43 42 20 50 48 41 |.Dr3;..D|3CB PHA|
00001A70: 3B 20 D3 54 45 55 45 52 5A 45 49 43 48 45 4E 45 |; .TEUERZEICHENE|
00001A80: 52 47 41 45 4E 5A 55 4E 47 20 28 53 2E 4F 29 00 |RGAENZUNG (S.O).|
00001A90: F7 44 86 33 20 4C 44 58 23 54 41 42 27 32 00 0C |.D.3 LDX#TAB'2..|
00001AA0: 45 90 33 43 44 20 43 4D 50 54 41 42 45 4C 4C 45 |E.3CD CMPTABELLE|
00001AB0: 33 2C 58 00 17 45 9A 33 20 42 45 51 43 43 00 20 |3,X..E.3 BEQCC. |
00001AC0: 45 A4 33 20 44 45 58 00 2B 45 AE 33 20 42 50 4C |E.3 DEX.+E.3 BPL|
00001AD0: 43 44 00 36 45 B8 33 20 42 4D 49 43 45 00 45 45 |CD.6E.3 BMICE.EE|
00001AE0: C2 33 43 43 20 4C 44 41 23 24 31 42 00 50 45 CC |.3CC LDA#$1B.PE.|
00001AF0: 33 20 4A 53 52 43 35 00 63 45 D6 33 20 4C 44 41 |3 JSRC5.cE.3 LDA|
00001B00: 54 41 42 45 4C 4C 45 34 2C 58 00 6E 45 E0 33 20 |TABELLE4,X.nE.3 |
00001B10: 4A 53 52 43 35 00 7D 45 EA 33 43 45 20 4C 44 41 |JSRC5.}E.3CE LDA|
00001B20: 23 24 31 42 00 88 45 F4 33 20 4A 53 52 43 35 00 |#$1B..E.3 JSRC5.|
00001B30: 91 45 FE 33 20 50 4C 41 00 97 45 08 34 3B 00 A2 |.E.3 PLA..E.4;..|
00001B40: 45 12 34 43 35 20 50 48 41 00 AE 45 1C 34 20 4C |E.4C5 PHA..E.4 L|
00001B50: 44 41 24 39 39 00 D4 45 26 34 20 43 4D 50 23 43 |DA$99..E&4 CMP#C|
00001B60: 45 4E 54 52 4F 4E 3B 20 C3 45 4E 54 52 4F 4E 49 |ENTRON; .ENTRONI|
00001B70: 43 53 20 28 D0 CC D5 D3 2F 34 29 00 DF 45 30 34 |CS (..../4)..E04|
00001B80: 20 42 4E 45 43 46 00 E8 45 3A 34 20 50 4C 41 00 | BNECF..E:4 PLA.|
00001B90: F9 45 44 34 20 4A 4D 50 4F 50 54 49 4F 4E 27 43 |.ED4 JMPOPTION'C|
00001BA0: 00 0C 46 4E 34 43 46 20 20 20 20 20 20 20 20 20 |..FN4CF |
00001BB0: 50 4C 41 00 1A 46 58 34 20 4A 4D 50 24 45 43 44 |PLA..FX4 JMP$ECD|
00001BC0: 46 00 20 46 62 34 3B 00 6F 46 6C 34 3B 2D 2D 2D |F. Fb4;.oFl4;---|
00001BD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001BE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001BF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001C00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001C10: 2D 2D 2D 2D 2D 2D 00 75 46 76 34 3B 00 9A 46 80 |------.uFv4;..F.|
00001C20: 34 3B 20 2A 2A 20 C4 45 55 54 53 43 48 45 20 20 |4; ** .EUTSCHE |
00001C30: C2 49 4C 44 53 43 48 49 52 4D 4D 45 4C 2D 20 2A |.ILDSCHIRMMEL- *|
00001C40: 2A 00 BF 46 8A 34 3B 20 2A 2A 20 20 20 44 55 4E |*..F.4; ** DUN|
00001C50: 47 45 4E 20 20 45 49 4E 53 43 48 4C 45 55 53 45 |GEN EINSCHLEUSE|
00001C60: 4E 20 20 20 2A 2A 00 C5 46 94 34 3B 00 F5 46 9E |N **..F.4;..F.|
00001C70: 34 4E 45 57 20 4C 44 41 24 44 41 3B 20 4E 45 55 |4NEW LDA$DA; NEU|
00001C80: 45 20 C9 4E 54 45 52 46 41 43 45 41 44 52 45 53 |E .NTERFACEADRES|
00001C90: 53 45 20 41 55 46 20 D3 54 41 43 4B 00 02 47 A8 |SE AUF .TACK..G.|
00001CA0: 34 20 43 4D 50 23 24 34 37 00 0D 47 B2 34 20 42 |4 CMP#$47..G.4 B|
00001CB0: 4E 45 59 32 00 16 47 BC 34 20 50 4C 41 00 1F 47 |NEY2..G.4 PLA..G|
00001CC0: C6 34 20 50 4C 41 00 3D 47 D0 34 20 4C 44 41 23 |.4 PLA.=G.4 LDA#|
00001CD0: 3E 28 49 4E 54 45 52 46 2D 49 4E 49 54 2B 42 41 |>(INTERF-INIT+BA|
00001CE0: 53 2D 31 29 00 46 47 DA 34 20 50 48 41 00 64 47 |S-1).FG.4 PHA.dG|
00001CF0: E4 34 20 4C 44 41 23 3C 28 49 4E 54 45 52 46 2D |.4 LDA#<(INTERF-|
00001D00: 49 4E 49 54 2B 42 41 53 2D 31 29 00 6D 47 EE 34 |INIT+BAS-1).mG.4|
00001D10: 20 50 48 41 00 7D 47 F8 34 59 32 20 4A 4D 50 24 | PHA.}G.4Y2 JMP$|
00001D20: 38 37 36 38 00 83 47 02 35 3B 00 AF 47 0C 35 49 |8768..G.5;..G.5I|
00001D30: 4E 46 4F 20 53 54 58 24 44 41 3B 20 D2 55 45 43 |NFO STX$DA; .UEC|
00001D40: 4B 53 50 52 55 4E 47 41 44 52 45 53 53 45 20 50 |KSPRUNGADRESSE P|
00001D50: 52 55 45 46 45 4E 00 B8 47 16 35 20 50 4C 41 00 |RUEFEN..G.5 PLA.|
00001D60: C5 47 20 35 20 43 4D 50 23 24 36 37 00 D0 47 2A |.G 5 CMP#$67..G*|
00001D70: 35 20 42 4E 45 59 30 00 D9 47 34 35 20 54 41 58 |5 BNEY0..G45 TAX|
00001D80: 00 E2 47 3E 35 20 50 4C 41 00 EF 47 48 35 20 43 |..G>5 PLA..GH5 C|
00001D90: 4D 50 23 24 38 37 00 FA 47 52 35 20 42 4E 45 59 |MP#$87..GR5 BNEY|
00001DA0: 31 00 0C 48 5C 35 20 4C 44 41 23 3E 28 4E 45 57 |1..H\5 LDA#>(NEW|
00001DB0: 2D 31 29 00 1E 48 66 35 20 4C 44 58 23 3C 28 4E |-1)..Hf5 LDX#<(N|
00001DC0: 45 57 2D 31 29 00 29 48 70 35 59 31 20 50 48 41 |EW-1).)Hp5Y1 PHA|
00001DD0: 00 32 48 7A 35 20 54 58 41 00 3D 48 84 35 59 30 |.2Hz5 TXA.=H.5Y0|
00001DE0: 20 50 48 41 00 49 48 8E 35 20 4C 44 58 24 44 41 | PHA.IH.5 LDX$DA|
00001DF0: 00 4F 48 98 35 3B 00 7E 48 A2 35 20 4C 44 41 23 |.OH.5;.~H.5 LDA#|
00001E00: 24 44 34 3B 20 DA 55 47 52 49 46 46 20 41 55 46 |$D4; .UGRIFF AUF|
00001E10: 20 D2 C1 CD 2D D4 41 42 45 4C 4C 45 20 41 42 20 | ...-.ABELLE AB |
00001E20: 24 44 34 30 30 00 8A 48 AC 35 20 53 54 41 24 33 |$D400..H.5 STA$3|
00001E30: 32 00 97 48 B6 35 20 4C 44 41 23 24 30 30 00 A3 |2..H.5 LDA#$00..|
00001E40: 48 C0 35 20 53 54 41 24 33 31 00 AC 48 CA 35 20 |H.5 STA$31..H.5 |
00001E50: 53 45 49 00 B8 48 D4 35 20 53 54 41 52 41 4D 00 |SEI..H.5 STARAM.|
00001E60: C1 48 DE 35 20 54 41 59 00 CA 48 E8 35 20 54 58 |.H.5 TAY..H.5 TX|
00001E70: 41 00 D5 48 F2 35 20 42 45 51 44 30 00 E5 48 FC |A..H.5 BEQD0..H.|
00001E80: 35 44 31 20 4A 53 52 49 4E 43 33 31 00 F5 48 06 |5D1 JSRINC31..H.|
00001E90: 36 20 4C 44 41 28 24 33 31 29 2C 59 00 00 49 10 |6 LDA($31),Y..I.|
00001EA0: 36 20 42 4E 45 44 31 00 09 49 1A 36 20 44 45 58 |6 BNED1..I.6 DEX|
00001EB0: 00 14 49 24 36 20 42 4E 45 44 31 00 21 49 2E 36 |..I$6 BNED1.!I.6|
00001EC0: 20 4C 44 59 23 24 30 31 00 31 49 38 36 20 4C 44 | LDY#$01.1I86 LD|
00001ED0: 41 28 24 33 31 29 2C 59 00 3E 49 42 36 20 43 4D |A($31),Y.>IB6 CM|
00001EE0: 50 23 24 30 41 00 49 49 4C 36 20 42 45 51 44 32 |P#$0A.IIL6 BEQD2|
00001EF0: 00 58 49 56 36 44 30 20 4C 44 41 23 24 31 33 00 |.XIV6D0 LDA#$13.|
00001F00: 67 49 60 36 20 4A 53 52 42 53 4F 55 54 33 00 74 |gI`6 JSRBSOUT3.t|
00001F10: 49 6A 36 20 4C 44 59 23 24 46 46 00 80 49 74 36 |Ij6 LDY#$FF..It6|
00001F20: 20 53 54 59 24 35 39 00 8D 49 7E 36 20 4C 44 41 | STY$59..I~6 LDA|
00001F30: 23 24 31 32 00 9C 49 88 36 44 45 20 43 4D 50 23 |#$12..I.6DE CMP#|
00001F40: 24 30 39 00 A7 49 92 36 20 42 45 51 44 33 00 B2 |$09..I.6 BEQD3..|
00001F50: 49 9C 36 20 42 43 53 44 34 00 BF 49 A6 36 20 43 |I.6 BCSD4..I.6 C|
00001F60: 4D 50 23 24 30 31 00 CA 49 B0 36 20 42 4E 45 44 |MP#$01..I.6 BNED|
00001F70: 35 00 D9 49 BA 36 20 4A 53 52 53 4F 55 4E 44 31 |5..I.6 JSRSOUND1|
00001F80: 00 E4 49 C4 36 20 4A 4D 50 44 36 00 EA 49 CE 36 |..I.6 JMPD6..I.6|
00001F90: 3B 00 F9 49 D8 36 44 33 20 4C 44 41 23 24 30 44 |;..I.6D3 LDA#$0D|
00001FA0: 00 08 4A E2 36 20 4A 53 52 42 53 4F 55 54 33 00 |..J.6 JSRBSOUT3.|
00001FB0: 13 4A EC 36 20 4A 4D 50 44 37 00 19 4A F6 36 3B |.J.6 JMPD7..J.6;|
00001FC0: 00 24 4A 00 37 44 35 20 54 41 58 00 32 4A 0A 37 |.$J.7D5 TAX.2J.7|
00001FD0: 20 4C 44 41 24 37 30 2C 58 00 41 4A 14 37 44 34 | LDA$70,X.AJ.7D4|
00001FE0: 20 43 4D 50 23 24 41 30 00 4C 4A 1E 37 20 42 43 | CMP#$A0.LJ.7 BC|
00001FF0: 43 44 37 00 59 4A 28 37 20 43 4D 50 23 24 42 46 |CD7.YJ(7 CMP#$BF|
00002000: 00 64 4A 32 37 20 42 43 43 44 38 00 71 4A 3C 37 |.dJ27 BCCD8.qJ<7|
00002010: 20 43 4D 50 23 24 45 30 00 7C 4A 46 37 20 42 43 | CMP#$E0.|JF7 BC|
00002020: 43 44 37 00 85 4A 50 37 20 53 45 43 00 92 4A 5A |CD7..JP7 SEC..JZ|
00002030: 37 20 53 42 43 23 24 43 30 00 9D 4A 64 37 2E 42 |7 SBC#$C0..Jd7.B|
00002040: 59 24 32 43 00 A3 4A 6E 37 3B 00 B2 4A 78 37 44 |Y$2C..Jn7;..Jx7D|
00002050: 38 20 41 4E 44 23 24 31 46 00 BB 4A 82 37 20 54 |8 AND#$1F..J.7 T|
00002060: 41 58 00 E7 4A 8C 37 20 4C 44 41 56 45 43 54 4F |AX..J.7 LDAVECTO|
00002070: 52 32 3B 20 CC 4F 57 2D C2 59 54 45 20 44 45 52 |R2; .OW-.YTE DER|
00002080: 20 D4 4F 4B 45 4E 2D D4 41 42 45 4C 4C 45 00 F3 | .OKEN-.ABELLE..|
00002090: 4A 96 37 20 53 54 41 24 33 35 00 22 4B A0 37 20 |J.7 STA$35."K.7 |
000020A0: 4C 44 41 56 45 43 54 4F 52 32 2B 31 3B 20 C8 49 |LDAVECTOR2+1; .I|
000020B0: 47 48 2D C2 59 54 45 20 44 45 52 20 D4 4F 4B 45 |GH-.YTE DER .OKE|
000020C0: 4E 2D D4 41 42 45 4C 4C 45 00 2E 4B AA 37 20 53 |N-.ABELLE..K.7 S|
000020D0: 54 41 24 33 36 00 3B 4B B4 37 20 4C 44 59 23 24 |TA$36.;K.7 LDY#$|
000020E0: 30 30 00 49 4B BE 37 44 41 20 49 4E 43 24 33 35 |00.IK.7DA INC$35|
000020F0: 00 54 4B C8 37 20 42 4E 45 44 39 00 60 4B D2 37 |.TK.7 BNED9.`K.7|
00002100: 20 49 4E 43 24 33 36 00 72 4B DC 37 44 39 20 4C | INC$36.rK.7D9 L|
00002110: 44 41 28 24 33 35 29 2C 59 00 7D 4B E6 37 20 42 |DA($35),Y.}K.7 B|
00002120: 4E 45 44 41 00 86 4B F0 37 20 44 45 58 00 91 4B |NEDA..K.7 DEX..K|
00002130: FA 37 20 42 50 4C 44 41 00 9C 4B 04 38 44 43 20 |.7 BPLDA..K.8DC |
00002140: 49 4E 59 00 AC 4B 0E 38 20 4C 44 41 28 24 33 35 |INY..K.8 LDA($35|
00002150: 29 2C 59 00 B7 4B 18 38 20 42 45 51 44 42 00 C6 |),Y..K.8 BEQDB..|
00002160: 4B 22 38 20 4A 53 52 42 53 4F 55 54 33 00 D2 4B |K"8 JSRBSOUT3..K|
00002170: 2C 38 20 49 4E 43 24 35 39 00 DD 4B 36 38 20 4A |,8 INC$59..K68 J|
00002180: 4D 50 44 43 00 E3 4B 40 38 3B 00 F2 4B 4A 38 44 |MPDC..K@8;..KJ8D|
00002190: 42 20 4C 44 41 23 22 20 22 00 F8 4B 54 38 3B 00 |B LDA#" "..KT8;.|
000021A0: 09 4C 5E 38 44 37 20 4A 53 52 42 53 4F 55 54 33 |.L^8D7 JSRBSOUT3|
000021B0: 00 16 4C 68 38 20 43 4D 50 23 24 32 32 00 21 4C |..Lh8 CMP#$22.!L|
000021C0: 72 38 20 42 45 51 44 44 00 31 4C 7C 38 44 32 20 |r8 BEQDD.1L|8D2 |
000021D0: 4A 53 52 49 4E 43 33 31 00 3D 4C 86 38 20 49 4E |JSRINC31.=L.8 IN|
000021E0: 43 24 35 39 00 4A 4C 90 38 20 4C 44 59 23 24 30 |C$59.JL.8 LDY#$0|
000021F0: 30 00 5A 4C 9A 38 20 4C 44 41 28 24 33 31 29 2C |0.ZL.8 LDA($31),|
00002200: 59 00 65 4C A4 38 20 42 4E 45 44 45 00 70 4C AE |Y.eL.8 BNEDE.pL.|
00002210: 38 44 36 20 43 4C 43 00 7C 4C B8 38 20 4C 44 41 |8D6 CLC.|L.8 LDA|
00002220: 24 35 39 00 89 4C C2 38 20 41 44 43 23 24 30 30 |$59..L.8 ADC#$00|
00002230: 00 95 4C CC 38 20 53 54 41 24 33 35 00 A2 4C D6 |..L.8 STA$35..L.|
00002240: 38 20 4C 44 41 23 24 30 43 00 AE 4C E0 38 20 53 |8 LDA#$0C..L.8 S|
00002250: 54 41 24 33 36 00 BC 4C EA 38 44 46 20 4C 44 41 |TA$36..L.8DF LDA|
00002260: 24 35 39 00 C9 4C F4 38 20 43 4D 50 23 24 31 44 |$59..L.8 CMP#$1D|
00002270: 00 D4 4C FE 38 20 42 45 51 44 44 00 E1 4C 08 39 |..L.8 BEQDD..L.9|
00002280: 20 4C 44 41 23 22 20 22 00 F0 4C 12 39 20 4A 53 | LDA#" "..L.9 JS|
00002290: 52 42 53 4F 55 54 33 00 FC 4C 1C 39 20 49 4E 43 |RBSOUT3..L.9 INC|
000022A0: 24 35 39 00 08 4D 26 39 20 4C 44 41 24 35 39 00 |$59..M&9 LDA$59.|
000022B0: 15 4D 30 39 20 43 4D 50 23 24 32 38 00 20 4D 3A |.M09 CMP#$28. M:|
000022C0: 39 20 42 43 43 44 46 00 2E 4D 44 39 44 44 20 53 |9 BCCDF..MD9DD S|
000022D0: 54 41 52 4F 4D 00 37 4D 4E 39 20 43 4C 49 00 40 |TAROM.7MN9 CLI.@|
000022E0: 4D 58 39 20 52 54 53 00 46 4D 62 39 3B 00 57 4D |MX9 RTS.FMb9;.WM|
000022F0: 6C 39 49 4E 43 33 31 20 49 4E 43 24 33 31 00 62 |l9INC31 INC$31.b|
00002300: 4D 76 39 20 42 4E 45 52 54 00 6E 4D 80 39 20 49 |Mv9 BNERT.nM.9 I|
00002310: 4E 43 24 33 32 00 79 4D 8A 39 52 54 20 52 54 53 |NC$32.yM.9RT RTS|
00002320: 00 7F 4D 94 39 3B 00 91 4D 9E 39 53 4F 55 4E 44 |..M.9;..M.9SOUND|
00002330: 31 20 53 54 41 52 4F 4D 00 9F 4D A8 39 20 4A 53 |1 STAROM..M.9 JS|
00002340: 52 53 4F 55 4E 44 00 AD 4D B2 39 20 4A 53 52 53 |RSOUND..M.9 JSRS|
00002350: 4F 55 4E 44 00 B9 4D BC 39 20 53 54 41 52 41 4D |OUND..M.9 STARAM|
00002360: 00 C2 4D C6 39 20 52 54 53 00 C8 4D D0 39 3B 00 |..M.9 RTS..M.9;.|
00002370: DA 4D DA 39 42 53 4F 55 54 33 20 53 54 41 52 4F |.M.9BSOUT3 STARO|
00002380: 4D 00 E3 4D E4 39 20 43 4C 49 00 F2 4D EE 39 20 |M..M.9 CLI..M.9 |
00002390: 4A 53 52 42 53 4F 55 54 32 00 FB 4D F8 39 20 53 |JSRBSOUT2..M.9 S|
000023A0: 45 49 00 07 4E 02 3A 20 53 54 41 52 41 4D 00 10 |EI..N.: STARAM..|
000023B0: 4E 0C 3A 20 52 54 53 00 16 4E 16 3A 3B 00 65 4E |N.: RTS..N.:;.eN|
000023C0: 20 3A 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | :;-------------|
000023D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000023E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000023F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002400: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 6B 4E 2A |------------.kN*|
00002410: 3A 3B 00 90 4E 34 3A 3B 20 2A 2A 20 20 20 4D 4F |:;..N4:; ** MO|
00002420: 44 49 46 49 5A 49 45 52 54 45 20 CB 45 52 4E 41 |DIFIZIERTE .ERNA|
00002430: 4C 2D 20 20 20 2A 2A 00 B5 4E 3E 3A 3B 20 2A 2A |L- **..N>:; **|
00002440: 20 20 20 20 20 20 C3 C8 CB CF D5 D4 2D D2 4F 55 | ......-.OU|
00002450: 54 49 4E 45 20 20 20 20 20 20 2A 2A 00 BB 4E 48 |TINE **..NH|
00002460: 3A 3B 00 CF 4E 52 3A 43 48 4B 4F 55 54 20 4A 53 |:;..NR:CHKOUT JS|
00002470: 52 46 49 4C 45 31 00 DA 4E 5C 3A 20 42 45 51 48 |RFILE1..N\: BEQH|
00002480: 30 00 E9 4E 66 3A 20 4A 4D 50 45 52 52 4F 52 33 |0..Nf: JMPERROR3|
00002490: 00 F9 4E 70 3A 48 30 20 4A 53 52 46 49 4C 45 32 |..Np:H0 JSRFILE2|
000024A0: 00 0A 4F 7A 3A 20 43 4D 50 23 43 45 4E 54 52 4F |..Oz: CMP#CENTRO|
000024B0: 4E 00 15 4F 84 3A 20 42 45 51 48 31 00 23 4F 8E |N..O.: BEQH1.#O.|
000024C0: 3A 20 4A 4D 50 24 45 44 37 30 00 38 4F 98 3A 48 |: JMP$ED70.8O.:H|
000024D0: 31 20 4C 44 58 23 25 30 30 30 30 30 30 30 30 00 |1 LDX#%00000000.|
000024E0: 47 4F A2 3A 20 53 54 58 44 27 50 4F 52 54 00 56 |GO.: STXD'PORT.V|
000024F0: 4F AC 3A 20 4A 4D 50 46 49 4C 45 4F 4B 00 5C 4F |O.: JMPFILEOK.\O|
00002500: B6 3A 3B 00 AB 4F C0 3A 3B 2D 2D 2D 2D 2D 2D 2D |.:;..O.:;-------|
00002510: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002520: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002530: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002540: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002550: 2D 2D 00 B1 4F CA 3A 3B 00 D6 4F D4 3A 3B 20 2A |--..O.:;..O.:; *|
00002560: 2A 20 20 20 20 CF 50 54 49 4F 4E 20 20 C3 45 4E |* .PTION .EN|
00002570: 54 52 4F 4E 49 43 53 20 20 20 20 2A 2A 00 FB 4F |TRONICS **..O|
00002580: DE 3A 3B 20 2A 2A 20 20 20 20 20 20 20 28 4E 55 |.:; ** (NU|
00002590: 52 20 D0 CC D5 D3 2F 34 29 20 20 20 20 20 20 20 |R ..../4) |
000025A0: 2A 2A 00 01 50 E8 3A 3B 00 32 50 F2 3A 4F 50 54 |**..P.:;.2P.:OPT|
000025B0: 49 4F 4E 27 43 20 53 54 41 44 27 50 4F 52 54 3B |ION'C STAD'PORT;|
000025C0: 20 DA 45 49 43 48 45 4E 20 49 4E 20 C4 41 54 45 | .EICHEN IN .ATE|
000025D0: 4E 52 45 47 49 53 54 45 52 00 59 50 FC 3A 20 4C |NREGISTER.YP.: L|
000025E0: 44 41 23 25 30 30 30 30 30 30 30 30 3B 20 CD 45 |DA#%00000000; .E|
000025F0: 4C 44 55 4E 47 20 41 4E 20 C4 52 55 43 4B 45 52 |LDUNG AN .RUCKER|
00002600: 00 68 50 06 3B 20 53 54 41 53 54 52 4F 42 45 00 |.hP.; STASTROBE.|
00002610: 7B 50 10 3B 20 4C 44 41 23 25 30 30 30 30 31 30 |{P.; LDA#%000010|
00002620: 30 30 00 8A 50 1A 3B 20 53 54 41 53 54 52 4F 42 |00..P.; STASTROB|
00002630: 45 00 9F 50 24 3B 4F 31 20 4C 44 41 23 25 30 30 |E..P$;O1 LDA#%00|
00002640: 31 30 30 30 30 30 00 BF 50 2E 3B 20 42 49 54 42 |100000..P.; BITB|
00002650: 55 53 59 3B 20 DA 45 49 43 48 45 4E 20 47 45 44 |USY; .EICHEN GED|
00002660: 52 55 43 4B 54 3F 00 DB 50 38 3B 20 42 4E 45 4F |RUCKT?..P8; BNEO|
00002670: 32 3B 20 4A 41 2C 20 44 41 4E 4E 20 46 45 52 54 |2; JA, DANN FERT|
00002680: 49 47 00 00 51 42 3B 20 4C 44 41 53 54 4B 45 59 |IG..QB; LDASTKEY|
00002690: 3B 20 D3 D4 CF D0 2D D4 41 53 54 45 20 47 45 44 |; ....-.ASTE GED|
000026A0: 52 55 45 43 4B 54 3F 00 1E 51 4C 3B 20 42 4D 49 |RUECKT?..QL; BMI|
000026B0: 4F 31 3B 20 4E 45 49 4E 2C 20 44 41 4E 4E 20 57 |O1; NEIN, DANN W|
000026C0: 41 52 54 45 4E 00 29 51 56 3B 20 4C 44 41 23 31 |ARTEN.)QV; LDA#1|
000026D0: 00 35 51 60 3B 20 53 54 41 24 45 46 00 40 51 6A |.5Q`; STA$EF.@Qj|
000026E0: 3B 20 4C 44 41 23 33 00 4E 51 74 3B 20 53 54 41 |; LDA#3.NQt; STA|
000026F0: 24 30 35 32 37 00 59 51 7E 3B 4F 32 20 43 4C 43 |$0527.YQ~;O2 CLC|
00002700: 00 62 51 88 3B 20 52 54 53 00 68 51 92 3B 3B 00 |.bQ.; RTS.hQ.;;.|
00002710: B7 51 9C 3B 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.Q.;;-----------|
00002720: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002730: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002740: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002750: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 BD |--------------..|
00002760: 51 A6 3B 3B 00 E2 51 B0 3B 3B 20 2A 2A 20 20 20 |Q.;;..Q.;; ** |
00002770: 4D 4F 44 49 46 49 5A 49 45 52 54 45 20 CB 45 52 |MODIFIZIERTE .ER|
00002780: 4E 41 4C 2D 20 20 20 2A 2A 00 07 52 BA 3B 3B 20 |NAL- **..R.;; |
00002790: 2A 2A 20 20 20 20 20 20 20 C7 C5 D4 C9 CE 2D D2 |** .....-.|
000027A0: 4F 55 54 49 4E 45 20 20 20 20 20 20 2A 2A 00 0D |OUTINE **..|
000027B0: 52 C4 3B 3B 00 39 52 CE 3B 47 45 54 49 4E 20 4A |R.;;.9R.;GETIN J|
000027C0: 53 52 24 45 42 44 39 3B 20 C1 42 46 52 41 47 45 |SR$EBD9; .BFRAGE|
000027D0: 20 41 55 46 20 22 4A 22 20 55 4E 44 20 22 59 22 | AUF "J" UND "Y"|
000027E0: 00 42 52 D8 3B 20 50 48 50 00 4F 52 E2 3B 20 43 |.BR.; PHP.OR.; C|
000027F0: 4D 50 23 22 4A 22 00 5A 52 EC 3B 20 42 4E 45 48 |MP#"J".ZR.; BNEH|
00002800: 32 00 68 52 F6 3B 20 4C 44 41 24 30 31 46 37 00 |2.hR.; LDA$01F7.|
00002810: 75 52 00 3C 20 43 4D 50 23 24 39 32 00 80 52 0A |uR.< CMP#$92..R.|
00002820: 3C 20 42 4E 45 48 33 00 8D 52 14 3C 20 4C 44 41 |< BNEH3..R.< LDA|
00002830: 23 22 59 22 00 98 52 1E 3C 2E 42 59 24 32 43 00 |#"Y"..R.<.BY$2C.|
00002840: A7 52 28 3C 48 33 20 4C 44 41 23 22 4A 22 00 B2 |.R(<H3 LDA#"J"..|
00002850: 52 32 3C 48 32 20 50 4C 50 00 BB 52 3C 3C 20 52 |R2<H2 PLP..R<< R|
00002860: 54 53 00 C1 52 46 3C 3B 00 10 53 50 3C 3B 2D 2D |TS..RF<;..SP<;--|
00002870: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002880: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002890: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000028A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000028B0: 2D 2D 2D 2D 2D 2D 2D 00 16 53 5A 3C 3B 00 3B 53 |-------..SZ<;.;S|
000028C0: 64 3C 3B 20 2A 2A 20 20 20 C9 4E 49 54 49 41 4C |d<; ** .NITIAL|
000028D0: 49 53 49 45 52 55 4E 47 20 20 56 4F 4E 20 20 20 |ISIERUNG VON |
000028E0: 2A 2A 00 60 53 6E 3C 3B 20 2A 2A 20 20 20 D3 43 |**.`Sn<; ** .C|
000028F0: 52 49 50 54 2F 50 4C 55 53 2D D3 55 50 50 4F 52 |RIPT/PLUS-.UPPOR|
00002900: 54 20 20 20 20 2A 2A 00 66 53 78 3C 3B 00 90 53 |T **.fSx<;..S|
00002910: 82 3C 53 54 41 52 54 20 4C 44 41 23 24 30 35 3B |.<START LDA#$05;|
00002920: 20 D3 43 52 49 50 54 2F 50 4C 55 53 20 56 4F 52 | .CRIPT/PLUS VOR|
00002930: 48 41 4E 44 45 4E 3F 00 9F 53 8C 3C 20 43 4D 50 |HANDEN?..S.< CMP|
00002940: 4D 4F 44 55 4C 32 00 B5 53 96 3C 20 42 45 51 47 |MODUL2..S.< BEQG|
00002950: 30 3B 20 49 4E 20 C2 41 4E 4B 20 32 00 C4 53 A0 |0; IN .ANK 2..S.|
00002960: 3C 20 43 4D 50 4D 4F 44 55 4C 31 00 DA 53 AA 3C |< CMPMODUL1..S.<|
00002970: 20 42 45 51 47 31 3B 20 49 4E 20 C2 41 4E 4B 20 | BEQG1; IN .ANK |
00002980: 31 00 E7 53 B4 3C 20 4C 44 41 23 24 30 30 00 F2 |1..S.< LDA#$00..|
00002990: 53 BE 3C 47 30 20 41 53 4C 00 00 54 C8 3C 47 31 |S.<G0 ASL..T.<G1|
000029A0: 20 53 54 41 24 44 30 00 06 54 D2 3C 3B 00 2D 54 | STA$D0..T.<;.-T|
000029B0: DC 3C 20 4C 44 41 23 46 41 52 42 45 30 3B 20 C6 |.< LDA#FARBE0; .|
000029C0: 41 52 42 45 49 4E 53 54 45 4C 4C 55 4E 47 20 28 |ARBEINSTELLUNG (|
000029D0: 53 2E 4F 29 00 3C 54 E6 3C 20 53 54 41 43 4F 4C |S.O).<T.< STACOL|
000029E0: 4F 52 30 00 4B 54 F0 3C 20 53 54 41 43 4F 4C 4F |OR0.KT.< STACOLO|
000029F0: 52 34 00 5B 54 FA 3C 20 4C 44 41 23 46 41 52 42 |R4.[T.< LDA#FARB|
00002A00: 45 31 00 6A 54 04 3D 20 53 54 41 43 4F 4C 4F 52 |E1.jT.= STACOLOR|
00002A10: 31 00 70 54 0E 3D 3B 00 8F 54 18 3D 20 4C 44 41 |1.pT.=;..T.= LDA|
00002A20: 23 24 30 30 3B 20 C5 49 4E 53 43 48 41 4C 54 4D |#$00; .INSCHALTM|
00002A30: 45 4C 44 55 4E 47 00 98 54 22 3D 20 54 41 58 00 |ELDUNG..T"= TAX.|
00002A40: A7 54 2C 3D 20 4A 53 52 53 45 54 54 49 4D 00 AD |.T,= JSRSETTIM..|
00002A50: 54 36 3D 3B 00 BC 54 40 3D 20 4A 53 52 50 52 49 |T6=;..T@= JSRPRI|
00002A60: 4E 54 31 00 DB 54 4A 3D 2E 42 59 31 39 2C 31 39 |NT1..TJ=.BY19,19|
00002A70: 2C 31 34 37 2C 31 33 2C 31 33 2C 31 33 2C 31 33 |,147,13,13,13,13|
00002A80: 2C 30 00 EC 54 54 3D 47 32 20 4C 44 41 4C 4F 47 |,0..TT=G2 LDALOG|
00002A90: 4F 2C 58 00 FB 54 5E 3D 20 4A 53 52 42 53 4F 55 |O,X..T^= JSRBSOU|
00002AA0: 54 31 00 04 55 68 3D 20 49 4E 58 00 11 55 72 3D |T1..Uh= INX..Ur=|
00002AB0: 20 43 50 58 23 24 43 44 00 1C 55 7C 3D 20 42 43 | CPX#$CD..U|= BC|
00002AC0: 43 47 32 00 2B 55 86 3D 20 4A 53 52 50 52 49 4E |CG2.+U.= JSRPRIN|
00002AD0: 54 31 00 35 55 90 3D 2E 42 59 31 33 00 58 55 9A |T1.5U.=.BY13.XU.|
00002AE0: 3D 2E 54 58 22 20 20 20 28 C3 29 20 31 39 38 37 |=.TX" (.) 1987|
00002AF0: 20 12 D2 92 A5 12 D5 92 A5 12 CE 92 A5 20 22 00 | ............ ".|
00002B00: 73 55 A4 3D 2E 54 58 22 28 C3 D7 2D D0 D5 C2 CC |sU.=.TX"(..-....|
00002B10: C9 CB C1 D4 C9 CF CE C5 CE 29 00 92 55 AE 3D 2E |.........)..U.=.|
00002B20: 42 59 31 33 2C 31 33 2C 31 33 2C 31 33 2C 31 33 |BY13,13,13,13,13|
00002B30: 2C 31 33 2C 31 33 2C 31 33 00 AF 55 B8 3D 2E 54 |,13,13,13..U.=.T|
00002B40: 58 22 20 20 20 20 20 20 20 D3 43 52 49 50 54 2F |X" .CRIPT/|
00002B50: 50 4C 55 53 20 22 00 B8 55 C2 3D 2E 42 59 30 00 |PLUS "..U.=.BY0.|
00002B60: C4 55 CC 3D 20 4C 44 41 24 44 30 00 CF 55 D6 3D |.U.= LDA$D0..U.=|
00002B70: 20 42 4E 45 47 33 00 DE 55 E0 3D 20 4A 53 52 50 | BNEG3..U.= JSRP|
00002B80: 52 49 4E 54 31 00 F7 55 EA 3D 2E 54 58 22 4E 49 |RINT1..U.=.TX"NI|
00002B90: 43 48 54 20 56 4F 52 48 41 4E 44 45 4E 21 00 00 |CHT VORHANDEN!..|
00002BA0: 56 F4 3D 2E 42 59 30 00 0E 56 FE 3D 20 4A 4D 50 |V.=.BY0..V.= JMP|
00002BB0: 24 38 30 30 33 00 1D 56 08 3E 47 33 20 43 4D 50 |$8003..V.>G3 CMP|
00002BC0: 23 24 30 35 00 28 56 12 3E 20 42 45 51 47 34 00 |#$05.(V.> BEQG4.|
00002BD0: 35 56 1C 3E 20 4C 44 41 23 22 32 22 00 40 56 26 |5V.> LDA#"2".@V&|
00002BE0: 3E 20 53 54 41 47 35 00 51 56 30 3E 47 34 20 4A |> STAG5.QV0>G4 J|
00002BF0: 53 52 50 52 49 4E 54 31 00 65 56 3A 3E 2E 54 58 |SRPRINT1.eV:>.TX|
00002C00: 22 49 4E 20 D2 CF CD 2D C2 41 4E 4B 00 79 56 44 |"IN ...-.ANK.yVD|
00002C10: 3E 2E 42 59 33 32 2C 31 38 2C 33 32 2C 31 33 30 |>.BY32,18,32,130|
00002C20: 00 94 56 4E 3E 47 35 20 2E 42 59 22 31 22 2C 31 |..VN>G5 .BY"1",1|
00002C30: 33 32 2C 33 32 2C 31 34 36 2C 30 00 9A 56 58 3E |32,32,146,0..VX>|
00002C40: 3B 00 A7 56 62 3E 20 4C 44 59 23 24 30 30 00 B4 |;..Vb> LDY#$00..|
00002C50: 56 6C 3E 20 53 54 59 54 4D 41 58 00 BD 56 76 3E |Vl> STYTMAX..Vv>|
00002C60: 20 49 4E 59 00 CE 56 80 3E 47 36 20 43 50 59 54 | INY..V.>G6 CPYT|
00002C70: 49 4D 45 2B 31 00 D9 56 8A 3E 20 42 4E 45 47 36 |IME+1..V.> BNEG6|
00002C80: 00 E6 56 94 3E 20 4C 44 41 23 24 30 41 00 F3 56 |..V.> LDA#$0A..V|
00002C90: 9E 3E 20 53 54 41 54 4D 41 58 00 F9 56 A8 3E 3B |.> STATMAX..V.>;|
00002CA0: 00 27 57 B2 3E 20 4C 44 58 23 24 36 31 3B 20 CB |.'W.> LDX#$61; .|
00002CB0: 4F 52 52 45 4B 54 55 52 52 4F 55 54 49 4E 45 20 |ORREKTURROUTINE |
00002CC0: 28 C2 29 20 49 4E 20 C6 55 4E 4B 54 49 2D 00 55 |(.) IN .UNKTI-.U|
00002CD0: 57 BC 3E 47 37 20 4C 44 41 4B 4F 52 52 45 4B 54 |W.>G7 LDAKORREKT|
00002CE0: 2C 58 3B 20 4F 4E 53 54 41 53 54 45 4E 50 55 46 |,X; ONSTASTENPUF|
00002CF0: 46 45 52 20 4B 4F 50 49 45 52 45 4E 00 64 57 C6 |FER KOPIEREN.dW.|
00002D00: 3E 20 53 54 41 24 35 37 41 2C 58 00 6D 57 D0 3E |> STA$57A,X.mW.>|
00002D10: 20 44 45 58 00 78 57 DA 3E 20 42 50 4C 47 37 00 | DEX.xW.> BPLG7.|
00002D20: 7E 57 E4 3E 3B 00 A5 57 EE 3E 20 44 45 59 3B 20 |~W.>;..W.> DEY; |
00002D30: CF 52 49 47 49 4E 41 4C 5A 45 49 43 48 45 4E 53 |.RIGINALZEICHENS|
00002D40: 41 54 5A 20 4B 4F 50 49 45 52 45 4E 00 B2 57 F8 |ATZ KOPIEREN..W.|
00002D50: 3E 20 4C 44 41 23 24 44 34 00 BE 57 02 3F 20 53 |> LDA#$D4..W.? S|
00002D60: 54 41 24 44 32 00 CB 57 0C 3F 20 4C 44 41 23 24 |TA$D2..W.? LDA#$|
00002D70: 46 30 00 D7 57 16 3F 20 53 54 41 24 44 34 00 E3 |F0..W.? STA$D4..|
00002D80: 57 20 3F 20 53 54 59 24 44 31 00 EF 57 2A 3F 20 |W ? STY$D1..W*? |
00002D90: 53 54 59 24 44 33 00 01 58 34 3F 47 38 20 4C 44 |STY$D3..X4?G8 LD|
00002DA0: 41 28 24 44 31 29 2C 59 00 11 58 3E 3F 20 53 54 |A($D1),Y..X>? ST|
00002DB0: 41 28 24 44 33 29 2C 59 00 1A 58 48 3F 20 49 4E |A($D3),Y..XH? IN|
00002DC0: 59 00 25 58 52 3F 20 42 4E 45 47 38 00 31 58 5C |Y.%XR? BNEG8.1X\|
00002DD0: 3F 20 49 4E 43 24 44 32 00 3D 58 66 3F 20 49 4E |? INC$D2.=Xf? IN|
00002DE0: 43 24 44 34 00 49 58 70 3F 20 4C 44 41 24 44 32 |C$D4.IXp? LDA$D2|
00002DF0: 00 56 58 7A 3F 20 43 4D 50 23 24 44 38 00 61 58 |.VXz? CMP#$D8.aX|
00002E00: 84 3F 20 42 43 43 47 38 00 67 58 8E 3F 3B 00 8B |.? BCCG8.gX.?;..|
00002E10: 58 98 3F 20 4C 44 59 23 24 31 32 3B 20 4E 45 55 |X.? LDY#$12; NEU|
00002E20: 45 20 DA 45 49 43 48 45 4E 20 45 49 4E 42 41 55 |E .EICHEN EINBAU|
00002E30: 45 4E 00 98 58 A2 3F 20 4C 44 58 23 24 39 38 00 |EN..X.? LDX#$98.|
00002E40: AD 58 AC 3F 47 39 20 4C 44 41 54 41 42 45 4C 4C |.X.?G9 LDATABELL|
00002E50: 45 36 2C 59 00 B9 58 B6 3F 20 53 54 41 24 44 31 |E6,Y..X.? STA$D1|
00002E60: 00 CC 58 C0 3F 20 4C 44 41 54 41 42 45 4C 4C 45 |..X.? LDATABELLE|
00002E70: 37 2C 59 00 D8 58 CA 3F 20 53 54 41 24 44 32 00 |7,Y..X.? STA$D2.|
00002E80: E1 58 D4 3F 20 54 59 41 00 EA 58 DE 3F 20 50 48 |.X.? TYA..X.? PH|
00002E90: 41 00 F7 58 E8 3F 20 4C 44 59 23 24 30 37 00 0E |A..X.? LDY#$07..|
00002EA0: 59 F2 3F 47 41 20 4C 44 41 54 41 42 45 4C 4C 45 |Y.?GA LDATABELLE|
00002EB0: 35 2D 31 2C 58 00 1E 59 FC 3F 20 53 54 41 28 24 |5-1,X..Y.? STA($|
00002EC0: 44 31 29 2C 59 00 27 59 06 40 20 44 45 58 00 30 |D1),Y.'Y.@ DEX.0|
00002ED0: 59 10 40 20 44 45 59 00 3B 59 1A 40 20 42 50 4C |Y.@ DEY.;Y.@ BPL|
00002EE0: 47 41 00 44 59 24 40 20 50 4C 41 00 4D 59 2E 40 |GA.DY$@ PLA.MY.@|
00002EF0: 20 54 41 59 00 56 59 38 40 20 44 45 59 00 61 59 | TAY.VY8@ DEY.aY|
00002F00: 42 40 20 42 50 4C 47 39 00 67 59 4C 40 3B 00 91 |B@ BPLG9.gYL@;..|
00002F10: 59 56 40 20 49 4E 59 3B 20 DA 45 49 43 48 45 4E |YV@ INY; .EICHEN|
00002F20: 53 41 54 5A 32 20 45 52 5A 45 55 47 45 4E 20 28 |SATZ2 ERZEUGEN (|
00002F30: C1 55 53 47 41 42 45 29 00 9E 59 60 40 20 4C 44 |.USGABE)..Y`@ LD|
00002F40: 41 23 24 46 30 00 AA 59 6A 40 20 53 54 41 24 44 |A#$F0..Yj@ STA$D|
00002F50: 32 00 B7 59 74 40 20 4C 44 41 23 24 46 34 00 C3 |2..Yt@ LDA#$F4..|
00002F60: 59 7E 40 20 53 54 41 24 44 34 00 CF 59 88 40 20 |Y~@ STA$D4..Y.@ |
00002F70: 53 54 59 24 44 31 00 DB 59 92 40 20 53 54 59 24 |STY$D1..Y.@ STY$|
00002F80: 44 33 00 E8 59 9C 40 20 4C 44 58 23 24 30 37 00 |D3..Y.@ LDX#$07.|
00002F90: F1 59 A6 40 20 53 45 49 00 FD 59 B0 40 20 53 54 |.Y.@ SEI..Y.@ ST|
00002FA0: 41 52 41 4D 00 0F 5A BA 40 47 44 20 4C 44 41 28 |ARAM..Z.@GD LDA(|
00002FB0: 24 44 31 29 2C 59 00 1F 5A C4 40 20 53 54 41 28 |$D1),Y..Z.@ STA(|
00002FC0: 24 44 33 29 2C 59 00 28 5A CE 40 20 44 45 58 00 |$D3),Y.(Z.@ DEX.|
00002FD0: 33 5A D8 40 20 42 50 4C 47 45 00 3E 5A E2 40 20 |3Z.@ BPLGE.>Z.@ |
00002FE0: 43 4D 50 23 30 00 63 5A EC 40 20 42 4E 45 47 46 |CMP#0.cZ.@ BNEGF|
00002FF0: 3B 20 D5 4E 54 45 52 4C 41 45 4E 47 45 3F 20 CA |; .NTERLAENGE? .|
00003000: 41 2C 20 44 41 4E 4E 20 47 46 00 72 5A F6 40 58 |A, DANN GF.rZ.@X|
00003010: 35 20 4C 44 41 23 24 46 46 00 92 5A 00 41 20 53 |5 LDA#$FF..Z.A S|
00003020: 54 41 28 24 44 33 29 2C 59 3B 20 55 4E 54 45 52 |TA($D3),Y; UNTER|
00003030: 53 54 52 45 49 43 48 45 4E 00 A1 5A 0A 41 47 46 |STREICHEN..Z.AGF|
00003040: 20 4C 44 58 23 24 30 37 00 AC 5A 14 41 47 45 20 | LDX#$07..Z.AGE |
00003050: 49 4E 59 00 B7 5A 1E 41 20 42 4E 45 47 44 00 C3 |INY..Z.A BNEGD..|
00003060: 5A 28 41 20 49 4E 43 24 44 32 00 CF 5A 32 41 20 |Z(A INC$D2..Z2A |
00003070: 49 4E 43 24 44 34 00 DB 5A 3C 41 20 4C 44 41 24 |INC$D4..Z<A LDA$|
00003080: 44 34 00 04 5B 46 41 20 43 4D 50 23 24 46 37 3B |D4..[FA CMP#$F7;|
00003090: 20 C7 52 41 46 49 4B 5A 45 49 43 48 45 4E 20 55 | .RAFIKZEICHEN U|
000030A0: 4E 56 45 52 41 45 4E 44 45 52 54 00 0F 5B 50 41 |NVERAENDERT..[PA|
000030B0: 20 42 43 43 47 44 00 1A 5B 5A 41 20 42 4E 45 58 | BCCGD..[ZA BNEX|
000030C0: 34 00 27 5B 64 41 20 4C 44 41 23 24 32 34 00 32 |4.'[dA LDA#$24.2|
000030D0: 5B 6E 41 20 53 54 41 58 35 00 3D 5B 78 41 20 42 |[nA STAX5.=[xA B|
000030E0: 4E 45 47 44 00 4B 5B 82 41 58 34 20 53 54 41 52 |NEGD.K[.AX4 STAR|
000030F0: 4F 4D 00 54 5B 8C 41 20 43 4C 49 00 5A 5B 96 41 |OM.T[.A CLI.Z[.A|
00003100: 3B 00 83 5B A0 41 20 4C 44 58 23 24 30 37 3B 20 |;..[.A LDX#$07; |
00003110: D3 45 49 54 45 4E 45 4E 44 45 5A 45 49 43 48 45 |.EITENENDEZEICHE|
00003120: 4E 20 4B 4F 50 49 45 52 45 4E 00 95 5B AA 41 58 |N KOPIEREN..[.AX|
00003130: 33 20 4C 44 41 24 44 37 44 38 2C 58 00 A5 5B B4 |3 LDA$D7D8,X..[.|
00003140: 41 20 53 54 41 24 46 37 46 30 2C 58 00 B5 5B BE |A STA$F7F0,X..[.|
00003150: 41 20 4C 44 41 24 44 37 43 38 2C 58 00 C5 5B C8 |A LDA$D7C8,X..[.|
00003160: 41 20 53 54 41 24 46 37 43 38 2C 58 00 CE 5B D2 |A STA$F7C8,X..[.|
00003170: 41 20 44 45 58 00 D9 5B DC 41 20 42 50 4C 58 33 |A DEX..[.A BPLX3|
00003180: 00 E7 5B E6 41 20 53 54 58 24 46 37 44 37 00 F0 |..[.A STX$F7D7..|
00003190: 5B F0 41 20 49 4E 58 00 FE 5B FA 41 20 53 54 58 |[.A INX..[.A STX|
000031A0: 24 46 37 46 37 00 04 5C 04 42 3B 00 30 5C 0E 42 |$F7F7..\.B;.0\.B|
000031B0: 20 4C 44 59 23 24 30 30 3B 20 44 45 55 54 53 43 | LDY#$00; DEUTSC|
000031C0: 48 45 20 CD 45 4C 44 55 4E 47 45 4E 20 4E 41 43 |HE .ELDUNGEN NAC|
000031D0: 48 20 24 44 34 30 30 00 43 5C 18 42 20 4C 44 41 |H $D400.C\.B LDA|
000031E0: 23 3C 54 41 42 45 4C 4C 45 38 00 56 5C 22 42 20 |#<TABELLE8.V\"B |
000031F0: 4C 44 58 23 3E 54 41 42 45 4C 4C 45 38 00 62 5C |LDX#>TABELLE8.b\|
00003200: 2C 42 20 53 54 41 24 44 31 00 6E 5C 36 42 20 53 |,B STA$D1.n\6B S|
00003210: 54 58 24 44 32 00 7A 5C 40 42 20 53 54 59 24 44 |TX$D2.z\@B STY$D|
00003220: 33 00 87 5C 4A 42 20 4C 44 41 23 24 44 34 00 93 |3..\JB LDA#$D4..|
00003230: 5C 54 42 20 53 54 41 24 44 34 00 A5 5C 5E 42 47 |\TB STA$D4..\^BG|
00003240: 42 20 4C 44 41 28 24 44 31 29 2C 59 00 B5 5C 68 |B LDA($D1),Y..\h|
00003250: 42 20 53 54 41 28 24 44 33 29 2C 59 00 BE 5C 72 |B STA($D3),Y..\r|
00003260: 42 20 49 4E 59 00 C9 5C 7C 42 20 42 4E 45 47 42 |B INY..\|B BNEGB|
00003270: 00 D5 5C 86 42 20 49 4E 43 24 44 32 00 E1 5C 90 |..\.B INC$D2..\.|
00003280: 42 20 49 4E 43 24 44 34 00 ED 5C 9A 42 20 4C 44 |B INC$D4..\.B LD|
00003290: 41 24 44 34 00 FA 5C A4 42 20 43 4D 50 23 24 45 |A$D4..\.B CMP#$E|
000032A0: 42 00 05 5D AE 42 20 42 43 43 47 42 00 0B 5D B8 |B..].B BCCGB..].|
000032B0: 42 3B 00 26 5D C2 42 20 4C 44 59 23 28 54 41 42 |B;.&].B LDY#(TAB|
000032C0: 45 4C 4C 45 38 2D 49 4E 49 54 2B 31 29 00 57 5D |ELLE8-INIT+1).W]|
000032D0: CC 42 47 43 20 4C 44 41 49 4E 49 54 2D 31 2C 59 |.BGC LDAINIT-1,Y|
000032E0: 3B 20 C9 4E 49 54 49 54 49 41 4C 49 53 49 45 52 |; .NITITIALISIER|
000032F0: 55 4E 47 20 4E 41 43 48 20 24 30 46 45 38 00 67 |UNG NACH $0FE8.g|
00003300: 5D D6 42 20 53 54 41 42 41 53 2D 31 2C 59 00 70 |].B STABAS-1,Y.p|
00003310: 5D E0 42 20 44 45 59 00 7B 5D EA 42 20 42 4E 45 |].B DEY.{].B BNE|
00003320: 47 43 00 81 5D F4 42 3B 00 8D 5D FE 42 20 4A 4D |GC..].B;..].B JM|
00003330: 50 42 41 53 00 93 5D 08 43 3B 00 E2 5D 12 43 3B |PBAS..].C;..].C;|
00003340: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003350: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003360: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003370: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003380: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 E8 5D 1C 43 3B 00 |---------..].C;.|
00003390: 0D 5E 26 43 3B 20 2A 2A 20 20 20 20 20 20 31 39 |.^&C; ** 19|
000033A0: 20 4E 45 55 45 20 DA 45 49 43 48 45 4E 20 20 20 | NEUE .EICHEN |
000033B0: 20 20 2A 2A 00 13 5E 30 43 3B 00 33 5E 3A 43 54 | **..^0C;.3^:CT|
000033C0: 41 42 45 4C 4C 45 35 20 2E 42 59 24 33 43 2C 24 |ABELLE5 .BY$3C,$|
000033D0: 36 36 2C 24 33 38 2C 24 36 43 00 4A 5E 44 43 2E |66,$38,$6C.J^DC.|
000033E0: 42 59 24 33 36 2C 24 31 43 2C 24 36 36 2C 24 33 |BY$36,$1C,$66,$3|
000033F0: 43 00 61 5E 4E 43 2E 42 59 24 36 36 2C 24 31 38 |C.a^NC.BY$66,$18|
00003400: 2C 24 33 43 2C 24 36 36 00 78 5E 58 43 2E 42 59 |,$3C,$66.x^XC.BY|
00003410: 24 37 45 2C 24 36 36 2C 24 36 36 2C 24 30 30 00 |$7E,$66,$66,$00.|
00003420: 8F 5E 62 43 2E 42 59 24 36 36 2C 24 33 43 2C 24 |.^bC.BY$66,$3C,$|
00003430: 36 36 2C 24 36 36 00 A6 5E 6C 43 2E 42 59 24 36 |66,$66..^lC.BY$6|
00003440: 36 2C 24 36 36 2C 24 33 43 2C 24 30 30 00 BD 5E |6,$66,$3C,$00..^|
00003450: 76 43 2E 42 59 24 36 36 2C 24 30 30 2C 24 36 36 |vC.BY$66,$00,$66|
00003460: 2C 24 36 36 00 D4 5E 80 43 2E 42 59 24 36 36 2C |,$66..^.C.BY$66,|
00003470: 24 36 36 2C 24 33 43 2C 24 30 30 00 EB 5E 8A 43 |$66,$3C,$00..^.C|
00003480: 2E 42 59 24 31 38 2C 24 33 43 2C 24 36 36 2C 24 |.BY$18,$3C,$66,$|
00003490: 30 30 00 02 5F 94 43 2E 42 59 24 30 30 2C 24 30 |00.._.C.BY$00,$0|
000034A0: 30 2C 24 30 30 2C 24 30 30 00 19 5F 9E 43 2E 42 |0,$00,$00.._.C.B|
000034B0: 59 24 30 30 2C 24 36 36 2C 24 33 43 2C 24 30 36 |Y$00,$66,$3C,$06|
000034C0: 00 30 5F A8 43 2E 42 59 24 33 45 2C 24 36 36 2C |.0_.C.BY$3E,$66,|
000034D0: 24 33 45 2C 24 30 30 00 47 5F B2 43 2E 42 59 24 |$3E,$00.G_.C.BY$|
000034E0: 46 46 2C 24 38 31 2C 24 42 44 2C 24 41 31 00 5E |FF,$81,$BD,$A1.^|
000034F0: 5F BC 43 2E 42 59 24 42 39 2C 24 41 31 2C 24 38 |_.C.BY$B9,$A1,$8|
00003500: 31 2C 24 46 46 00 75 5F C6 43 2E 42 59 24 30 30 |1,$FF.u_.C.BY$00|
00003510: 2C 24 36 36 2C 24 30 30 2C 24 36 36 00 8C 5F D0 |,$66,$00,$66.._.|
00003520: 43 2E 42 59 24 36 36 2C 24 36 36 2C 24 33 43 2C |C.BY$66,$66,$3C,|
00003530: 24 30 30 00 A3 5F DA 43 2E 42 59 24 33 38 2C 24 |$00.._.C.BY$38,$|
00003540: 36 43 2C 24 36 43 2C 24 37 38 00 BA 5F E4 43 2E |6C,$6C,$78.._.C.|
00003550: 42 59 24 36 43 2C 24 36 36 2C 24 37 43 2C 24 36 |BY$6C,$66,$7C,$6|
00003560: 30 00 D1 5F EE 43 2E 42 59 24 46 46 2C 24 38 31 |0.._.C.BY$FF,$81|
00003570: 2C 24 41 35 2C 24 41 35 00 E8 5F F8 43 2E 42 59 |,$A5,$A5.._.C.BY|
00003580: 24 41 35 2C 24 42 44 2C 24 38 31 2C 24 46 46 00 |$A5,$BD,$81,$FF.|
00003590: FF 5F 02 44 2E 42 59 24 46 46 2C 24 46 46 2C 24 |._.D.BY$FF,$FF,$|
000035A0: 43 33 2C 24 44 46 00 16 60 0C 44 2E 42 59 24 43 |C3,$DF..`.D.BY$C|
000035B0: 37 2C 24 44 46 2C 24 46 46 2C 24 46 46 00 2D 60 |7,$DF,$FF,$FF.-`|
000035C0: 16 44 2E 42 59 24 46 46 2C 24 46 46 2C 24 44 42 |.D.BY$FF,$FF,$DB|
000035D0: 2C 24 44 42 00 44 60 20 44 2E 42 59 24 44 42 2C |,$DB.D` D.BY$DB,|
000035E0: 24 43 33 2C 24 46 46 2C 24 46 46 00 5B 60 2A 44 |$C3,$FF,$FF.[`*D|
000035F0: 2E 42 59 24 46 46 2C 24 39 44 2C 24 41 31 2C 24 |.BY$FF,$9D,$A1,$|
00003600: 39 39 00 72 60 34 44 2E 42 59 24 38 35 2C 24 42 |99.r`4D.BY$85,$B|
00003610: 39 2C 24 38 31 2C 24 46 46 00 89 60 3E 44 2E 42 |9,$81,$FF..`>D.B|
00003620: 59 24 46 46 2C 24 45 33 2C 24 44 46 2C 24 45 37 |Y$FF,$E3,$DF,$E7|
00003630: 00 A0 60 48 44 2E 42 59 24 46 42 2C 24 43 37 2C |..`HD.BY$FB,$C7,|
00003640: 24 46 46 2C 24 46 46 00 B7 60 52 44 2E 42 59 24 |$FF,$FF..`RD.BY$|
00003650: 30 30 2C 24 36 36 2C 24 33 43 2C 24 36 36 00 CE |00,$66,$3C,$66..|
00003660: 60 5C 44 2E 42 59 24 36 36 2C 24 36 36 2C 24 33 |`\D.BY$66,$66,$3|
00003670: 43 2C 24 30 30 00 E5 60 66 44 2E 42 59 24 46 46 |C,$00..`fD.BY$FF|
00003680: 2C 24 43 37 2C 24 44 42 2C 24 43 37 00 FC 60 70 |,$C7,$DB,$C7..`p|
00003690: 44 2E 42 59 24 44 42 2C 24 43 37 2C 24 46 46 2C |D.BY$DB,$C7,$FF,|
000036A0: 24 46 46 00 13 61 7A 44 2E 42 59 24 46 46 2C 24 |$FF..azD.BY$FF,$|
000036B0: 42 39 2C 24 41 35 2C 24 42 39 00 2A 61 84 44 2E |B9,$A5,$B9.*a.D.|
000036C0: 42 59 24 41 35 2C 24 42 39 2C 24 38 31 2C 24 46 |BY$A5,$B9,$81,$F|
000036D0: 46 00 41 61 8E 44 2E 42 59 24 46 46 2C 24 46 46 |F.Aa.D.BY$FF,$FF|
000036E0: 2C 24 44 42 2C 24 44 42 00 58 61 98 44 2E 42 59 |,$DB,$DB.Xa.D.BY|
000036F0: 24 43 33 2C 24 44 42 2C 24 46 46 2C 24 46 46 00 |$C3,$DB,$FF,$FF.|
00003700: 6F 61 A2 44 2E 42 59 24 46 46 2C 24 38 31 2C 24 |oa.D.BY$FF,$81,$|
00003710: 41 35 2C 24 41 35 00 86 61 AC 44 2E 42 59 24 42 |A5,$A5..a.D.BY$B|
00003720: 44 2C 24 41 35 2C 24 38 31 2C 24 46 46 00 8C 61 |D,$A5,$81,$FF..a|
00003730: B6 44 3B 00 DB 61 C0 44 3B 2D 2D 2D 2D 2D 2D 2D |.D;..a.D;-------|
00003740: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003750: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003780: 2D 2D 00 E1 61 CA 44 3B 00 06 62 D4 44 3B 20 2A |--..a.D;..b.D; *|
00003790: 2A 20 20 CC 4F 57 2D C2 59 54 45 53 20 4E 45 55 |* .OW-.YTES NEU|
000037A0: 45 20 DA 45 49 43 48 45 4E 20 20 2A 2A 00 0C 62 |E .EICHEN **..b|
000037B0: DE 44 3B 00 2C 62 E8 44 54 41 42 45 4C 4C 45 36 |.D;.,b.DTABELLE6|
000037C0: 20 2E 42 59 24 30 30 2C 24 44 38 2C 24 44 30 2C | .BY$00,$D8,$D0,|
000037D0: 24 45 38 00 43 62 F2 44 2E 42 59 24 46 30 2C 24 |$E8.Cb.D.BY$F0,$|
000037E0: 44 38 2C 24 45 30 2C 24 45 38 00 5A 62 FC 44 2E |D8,$E0,$E8.Zb.D.|
000037F0: 42 59 24 46 38 2C 24 46 38 2C 24 33 30 2C 24 34 |BY$F8,$F8,$30,$4|
00003800: 38 00 71 62 06 45 2E 42 59 24 43 30 2C 24 43 38 |8.qb.E.BY$C0,$C8|
00003810: 2C 24 45 30 2C 24 45 30 00 84 62 10 45 2E 42 59 |,$E0,$E0..b.E.BY|
00003820: 24 46 30 2C 24 36 38 2C 24 45 38 00 8A 62 1A 45 |$F0,$68,$E8..b.E|
00003830: 3B 00 D9 62 24 45 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D |;..b$E;---------|
00003840: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003850: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003860: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003870: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003880: 00 DF 62 2E 45 3B 00 04 63 38 45 3B 20 2A 2A 20 |..b.E;..c8E; ** |
00003890: C8 49 47 48 2D C2 59 54 45 53 20 20 4E 45 55 45 |.IGH-.YTES NEUE|
000038A0: 20 DA 45 49 43 48 45 4E 20 2A 2A 00 0A 63 42 45 | .EICHEN **..cBE|
000038B0: 3B 00 2A 63 4C 45 54 41 42 45 4C 4C 45 37 20 2E |;.*cLETABELLE7 .|
000038C0: 42 59 24 46 30 2C 24 46 32 2C 24 46 33 2C 24 46 |BY$F0,$F2,$F3,$F|
000038D0: 32 00 41 63 56 45 2E 42 59 24 46 30 2C 24 46 30 |2.AcVE.BY$F0,$F0|
000038E0: 2C 24 46 32 2C 24 46 30 00 58 63 60 45 2E 42 59 |,$F2,$F0.Xc`E.BY|
000038F0: 24 46 33 2C 24 46 32 2C 24 46 33 2C 24 46 33 00 |$F3,$F2,$F3,$F3.|
00003900: 6F 63 6A 45 2E 42 59 24 46 33 2C 24 46 33 2C 24 |ocjE.BY$F3,$F3,$|
00003910: 46 30 2C 24 46 33 00 82 63 74 45 2E 42 59 24 46 |F0,$F3..ctE.BY$F|
00003920: 33 2C 24 46 33 2C 24 46 33 00 88 63 7E 45 3B 00 |3,$F3,$F3..c~E;.|
00003930: D7 63 88 45 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.c.E;-----------|
00003940: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003950: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003960: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003970: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 DD |--------------..|
00003980: 63 92 45 3B 00 02 64 9C 45 3B 20 2A |c.E;..d.E; * |
Z*.*.';*********************************
****************************************
..*.';..*$'; S C R I P T / P L U S
- S U P P O R T V E R S I O N 2 . 1
..*.';.N+8';****************************
****************************************
*****.T+B';.Z+L';..+V'; .OB "@0:S
/P-SUPPORT V2.1,P,W..+`'.DP15,46,0,20..+
J'.BA$1001,$DE00..+T';..+~';------------
----------------------------------------
---------------------..,.';.),.'; **
FARBEINSTELLUNGEN: **./,.';.^,.'.EQFA
RBE0=$8D; EDITORMODUS COLOR0+4,14,0..,
.'.EQFARBE1=$71; ZEICHENFARBE COLOR1 ,
2,7..,.'.EQFARBE2=$81; AUSGABEMODUS CO
LOR0+4, 2,0..,D'.EQFARBE3=$80; RAHMENBLI
NKEN COLOR4 , 1,0..,N';.@-X';----------
----------------------------------------
-----------------------.F-.';.K-.'; **
BASIC-PROGRAMMKOPF **.Q-.';..-.(.WO
LINEEND+1,0..-.(.BYSYS..-.(.BYMC/1000+OF
.H-.(.BY(MC-(MC/1000!A!MA)*1000)/100+OF.
.-((.BY(MC-(MC/100!A!MA)*100)/10+OF...2(
.BYMC-(MC/10!A!MA)*10+OF.$.<(.BY34,13,19
,19,147,130.8.F(LOGO .BY9,14,18.I.P(.TX"
........................................
...Z(.TX". SCRIPT/PLUS-SUPPORT VERSIO
N 2.1 ..K.D(.TX". VON OLUF HEI
NRICHSEN ....N(.TX".TANNENBAUMER
WEG 97, 5600 WUPPERTAL 21..-/X(.TX"....
.....................................:/.
(.BY13,13.K/.(.TX"[NOV.87].`/.(LINEEND .
BY0,0,0.P/ (MC JMPSTART.V/.(;.E/.(;-----
----------------------------------------
----------------------------.K/.(;../H(;
** DEFINITIONEN: **../R(;..0
.(.EQBANK=$FB..0.(.EQBANKSWITCH=$FDD0./0
.(.EQBAS=$0FE8.C0.(.EQBSOUT1=$FFD2.W0.).
EQBSOUT2=$8162..0.).EQBUSY=$FD01; REGIST
ER 1 ACIA 6551 (PLUS/4)..0.).EQCOLOR0=
REGISTER+21..0").EQCOLOR1=$053B.R0,).EQC
OLOR4=REGISTER+25..16).EQD'PORT=$FD10; D
ATENREGISTER 5229 B (PLUS/4).91@).EQCE
NTRON=7; CENTRONICS-DEVICE-NR.7 (PLUS/4)
.M1J).EQERROR3=$F279.A1T).EQERROR5=$F27F
.T1^).EQF'KEY=$055F..1H).EQFILE1=$EEE8..
1R).EQFILE2=$EEF8..1|).EQFILEOK=$ED81.B1
.).EQIRQLOW=$05F5.R1.).EQMA=$FFFF..1.).E
QMODUL1=$05ED..1.).EQMODUL2=$05EE..2.).E
QOF=$30..2.).EQPRINT1=$FF4F.32B).EQRAM=R
EGISTER+63.I2L).EQREGISTER=$FF00.`2V).EQ
ROM=REGISTER+62.T2.).EQSETTIM=$FFDB..2.)
.EQSOUND=$BDC1..2.).EQSTKEY=$91..2.).EQS
T'LINE=$0C00..2.*.EQSTROBE=$FD02; REGIST
ER 2 ACIA 6551 (PLUS/4)..2.*.EQSYS=$9E
..3.*.EQTIME=$A3..3&*.EQTMAX=$053F.*30*.
EQVEC'BSOUT=$0324.B3:*.EQVEC'CHKOUT=$031
E.Y3D*.EQVEC'GETIN=$0328.O3N*.EQVEC'INFO
=$1408..3X*.EQVEC'IRQ1=$0314..3B*.EQVEC'
IRQ2=$0312..3L*;..3V*;------------------
----------------------------------------
---------------..3.*;..4.*; ** TASTENBEL
EGUNG ALT - NEU **.!4.*;.G4.*.EQTAB'1=18
; ANZAHL AENDERUNGEN-1.M4.*;..4.*TABELLE
1 .BY";",":","@","]","["; WENN ZEICHEN (
ALT), DANN .....4.*.BY$BA,"\",$82,$84,"<
".E4F*.BY">","#","Y","Z",$A9..4P*.BY$A8,
$DF,"Z","Y"..4Z*;.$5.*TABELLE2 .BY"[","\
","]",".",$BA; DURCH ZEICHEN (NEU) ERSET
ZEN.?5.*.BY".",$BF,"<",">",";".Z5.*.BY":
","@","Z","Y","#".Q5.+.BY"[","]","Y","Z"
.W5.+;.F5.+;----------------------------
----------------------------------------
-----.L5 +;..5*+; ** ERGAENZENDE DRUCKER
STEU- **..64+; ** ERZEICHEN
**..6>+;.B6H+.EQTAB'2=3; ANZAHL ERGAE
NZUNGEN-1.D6R+; WENN <ESC>+CHR$(.
..)..6\+TABELLE3 .BY83; HOCH- ODER TIEFS
CHRIFT EIN..6F+.BY84; HOCH- ODER TIEFSCH
RIFT AUS.V6P+.BY69; SCHATTENDRUCK EIN..6
Z+.BY70; SCHATTENDRUCK AUS..7.+.BY0,0,0;
FREIRAUM.87.+; DANN ZUSAETZLICH
<ESC>+CHR$(...).^7.+TABELLE4 .BY15; SCHM
ALSCHRIFT EIN.R7.+.BY80; PICA EIN..7.+.B
Y52; KURSIV NLQ EIN..7.+.BY53; KURSIV NL
Q AUS..7.+.BY0,0,0; FREIRAUM.C7J+;..8T+;
----------------------------------------
---------------------------------..8.+;.
<8.+VECTOR1 .WO$CE0E; IRQ 1 (DUMMY).B8.+
;.W8.+VECTOR2 .WOTABELLE9-TABELLE8+$D3FF
; TOKENTABELLE.}8.,;.L8.,;--------------
----------------------------------------
-------------------.R8.,;..8$,; ** MODIF
IZIERTE INTERRUPT- **..9.,; ** ROUT
INE (TEIL 1) **."98,;.B9B,IRQ1 LDA$5
F0; KORREKTUR (A).O9L, CMP#$D4.Z9V, BNEA
0.G9`, LDA$5F1.T9J, CMP#$D8.9T, BNEA0..
9~, LDA#$C1..9., STA$5F0..9.,;..9.,A0 LD
A#$8D; KORREKTUR (B).N9., STAVEC'INFO..9
., LDA#$05..9., STAVEC'INFO+1..9D,;..:N,
LDA$1A; ZEICHEN- UND HINTERGRUNDFARBE.,
:X, CMP#$1B.7:., BNEA1.C:., LDA$19.P:.,
CMP#$20.[:.- BEQA2.H:.- CMP#$FE.S:.- BEQ
A2..:.- CMP#$F9..:(- BEQA2..:2- LDXST'LI
NE+6..:<- BMIX2..:F- LDA#FARBE3.G:P- CMP
COLOR4.R:Z- BEQA3..:D- BNEA4..:N-A1 LDA#
$08..:X- STAREGISTER+7..;.-X2 LDA#FARBE0
..;.- BNEX1.+;.-A2 LDA#$88.>; - STAREGIS
TER+7.N;.- LDA#FARBE2._;.-X1 CMPCOLOR4.J
;.- BEQA3.Y;H- STACOLOR0..;R-A4 STACOLOR
4..;.-;.A;.-A3 LDAST'LINE+11; AENDERUNGE
N IN STATUSZEILE.N;.- CMP#$C6.Y;.- BNEA5
..;.. LDAST'LINE+12..;.. CMP#$C6..<.. BN
EA5. <". LDA#$C1; AUS STATT OFF.3<,. STA
ST'LINE+10.@<6. LDA#$D5.S<@. STAST'LINE+
11.`<J. LDA#$D3.S<T. STAST'LINE+12..<^.A
5 LDAST'LINE+14..<H. CMP#$D7. <R. BNEA6.
.<|. LDA#$D5; U STATT W.K<.. STAST'LINE+
14..<..A6 LDAST'LINE+16..<.. CMP#$C9..<.
. BNEA7..=.. LDA#$C5; E STATT I.#=.. STA
ST'LINE+16.8=B.A7 LDAST'LINE+20.E=L. CMP
#$C3.P=V. BNEA8.H=.. LDA#$C7; G STATT C.
{=.. STAST'LINE+20..=..A8 LDAST'LINE+29.
.=.. CMP#$CC..=./ BNEA9..=./ LDA#$DA; Z
STATT L.S=./ STAST'LINE+29..=&/A9 LDAST'
LINE+35..=0/ CMP#$C3..>:/ BNEAA..>D/ LDA
#$D3; S STATT C.+>N/ STAST'LINE+35.?>X/A
A JMP(VECTOR1).E>B/;..>L/;--------------
----------------------------------------
-------------------..>V/;..>./; ** MODIF
IZIERTE INTERRUPT- **..>./; ** ROUT
INE (TEIL 2) **..>./;..>./IRQ2 JSR$C
FBF..?./ JSR$CECD..?./ LDABANK. ?./ PHA.
-?F/ LDA#$00.:?P/ STABANK.C?Z/ PHP.L?./
CLI.Z?./ JSR$DB11.F?./ LDX$EF.Q?.0 BEQB0
..?.0 LDX#TAB'1; NEUE TASTATURBELEGUNG..
?.0B2 CMPTABELLE1,X..? 0 BEQB1..?*0 DEX.
K?40 BPLB2.V?>0 BMIB0..?H0B1 LDATABELLE2
,X..?R0 LDX$EF..@\0 STA$526,X..@F0B0 JMP
$CE54..@P0;.K@Z0;-----------------------
----------------------------------------
----------.Q@.0;..@.0; ** MODIFIZIERTE R
OUTINE ZUR **..@.0; ** ZEICHENAUSGA
BE **.A@.0;.O@.0BSOUT PHA.U@.0;..@.
0 LDA$19; KEINE ZEICHENWANDLUNG FALLS.-A
J0 AND#$7F; SAVEMODUS ODER BILDSCHIRMAUS
GABE.:AT0 CMP#$40.EA.0 BEQC0.RA.0 CMP#$4
6.]A.0 BEQC0.JA.0 CMP#$51.UA.1 BNEC1..A.
1C0 JMP$EC4C..A.1;..A$1C1 LDA$D0; DRUCKE
RSTEUERZEICHEN AUSFILTERN.GA.1 CMP#$1B.R
A81 BEQC2..AB1 PLA..AL1 STA$D0..AV1 CMP#
$1B..A`1 BNEC3..BJ1 CLC..BT1 RTS..B~1;."
B.1C3 PHA..B.1 LDA$0B.9B.1 BNEC4.BB.1 PL
A; COMMODORE-ASCII (DRUCKERTYP 0).OB.1 C
MP#$5B.ZB.1 BCCC5..BD1 CMP#$C0..BN1 BCCC
6..BX1 CMP#$DB..B.1 BCCC7..B.1 AND#$7F.B
B.1 BNEC5.MB.2C7 SEC.ZB.2 SBC#$60..B.2 B
NEC5..B.2C6 CMP#$5E..B(2 BCSC8..C22 CLC.
.C<2 ADC#$20. CF2 BNEC5.&CP2;.RCZ2C4 PLA
; STANDARD-ASCII (DRUCKERTYP 1-4)._CD2 C
MP#$41.JCN2 BCCC5.WCX2 CMP#$5E..C.2 BCSC
9..C.2 ADC#$20..C.2 BNEC5..C 2C9 CMP#$C0
..C.2 BCCC8.AC.2 CMP#$E0.LC.2 BCSC5.YCH2
AND#$7F..CR2C8 CMP#$BA..C.2 BNECA..D.2
LDA#$5C..D.2 BNEC5..D.2CA CMP#$BF.%D.3 B
NEC5.2D.3 LDA#$7E.=D.3 BNEC5.CD"3;.ND,3C
2 PLA.[D63 AND#$7F.GD@3 STA$D0..DJ3 CMP#
$59; PROBLEMFALL: PFUNDZEICHEN IN OE. DT
3 BNECB..D^3 LDA#$7C..DH3 BNEC5..DR3;..D
|3CB PHA; STEUERZEICHENERGAENZUNG (S.O).
.D.3 LDX#TAB'2..E.3CD CMPTABELLE3,X..E.3
BEQCC. E.3 DEX.+E.3 BPLCD.6E.3 BMICE.EE
B3CC LDA#$1B.PEL3 JSRC5.CEV3 LDATABELLE4
,X.NE.3 JSRC5.}E.3CE LDA#$1B..E.3 JSRC5.
.E.3 PLA..E.4;..E.4C5 PHA..E.4 LDA$99.TE
&4 CMP#CENTRON; CENTRONICS (PLUS/4)..E04
BNECF..E:4 PLA..ED4 JMPOPTION'C..FN4CF
PLA..FX4 JMP$ECDF. FB4;.OFL4;---
----------------------------------------
------------------------------.UFV4;..F.
4; ** DEUTSCHE BILDSCHIRMMEL- **..F.4;
** DUNGEN EINSCHLEUSEN **.EF.4;..F.
4NEW LDA$DA; NEUE INTERFACEADRESSE AUF S
TACK..G.4 CMP#$47..G.4 BNEY2..G.4 PLA..G
F4 PLA.=GP4 LDA#>(INTERF-INIT+BAS-1).FGZ
4 PHA.DG.4 LDA#<(INTERF-INIT+BAS-1).MG.4
PHA.}G.4Y2 JMP$8768..G.5;..G.5INFO STX$
DA; RUECKSPRUNGADRESSE PRUEFEN..G.5 PLA.
EG 5 CMP#$67.PG*5 BNEY0.YG45 TAX..G>5 PL
A..GH5 CMP#$87..GR5 BNEY1..H\5 LDA#>(NEW
-1)..HF5 LDX#<(NEW-1).)HP5Y1 PHA.2HZ5 TX
A.=H.5Y0 PHA.IH.5 LDX$DA.OH.5;.~H.5 LDA#
$D4; ZUGRIFF AUF RAM-TABELLE AB $D400..H
.5 STA$32..H.5 LDA#$00..H.5 STA$31..HJ5
SEI..HT5 STARAM.AH.5 TAY.JH.5 TXA.UH.5 B
EQD0..H.5D1 JSRINC31..H.6 LDA($31),Y..I.
6 BNED1..I.6 DEX..I$6 BNED1.!I.6 LDY#$01
.1I86 LDA($31),Y.>IB6 CMP#$0A.IIL6 BEQD2
.XIV6D0 LDA#$13.GI`6 JSRBSOUT3.TIJ6 LDY#
$FF..IT6 STY$59..I~6 LDA#$12..I.6DE CMP#
$09..I.6 BEQD3..I.6 BCSD4..I.6 CMP#$01.J
I.6 BNED5.YI.6 JSRSOUND1..ID6 JMPD6..IN6
;..IX6D3 LDA#$0D..J.6 JSRBSOUT3..J.6 JMP
D7..J.6;.$J.7D5 TAX.2J.7 LDA$70,X.AJ.7D4
CMP#$A0.LJ.7 BCCD7.YJ(7 CMP#$BF.DJ27 BC
CD8.QJ<7 CMP#$E0.|JF7 BCCD7..JP7 SEC..JZ
7 SBC#$C0..JD7.BY$2C..JN7;..JX7D8 AND#$1
F..J.7 TAX..J.7 LDAVECTOR2; LOW-BYTE DER
TOKEN-TABELLE..J.7 STA$35."K 7 LDAVECTO
R2+1; HIGH-BYTE DER TOKEN-TABELLE..K.7 S
TA$36.;K.7 LDY#$00.IK.7DA INC$35.TKH7 BN
ED9.`KR7 INC$36.RK.7D9 LDA($35),Y.}K.7 B
NEDA..K.7 DEX..K.7 BPLDA..K.8DC INY..K.8
LDA($35),Y..K.8 BEQDB.FK"8 JSRBSOUT3.RK
,8 INC$59..K68 JMPDC..K@8;..KJ8DB LDA#"
"..KT8;..L^8D7 JSRBSOUT3..LH8 CMP#$22.!L
R8 BEQDD.1L|8D2 JSRINC31.=L.8 INC$59.JL.
8 LDY#$00.ZL.8 LDA($31),Y.EL.8 BNEDE.PL.
8D6 CLC.|L.8 LDA$59..LB8 ADC#$00..LL8 ST
A$35..LV8 LDA#$0C..L.8 STA$36..L.8DF LDA
$59.IL.8 CMP#$1D.TL.8 BEQDD..L.9 LDA#" "
..L.9 JSRBSOUT3..L.9 INC$59..M&9 LDA$59.
.M09 CMP#$28. M:9 BCCDF..MD9DD STAROM.7M
N9 CLI.@MX9 RTS.FMB9;.WML9INC31 INC$31.B
MV9 BNERT.NM.9 INC$32.YM.9RT RTS.M.9;..
M.9SOUND1 STAROM..M.9 JSRSOUND..M.9 JSRS
OUND..M.9 STARAM.BMF9 RTS.HMP9;.ZMZ9BSOU
T3 STAROM..M.9 CLI..M.9 JSRBSOUT2..M.9 S
EI..N.: STARAM..N.: RTS..N.:;.EN :;-----
----------------------------------------
----------------------------.KN*:;..N4:;
** MODIFIZIERTE KERNAL- **..N>:; **
CHKOUT-ROUTINE **..NH:;.ONR:C
HKOUT JSRFILE1.ZN\: BEQH0..NF: JMPERROR3
..NP:H0 JSRFILE2..OZ: CMP#CENTRON..O.: B
EQH1.#O.: JMP$ED70.8O.:H1 LDX#%00000000.
GO.: STXD'PORT.VO.: JMPFILEOK.\O.:;..O.:
;---------------------------------------
----------------------------------..OJ:;
.VOT:; ** OPTION CENTRONICS **..O
.:; ** (NUR PLUS/4) **..P.:;
.2P.:OPTION'C STAD'PORT; ZEICHEN IN DATE
NREGISTER.YP.: LDA#%00000000; MELDUNG AN
DRUCKER.HP.; STASTROBE.{P.; LDA#%000010
00..P.; STASTROBE..P$;O1 LDA#%00100000..
P.; BITBUSY; ZEICHEN GEDRUCKT?..P8; BNEO
2; JA, DANN FERTIG..QB; LDASTKEY; STOP-T
ASTE GEDRUECKT?..QL; BMIO1; NEIN, DANN W
ARTEN.)QV; LDA#1.5Q`; STA$EF.@QJ; LDA#3.
NQT; STA$0527.YQ~;O2 CLC.BQ.; RTS.HQ.;;.
.Q.;;-----------------------------------
--------------------------------------..
Q.;;..Q.;; ** MODIFIZIERTE KERNAL- *
*..R.;; ** GETIN-ROUTINE **..
RD;;.9RN;GETIN JSR$EBD9; ABFRAGE AUF "J"
UND "Y".BRX; PHP.OR.; CMP#"J".ZR.; BNEH
2.HR.; LDA$01F7.UR.< CMP#$92..R.< BNEH3.
.R.< LDA#"Y"..R.<.BY$2C..R(<H3 LDA#"J"..
R2<H2 PLP..R<< RTS.ARF<;..SP<;----------
----------------------------------------
-----------------------..SZ<;.;SD<; **
INITIALISIERUNG VON **.`SN<; ** SC
RIPT/PLUS-SUPPORT **.FSX<;..S.<START
LDA#$05; SCRIPT/PLUS VORHANDEN?..S.< CMP
MODUL2..S.< BEQG0; IN BANK 2.DS < CMPMOD
UL1.ZS.< BEQG1; IN BANK 1..S.< LDA#$00..
S.<G0 ASL..TH<G1 STA$D0..TR<;.-T.< LDA#F
ARBE0; FARBEINSTELLUNG (S.O).<T.< STACOL
OR0.KT.< STACOLOR4.[T.< LDA#FARBE1.JT.=
STACOLOR1.PT.=;..T.= LDA#$00; EINSCHALTM
ELDUNG..T"= TAX..T,= JSRSETTIM..T6=;..T@
= JSRPRINT1..TJ=.BY19,19,147,13,13,13,13
,0..TT=G2 LDALOGO,X..T^= JSRBSOUT1..UH=
INX..UR= CPX#$CD..U|= BCCG2.+U.= JSRPRIN
T1.5U.=.BY13.XU.=.TX" (C) 1987 .R...U.
..N.. ".SU.=.TX"(CW-PUBLIKATIONEN)..U.=.
BY13,13,13,13,13,13,13,13..U.=.TX"
SCRIPT/PLUS "..UB=.BY0.DUL= LDA$D0.OUV=
BNEG3..U.= JSRPRINT1..U.=.TX"NICHT VORH
ANDEN!..V.=.BY0..V.= JMP$8003..V.>G3 CMP
#$05.(V.> BEQG4.5V.> LDA#"2".@V&> STAG5.
QV0>G4 JSRPRINT1.EV:>.TX"IN ROM-BANK.YVD
>.BY32,18,32,130..VN>G5 .BY"1",132,32,14
6,0..VX>;..VB> LDY#$00..VL> STYTMAX..VV>
INY.NV.>G6 CPYTIME+1.YV.> BNEG6..V.> LD
A#$0A..V.> STATMAX..V.>;.'W.> LDX#$61; K
ORREKTURROUTINE (B) IN FUNKTI-.UW.>G7 LD
AKORREKT,X; ONSTASTENPUFFER KOPIEREN.DWF
> STA$57A,X.MWP> DEX.XWZ> BPLG7.~W.>;..W
.> DEY; ORIGINALZEICHENSATZ KOPIEREN..W.
> LDA#$D4..W.? STA$D2.KW.? LDA#$F0.WW.?
STA$D4..W ? STY$D1..W*? STY$D3..X4?G8 LD
A($D1),Y..X>? STA($D3),Y..XH? INY.%XR? B
NEG8.1X\? INC$D2.=XF? INC$D4.IXP? LDA$D2
.VXZ? CMP#$D8.AX.? BCCG8.GX.?;..X.? LDY#
$12; NEUE ZEICHEN EINBAUEN..X.? LDX#$98.
.X.?G9 LDATABELLE6,Y..X.? STA$D1.LX.? LD
ATABELLE7,Y.XXJ? STA$D2..XT? TYA..X.? PH
A..X.? LDY#$07..Y.?GA LDATABELLE5-1,X..Y
.? STA($D1),Y.'Y.@ DEX.0Y.@ DEY.;Y.@ BPL
GA.DY$@ PLA.MY.@ TAY.VY8@ DEY.AYB@ BPLG9
.GYL@;..YV@ INY; ZEICHENSATZ2 ERZEUGEN (
AUSGABE)..Y`@ LDA#$F0..YJ@ STA$D2..YT@ L
DA#$F4.CY~@ STA$D4.OY.@ STY$D1..Y.@ STY$
D3..Y.@ LDX#$07..Y.@ SEI..Y.@ STARAM..Z.
@GD LDA($D1),Y..ZD@ STA($D3),Y.(ZN@ DEX.
3ZX@ BPLGE.>Z.@ CMP#0.CZ.@ BNEGF; UNTERL
AENGE? JA, DANN GF.RZ.@X5 LDA#$FF..Z.A S
TA($D3),Y; UNTERSTREICHEN..Z.AGF LDX#$07
..Z.AGE INY..Z.A BNEGD.CZ(A INC$D2.OZ2A
INC$D4..Z<A LDA$D4..[FA CMP#$F7; GRAFIKZ
EICHEN UNVERAENDERT..[PA BCCGD..[ZA BNEX
4.'[DA LDA#$24.2[NA STAX5.=[XA BNEGD.K[.
AX4 STAROM.T[.A CLI.Z[.A;..[ A LDX#$07;
SEITENENDEZEICHEN KOPIEREN..[.AX3 LDA$D7
D8,X..[.A STA$F7F0,X..[.A LDA$D7C8,X.E[H
A STA$F7C8,X.N[RA DEX.Y[.A BPLX3..[.A ST
X$F7D7..[.A INX..[.A STX$F7F7..\.B;.0\.B
LDY#$00; DEUTSCHE MELDUNGEN NACH $D400.
C\.B LDA#<TABELLE8.V\"B LDX#>TABELLE8.B\
,B STA$D1.N\6B STX$D2.Z\@B STY$D3..\JB L
DA#$D4..\TB STA$D4..\^BGB LDA($D1),Y..\H
B STA($D3),Y..\RB INY.I\|B BNEGB.U\.B IN
C$D2..\.B INC$D4..\.B LDA$D4..\.B CMP#$E
B..].B BCCGB..].B;.&]BB LDY#(TABELLE8-IN
IT+1).W]LBGC LDAINIT-1,Y; INITITIALISIER
UNG NACH $0FE8.G]VB STABAS-1,Y.P].B DEY.
{].B BNEGC..].B;..].B JMPBAS..].C;..].C;
----------------------------------------
---------------------------------..].C;.
.^&C; ** 19 NEUE ZEICHEN **..^0
C;.3^:CTABELLE5 .BY$3C,$66,$38,$6C.J^DC.
BY$36,$1C,$66,$3C.A^NC.BY$66,$18,$3C,$66
.X^XC.BY$7E,$66,$66,$00..^BC.BY$66,$3C,$
66,$66..^LC.BY$66,$66,$3C,$00..^VC.BY$66
,$00,$66,$66.T^.C.BY$66,$66,$3C,$00..^.C
.BY$18,$3C,$66,$00.._.C.BY$00,$00,$00,$0
0.._.C.BY$00,$66,$3C,$06.0_.C.BY$3E,$66,
$3E,$00.G_.C.BY$FF,$81,$BD,$A1.^_.C.BY$B
9,$A1,$81,$FF.U_FC.BY$00,$66,$00,$66.._P
C.BY$66,$66,$3C,$00.._ZC.BY$38,$6C,$6C,$
78.._.C.BY$6C,$66,$7C,$60.Q_.C.BY$FF,$81
,$A5,$A5.._.C.BY$A5,$BD,$81,$FF.._.D.BY$
FF,$FF,$C3,$DF..`.D.BY$C7,$DF,$FF,$FF.-`
.D.BY$FF,$FF,$DB,$DB.D` D.BY$DB,$C3,$FF,
$FF.[`*D.BY$FF,$9D,$A1,$99.R`4D.BY$85,$B
9,$81,$FF..`>D.BY$FF,$E3,$DF,$E7. `HD.BY
$FB,$C7,$FF,$FF..`RD.BY$00,$66,$3C,$66.N
`\D.BY$66,$66,$3C,$00..`FD.BY$FF,$C7,$DB
,$C7..`PD.BY$DB,$C7,$FF,$FF..AZD.BY$FF,$
B9,$A5,$B9.*A.D.BY$A5,$B9,$81,$FF.AA.D.B
Y$FF,$FF,$DB,$DB.XA.D.BY$C3,$DB,$FF,$FF.
OA.D.BY$FF,$81,$A5,$A5..A.D.BY$BD,$A5,$8
1,$FF..A.D;..A.D;-----------------------
----------------------------------------
----------..AJD;..BTD; ** LOW-BYTES NEU
E ZEICHEN **..B.D;.,B.DTABELLE6 .BY$00,
$D8,$D0,$E8.CB.D.BY$F0,$D8,$E0,$E8.ZB.D.
BY$F8,$F8,$30,$48.QB.E.BY$C0,$C8,$E0,$E0
..B.E.BY$F0,$68,$E8..B.E;.YB$E;---------
----------------------------------------
------------------------..B.E;..C8E; **
HIGH-BYTES NEUE ZEICHEN **..CBE;.*CLETA
BELLE7 .BY$F0,$F2,$F3,$F2.ACVE.BY$F0,$F0
,$F2,$F0.XC`E.BY$F3,$F2,$F3,$F3.OCJE.BY$
F3,$F3,$F0,$F3..CTE.BY$F3,$F3,$F3..C~E;.
WC.E;-----------------------------------
--------------------------------------..
C.E;..D.E; *
> CLICK IMAGE PREVIEW FOR FULL MODAL