CITIZEN120.SRC
FILE INFORMATION
FILENAME(S): CITIZEN120.SRC
FILE TYPE(S): PRG
FILE SIZE: 12.6K
FIRST SEEN: 2025-10-20 00:34:41
APPEARS ON: 5 disk(s)
FILE HASH
8a3f09ce3939957588ba6a5a8746888094e1f69bb1ad3976fa6d1100116b561e
FOUND ON DISKS (5 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| D | CITIZEN120.SRC | PRG | Robin Albicker | 24 | 2 | DOWNLOAD FILE |
| D | CITIZEN120.SRC | PRG | Treasure Chest - Klaus Der Suhler | 24 | 2 | DOWNLOAD FILE |
| D | CITIZEN120.SRC | PRG | Treasure Chest - Klaus Der Suhler | 24 | 2 | DOWNLOAD FILE |
| D | CITIZEN120.SRC | PRG | Treasure Chest - Max | 24 | 2 | DOWNLOAD FILE |
| DRUCKERTREIBER | CITIZEN120.SRC | PRG | DuncanTwain | 23 | 18 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: D8 1F E6 1F 0A 00 3B 2E 4C 49 31 2C 34 2C 37 00 |......;.LI1,4,7.|
00000010: EC 1F 14 00 3B 00 F2 1F 1E 00 3B 00 21 20 28 00 |....;.....;.! (.|
00000020: 3B 20 20 20 C3 49 54 49 5A 45 4E 20 31 32 30 20 |; .ITIZEN 120 |
00000030: C4 20 C4 52 55 43 4B 45 52 54 52 45 49 42 45 52 |. .RUCKERTREIBER|
00000040: 20 46 55 45 52 20 C7 45 4F 53 00 50 20 32 00 3B | FUER .EOS.P 2.;|
00000050: 20 20 20 4B 4F 52 52 45 4B 54 45 52 20 C4 52 55 | KORREKTER .RU|
00000060: 43 4B 20 56 4F 4E 20 44 45 55 54 53 43 48 45 4E |CK VON DEUTSCHEN|
00000070: 20 D5 4D 4C 41 55 54 45 4E 00 7F 20 3C 00 3B 20 | .MLAUTEN.. <.; |
00000080: 20 20 56 45 52 53 43 48 49 45 44 45 4E 45 20 CE | VERSCHIEDENE .|
00000090: CC D1 2D 20 55 4E 44 20 C7 52 41 46 49 4B 20 C4 |..- UND .RAFIK .|
000000A0: 52 55 43 4B 4D 4F 44 49 00 AC 20 46 00 3B 20 20 |RUCKMODI.. F.; |
000000B0: 20 56 45 52 53 43 48 49 45 44 45 4E 45 20 C4 49 | VERSCHIEDENE .I|
000000C0: 43 48 54 45 4E 20 42 45 49 20 C7 52 41 46 49 4B |CHTEN BEI .RAFIK|
000000D0: 44 52 55 43 4B 00 B2 20 50 00 3B 00 ED 20 5A 00 |DRUCK.. P.;.. Z.|
000000E0: 3B 20 20 20 41 55 46 20 C2 41 53 49 53 20 44 45 |; AUF .ASIS DE|
000000F0: 53 20 C5 50 53 4F 4E 20 C6 D8 2D 38 30 20 D4 52 |S .PSON ..-80 .R|
00000100: 45 49 42 45 52 53 20 47 45 53 43 48 52 49 45 42 |EIBERS GESCHRIEB|
00000110: 45 4E 20 56 4F 4E 00 F3 20 64 00 3B 00 0C 21 6E |EN VON.. d.;..!n|
00000120: 00 3B 20 20 20 D7 4F 4C 46 47 41 4E 47 20 C4 4F |.; .OLFGANG .O|
00000130: 45 48 4C 45 52 00 23 21 78 00 3B 20 20 20 D3 54 |EHLER.#!x.; .T|
00000140: 41 55 44 45 4E 57 45 47 20 32 32 41 00 3C 21 82 |AUDENWEG 22A.<!.|
00000150: 00 3B 20 20 20 36 38 30 30 20 CD 41 4E 4E 48 45 |.; 6800 .ANNHE|
00000160: 49 4D 20 33 31 00 69 21 8C 00 3B 20 20 20 D4 45 |IM 31.i!..; .E|
00000170: 4C 3A 20 30 36 32 31 20 2F 20 37 35 35 30 36 37 |L: 0621 / 755067|
00000180: 20 20 28 50 52 49 56 2E 20 42 45 49 20 D0 49 43 | (PRIV. BEI .IC|
00000190: 4B 29 00 94 21 96 00 3B 20 20 20 20 20 20 20 20 |K)..!..; |
000001A0: 30 36 32 31 20 2F 20 32 33 35 36 37 20 20 20 28 |0621 / 23567 (|
000001B0: 38 20 42 49 53 20 31 37 20 D5 48 52 29 00 9A 21 |8 BIS 17 .HR)..!|
000001C0: A0 00 3B 00 B6 21 AA 00 3B 20 20 20 CD 41 4E 4E |..;..!..; .ANN|
000001D0: 48 45 49 4D 20 31 39 2E 30 34 2E 31 39 38 38 00 |HEIM 19.04.1988.|
000001E0: BC 21 B4 00 3B 00 D2 21 BE 00 3B 2E 4F 42 22 43 |.!..;..!..;.OB"C|
000001F0: 49 54 49 5A 45 4E 2C 50 2C 57 22 00 E0 21 C8 00 |ITIZEN,P,W"..!..|
00000200: 2E 42 41 20 24 37 39 30 30 00 FD 21 D2 00 20 4A |.BA $7900..!.. J|
00000210: 4D 50 4D 45 4E 55 45 3B 5A 55 52 20 C1 55 53 57 |MPMENUE;ZUR .USW|
00000220: 41 48 4C 42 4F 58 00 1C 22 DC 00 20 4A 4D 50 49 |AHLBOX..".. JMPI|
00000230: 4E 49 54 47 3B C9 4E 49 54 20 C7 52 41 46 49 4B |NITG;.NIT .RAFIK|
00000240: 4D 4F 44 55 53 00 3B 22 E6 00 20 4A 4D 50 44 52 |MODUS.;".. JMPDR|
00000250: 55 43 4B 5A 3B C4 52 55 43 4B 45 4E 2C 20 C7 52 |UCKZ;.RUCKEN, .R|
00000260: 41 46 49 4B 00 51 22 F0 00 20 4A 4D 50 50 41 50 |AFIK.Q".. JMPPAP|
00000270: 56 3B C6 4F 52 4D 46 45 45 44 00 79 22 FA 00 20 |V;.ORMFEED.y".. |
00000280: 4A 4D 50 49 4E 46 4F 3B C4 41 54 45 4E 20 55 45 |JMPINFO;.ATEN UE|
00000290: 42 45 52 20 C4 52 55 43 4B 45 52 54 52 45 49 42 |BER .RUCKERTREIB|
000002A0: 45 52 00 9A 22 04 01 20 4A 4D 50 44 52 55 43 4B |ER..".. JMPDRUCK|
000002B0: 3B C4 52 55 43 4B 45 4E 2C 20 CE CC D1 2D CD 4F |;.RUCKEN, ...-.O|
000002C0: 44 55 53 00 B7 22 0E 01 20 4A 4D 50 49 4E 49 54 |DUS..".. JMPINIT|
000002D0: 44 3B C9 4E 49 54 20 CE CC D1 2D CD 4F 44 55 53 |D;.NIT ...-.ODUS|
000002E0: 00 D8 22 18 01 20 4A 4D 50 4D 4F 44 3B D4 45 58 |..".. JMPMOD;.EX|
000002F0: 54 4D 4F 44 55 53 20 41 4E 20 C4 52 55 43 4B 45 |TMODUS AN .RUCKE|
00000300: 52 00 00 23 22 01 20 2E 42 59 24 34 35 2C 24 37 |R..#". .BY$45,$7|
00000310: 30 2C 24 37 33 2C 24 36 46 2C 24 36 45 2C 24 32 |0,$73,$6F,$6E,$2|
00000320: 30 2C 24 34 36 2C 24 35 38 00 18 23 2C 01 20 2E |0,$46,$58..#,. .|
00000330: 42 59 24 32 44 2C 24 33 38 2C 24 33 30 2C 24 30 |BY$2D,$38,$30,$0|
00000340: 30 00 42 23 36 01 54 41 42 45 4C 4C 45 31 20 2E |0.B#6.TABELLE1 .|
00000350: 42 59 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |BY0,0,0,0,0,0,0,|
00000360: 30 2C 30 2C 30 2C 30 2C 30 2C 30 00 54 23 40 01 |0,0,0,0,0,0.T#@.|
00000370: 4F 50 45 4E 31 20 4C 44 41 23 24 30 34 00 62 23 |OPEN1 LDA#$04.b#|
00000380: 4A 01 20 4A 53 52 24 46 46 42 31 00 6F 23 54 01 |J. JSR$FFB1.o#T.|
00000390: 20 4C 44 41 23 24 46 37 00 7D 23 5E 01 20 4A 53 | LDA#$F7.}#^. JS|
000003A0: 52 24 46 46 39 33 00 8B 23 68 01 20 4A 53 52 24 |R$FF93..#h. JSR$|
000003B0: 46 46 41 45 00 94 23 72 01 20 52 54 53 00 A6 23 |FFAE..#r. RTS..#|
000003C0: 7C 01 4F 50 45 4E 32 20 4C 44 41 23 24 30 34 00 ||.OPEN2 LDA#$04.|
000003D0: B4 23 86 01 20 4A 53 52 24 46 46 42 31 00 C1 23 |.#.. JSR$FFB1..#|
000003E0: 90 01 20 4C 44 41 23 24 45 37 00 CF 23 9A 01 20 |.. LDA#$E7..#.. |
000003F0: 4A 53 52 24 46 46 39 33 00 DD 23 A4 01 20 4A 53 |JSR$FF93..#.. JS|
00000400: 52 24 46 46 41 45 00 E6 23 AE 01 20 52 54 53 00 |R$FFAE..#.. RTS.|
00000410: F8 23 B8 01 4F 50 45 4E 33 20 4C 44 41 23 24 30 |.#..OPEN3 LDA#$0|
00000420: 34 00 06 24 C2 01 20 4A 53 52 24 46 46 42 31 00 |4..$.. JSR$FFB1.|
00000430: 13 24 CC 01 20 4C 44 41 23 24 36 37 00 21 24 D6 |.$.. LDA#$67.!$.|
00000440: 01 20 4A 53 52 24 46 46 39 33 00 2A 24 E0 01 20 |. JSR$FF93.*$.. |
00000450: 52 54 53 00 3D 24 EA 01 43 4C 4F 53 45 20 4A 53 |RTS.=$..CLOSE JS|
00000460: 52 24 46 46 41 45 00 46 24 F4 01 20 52 54 53 00 |R$FFAE.F$.. RTS.|
00000470: 62 24 FE 01 4C 45 53 45 53 43 48 4C 20 53 54 41 |b$..LESESCHL STA|
00000480: 54 41 42 45 4C 4C 45 31 2B 31 30 00 76 24 08 02 |TABELLE1+10.v$..|
00000490: 20 44 45 43 54 41 42 45 4C 4C 45 31 2B 31 30 00 | DECTABELLE1+10.|
000004A0: 8E 24 12 02 4C 45 53 32 20 4C 44 59 54 41 42 45 |.$..LES2 LDYTABE|
000004B0: 4C 4C 45 31 2B 31 30 00 9D 24 1C 02 20 4C 44 41 |LLE1+10..$.. LDA|
000004C0: 28 30 38 29 2C 59 00 AB 24 26 02 20 4A 53 52 24 |(08),Y..$&. JSR$|
000004D0: 46 46 41 38 00 BF 24 30 02 20 44 45 43 54 41 42 |FFA8..$0. DECTAB|
000004E0: 45 4C 4C 45 31 2B 31 30 00 CC 24 3A 02 20 42 50 |ELLE1+10..$:. BP|
000004F0: 4C 4C 45 53 32 00 D5 24 44 02 20 52 54 53 00 ED |LLES2..$D. RTS..|
00000500: 24 4E 02 49 4E 49 54 47 20 4A 53 52 41 4E 47 4C |$N.INITG JSRANGL|
00000510: 45 49 43 48 45 4E 00 FA 24 50 02 20 4C 44 41 23 |EICHEN..$P. LDA#|
00000520: 24 30 30 00 0E 25 58 02 20 53 54 41 54 41 42 45 |$00..%X. STATABE|
00000530: 4C 4C 45 31 2B 31 32 00 1E 25 62 02 49 4E 49 20 |LLE1+12..%b.INI |
00000540: 4C 44 41 23 24 30 34 00 2C 25 6C 02 20 4A 53 52 |LDA#$04.,%l. JSR|
00000550: 24 43 32 42 30 00 3A 25 76 02 20 4A 53 52 24 43 |$C2B0.:%v. JSR$C|
00000560: 32 35 43 00 47 25 80 02 20 4C 44 41 23 24 30 30 |25C.G%.. LDA#$00|
00000570: 00 53 25 8A 02 20 53 54 41 24 39 30 00 61 25 94 |.S%.. STA$90.a%.|
00000580: 02 20 4A 53 52 4F 50 45 4E 31 00 6D 25 9E 02 20 |. JSROPEN1.m%.. |
00000590: 4C 44 41 24 39 30 00 7C 25 A8 02 20 42 4E 45 49 |LDA$90.|%.. BNEI|
000005A0: 4E 49 54 47 32 00 8A 25 B2 02 20 4A 53 52 4F 50 |NITG2..%.. JSROP|
000005B0: 45 4E 33 00 97 25 BC 02 20 4A 53 52 4D 4F 44 44 |EN3..%.. JSRMODD|
000005C0: 00 A5 25 C6 02 20 4A 53 52 43 4C 4F 53 45 00 B3 |..%.. JSRCLOSE..|
000005D0: 25 D0 02 20 4A 53 52 50 41 55 53 45 00 C1 25 DA |%.. JSRPAUSE..%.|
000005E0: 02 20 4A 53 52 24 43 32 35 46 00 CE 25 E4 02 20 |. JSR$C25F..%.. |
000005F0: 4C 44 58 23 24 30 30 00 D7 25 EE 02 20 52 54 53 |LDX#$00..%.. RTS|
00000600: 00 E6 25 F8 02 49 4E 49 54 47 32 20 50 48 41 00 |..%..INITG2 PHA.|
00000610: F4 25 02 03 20 4A 53 52 4F 50 45 4E 32 00 02 26 |.%.. JSROPEN2..&|
00000620: 0C 03 20 4A 53 52 24 43 32 35 46 00 0B 26 16 03 |.. JSR$C25F..&..|
00000630: 20 50 4C 41 00 14 26 20 03 20 54 41 58 00 1D 26 | PLA..& . TAX..&|
00000640: 2A 03 20 52 54 53 00 2F 26 34 03 50 41 55 53 45 |*. RTS./&4.PAUSE|
00000650: 20 4C 44 58 23 24 30 30 00 3E 26 3E 03 50 31 20 | LDX#$00.>&>.P1 |
00000660: 4C 44 59 23 24 30 30 00 49 26 48 03 50 32 20 44 |LDY#$00.I&H.P2 D|
00000670: 45 59 00 54 26 52 03 20 42 4E 45 50 32 00 5D 26 |EY.T&R. BNEP2.]&|
00000680: 5C 03 20 44 45 58 00 68 26 66 03 20 42 4E 45 50 |\. DEX.h&f. BNEP|
00000690: 31 00 71 26 70 03 20 52 54 53 00 84 26 7A 03 44 |1.q&p. RTS..&z.D|
000006A0: 52 55 43 4B 5A 20 4C 44 41 23 24 30 34 00 92 26 |RUCKZ LDA#$04..&|
000006B0: 84 03 20 4A 53 52 24 43 32 42 30 00 A0 26 8E 03 |.. JSR$C2B0..&..|
000006C0: 20 4A 53 52 24 43 32 35 43 00 AE 26 98 03 20 4A | JSR$C25C..&.. J|
000006D0: 53 52 4F 50 45 4E 33 00 D6 26 9A 03 20 4C 44 41 |SROPEN3..&.. LDA|
000006E0: 46 4C 41 47 3B C6 4C 41 47 20 46 2E 20 C1 4E 5A |FLAG;.LAG F. .NZ|
000006F0: 41 48 4C 20 44 45 52 20 D3 54 52 49 4B 45 53 00 |AHL DER .TRIKES.|
00000700: E2 26 9C 03 20 42 45 51 44 52 31 00 EE 26 9E 03 |.&.. BEQDR1..&..|
00000710: 20 43 4D 50 23 30 31 00 FA 26 A0 03 20 42 45 51 | CMP#01..&.. BEQ|
00000720: 44 52 32 00 1B 27 A2 03 20 4A 53 52 44 52 55 4E |DR2..'.. JSRDRUN|
00000730: 54 3B C5 49 4E 53 50 52 55 4E 47 20 33 58 20 55 |T;.INSPRUNG 3X U|
00000740: 2E 20 34 58 00 3C 27 A4 03 20 4A 53 52 5A 56 30 |. 4X.<'.. JSRZV0|
00000750: 3B DA 45 49 4C 45 4E 56 4F 52 53 43 48 55 42 20 |;.EILENVORSCHUB |
00000760: 30 2F 32 31 36 00 5A 27 A6 03 44 52 32 20 4A 53 |0/216.Z'..DR2 JS|
00000770: 52 44 52 55 4E 54 3B C5 49 4E 53 50 52 55 4E 47 |RDRUNT;.INSPRUNG|
00000780: 20 32 58 00 7B 27 A8 03 20 4A 53 52 5A 56 31 3B | 2X.{'.. JSRZV1;|
00000790: DA 45 49 4C 45 4E 56 4F 52 53 43 48 55 42 20 31 |.EILENVORSCHUB 1|
000007A0: 2F 32 31 36 00 89 27 AA 03 20 4A 53 52 44 52 55 |/216..'.. JSRDRU|
000007B0: 4E 54 00 B4 27 AC 03 20 4C 44 41 46 4C 41 47 2B |NT..'.. LDAFLAG+|
000007C0: 31 3B C6 4C 41 47 20 45 4E 54 53 43 48 45 49 44 |1;.LAG ENTSCHEID|
000007D0: 45 54 20 31 2D 33 20 55 4E 44 20 34 58 00 D5 27 |ET 1-3 UND 4X..'|
000007E0: AE 03 20 42 45 51 44 52 55 45 4E 44 3B C5 4E 44 |.. BEQDRUEND;.ND|
000007F0: 45 20 42 45 49 20 32 58 20 55 2E 20 33 58 00 E1 |E BEI 2X U. 3X..|
00000800: 27 B0 03 20 4A 53 52 5A 56 30 00 FF 27 B2 03 44 |'.. JSRZV0..'..D|
00000810: 52 31 20 4A 53 52 44 52 55 4E 54 3B C5 49 4E 53 |R1 JSRDRUNT;.INS|
00000820: 50 52 55 4E 47 20 31 58 00 26 28 B4 03 44 52 55 |PRUNG 1X.&(..DRU|
00000830: 45 4E 44 20 4A 53 52 5A 56 3B DA 45 49 4C 45 4E |END JSRZV;.EILEN|
00000840: 56 4F 52 53 43 48 55 42 20 32 33 2F 32 31 36 00 |VORSCHUB 23/216.|
00000850: 34 28 B6 03 20 4A 53 52 43 4C 4F 53 45 00 42 28 |4(.. JSRCLOSE.B(|
00000860: B8 03 20 4A 53 52 24 43 32 35 46 00 4B 28 BA 03 |.. JSR$C25F.K(..|
00000870: 20 52 54 53 00 5C 28 BC 03 44 52 55 4E 54 20 4C | RTS.\(..DRUNT L|
00000880: 44 41 24 30 33 00 79 28 BE 03 20 53 54 41 24 30 |DA$03.y(.. STA$0|
00000890: 39 3B DA 45 49 4C 45 20 55 45 42 45 52 47 45 42 |9;.EILE UEBERGEB|
000008A0: 45 4E 00 85 28 C0 03 20 4C 44 41 24 30 32 00 91 |EN..(.. LDA$02..|
000008B0: 28 C2 03 20 53 54 41 24 30 38 00 AB 28 C4 03 20 |(.. STA$08..(.. |
000008C0: 4A 4D 50 5A 45 49 4C 45 3B 55 4E 44 20 44 52 55 |JMPZEILE;UND DRU|
000008D0: 43 4B 45 4E 00 BC 28 42 04 50 41 50 56 20 4C 44 |CKEN..(B.PAPV LD|
000008E0: 41 23 24 30 34 00 CA 28 4C 04 20 4A 53 52 24 43 |A#$04..(L. JSR$C|
000008F0: 32 42 30 00 D8 28 56 04 20 4A 53 52 24 43 32 35 |2B0..(V. JSR$C25|
00000900: 43 00 E6 28 60 04 20 4A 53 52 4F 50 45 4E 33 00 |C..(`. JSROPEN3.|
00000910: F4 28 6A 04 20 4A 53 52 53 45 49 54 45 00 02 29 |.(j. JSRSEITE..)|
00000920: 74 04 20 4A 53 52 43 4C 4F 53 45 00 10 29 7E 04 |t. JSRCLOSE..)~.|
00000930: 20 4A 53 52 4F 50 45 4E 32 00 1E 29 88 04 20 4A | JSROPEN2..).. J|
00000940: 53 52 24 43 32 35 46 00 27 29 92 04 20 52 54 53 |SR$C25F.').. RTS|
00000950: 00 38 29 9C 04 49 4E 46 4F 20 4C 44 58 23 24 35 |.8)..INFO LDX#$5|
00000960: 30 00 45 29 A6 04 20 4C 44 59 23 24 35 45 00 52 |0.E).. LDY#$5E.R|
00000970: 29 B0 04 20 4C 44 41 23 24 30 30 00 5B 29 BA 04 |).. LDA#$00.[)..|
00000980: 20 52 54 53 00 6D 29 C4 04 49 4E 49 54 44 20 4C | RTS.m)..INITD L|
00000990: 44 41 23 24 46 46 00 81 29 CE 04 20 53 54 41 54 |DA#$FF..).. STAT|
000009A0: 41 42 45 4C 4C 45 31 2B 31 32 00 8D 29 D8 04 20 |ABELLE1+12..).. |
000009B0: 4A 4D 50 49 4E 49 00 9D 29 E2 04 4D 4F 44 20 4C |JMPINI..)..MOD L|
000009C0: 44 41 23 24 30 34 00 AB 29 EC 04 20 4A 53 52 24 |DA#$04..).. JSR$|
000009D0: 43 32 42 30 00 B9 29 F6 04 20 4A 53 52 24 43 32 |C2B0..).. JSR$C2|
000009E0: 35 43 00 C7 29 00 05 20 4A 53 52 4F 50 45 4E 33 |5C..).. JSROPEN3|
000009F0: 00 DC 29 0A 05 20 4C 44 41 23 3E 28 54 41 42 45 |..).. LDA#>(TABE|
00000A00: 4C 4C 45 32 29 00 E8 29 14 05 20 53 54 41 24 30 |LLE2)..).. STA$0|
00000A10: 39 00 FD 29 1E 05 20 4C 44 41 23 3C 28 54 41 42 |9..).. LDA#<(TAB|
00000A20: 45 4C 4C 45 32 29 00 09 2A 28 05 20 53 54 41 24 |ELLE2)..*(. STA$|
00000A30: 30 38 00 23 2A 32 05 20 4C 44 41 23 24 30 36 3B |08.#*2. LDA#$06;|
00000A40: C1 4E 5A 41 48 4C 20 42 59 54 45 53 00 34 2A 3C |.NZAHL BYTES.4*<|
00000A50: 05 20 4A 53 52 4C 45 53 45 53 43 48 4C 00 42 2A |. JSRLESESCHL.B*|
00000A60: 46 05 20 4A 53 52 43 4C 4F 53 45 00 50 2A 50 05 |F. JSRCLOSE.P*P.|
00000A70: 20 4A 53 52 24 43 32 35 46 00 59 2A 5A 05 20 52 | JSR$C25F.Y*Z. R|
00000A80: 54 53 00 8F 2A 64 05 54 41 42 45 4C 4C 45 32 20 |TS..*d.TABELLE2 |
00000A90: 2E 42 59 30 2C 24 37 38 2C 24 31 42 2C 24 30 2C |.BY0,$78,$1B,$0,|
00000AA0: 24 32 31 2C 24 31 42 3B 20 CE CC D1 20 2B 20 D4 |$21,$1B; ... + .|
00000AB0: 45 58 54 4D 4F 44 55 53 00 B6 2A 6E 05 46 4C 41 |EXTMODUS..*n.FLA|
00000AC0: 47 20 2E 42 59 30 2C 30 3B C6 4C 41 47 20 46 55 |G .BY0,0;.LAG FU|
00000AD0: 45 52 20 C4 52 55 43 4B 53 54 41 45 52 4B 45 00 |ER .RUCKSTAERKE.|
00000AE0: D3 2A 78 05 44 52 55 43 4B 20 4C 44 41 23 24 30 |.*x.DRUCK LDA#$0|
00000AF0: 34 3B 20 D4 45 58 54 44 52 55 43 4B 00 E1 2A 82 |4; .EXTDRUCK..*.|
00000B00: 05 20 4A 53 52 24 43 32 42 30 00 EF 2A 8C 05 20 |. JSR$C2B0..*.. |
00000B10: 4A 53 52 24 43 32 35 43 00 FD 2A 96 05 20 4A 53 |JSR$C25C..*.. JS|
00000B20: 52 4F 50 45 4E 33 00 0E 2B A0 05 44 52 55 31 20 |ROPEN3..+..DRU1 |
00000B30: 4C 44 59 23 24 30 30 00 2F 2B AA 05 20 4C 44 41 |LDY#$00./+.. LDA|
00000B40: 28 24 30 32 29 2C 59 3B C2 55 43 48 53 54 41 42 |($02),Y;.UCHSTAB|
00000B50: 45 4E 20 48 4F 4C 45 4E 00 54 2B B4 05 20 42 45 |EN HOLEN.T+.. BE|
00000B60: 51 44 52 55 43 4B 45 4E 44 3B 47 4C 45 49 43 48 |QDRUCKEND;GLEICH|
00000B70: 20 30 2C 20 44 41 4E 4E 20 C5 4E 44 45 00 75 2B | 0, DANN .NDE.u+|
00000B80: BE 05 20 4C 44 58 23 31 32 3B 4D 49 54 20 44 45 |.. LDX#12;MIT DE|
00000B90: 4E 20 31 32 20 C2 59 54 45 53 20 44 45 52 00 A3 |N 12 .YTES DER..|
00000BA0: 2B C8 05 44 52 55 34 20 43 4D 50 55 54 41 42 2C |+..DRU4 CMPUTAB,|
00000BB0: 58 3B CB 4F 4E 56 45 52 54 49 45 52 55 4E 47 53 |X;.ONVERTIERUNGS|
00000BC0: 54 41 42 45 4C 4C 45 20 55 54 41 42 00 CE 2B D2 |TABELLE UTAB..+.|
00000BD0: 05 20 42 4E 45 44 52 55 35 3B 56 45 52 47 4C 45 |. BNEDRU5;VERGLE|
00000BE0: 49 43 48 45 4E 20 55 4E 44 20 47 45 47 42 45 4E |ICHEN UND GEGBEN|
00000BF0: 45 4E 46 41 4C 4C 53 00 F8 2B DC 05 20 4C 44 41 |ENFALLS..+.. LDA|
00000C00: 55 54 41 42 32 2C 58 3B 4E 45 55 45 4E 20 C2 55 |UTAB2,X;NEUEN .U|
00000C10: 43 48 54 41 42 45 4E 43 4F 44 45 20 4C 41 44 45 |CHTABENCODE LADE|
00000C20: 4E 00 20 2C E6 05 20 42 4E 45 44 52 55 33 3B 20 |N. ,.. BNEDRU3; |
00000C30: 55 4E 42 45 44 2E 20 D3 50 52 55 4E 47 20 5A 55 |UNBED. .PRUNG ZU|
00000C40: 52 20 C1 55 53 47 41 42 45 00 26 2C F0 05 3B 00 |R .USGABE.&,..;.|
00000C50: 40 2C FA 05 44 52 55 35 20 44 45 58 3B 58 20 56 |@,..DRU5 DEX;X V|
00000C60: 45 52 4D 49 4E 44 45 52 4E 00 6B 2C 04 06 20 42 |ERMINDERN.k,.. B|
00000C70: 50 4C 44 52 55 34 3B 58 3E 3D 30 2C 20 44 41 4E |PLDRU4;X>=0, DAN|
00000C80: 4E 20 57 45 49 54 45 52 20 56 45 52 47 4C 45 49 |N WEITER VERGLEI|
00000C90: 43 48 45 4E 00 8E 2C 0E 06 20 43 4D 50 23 24 34 |CHEN..,.. CMP#$4|
00000CA0: 31 3B 41 4C 4C 47 45 4D 45 49 4E 45 20 C7 45 4F |1;ALLGEMEINE .EO|
00000CB0: 53 20 2D 20 C3 C2 CD 00 A6 2C 18 06 20 42 43 43 |S - .....,.. BCC|
00000CC0: 44 52 55 33 3B D5 4D 57 41 4E 44 4C 55 4E 47 00 |DRU3;.MWANDLUNG.|
00000CD0: B3 2C 22 06 20 43 4D 50 23 24 37 42 00 C0 2C 2C |.,". CMP#$7B..,,|
00000CE0: 06 20 42 43 53 44 52 55 33 00 CD 2C 36 06 20 45 |. BCSDRU3..,6. E|
00000CF0: 4F 52 23 24 32 30 00 F3 2C 40 06 44 52 55 33 20 |OR#$20..,@.DRU3 |
00000D00: 4A 53 52 24 46 46 41 38 3B C2 55 43 48 53 54 41 |JSR$FFA8;.UCHSTA|
00000D10: 42 45 4E 20 41 55 53 47 45 42 45 4E 00 FF 2C 4A |BEN AUSGEBEN..,J|
00000D20: 06 20 49 4E 43 24 30 32 00 0C 2D 54 06 20 42 4E |. INC$02..-T. BN|
00000D30: 45 44 52 55 32 00 18 2D 5E 06 20 49 4E 43 24 30 |EDRU2..-^. INC$0|
00000D40: 33 00 29 2D 68 06 44 52 55 32 20 4A 4D 50 44 52 |3.)-h.DRU2 JMPDR|
00000D50: 55 31 00 66 2D 72 06 3B 20 20 20 20 20 20 20 20 |U1.f-r.; |
00000D60: 20 55 54 41 42 20 55 4E 44 20 55 54 41 42 32 20 | UTAB UND UTAB2 |
00000D70: 53 49 4E 44 20 44 49 45 20 CB 4F 4E 56 45 52 54 |SIND DIE .ONVERT|
00000D80: 49 45 52 55 4E 47 53 54 41 42 45 4C 4C 45 4E 00 |IERUNGSTABELLEN.|
00000D90: 90 2D 7C 06 3B 20 20 20 20 20 20 20 20 20 46 55 |.-|.; FU|
00000DA0: 45 52 20 44 49 45 20 44 45 55 54 53 43 48 45 4E |ER DIE DEUTSCHEN|
00000DB0: 20 D5 4D 4C 41 55 54 45 2E 00 D0 2D 86 06 55 54 | .MLAUTE...-..UT|
00000DC0: 41 42 20 2E 42 59 24 38 34 2C 24 39 34 2C 24 38 |AB .BY$84,$94,$8|
00000DD0: 31 2C 24 45 31 2C 24 38 45 2C 24 39 39 2C 24 39 |1,$E1,$8E,$99,$9|
00000DE0: 41 2C 24 45 42 2C 24 36 30 2C 24 35 45 2C 24 35 |A,$EB,$60,$5E,$5|
00000DF0: 42 2C 24 35 43 2C 24 35 44 00 11 2E 90 06 55 54 |B,$5C,$5D.....UT|
00000E00: 41 42 32 20 2E 42 59 24 37 42 2C 24 37 43 2C 24 |AB2 .BY$7B,$7C,$|
00000E10: 37 44 2C 24 37 45 2C 24 35 42 2C 24 35 43 2C 24 |7D,$7E,$5B,$5C,$|
00000E20: 35 44 2C 24 34 30 2C 24 36 30 2C 24 35 45 2C 24 |5D,$40,$60,$5E,$|
00000E30: 35 42 2C 24 35 43 2C 24 35 44 00 17 2E 9A 06 3B |5B,$5C,$5D.....;|
00000E40: 00 2D 2E A4 06 44 52 55 43 4B 45 4E 44 20 4A 53 |.-...DRUCKEND JS|
00000E50: 52 43 4C 4F 53 45 00 3B 2E AE 06 20 4A 53 52 24 |RCLOSE.;... JSR$|
00000E60: 43 32 35 46 00 44 2E B8 06 20 52 54 53 00 55 2E |C25F.D... RTS.U.|
00000E70: C2 06 5A 45 49 4C 45 20 4C 44 41 24 30 39 00 5E |..ZEILE LDA$09.^|
00000E80: 2E CC 06 20 50 48 41 00 6A 2E D6 06 20 4C 44 41 |... PHA.j... LDA|
00000E90: 24 30 38 00 73 2E E0 06 20 50 48 41 00 82 2E EA |$08.s... PHA....|
00000EA0: 06 20 4A 53 52 5A 45 49 4C 45 32 00 91 2E F4 06 |. JSRZEILE2.....|
00000EB0: 20 42 43 53 5A 45 49 4C 45 33 00 9A 2E FE 06 20 | BCSZEILE3..... |
00000EC0: 50 4C 41 00 A6 2E 08 07 20 53 54 41 24 30 38 00 |PLA..... STA$08.|
00000ED0: AF 2E 12 07 20 50 4C 41 00 BB 2E 1C 07 20 53 54 |.... PLA..... ST|
00000EE0: 41 24 30 39 00 C4 2E 26 07 20 52 54 53 00 D7 2E |A$09...&. RTS...|
00000EF0: 30 07 5A 45 49 4C 45 33 20 4A 53 52 47 4D 4F 44 |0.ZEILE3 JSRGMOD|
00000F00: 00 E0 2E 3A 07 20 50 4C 41 00 EC 2E 44 07 20 53 |...:. PLA...D. S|
00000F10: 54 41 24 30 38 00 F5 2E 4E 07 20 50 4C 41 00 01 |TA$08...N. PLA..|
00000F20: 2F 58 07 20 53 54 41 24 30 39 00 0E 2F 62 07 20 |/X. STA$09../b. |
00000F30: 4C 44 41 23 24 35 30 00 17 2F 6C 07 20 53 45 43 |LDA#$50../l. SEC|
00000F40: 00 2B 2F 76 07 20 53 42 43 54 41 42 45 4C 4C 45 |.+/v. SBCTABELLE|
00000F50: 31 2B 31 31 00 34 2F 80 07 20 54 41 58 00 41 2F |1+11.4/.. TAX.A/|
00000F60: 8A 07 5A 45 49 31 20 54 58 41 00 4A 2F 94 07 20 |..ZEI1 TXA.J/.. |
00000F70: 50 48 41 00 58 2F 9E 07 20 4A 53 52 52 45 43 48 |PHA.X/.. JSRRECH|
00000F80: 4E 00 65 2F A8 07 20 4A 53 52 41 55 53 47 00 6E |N.e/.. JSRAUSG.n|
00000F90: 2F B2 07 20 43 4C 43 00 7B 2F BC 07 20 4C 44 41 |/.. CLC.{/.. LDA|
00000FA0: 23 24 30 38 00 87 2F C6 07 20 41 44 43 24 30 38 |#$08../.. ADC$08|
00000FB0: 00 93 2F D0 07 20 53 54 41 24 30 38 00 A0 2F DA |../.. STA$08../.|
00000FC0: 07 20 4C 44 41 23 24 30 30 00 AC 2F E4 07 20 41 |. LDA#$00../.. A|
00000FD0: 44 43 24 30 39 00 B8 2F EE 07 20 53 54 41 24 30 |DC$09../.. STA$0|
00000FE0: 39 00 C1 2F F8 07 20 50 4C 41 00 CA 2F 02 08 20 |9../.. PLA../.. |
00000FF0: 54 41 58 00 D3 2F 0C 08 20 44 45 58 00 E0 2F 16 |TAX../.. DEX../.|
00001000: 08 20 42 4E 45 5A 45 49 31 00 E9 2F 20 08 20 52 |. BNEZEI1../ . R|
00001010: 54 53 00 FC 2F 2A 08 5A 45 49 4C 45 32 20 4C 44 |TS../*.ZEILE2 LD|
00001020: 41 23 24 30 30 00 10 30 34 08 20 53 54 41 54 41 |A#$00..04. STATA|
00001030: 42 45 4C 4C 45 31 2B 31 31 00 1D 30 3E 08 20 4C |BELLE1+11..0>. L|
00001040: 44 58 23 24 30 37 00 31 30 48 08 20 53 54 58 54 |DX#$07.10H. STXT|
00001050: 41 42 45 4C 4C 45 31 2B 31 30 00 3A 30 52 08 20 |ABELLE1+10.:0R. |
00001060: 43 4C 43 00 47 30 5C 08 20 4C 44 41 23 24 37 38 |CLC.G0\. LDA#$78|
00001070: 00 53 30 66 08 20 41 44 43 24 30 38 00 5F 30 70 |.S0f. ADC$08._0p|
00001080: 08 20 53 54 41 24 30 38 00 6C 30 7A 08 20 4C 44 |. STA$08.l0z. LD|
00001090: 41 23 24 30 32 00 78 30 84 08 20 41 44 43 24 30 |A#$02.x0.. ADC$0|
000010A0: 39 00 84 30 8E 08 20 53 54 41 24 30 39 00 91 30 |9..0.. STA$09..0|
000010B0: 98 08 20 4C 44 58 23 24 35 30 00 A9 30 A2 08 5A |.. LDX#$50..0..Z|
000010C0: 45 49 33 20 4C 44 59 54 41 42 45 4C 4C 45 31 2B |EI3 LDYTABELLE1+|
000010D0: 31 30 00 BD 30 AC 08 5A 45 49 32 20 4C 44 41 28 |10..0..ZEI2 LDA(|
000010E0: 24 30 38 29 2C 59 00 CC 30 B6 08 20 42 4E 45 5A |$08),Y..0.. BNEZ|
000010F0: 45 49 4C 45 34 00 D5 30 C0 08 20 44 45 59 00 E2 |EILE4..0.. DEY..|
00001100: 30 CA 08 20 42 50 4C 5A 45 49 32 00 EB 30 D4 08 |0.. BPLZEI2..0..|
00001110: 20 53 45 43 00 F7 30 DE 08 20 4C 44 41 24 30 38 | SEC..0.. LDA$08|
00001120: 00 04 31 E8 08 20 53 42 43 23 24 30 38 00 10 31 |..1.. SBC#$08..1|
00001130: F2 08 20 53 54 41 24 30 38 00 1C 31 FC 08 20 4C |.. STA$08..1.. L|
00001140: 44 41 24 30 39 00 29 31 06 09 20 53 42 43 23 24 |DA$09.)1.. SBC#$|
00001150: 30 30 00 35 31 10 09 20 53 54 41 24 30 39 00 49 |00.51.. STA$09.I|
00001160: 31 1A 09 20 49 4E 43 54 41 42 45 4C 4C 45 31 2B |1.. INCTABELLE1+|
00001170: 31 31 00 52 31 24 09 20 44 45 58 00 5F 31 2E 09 |11.R1$. DEX._1..|
00001180: 20 42 4E 45 5A 45 49 33 00 68 31 38 09 20 43 4C | BNEZEI3.h18. CL|
00001190: 43 00 71 31 42 09 20 52 54 53 00 80 31 4C 09 5A |C.q1B. RTS..1L.Z|
000011A0: 45 49 4C 45 34 20 53 45 43 00 89 31 56 09 20 52 |EILE4 SEC..1V. R|
000011B0: 54 53 00 A1 31 60 09 4D 4F 44 44 20 42 49 54 54 |TS..1`.MODD BITT|
000011C0: 41 42 45 4C 4C 45 31 2B 31 32 00 AE 31 6A 09 20 |ABELLE1+12..1j. |
000011D0: 42 4D 49 4D 4F 44 47 00 C3 31 74 09 20 4C 44 41 |BMIMODG..1t. LDA|
000011E0: 23 3E 28 54 41 42 45 4C 4C 45 33 29 00 CF 31 7E |#>(TABELLE3)..1~|
000011F0: 09 20 53 54 41 24 30 39 00 E4 31 88 09 20 4C 44 |. STA$09..1.. LD|
00001200: 41 23 3C 28 54 41 42 45 4C 4C 45 33 29 00 F0 31 |A#<(TABELLE3)..1|
00001210: 92 09 20 53 54 41 24 30 38 00 FD 31 9C 09 20 4C |.. STA$08..1.. L|
00001220: 44 41 23 24 30 35 00 0E 32 A6 09 20 4A 4D 50 4C |DA#$05..2.. JMPL|
00001230: 45 53 45 53 43 48 4C 00 27 32 B0 09 4D 4F 44 47 |ESESCHL.'2..MODG|
00001240: 20 4C 44 41 23 3E 28 54 41 42 45 4C 4C 45 34 29 | LDA#>(TABELLE4)|
00001250: 00 33 32 BA 09 20 53 54 41 24 30 39 00 48 32 C4 |.32.. STA$09.H2.|
00001260: 09 20 4C 44 41 23 3C 28 54 41 42 45 4C 4C 45 34 |. LDA#<(TABELLE4|
00001270: 29 00 54 32 CE 09 20 53 54 41 24 30 38 00 61 32 |).T2.. STA$08.a2|
00001280: D8 09 20 4C 44 41 23 24 30 34 00 72 32 E2 09 20 |.. LDA#$04.r2.. |
00001290: 4A 4D 50 4C 45 53 45 53 43 48 4C 00 A7 32 EC 09 |JMPLESESCHL..2..|
000012A0: 54 41 42 45 4C 4C 45 33 20 2E 42 59 24 31 37 2C |TABELLE3 .BY$17,|
000012B0: 24 33 33 2C 24 31 42 2C 24 34 30 2C 24 31 42 3B |$33,$1B,$40,$1B;|
000012C0: C9 4E 49 54 20 C7 52 41 46 49 4B 4D 4F 44 55 53 |.NIT .RAFIKMODUS|
000012D0: 00 D7 32 F6 09 54 41 42 45 4C 4C 45 33 41 20 2E |..2..TABELLE3A .|
000012E0: 42 59 30 2C 24 33 33 2C 24 31 42 3B DA 45 49 4C |BY0,$33,$1B;.EIL|
000012F0: 45 4E 56 4F 52 53 43 48 55 42 20 30 2F 32 31 36 |ENVORSCHUB 0/216|
00001300: 00 0F 33 FB 09 54 41 42 45 4C 4C 45 33 42 20 2E |..3..TABELLE3B .|
00001310: 42 59 30 2C 24 33 33 2C 24 31 42 3B DA 45 49 4C |BY0,$33,$1B;.EIL|
00001320: 45 4E 56 4F 52 53 43 48 55 42 20 31 2F 32 31 36 |ENVORSCHUB 1/216|
00001330: 28 4E 55 52 20 C8 D1 29 00 42 33 00 0A 54 41 42 |(NUR ..).B3..TAB|
00001340: 45 4C 4C 45 34 20 2E 42 59 24 33 32 2C 24 31 42 |ELLE4 .BY$32,$1B|
00001350: 2C 24 34 30 2C 24 31 42 3B C9 4E 49 54 20 CE CC |,$40,$1B;.NIT ..|
00001360: D1 20 55 4E 44 20 C4 52 41 46 54 00 67 33 0A 0A |. UND .RAFT.g3..|
00001370: 47 4D 4F 44 20 4C 44 41 23 24 30 30 3B C4 52 55 |GMOD LDA#$00;.RU|
00001380: 43 4B 57 45 47 4F 50 54 49 4D 49 45 52 55 4E 47 |CKWEGOPTIMIERUNG|
00001390: 00 73 33 14 0A 20 53 54 41 24 30 39 00 87 33 1E |.s3.. STA$09..3.|
000013A0: 0A 20 4C 44 41 54 41 42 45 4C 4C 45 31 2B 31 31 |. LDATABELLE1+11|
000013B0: 00 AF 33 28 0A 20 53 54 41 24 30 38 3B 48 49 45 |..3(. STA$08;HIE|
000013C0: 52 20 57 45 52 44 45 4E 20 CC 45 45 52 53 43 48 |R WERDEN .EERSCH|
000013D0: 52 49 54 54 45 20 41 4D 00 CC 33 32 0A 20 41 53 |RITTE AM..32. AS|
000013E0: 4C 24 30 38 3B C5 4E 44 45 20 4A 45 44 45 52 20 |L$08;.NDE JEDER |
000013F0: DA 45 49 4C 45 00 F2 33 3C 0A 20 52 4F 4C 24 30 |.EILE..3<. ROL$0|
00001400: 39 3B 56 4F 4D 20 C7 52 41 46 49 4B 4D 4F 44 55 |9;VOM .RAFIKMODU|
00001410: 53 20 41 42 47 45 5A 4F 47 45 4E 00 FE 33 46 0A |S ABGEZOGEN..3F.|
00001420: 20 41 53 4C 24 30 38 00 0A 34 50 0A 20 52 4F 4C | ASL$08..4P. ROL|
00001430: 24 30 39 00 16 34 5A 0A 20 41 53 4C 24 30 38 00 |$09..4Z. ASL$08.|
00001440: 22 34 64 0A 20 52 4F 4C 24 30 39 00 46 34 6E 0A |"4d. ROL$09.F4n.|
00001450: 4E 45 55 20 2E 42 59 24 45 41 2C 24 45 41 3B 52 |NEU .BY$EA,$EA;R|
00001460: 41 55 4D 20 46 2E 20 48 51 2D 4D 4F 44 55 53 00 |AUM F. HQ-MODUS.|
00001470: 73 34 78 0A 20 2E 42 59 24 45 41 2C 24 45 41 3B |s4x. .BY$EA,$EA;|
00001480: 48 49 45 52 20 57 49 52 44 20 42 45 49 20 C1 55 |HIER WIRD BEI .U|
00001490: 53 57 41 48 4C 20 56 4F 4E 20 C8 D1 00 95 34 82 |SWAHL VON ....4.|
000014A0: 0A 20 2E 42 59 24 45 41 2C 24 45 41 3B 44 49 45 |. .BY$EA,$EA;DIE|
000014B0: 20 D2 4F 55 54 49 4E 45 20 4E 45 55 50 4C 00 B0 | .OUTINE NEUPL..|
000014C0: 34 8C 0A 20 2E 42 59 24 45 41 2C 24 45 41 3B 45 |4.. .BY$EA,$EA;E|
000014D0: 49 4E 47 45 46 55 45 47 54 00 BC 34 96 0A 20 2E |INGEFUEGT..4.. .|
000014E0: 42 59 24 45 41 00 C8 34 A0 0A 20 2E 42 59 24 45 |BY$EA..4.. .BY$E|
000014F0: 41 00 D8 34 AA 0A 20 2E 42 59 24 45 41 2C 24 45 |A..4.. .BY$EA,$E|
00001500: 41 00 E8 34 B4 0A 20 2E 42 59 24 45 41 2C 24 45 |A..4.. .BY$EA,$E|
00001510: 41 00 F4 34 BE 0A 20 2E 42 59 24 45 41 00 04 35 |A..4.. .BY$EA..5|
00001520: C8 0A 20 2E 42 59 24 45 41 2C 24 45 41 00 14 35 |.. .BY$EA,$EA..5|
00001530: D2 0A 20 2E 42 59 24 45 41 2C 24 45 41 00 1D 35 |.. .BY$EA,$EA..5|
00001540: DC 0A 20 53 45 43 00 2A 35 E6 0A 20 4C 44 41 23 |.. SEC.*5.. LDA#|
00001550: 24 38 30 00 36 35 F0 0A 20 53 42 43 24 30 38 00 |$80.65.. SBC$08.|
00001560: 49 35 FA 0A 20 53 54 41 54 41 42 45 4C 4C 45 35 |I5.. STATABELLE5|
00001570: 2B 31 00 66 35 04 0B 4E 45 55 31 20 4C 44 41 23 |+1.f5..NEU1 LDA#|
00001580: 24 30 32 3B 42 45 49 20 C8 D1 20 23 24 30 37 00 |$02;BEI .. #$07.|
00001590: 72 35 0E 0B 20 53 42 43 24 30 39 00 83 35 18 0B |r5.. SBC$09..5..|
000015A0: 20 53 54 41 54 41 42 45 4C 4C 45 35 00 98 35 22 | STATABELLE5..5"|
000015B0: 0B 20 4C 44 41 23 3E 28 54 41 42 45 4C 4C 45 35 |. LDA#>(TABELLE5|
000015C0: 29 00 A4 35 2C 0B 20 53 54 41 24 30 39 00 B9 35 |)..5,. STA$09..5|
000015D0: 36 0B 20 4C 44 41 23 3C 28 54 41 42 45 4C 4C 45 |6. LDA#<(TABELLE|
000015E0: 35 29 00 C5 35 40 0B 20 53 54 41 24 30 38 00 D2 |5)..5@. STA$08..|
000015F0: 35 4A 0B 20 4C 44 41 23 24 30 35 00 E3 35 54 0B |5J. LDA#$05..5T.|
00001600: 20 4A 4D 50 4C 45 53 45 53 43 48 4C 00 1E 36 5E | JMPLESESCHL..6^|
00001610: 0B 54 41 42 45 4C 4C 45 35 20 2E 42 59 30 32 2C |.TABELLE5 .BY02,|
00001620: 24 38 30 2C 30 34 2C 24 32 41 2C 24 31 42 3B 42 |$80,04,$2A,$1B;B|
00001630: 45 49 20 C8 D1 20 30 37 2C 24 38 30 2C 30 33 2C |EI .. 07,$80,03,|
00001640: 24 32 41 2C 24 31 42 00 2F 36 68 0B 41 55 53 47 |$2A,$1B./6h.AUSG|
00001650: 20 4C 44 58 23 24 30 30 00 3C 36 72 0B 41 55 53 | LDX#$00.<6r.AUS|
00001660: 31 20 54 58 41 00 45 36 7C 0B 20 50 48 41 00 58 |1 TXA.E6|. PHA.X|
00001670: 36 86 0B 20 4C 44 41 54 41 42 45 4C 4C 45 31 2C |6.. LDATABELLE1,|
00001680: 58 00 66 36 90 0B 20 4A 53 52 24 46 46 41 38 00 |X.f6.. JSR$FFA8.|
00001690: 92 36 9A 0B 4E 45 55 32 20 2E 42 59 24 45 41 2C |.6..NEU2 .BY$EA,|
000016A0: 24 45 41 2C 24 45 41 3B 20 D2 41 55 4D 20 46 55 |$EA,$EA; .AUM FU|
000016B0: 45 52 20 C8 D1 2D CD 4F 44 55 53 00 B4 36 A4 0B |ER ..-.ODUS..6..|
000016C0: 20 2E 42 59 24 45 41 2C 24 45 41 2C 24 45 41 3B | .BY$EA,$EA,$EA;|
000016D0: 20 32 2A 20 4A 53 52 20 24 46 46 41 38 00 BD 36 | 2* JSR $FFA8..6|
000016E0: AE 0B 20 50 4C 41 00 C6 36 B8 0B 20 54 41 58 00 |.. PLA..6.. TAX.|
000016F0: CF 36 C2 0B 20 49 4E 58 00 DC 36 CC 0B 20 43 50 |.6.. INX..6.. CP|
00001700: 58 23 24 30 38 00 E9 36 D6 0B 20 42 4E 45 41 55 |X#$08..6.. BNEAU|
00001710: 53 31 00 F2 36 E0 0B 20 52 54 53 00 1D 37 EA 0B |S1..6.. RTS..7..|
00001720: 5A 56 20 4C 44 41 23 3E 28 54 41 42 45 4C 4C 45 |ZV LDA#>(TABELLE|
00001730: 33 29 3B 20 DA 45 49 4C 45 4E 56 4F 52 53 43 48 |3); .EILENVORSCH|
00001740: 55 42 20 41 55 53 00 3B 37 F4 0B 20 53 54 41 24 |UB AUS.;7.. STA$|
00001750: 30 39 3B D4 41 42 45 4C 4C 45 33 20 28 32 33 2F |09;.ABELLE3 (23/|
00001760: 32 31 36 29 00 5A 37 FE 0B 20 4C 44 41 23 3C 28 |216).Z7.. LDA#<(|
00001770: 54 41 42 45 4C 4C 45 33 29 3B 20 41 55 53 47 45 |TABELLE3); AUSGE|
00001780: 42 45 4E 00 66 37 08 0C 20 53 54 41 24 30 38 00 |BEN.f7.. STA$08.|
00001790: 73 37 12 0C 20 4C 44 41 23 24 30 33 00 84 37 1C |s7.. LDA#$03..7.|
000017A0: 0C 20 4A 53 52 4C 45 53 45 53 43 48 4C 00 91 37 |. JSRLESESCHL..7|
000017B0: 26 0C 20 4C 44 41 23 24 30 44 00 9F 37 30 0C 20 |&. LDA#$0D..70. |
000017C0: 4A 53 52 24 46 46 41 38 00 A8 37 3A 0C 20 52 54 |JSR$FFA8..7:. RT|
000017D0: 53 00 D1 37 44 0C 5A 56 30 20 4C 44 41 23 3E 28 |S..7D.ZV0 LDA#>(|
000017E0: 54 41 42 45 4C 4C 45 33 41 29 3B 20 DA 45 49 4C |TABELLE3A); .EIL|
000017F0: 45 4E 56 4F 52 53 43 48 55 42 00 ED 37 4E 0C 20 |ENVORSCHUB..7N. |
00001800: 53 54 41 24 30 39 3B 20 30 2F 32 31 36 20 41 55 |STA$09; 0/216 AU|
00001810: 53 47 45 42 45 4E 00 03 38 58 0C 20 4C 44 41 23 |SGEBEN..8X. LDA#|
00001820: 3C 28 54 41 42 45 4C 4C 45 33 41 29 00 0F 38 62 |<(TABELLE3A)..8b|
00001830: 0C 20 53 54 41 24 30 38 00 1C 38 6C 0C 20 4C 44 |. STA$08..8l. LD|
00001840: 41 23 24 30 33 00 2D 38 76 0C 20 4A 53 52 4C 45 |A#$03.-8v. JSRLE|
00001850: 53 45 53 43 48 4C 00 3A 38 80 0C 20 4C 44 41 23 |SESCHL.:8.. LDA#|
00001860: 24 30 44 00 48 38 8A 0C 20 4A 53 52 24 46 46 41 |$0D.H8.. JSR$FFA|
00001870: 38 00 51 38 94 0C 20 52 54 53 00 7A 38 95 0C 5A |8.Q8.. RTS.z8..Z|
00001880: 56 31 20 4C 44 41 23 3E 28 54 41 42 45 4C 4C 45 |V1 LDA#>(TABELLE|
00001890: 33 42 29 3B 20 DA 45 49 4C 45 4E 56 4F 52 53 43 |3B); .EILENVORSC|
000018A0: 48 55 42 00 96 38 96 0C 20 53 54 41 24 30 39 3B |HUB..8.. STA$09;|
000018B0: 20 31 2F 32 31 36 20 41 55 53 47 45 42 45 4E 00 | 1/216 AUSGEBEN.|
000018C0: AC 38 97 0C 20 4C 44 41 23 3C 28 54 41 42 45 4C |.8.. LDA#<(TABEL|
000018D0: 4C 45 33 42 29 00 B8 38 98 0C 20 53 54 41 24 30 |LE3B)..8.. STA$0|
000018E0: 38 00 C5 38 99 0C 20 4C 44 41 23 24 30 33 00 D6 |8..8.. LDA#$03..|
000018F0: 38 9A 0C 20 4A 53 52 4C 45 53 45 53 43 48 4C 00 |8.. JSRLESESCHL.|
00001900: E3 38 9B 0C 20 4C 44 41 23 24 30 44 00 F1 38 9C |.8.. LDA#$0D..8.|
00001910: 0C 20 4A 53 52 24 46 46 41 38 00 FA 38 9D 0C 20 |. JSR$FFA8..8.. |
00001920: 52 54 53 00 1E 39 9E 0C 53 45 49 54 45 20 4C 44 |RTS..9..SEITE LD|
00001930: 41 23 24 30 43 3B C6 4F 52 4D 46 45 45 44 20 41 |A#$0C;.ORMFEED A|
00001940: 55 53 47 45 42 45 4E 00 2C 39 A8 0C 20 4A 53 52 |USGEBEN.,9.. JSR|
00001950: 24 46 46 41 38 00 35 39 B2 0C 20 52 54 53 00 43 |$FFA8.59.. RTS.C|
00001960: 39 BC 0C 52 45 43 48 4E 20 53 45 49 00 50 39 C6 |9..RECHN SEI.P9.|
00001970: 0C 20 4C 44 59 23 24 30 37 00 65 39 D0 0C 52 45 |. LDY#$07.e9..RE|
00001980: 43 48 32 20 4C 44 41 28 24 30 38 29 2C 59 00 72 |CH2 LDA($08),Y.r|
00001990: 39 DA 0C 20 4C 44 58 23 24 30 37 00 80 39 E4 0C |9.. LDX#$07..9..|
000019A0: 52 45 43 48 31 20 52 4F 52 00 93 39 EE 0C 20 52 |RECH1 ROR..9.. R|
000019B0: 4F 52 54 41 42 45 4C 4C 45 31 2C 58 00 9C 39 F8 |ORTABELLE1,X..9.|
000019C0: 0C 20 44 45 58 00 AA 39 02 0D 20 42 50 4C 52 45 |. DEX..9.. BPLRE|
000019D0: 43 48 31 00 B3 39 0C 0D 20 44 45 59 00 C1 39 16 |CH1..9.. DEY..9.|
000019E0: 0D 20 42 50 4C 52 45 43 48 32 00 CA 39 20 0D 20 |. BPLRECH2..9 . |
000019F0: 43 4C 49 00 D3 39 2A 0D 20 52 54 53 00 05 3A 34 |CLI..9*. RTS..:4|
00001A00: 0D 4D 45 4E 55 45 20 4C 44 41 23 3C 28 4D 45 4E |.MENUE LDA#<(MEN|
00001A10: 54 41 42 29 3B 20 C1 44 52 45 53 53 45 20 44 45 |TAB); .DRESSE DE|
00001A20: 52 20 D4 41 42 45 4C 4C 45 20 46 55 45 52 00 27 |R .ABELLE FUER.'|
00001A30: 3A 3E 0D 20 53 54 41 24 30 32 3B 20 C4 49 41 4C |:>. STA$02; .IAL|
00001A40: 4F 47 42 4F 58 20 55 45 42 45 52 47 45 42 45 4E |OGBOX UEBERGEBEN|
00001A50: 00 3A 3A 48 0D 20 4C 44 41 23 3E 28 4D 45 4E 54 |.::H. LDA#>(MENT|
00001A60: 41 42 29 00 46 3A 52 0D 20 53 54 41 24 30 33 00 |AB).F:R. STA$03.|
00001A70: 5C 3A 5C 0D 20 4A 53 52 24 43 32 35 36 3B 44 49 |\:\. JSR$C256;DI|
00001A80: 41 4C 42 4F 58 00 65 3A 66 0D 20 52 54 53 00 6B |ALBOX.e:f. RTS.k|
00001A90: 3A 70 0D 3B 00 85 3A 7A 0D 4D 45 4E 54 41 42 20 |:p.;..:z.MENTAB |
00001AA0: 2E 42 59 24 30 31 3B 4D 55 53 54 45 52 31 00 BC |.BY$01;MUSTER1..|
00001AB0: 3A 84 0D 3B 20 20 20 20 20 20 20 20 20 20 20 20 |:..; |
00001AC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001AD0: D0 4F 53 49 54 49 4F 4E 20 44 45 53 20 C6 45 4E |.OSITION DES .EN|
00001AE0: 53 54 45 52 53 00 D8 3A 8E 0D 20 2E 42 59 34 32 |STERS..:.. .BY42|
00001AF0: 2C 31 33 37 2C 36 34 2C 30 30 2C 32 35 35 2C 30 |,137,64,00,255,0|
00001B00: 30 00 EC 3A 98 0D 20 2E 42 59 24 30 31 3B 4F 4B |0..:.. .BY$01;OK|
00001B10: 2D 46 45 4C 44 00 F9 3A A2 0D 20 2E 42 59 39 2C |-FELD..:.. .BY9,|
00001B20: 37 35 00 15 3B AC 0D 20 2E 42 59 24 30 42 3B D4 |75..;.. .BY$0B;.|
00001B30: 45 58 54 27 CE CC D1 2D CD CF C4 D5 D3 27 00 2D |EXT'...-.....'.-|
00001B40: 3B B6 0D 20 2E 42 59 35 2C 31 32 3B CB 4F 4F 52 |;.. .BY5,12;.OOR|
00001B50: 44 49 4E 41 54 45 00 46 3B C0 0D 20 2E 57 4F 4E |DINATE.F;.. .WON|
00001B60: 4D 4F 44 3B D4 41 42 45 4C 4C 45 4E 41 44 52 00 |MOD;.ABELLENADR.|
00001B70: 57 3B CA 0D 20 2E 42 59 24 30 42 3B D4 45 58 54 |W;.. .BY$0B;.EXT|
00001B80: 00 65 3B D4 0D 20 2E 42 59 33 31 2C 33 30 00 74 |.e;.. .BY31,30.t|
00001B90: 3B DE 0D 20 2E 57 4F 4B 55 52 53 49 56 00 85 3B |;.. .WOKURSIV..;|
00001BA0: E8 0D 20 2E 42 59 24 30 42 3B D4 45 58 54 00 93 |.. .BY$0B;.EXT..|
00001BB0: 3B F2 0D 20 2E 42 59 33 31 2C 34 38 00 A0 3B FC |;.. .BY31,48..;.|
00001BC0: 0D 20 2E 57 4F 46 45 54 54 00 B2 3B 06 0E 20 2E |. .WOFETT..;.. .|
00001BD0: 42 59 24 30 42 3B 20 D4 45 58 54 00 C0 3B 10 0E |BY$0B; .EXT..;..|
00001BE0: 20 2E 42 59 33 31 2C 36 36 00 D0 3B 1A 0E 20 2E | .BY31,66..;.. .|
00001BF0: 57 4F 44 4F 50 50 45 4C 54 00 E1 3B 24 0E 20 2E |WODOPPELT..;$. .|
00001C00: 42 59 24 30 42 3B D4 45 58 54 00 EF 3B 2E 0E 20 |BY$0B;.EXT..;.. |
00001C10: 2E 42 59 33 31 2C 38 34 00 FB 3B 38 0E 20 2E 57 |.BY31,84..;8. .W|
00001C20: 4F 4E 4C 51 00 15 3C 42 0E 20 2E 42 59 24 31 32 |ONLQ..<B. .BY$12|
00001C30: 3B C9 43 4F 4E 20 27 CB 55 52 53 49 56 27 00 2E |;.CON '.URSIV'..|
00001C40: 3C 4C 0E 20 2E 42 59 31 2C 32 30 3B CB 4F 4F 52 |<L. .BY1,20;.OOR|
00001C50: 44 49 4E 41 54 45 4E 00 4C 3C 56 0E 20 2E 57 4F |DINATEN.L<V. .WO|
00001C60: 49 43 4F 4E 31 3B D4 41 42 45 4C 4C 45 4E 41 44 |ICON1;.ABELLENAD|
00001C70: 52 45 53 53 45 00 64 3C 60 0E 20 2E 42 59 24 31 |RESSE.d<`. .BY$1|
00001C80: 32 3B C9 43 4F 4E 20 27 C6 45 54 54 27 00 71 3C |2;.CON '.ETT'.q<|
00001C90: 6A 0E 20 2E 42 59 31 2C 33 38 00 7F 3C 74 0E 20 |j. .BY1,38..<t. |
00001CA0: 2E 57 4F 49 43 4F 4E 32 00 9A 3C 7E 0E 20 2E 42 |.WOICON2..<~. .B|
00001CB0: 59 24 31 32 3B C9 43 4F 4E 20 27 C4 4F 50 50 45 |Y$12;.CON '.OPPE|
00001CC0: 4C 54 27 00 A7 3C 88 0E 20 2E 42 59 31 2C 35 36 |LT'..<.. .BY1,56|
00001CD0: 00 B5 3C 92 0E 20 2E 57 4F 49 43 4F 4E 33 00 CC |..<.. .WOICON3..|
00001CE0: 3C 9C 0E 20 2E 42 59 24 31 32 3B C9 43 4F 4E 20 |<.. .BY$12;.CON |
00001CF0: 27 CE CC D1 27 00 D9 3C A6 0E 20 2E 42 59 31 2C |'...'..<.. .BY1,|
00001D00: 37 34 00 E7 3C B0 0E 20 2E 57 4F 49 43 4F 4E 34 |74..<.. .WOICON4|
00001D10: 00 04 3D BA 0E 20 2E 42 59 24 31 32 3B C9 43 4F |..=.. .BY$12;.CO|
00001D20: 4E 20 27 C6 C6 45 45 44 20 41 55 53 27 00 11 3D |N '..EED AUS'..=|
00001D30: C4 0E 20 2E 42 59 39 2C 33 38 00 1F 3D CE 0E 20 |.. .BY9,38..=.. |
00001D40: 2E 57 4F 49 43 4F 4E 35 00 30 3D D8 0E 20 2E 42 |.WOICON5.0=.. .B|
00001D50: 59 24 30 42 3B D4 45 58 54 00 3E 3D E2 0E 20 2E |Y$0B;.EXT.>=.. .|
00001D60: 42 59 39 35 2C 34 34 00 4C 3D EC 0E 20 2E 57 4F |BY95,44.L=.. .WO|
00001D70: 46 46 45 45 44 00 5D 3D F6 0E 20 2E 42 59 24 30 |FFEED.]=.. .BY$0|
00001D80: 42 3B D4 45 58 54 00 6B 3D 00 0F 20 2E 42 59 39 |B;.EXT.k=.. .BY9|
00001D90: 35 2C 35 33 00 77 3D 0A 0F 20 2E 57 4F 41 55 53 |5,53.w=.. .WOAUS|
00001DA0: 00 88 3D 14 0F 20 2E 42 59 24 30 42 3B D4 45 58 |..=.. .BY$0B;.EX|
00001DB0: 54 00 97 3D 1E 0F 20 2E 42 59 31 30 34 2C 31 32 |T..=.. .BY104,12|
00001DC0: 00 A6 3D 28 0F 20 2E 57 4F 47 52 41 4D 4F 44 00 |..=(. .WOGRAMOD.|
00001DD0: C5 3D 32 0F 20 2E 42 59 24 31 32 3B C9 43 4F 4E |.=2. .BY$12;.CON|
00001DE0: 20 27 C4 52 55 43 4B 44 49 43 48 54 45 27 00 D3 | '.RUCKDICHTE'..|
00001DF0: 3D 3C 0F 20 2E 42 59 31 37 2C 33 38 00 E1 3D 46 |=<. .BY17,38..=F|
00001E00: 0F 20 2E 57 4F 49 43 4F 4E 36 00 01 3E 50 0F 20 |. .WOICON6..>P. |
00001E10: 2E 42 59 24 31 32 3B C9 43 4F 4E 20 27 C4 52 55 |.BY$12;.CON '.RU|
00001E20: 43 4B 53 54 41 45 52 4B 45 27 00 0F 3E 5A 0F 20 |CKSTAERKE'..>Z. |
00001E30: 2E 42 59 31 37 2C 37 34 00 1D 3E 64 0F 20 2E 57 |.BY17,74..>d. .W|
00001E40: 4F 49 43 4F 4E 37 00 2E 3E 6E 0F 20 2E 42 59 24 |OICON7..>n. .BY$|
00001E50: 30 42 3B D4 45 58 54 00 3D 3E 78 0F 20 2E 42 59 |0B;.EXT.=>x. .BY|
00001E60: 31 32 35 2C 33 30 00 4C 3E 82 0F 20 2E 57 4F 44 |125,30.L>.. .WOD|
00001E70: 49 43 48 54 45 00 5D 3E 8C 0F 20 2E 42 59 24 30 |ICHTE.]>.. .BY$0|
00001E80: 42 3B D4 45 58 54 00 6C 3E 96 0F 20 2E 42 59 31 |B;.EXT.l>.. .BY1|
00001E90: 32 35 2C 36 36 00 7C 3E A0 0F 20 2E 57 4F 53 54 |25,66.|>.. .WOST|
00001EA0: 41 45 52 4B 45 00 8D 3E AA 0F 20 2E 42 59 24 30 |AERKE..>.. .BY$0|
00001EB0: 42 3B D4 45 58 54 00 9C 3E B4 0F 20 2E 42 59 31 |B;.EXT..>.. .BY1|
00001EC0: 36 30 2C 34 38 00 A9 3E BE 0F 20 2E 57 4F 4E 4F |60,48..>.. .WONO|
00001ED0: 52 4D 00 BA 3E C8 0F 20 2E 42 59 24 30 42 3B D4 |RM..>.. .BY$0B;.|
00001EE0: 45 58 54 00 C9 3E D2 0F 20 2E 42 59 31 36 30 2C |EXT..>.. .BY160,|
00001EF0: 38 34 00 D6 3E DC 0F 20 2E 57 4F 45 49 4E 53 00 |84..>.. .WOEINS.|
00001F00: ED 3E E6 0F 20 2E 42 59 30 3B D4 41 42 45 4C 4C |.>.. .BY0;.ABELL|
00001F10: 45 4E 45 4E 44 45 00 0A 3F F0 0F 41 4E 47 4C 45 |ENENDE..?..ANGLE|
00001F20: 49 43 48 45 4E 20 4C 44 41 54 41 42 45 4C 4C 45 |ICHEN LDATABELLE|
00001F30: 35 2B 32 00 17 3F F5 0F 20 43 4D 50 23 24 30 33 |5+2..?.. CMP#$03|
00001F40: 00 3E 3F FA 0F 20 42 4E 45 52 55 45 43 4B 3B 4E |.>?.. BNERUECK;N|
00001F50: 55 52 20 41 42 20 C8 D1 20 32 58 20 45 52 46 4F |UR AB .. 2X ERFO|
00001F60: 4C 47 54 20 42 45 49 00 61 3F FF 0F 20 4C 44 41 |LGT BEI.a?.. LDA|
00001F70: 46 4C 41 47 3B C8 41 4C 42 5A 45 49 54 20 42 5A |FLAG;.ALBZEIT BZ|
00001F80: 57 2E 20 32 2F 33 20 45 49 4E 00 84 3F 04 10 20 |W. 2/3 EIN..?.. |
00001F90: 42 45 51 52 55 45 43 4B 3B DA 45 49 4C 45 4E 56 |BEQRUECK;.EILENV|
00001FA0: 4F 52 53 43 48 55 42 20 31 2F 32 31 36 00 AC 3F |ORSCHUB 1/216..?|
00001FB0: 09 10 20 4C 44 41 23 24 31 36 3B 44 45 52 20 4E |.. LDA#$16;DER N|
00001FC0: 4F 52 4D 41 4C 45 20 DA D6 20 57 49 52 44 20 44 |ORMALE .. WIRD D|
00001FD0: 41 46 55 45 52 00 D7 3F 0E 10 20 53 54 41 54 41 |AFUER..?.. STATA|
00001FE0: 42 45 4C 4C 45 33 3B 55 4D 20 31 20 52 45 44 55 |BELLE3;UM 1 REDU|
00001FF0: 5A 49 45 52 54 20 41 55 46 20 32 32 2F 32 31 36 |ZIERT AUF 22/216|
00002000: 00 E4 3F 13 10 20 4C 44 41 23 24 30 31 00 F6 3F |..?.. LDA#$01..?|
00002010: 18 10 20 53 54 41 54 41 42 45 4C 4C 45 33 42 00 |.. STATABELLE3B.|
00002020: 04 40 1D 10 52 55 45 43 4B 20 52 54 53 00 0A 40 |.@..RUECK RTS..@|
00002030: 28 23 3B 00 10 40 32 23 3B 00 4C 40 3C 23 3B 20 |(#;..@2#;.L@<#; |
00002040: 20 20 20 20 20 2A 2A 2A 20 D5 4E 54 45 52 52 4F | *** .NTERRO|
00002050: 55 54 49 4E 45 4E 20 55 4E 44 20 D4 41 42 45 4C |UTINEN UND .ABEL|
00002060: 4C 45 4E 20 44 45 52 20 C4 49 41 4C 4F 47 42 4F |LEN DER .IALOGBO|
00002070: 58 20 2A 2A 2A 00 52 40 46 23 3B 00 58 40 50 23 |X ***.R@F#;.X@P#|
00002080: 3B 00 76 40 10 27 4B 41 53 54 45 4E 20 2E 42 59 |;.v@.'KASTEN .BY|
00002090: 31 36 30 3B 20 C9 43 4F 4E 20 31 20 2D 20 35 00 |160; .CON 1 - 5.|
000020A0: 9E 40 1A 27 20 2E 42 59 32 35 35 2C 32 35 35 2C |.@.' .BY255,255,|
000020B0: 31 32 38 2C 31 2C 31 32 38 2C 31 2C 31 32 38 2C |128,1,128,1,128,|
000020C0: 31 2C 31 32 38 2C 31 00 C4 40 24 27 20 2E 42 59 |1,128,1..@$' .BY|
000020D0: 31 32 38 2C 31 2C 31 32 38 2C 31 2C 31 32 38 2C |128,1,128,1,128,|
000020E0: 31 2C 31 32 38 2C 31 2C 31 32 38 2C 31 00 EA 40 |1,128,1,128,1..@|
000020F0: 2E 27 20 2E 42 59 31 32 38 2C 31 2C 31 32 38 2C |.' .BY128,1,128,|
00002100: 31 2C 31 32 38 2C 31 2C 31 32 38 2C 31 2C 31 32 |1,128,1,128,1,12|
00002110: 38 2C 31 00 FA 40 38 27 20 2E 42 59 32 35 35 2C |8,1..@8' .BY255,|
00002120: 32 35 35 00 17 41 42 27 50 46 45 49 4C 20 2E 42 |255..AB'PFEIL .B|
00002130: 59 31 35 38 3B 20 C9 43 4F 4E 20 36 20 2B 20 37 |Y158; .CON 6 + 7|
00002140: 00 47 41 4C 27 20 2E 42 59 32 35 35 2C 32 35 35 |.GAL' .BY255,255|
00002150: 2C 31 32 39 2C 31 32 39 2C 31 32 39 2C 31 39 33 |,129,129,129,193|
00002160: 2C 31 32 39 2C 32 32 35 2C 31 32 39 2C 32 34 31 |,129,225,129,241|
00002170: 00 77 41 56 27 20 2E 42 59 31 32 39 2C 32 34 39 |.wAV' .BY129,249|
00002180: 2C 31 32 39 2C 32 35 33 2C 31 32 39 2C 32 35 35 |,129,253,129,255|
00002190: 2C 31 32 39 2C 32 35 33 2C 31 32 39 2C 32 34 39 |,129,253,129,249|
000021A0: 00 A7 41 60 27 20 2E 42 59 31 32 39 2C 32 34 31 |..A`' .BY129,241|
000021B0: 2C 31 32 39 2C 32 32 35 2C 31 32 39 2C 31 39 33 |,129,225,129,193|
000021C0: 2C 31 32 39 2C 31 32 39 2C 32 35 35 2C 32 35 35 |,129,129,255,255|
000021D0: 00 D1 41 6A 27 49 54 41 42 20 2E 42 59 36 34 2C |..Aj'ITAB .BY64,|
000021E0: 38 2C 31 36 3B CB 55 52 53 49 56 2C 20 C6 45 54 |8,16;.URSIV, .ET|
000021F0: 54 2C 20 C4 4F 50 50 45 4C 54 00 01 42 74 27 49 |T, .OPPELT..Bt'I|
00002200: 54 41 42 31 20 2E 42 59 36 34 2C 38 32 2C 31 30 |TAB1 .BY64,82,10|
00002210: 30 2C 31 31 38 2C 38 32 3B 20 59 2D 4F 20 20 CB |0,118,82; Y-O .|
00002220: 4F 4F 52 44 49 4E 41 54 45 4E 00 37 42 7E 27 49 |OORDINATEN.7B~'I|
00002230: 54 41 42 32 20 2E 42 59 37 35 2C 39 33 2C 31 31 |TAB2 .BY75,93,11|
00002240: 31 2C 31 32 39 2C 39 33 3B 59 2D 55 4E 20 20 5A |1,129,93;Y-UN Z|
00002250: 55 52 20 C9 4E 56 45 52 54 49 45 52 4E 55 4E 47 |UR .NVERTIERNUNG|
00002260: 00 6B 42 88 27 49 54 41 42 33 20 2E 42 59 37 34 |.kB.'ITAB3 .BY74|
00002270: 2C 37 34 2C 37 34 2C 37 34 2C 31 33 38 3B 58 4C |,74,74,74,138;XL|
00002280: 2D 4C 49 20 20 44 45 52 20 C9 43 4F 4E 53 20 31 |-LI DER .CONS 1|
00002290: 20 2D 20 35 00 8E 42 92 27 49 54 41 42 34 20 2E | - 5..B.'ITAB4 .|
000022A0: 42 59 38 35 2C 38 35 2C 38 35 2C 38 35 2C 31 34 |BY85,85,85,85,14|
000022B0: 39 3B 58 4C 2D 52 45 00 A2 42 9C 27 4E 4D 4F 44 |9;XL-RE..B.'NMOD|
000022C0: 20 2E 42 59 32 34 3B C6 45 54 54 00 B6 42 A6 27 | .BY24;.ETT..B.'|
000022D0: 20 2E 54 58 22 4E 4C 51 2D 4D 4F 44 55 53 22 00 | .TX"NLQ-MODUS".|
000022E0: C0 42 B0 27 20 2E 42 59 30 00 D7 42 BA 27 4B 55 |.B.' .BY0..B.'KU|
000022F0: 52 53 49 56 20 2E 54 58 22 4B 75 72 73 69 76 22 |RSIV .TX"Kursiv"|
00002300: 00 E1 42 C4 27 20 2E 42 59 30 00 F4 42 CE 27 46 |..B.' .BY0..B.'F|
00002310: 45 54 54 20 2E 54 58 22 46 65 74 74 22 00 FE 42 |ETT .TX"Fett"..B|
00002320: D8 27 20 2E 42 59 30 00 17 43 E2 27 44 4F 50 50 |.' .BY0..C.'DOPP|
00002330: 45 4C 54 20 2E 54 58 22 44 6F 70 70 65 6C 74 22 |ELT .TX"Doppelt"|
00002340: 00 21 43 EC 27 20 2E 42 59 30 00 32 43 F6 27 4E |.!C.' .BY0.2C.'N|
00002350: 4C 51 20 2E 54 58 22 4E 4C 51 22 00 3C 43 00 28 |LQ .TX"NLQ".<C.(|
00002360: 20 2E 42 59 30 00 42 43 0A 28 3B 00 48 43 14 28 | .BY0.BC.(;.HC.(|
00002370: 3B 00 6C 43 1E 28 49 43 4F 4E 31 20 2E 57 4F 4B |;.lC.(ICON1 .WOK|
00002380: 41 53 54 45 4E 3B C9 43 4F 4E 2D C4 45 46 49 4E |ASTEN;.CON-.EFIN|
00002390: 49 54 49 4F 4E 00 7C 43 28 28 20 2E 42 59 24 32 |ITION.|C(( .BY$2|
000023A0: 30 2C 24 32 30 00 96 43 32 28 20 2E 42 59 32 2C |0,$20..C2( .BY2,|
000023B0: 31 36 3B C9 43 4F 4E 2D C7 52 4F 45 53 53 45 00 |16;.CON-.ROESSE.|
000023C0: B3 43 3C 28 20 2E 57 4F 4B 55 52 53 49 56 49 3B |.C<( .WOKURSIVI;|
000023D0: D5 4E 54 45 52 52 4F 55 54 49 4E 45 00 C7 43 46 |.NTERROUTINE..CF|
000023E0: 28 49 43 4F 4E 32 20 2E 57 4F 4B 41 53 54 45 4E |(ICON2 .WOKASTEN|
000023F0: 00 D7 43 50 28 20 2E 42 59 24 32 30 2C 24 32 30 |..CP( .BY$20,$20|
00002400: 00 E4 43 5A 28 20 2E 42 59 32 2C 31 36 00 F2 43 |..CZ( .BY2,16..C|
00002410: 64 28 20 2E 57 4F 46 45 54 54 49 00 06 44 6E 28 |d( .WOFETTI..Dn(|
00002420: 49 43 4F 4E 33 20 2E 57 4F 4B 41 53 54 45 4E 00 |ICON3 .WOKASTEN.|
00002430: 16 44 78 28 20 2E 42 59 24 32 30 2C 24 32 30 00 |.Dx( .BY$20,$20.|
00002440: 23 44 82 28 20 2E 42 59 32 2C 31 36 00 34 44 8C |#D.( .BY2,16.4D.|
00002450: 28 20 2E 57 4F 44 4F 50 50 45 4C 54 49 00 48 44 |( .WODOPPELTI.HD|
00002460: 96 28 49 43 4F 4E 34 20 2E 57 4F 4B 41 53 54 45 |.(ICON4 .WOKASTE|
00002470: 4E 00 58 44 A0 28 20 2E 42 59 24 32 30 2C 24 32 |N.XD.( .BY$20,$2|
00002480: 30 00 65 44 AA 28 20 2E 42 59 32 2C 31 36 00 72 |0.eD.( .BY2,16.r|
00002490: 44 B4 28 20 2E 57 4F 4E 4C 51 49 00 78 44 BE 28 |D.( .WONLQI.xD.(|
000024A0: 3B 00 7E 44 C8 28 3B 00 99 44 D2 28 4B 55 52 53 |;.~D.(;..D.(KURS|
000024B0: 49 56 49 20 4C 44 59 23 24 30 30 3B C9 43 4F 4E |IVI LDY#$00;.CON|
000024C0: 20 31 00 B2 44 DC 28 20 4A 53 52 55 49 4E 56 3B | 1..D.( JSRUINV;|
000024D0: C9 4E 56 45 52 54 49 45 52 45 4E 00 D5 44 E6 28 |.NVERTIEREN..D.(|
000024E0: 20 4C 44 41 54 41 42 45 4C 4C 45 32 2B 33 3B C2 | LDATABELLE2+3;.|
000024F0: 49 54 20 46 55 45 52 20 CB 55 52 53 49 56 00 EE |IT FUER .URSIV..|
00002500: 44 F0 28 20 45 4F 52 23 36 34 3B C5 49 4E 20 4F |D.( EOR#64;.IN O|
00002510: 44 45 52 20 C1 55 53 00 01 45 FA 28 20 53 54 41 |DER .US..E.( STA|
00002520: 54 41 42 45 4C 4C 45 32 2B 33 00 0A 45 04 29 20 |TABELLE2+3..E.) |
00002530: 52 54 53 00 23 45 0E 29 46 45 54 54 49 20 4C 44 |RTS.#E.)FETTI LD|
00002540: 59 23 24 30 31 3B C9 43 4F 4E 20 32 00 3C 45 18 |Y#$01;.CON 2.<E.|
00002550: 29 20 4A 53 52 55 49 4E 56 3B C9 4E 56 45 52 54 |) JSRUINV;.NVERT|
00002560: 49 45 52 45 4E 00 5D 45 22 29 20 4C 44 41 54 41 |IEREN.]E") LDATA|
00002570: 42 45 4C 4C 45 32 2B 33 3B C2 49 54 20 46 55 45 |BELLE2+3;.IT FUE|
00002580: 52 20 C6 45 54 54 00 75 45 2C 29 20 45 4F 52 23 |R .ETT.uE,) EOR#|
00002590: 38 3B C5 49 4E 20 4F 44 45 52 20 C1 55 53 00 88 |8;.IN ODER .US..|
000025A0: 45 36 29 20 53 54 41 54 41 42 45 4C 4C 45 32 2B |E6) STATABELLE2+|
000025B0: 33 00 91 45 40 29 20 52 54 53 00 97 45 4A 29 3B |3..E@) RTS..EJ);|
000025C0: 00 B3 45 54 29 44 4F 50 50 45 4C 54 49 20 4C 44 |..ET)DOPPELTI LD|
000025D0: 59 23 24 30 32 3B C9 43 4F 4E 20 33 00 CC 45 5E |Y#$02;.CON 3..E^|
000025E0: 29 20 4A 53 52 55 49 4E 56 3B C9 4E 56 45 52 54 |) JSRUINV;.NVERT|
000025F0: 49 45 52 45 4E 00 F0 45 68 29 20 4C 44 41 54 41 |IEREN..Eh) LDATA|
00002600: 42 45 4C 4C 45 32 2B 33 3B C2 49 54 20 46 55 45 |BELLE2+3;.IT FUE|
00002610: 52 20 C4 4F 50 50 45 4C 54 00 09 46 72 29 20 45 |R .OPPELT..Fr) E|
00002620: 4F 52 23 31 36 3B C5 49 4E 20 4F 44 45 52 20 C1 |OR#16;.IN ODER .|
00002630: 55 53 00 1C 46 7C 29 20 53 54 41 54 41 42 45 4C |US..F|) STATABEL|
00002640: 4C 45 32 2B 33 00 25 46 86 29 20 52 54 53 00 3D |LE2+3.%F.) RTS.=|
00002650: 46 90 29 4E 4C 51 49 20 4C 44 59 23 24 30 33 3B |F.)NLQI LDY#$03;|
00002660: C9 43 4F 4E 20 34 00 56 46 9A 29 20 4A 53 52 55 |.CON 4.VF.) JSRU|
00002670: 49 4E 56 3B C9 4E 56 45 52 54 49 45 52 45 4E 00 |INV;.NVERTIEREN.|
00002680: 73 46 A4 29 20 4C 44 41 54 41 42 45 4C 4C 45 32 |sF.) LDATABELLE2|
00002690: 3B CE CC D1 2D D3 43 48 52 49 46 54 00 8B 46 AE |;...-.CHRIFT..F.|
000026A0: 29 20 45 4F 52 23 31 3B C5 49 4E 20 4F 44 45 52 |) EOR#1;.IN ODER|
000026B0: 20 C1 55 53 00 9C 46 B8 29 20 53 54 41 54 41 42 | .US..F.) STATAB|
000026C0: 45 4C 4C 45 32 00 A5 46 C2 29 20 52 54 53 00 D0 |ELLE2..F.) RTS..|
000026D0: 46 CC 29 55 49 4E 56 20 4C 44 41 49 54 41 42 31 |F.)UINV LDAITAB1|
000026E0: 2C 59 3B CB 4F 4F 52 44 49 4E 41 54 45 4E 20 55 |,Y;.OORDINATEN U|
000026F0: 45 42 45 52 47 45 42 45 4E 00 E3 46 D6 29 20 53 |EBERGEBEN..F.) S|
00002700: 54 41 24 30 36 3B D9 2D 4F 42 45 4E 00 F3 46 E0 |TA$06;.-OBEN..F.|
00002710: 29 20 4C 44 41 49 54 41 42 32 2C 59 00 07 47 EA |) LDAITAB2,Y..G.|
00002720: 29 20 53 54 41 24 30 37 3B D9 2D 55 4E 54 45 4E |) STA$07;.-UNTEN|
00002730: 00 17 47 F4 29 20 4C 44 41 49 54 41 42 33 2C 59 |..G.) LDAITAB3,Y|
00002740: 00 2F 47 FE 29 20 53 54 41 24 30 38 3B D8 2D 4C |./G.) STA$08;.-L|
00002750: 49 4E 4B 53 20 4C 4F 57 00 3F 47 08 2A 20 4C 44 |INKS LOW.?G.* LD|
00002760: 41 49 54 41 42 34 2C 59 00 58 47 12 2A 20 53 54 |AITAB4,Y.XG.* ST|
00002770: 41 24 30 41 3B D8 2D 52 45 43 48 54 53 20 4C 4F |A$0A;.-RECHTS LO|
00002780: 57 00 73 47 1C 2A 20 4C 44 41 23 24 30 30 3B C8 |W.sG.* LDA#$00;.|
00002790: 49 47 48 42 59 54 45 53 20 56 4F 4E 00 89 47 26 |IGHBYTES VON..G&|
000027A0: 2A 20 53 54 41 24 30 39 3B 20 D8 20 53 49 4E 44 |* STA$09; . SIND|
000027B0: 20 30 00 95 47 30 2A 20 53 54 41 24 30 42 00 AA | 0..G0* STA$0B..|
000027C0: 47 3A 2A 20 4A 53 52 24 43 31 32 41 3B 49 4E 56 |G:* JSR$C12A;INV|
000027D0: 42 4F 58 00 B3 47 44 2A 20 52 54 53 00 C8 47 4E |BOX..GD* RTS..GN|
000027E0: 2A 46 46 45 45 44 20 2E 54 58 22 46 46 65 65 64 |*FFEED .TX"FFeed|
000027F0: 22 00 D2 47 58 2A 20 2E 42 59 30 00 E6 47 62 2A |"..GX* .BY0..Gb*|
00002800: 49 43 4F 4E 35 20 2E 57 4F 4B 41 53 54 45 4E 00 |ICON5 .WOKASTEN.|
00002810: F6 47 6C 2A 20 2E 42 59 24 32 30 2C 24 32 30 00 |.Gl* .BY$20,$20.|
00002820: 03 48 76 2A 20 2E 42 59 32 2C 31 36 00 12 48 80 |.Hv* .BY2,16..H.|
00002830: 2A 20 2E 57 4F 46 46 45 45 44 49 00 2C 48 8A 2A |* .WOFFEEDI.,H.*|
00002840: 46 46 45 45 44 49 20 4C 44 59 23 24 30 34 3B C9 |FFEEDI LDY#$04;.|
00002850: 43 4F 4E 20 35 00 45 48 94 2A 20 4A 53 52 55 49 |CON 5.EH.* JSRUI|
00002860: 4E 56 3B C9 4E 56 45 52 54 49 45 52 45 4E 00 66 |NV;.NVERTIEREN.f|
00002870: 48 9E 2A 20 4C 44 41 53 45 49 54 45 2B 31 3B 24 |H.* LDASEITE+1;$|
00002880: 30 C3 20 3D 20 C6 C6 45 45 44 20 4F 44 45 52 00 |0. = ..EED ODER.|
00002890: 7C 48 A8 2A 20 45 4F 52 23 24 30 31 3B 24 30 C4 ||H.* EOR#$01;$0.|
000028A0: 20 3D 20 C3 D2 00 8C 48 B2 2A 20 53 54 41 53 45 | = ....H.* STASE|
000028B0: 49 54 45 2B 31 00 95 48 BC 2A 20 52 54 53 00 A6 |ITE+1..H.* RTS..|
000028C0: 48 C6 2A 41 55 53 20 2E 54 58 22 61 75 73 22 00 |H.*AUS .TX"aus".|
000028D0: B0 48 D0 2A 20 2E 42 59 30 00 C6 48 DA 2A 47 52 |.H.* .BY0..H.*GR|
000028E0: 41 4D 4F 44 20 2E 42 59 32 34 3B C6 45 54 54 00 |AMOD .BY24;.ETT.|
000028F0: DD 48 E4 2A 20 2E 54 58 22 47 52 41 46 49 4B 2D |.H.* .TX"GRAFIK-|
00002900: 4D 4F 44 55 53 22 00 E7 48 EE 2A 20 2E 42 59 30 |MODUS"..H.* .BY0|
00002910: 00 FA 48 F8 2A 49 43 4F 4E 36 20 2E 57 4F 50 46 |..H.*ICON6 .WOPF|
00002920: 45 49 4C 00 0A 49 02 2B 20 2E 42 59 24 32 30 2C |EIL..I.+ .BY$20,|
00002930: 24 32 30 00 17 49 0C 2B 20 2E 42 59 32 2C 31 35 |$20..I.+ .BY2,15|
00002940: 00 27 49 16 2B 20 2E 57 4F 44 49 43 48 54 45 49 |.'I.+ .WODICHTEI|
00002950: 00 3A 49 20 2B 49 43 4F 4E 37 20 2E 57 4F 50 46 |.:I +ICON7 .WOPF|
00002960: 45 49 4C 00 4A 49 2A 2B 20 2E 42 59 24 32 30 2C |EIL.JI*+ .BY$20,|
00002970: 24 32 30 00 57 49 34 2B 20 2E 42 59 32 2C 31 35 |$20.WI4+ .BY2,15|
00002980: 00 68 49 3E 2B 20 2E 57 4F 53 54 41 45 52 4B 45 |.hI>+ .WOSTAERKE|
00002990: 49 00 7B 49 48 2B 4E 4F 52 4D 20 2E 54 58 22 4E |I.{IH+NORM .TX"N|
000029A0: 6F 72 6D 22 00 85 49 52 2B 20 2E 42 59 30 00 97 |orm"..IR+ .BY0..|
000029B0: 49 5C 2B 48 51 20 2E 54 58 22 48 51 2E 20 20 22 |I\+HQ .TX"HQ. "|
000029C0: 00 A1 49 66 2B 20 2E 42 59 30 00 B4 49 70 2B 45 |..If+ .BY0..Ip+E|
000029D0: 49 4E 53 20 2E 54 58 22 31 20 78 20 22 00 BE 49 |INS .TX"1 x "..I|
000029E0: 7A 2B 20 2E 42 59 30 00 D0 49 84 2B 5A 57 45 49 |z+ .BY0..I.+ZWEI|
000029F0: 20 2E 54 58 22 32 20 78 22 00 DA 49 8E 2B 20 2E | .TX"2 x"..I.+ .|
00002A00: 42 59 30 00 EC 49 98 2B 44 52 45 49 20 2E 54 58 |BY0..I.+DREI .TX|
00002A10: 22 33 20 78 22 00 F6 49 A2 2B 20 2E 42 59 30 00 |"3 x"..I.+ .BY0.|
00002A20: 08 4A AC 2B 56 49 45 52 20 2E 54 58 22 34 20 78 |.J.+VIER .TX"4 x|
00002A30: 22 00 12 4A B6 2B 20 2E 42 59 30 00 2C 4A C0 2B |"..J.+ .BY0.,J.+|
00002A40: 44 49 43 48 54 45 49 20 4C 44 41 54 41 42 45 4C |DICHTEI LDATABEL|
00002A50: 4C 45 35 2B 32 00 39 4A CA 2B 20 43 4D 50 23 24 |LE5+2.9J.+ CMP#$|
00002A60: 30 34 00 45 4A D4 2B 20 42 45 51 57 48 51 00 6B |04.EJ.+ BEQWHQ.k|
00002A70: 4A DE 2B 20 4C 44 41 23 24 45 41 3B 4E 4F 50 27 |J.+ LDA#$EA;NOP'|
00002A80: 53 20 49 4E 20 27 4E 45 55 27 20 53 43 48 52 45 |S IN 'NEU' SCHRE|
00002A90: 49 42 45 4E 00 81 4A E8 2B 20 4C 44 59 23 31 38 |IBEN..J.+ LDY#18|
00002AA0: 3B C8 D1 20 3E 20 CE 4F 52 4D 00 95 4A F2 2B 4E |;.. > .ORM..J.+N|
00002AB0: 4F 50 53 45 54 20 53 54 41 4E 45 55 2C 59 00 9E |OPSET STANEU,Y..|
00002AC0: 4A FC 2B 20 44 45 59 00 AD 4A 06 2C 20 42 50 4C |J.+ DEY..J., BPL|
00002AD0: 4E 4F 50 53 45 54 00 B9 4A 10 2C 20 4C 44 59 23 |NOPSET..J., LDY#|
00002AE0: 30 35 00 DD 4A 1A 2C 4E 4F 50 53 45 54 32 20 53 |05..J.,NOPSET2 S|
00002AF0: 54 41 4E 45 55 32 2C 59 3B 4E 4F 50 27 53 20 49 |TANEU2,Y;NOP'S I|
00002B00: 4E 20 4E 45 55 32 00 F0 4A 24 2C 20 44 45 59 3B |N NEU2..J$, DEY;|
00002B10: C8 D1 20 3E 20 CE 4F 52 4D 00 00 4B 2E 2C 20 42 |.. > .ORM..K., B|
00002B20: 50 4C 4E 4F 50 53 45 54 32 00 20 4B 38 2C 20 4C |PLNOPSET2. K8, L|
00002B30: 44 41 23 30 32 3B 24 31 42 2C 24 32 41 2C 30 34 |DA#02;$1B,$2A,04|
00002B40: 2C 24 38 30 2C 2A 30 32 2A 00 2F 4B 42 2C 20 53 |,$80,*02*./KB, S|
00002B50: 54 41 4E 45 55 31 2B 31 00 40 4B 4C 2C 20 53 54 |TANEU1+1.@KL, ST|
00002B60: 41 54 41 42 45 4C 4C 45 35 00 60 4B 56 2C 20 4C |ATABELLE5.`KV, L|
00002B70: 44 41 23 30 34 3B 24 31 42 2C 24 32 41 2C 2A 30 |DA#04;$1B,$2A,*0|
00002B80: 34 2A 2C 24 38 30 2C 30 32 00 73 4B 60 2C 20 53 |4*,$80,02.sK`, S|
00002B90: 54 41 54 41 42 45 4C 4C 45 35 2B 32 00 92 4B 6A |TATABELLE5+2..Kj|
00002BA0: 2C 20 4C 44 59 23 30 31 3B C1 44 52 45 53 53 45 |, LDY#01;.DRESSE|
00002BB0: 20 56 4F 4E 20 27 CE 4F 52 4D 27 00 B5 4B 74 2C | VON '.ORM'..Kt,|
00002BC0: 20 4A 4D 50 55 45 42 45 52 53 3B 27 C8 D1 27 20 | JMPUEBERS;'..' |
00002BD0: 55 45 42 45 52 53 43 48 52 45 49 42 45 4E 00 C4 |UEBERSCHREIBEN..|
00002BE0: 4B 7E 2C 57 48 51 20 4C 44 59 23 31 38 00 ED 4B |K~,WHQ LDY#18..K|
00002BF0: 88 2C 4E 45 55 53 45 54 20 4C 44 41 4E 45 55 50 |.,NEUSET LDANEUP|
00002C00: 4C 2C 59 3B C8 D1 2D D2 4F 55 54 49 4E 45 20 27 |L,Y;..-.OUTINE '|
00002C10: 4E 45 55 50 4C 27 00 05 4C 92 2C 20 53 54 41 4E |NEUPL'..L., STAN|
00002C20: 45 55 2C 59 3B 45 49 4E 46 55 45 47 45 4E 00 0E |EU,Y;EINFUEGEN..|
00002C30: 4C 9C 2C 20 44 45 59 00 1D 4C A6 2C 20 42 50 4C |L., DEY..L., BPL|
00002C40: 4E 45 55 53 45 54 00 29 4C B0 2C 20 4C 44 59 23 |NEUSET.)L., LDY#|
00002C50: 30 35 00 55 4C BA 2C 4E 45 55 53 45 54 32 20 4C |05.UL.,NEUSET2 L|
00002C60: 44 41 4E 45 55 32 50 4C 2C 59 3B C8 D1 2D D2 4F |DANEU2PL,Y;..-.O|
00002C70: 55 54 49 4E 45 20 27 4E 45 55 50 4C 32 27 00 6E |UTINE 'NEUPL2'.n|
00002C80: 4C C4 2C 20 53 54 41 4E 45 55 32 2C 59 3B 45 49 |L., STANEU2,Y;EI|
00002C90: 4E 46 55 45 47 45 4E 00 77 4C CE 2C 20 44 45 59 |NFUEGEN.wL., DEY|
00002CA0: 00 87 4C D8 2C 20 42 50 4C 4E 45 55 53 45 54 32 |..L., BPLNEUSET2|
00002CB0: 00 A7 4C E2 2C 20 4C 44 41 23 30 37 3B 24 31 42 |..L., LDA#07;$1B|
00002CC0: 2C 24 32 41 2C 30 33 2C 24 38 30 2C 2A 30 37 2A |,$2A,03,$80,*07*|
00002CD0: 00 B6 4C EC 2C 20 53 54 41 4E 45 55 31 2B 31 00 |..L., STANEU1+1.|
00002CE0: C7 4C F6 2C 20 53 54 41 54 41 42 45 4C 4C 45 35 |.L., STATABELLE5|
00002CF0: 00 E7 4C 00 2D 20 4C 44 41 23 30 33 3B 24 31 42 |..L.- LDA#03;$1B|
00002D00: 2C 24 32 41 2C 2A 30 33 2A 2C 24 38 30 2C 30 37 |,$2A,*03*,$80,07|
00002D10: 00 FA 4C 0A 2D 20 53 54 41 54 41 42 45 4C 4C 45 |..L.- STATABELLE|
00002D20: 35 2B 32 00 06 4D 14 2D 20 4C 44 59 23 30 30 00 |5+2..M.- LDY#00.|
00002D30: 31 4D 1E 2D 55 45 42 45 52 53 20 4C 44 41 53 54 |1M.-UEBERS LDAST|
00002D40: 41 42 31 3B CB 4F 4F 52 44 49 4E 41 54 45 4E 20 |AB1;.OORDINATEN |
00002D50: 55 45 42 45 52 47 45 42 45 4E 00 3D 4D 28 2D 20 |UEBERGEBEN.=M(- |
00002D60: 53 54 41 24 31 38 00 49 4D 32 2D 20 4C 44 41 23 |STA$18.IM2- LDA#|
00002D70: 30 30 00 55 4D 3C 2D 20 53 54 41 24 31 39 00 63 |00.UM<- STA$19.c|
00002D80: 4D 46 2D 20 4C 44 41 53 54 41 42 32 00 6F 4D 50 |MF- LDASTAB2.oMP|
00002D90: 2D 20 53 54 41 24 30 35 00 97 4D 5A 2D 20 4C 44 |- STA$05..MZ- LD|
00002DA0: 41 53 54 41 42 33 2C 59 3B D4 41 42 45 4C 4C 45 |ASTAB3,Y;.ABELLE|
00002DB0: 4E 41 44 52 45 53 53 45 20 46 2E 20 D4 45 58 54 |NADRESSE F. .EXT|
00002DC0: 00 A3 4D 64 2D 20 53 54 41 24 30 32 00 B3 4D 6E |..Md- STA$02..Mn|
00002DD0: 2D 20 4C 44 41 53 54 41 42 34 2C 59 00 CE 4D 78 |- LDASTAB4,Y..Mx|
00002DE0: 2D 20 53 54 41 24 30 33 3B 55 45 42 45 52 53 43 |- STA$03;UEBERSC|
00002DF0: 48 52 45 49 42 45 4E 00 E3 4D 82 2D 20 4A 4D 50 |HREIBEN..M.- JMP|
00002E00: 24 43 31 34 38 3B 50 55 54 53 54 52 00 F4 4D 8C |$C148;PUTSTR..M.|
00002E10: 2D 53 54 41 42 31 20 2E 42 59 32 32 34 00 04 4E |-STAB1 .BY224..N|
00002E20: 96 2D 53 54 41 42 32 20 2E 42 59 39 30 00 3C 4E |.-STAB2 .BY90.<N|
00002E30: A0 2D 53 54 41 42 33 20 2E 42 59 3C 28 48 51 29 |.-STAB3 .BY<(HQ)|
00002E40: 2C 3C 28 4E 4F 52 4D 29 3B 20 D4 41 42 45 4C 4C |,<(NORM); .ABELL|
00002E50: 45 20 46 55 45 52 20 D5 45 42 45 52 53 43 48 52 |E FUER .EBERSCHR|
00002E60: 45 49 42 45 4E 00 57 4E AA 2D 53 54 41 42 34 20 |EIBEN.WN.-STAB4 |
00002E70: 2E 42 59 3E 28 48 51 29 2C 3E 28 4E 4F 52 4D 29 |.BY>(HQ),>(NORM)|
00002E80: 00 74 4E B4 2D 53 54 41 45 52 4B 45 20 2E 54 58 |.tN.-STAERKE .TX|
00002E90: 22 44 72 75 63 6B 73 74 7B 72 6B 65 22 00 7E 4E |"Druckst{rke".~N|
00002EA0: BE 2D 20 2E 42 59 30 00 9A 4E C8 2D 44 49 43 48 |.- .BY0..N.-DICH|
00002EB0: 54 45 20 2E 54 58 22 44 72 75 63 6B 64 69 63 68 |TE .TX"Druckdich|
00002EC0: 74 65 22 00 A4 4E D2 2D 20 2E 42 59 30 00 B6 4E |te"..N.- .BY0..N|
00002ED0: DC 2D 53 54 41 42 31 31 20 2E 42 59 32 32 34 00 |.-STAB11 .BY224.|
00002EE0: C8 4E E6 2D 53 54 41 42 32 32 20 2E 42 59 31 32 |.N.-STAB22 .BY12|
00002EF0: 36 00 F6 4E F0 2D 53 54 41 42 33 33 20 2E 42 59 |6..N.-STAB33 .BY|
00002F00: 3C 28 45 49 4E 53 29 2C 3C 28 5A 57 45 49 29 2C |<(EINS),<(ZWEI),|
00002F10: 3C 28 44 52 45 49 29 2C 3C 28 56 49 45 52 29 00 |<(DREI),<(VIER).|
00002F20: 24 4F FA 2D 53 54 41 42 34 34 20 2E 42 59 3E 28 |$O.-STAB44 .BY>(|
00002F30: 45 49 4E 53 29 2C 3E 28 5A 57 45 49 29 2C 3E 28 |EINS),>(ZWEI),>(|
00002F40: 44 52 45 49 29 2C 3E 28 56 49 45 52 29 00 47 4F |DREI),>(VIER).GO|
00002F50: 04 2E 53 54 41 45 52 4B 45 49 20 49 4E 43 46 4C |..STAERKEI INCFL|
00002F60: 41 47 3B C6 4C 41 47 20 45 52 48 4F 45 48 45 4E |AG;.LAG ERHOEHEN|
00002F70: 00 56 4F 0E 2E 20 49 4E 43 46 4C 41 47 2B 31 00 |.VO.. INCFLAG+1.|
00002F80: 63 4F 18 2E 20 4C 44 41 46 4C 41 47 00 7E 4F 22 |cO.. LDAFLAG.~O"|
00002F90: 2E 20 43 4D 50 23 24 30 34 3B 57 45 4E 4E 20 C6 |. CMP#$04;WENN .|
00002FA0: 4C 41 47 20 3D 20 34 00 8E 4F 2C 2E 20 42 4E 45 |LAG = 4..O,. BNE|
00002FB0: 55 45 42 45 52 53 32 00 AA 4F 36 2E 20 4C 44 41 |UEBERS2..O6. LDA|
00002FC0: 23 24 30 30 3B 20 44 41 4E 4E 20 41 55 46 20 CE |#$00; DANN AUF .|
00002FD0: 55 4C 4C 00 B7 4F 40 2E 20 53 54 41 46 4C 41 47 |ULL..O@. STAFLAG|
00002FE0: 00 C6 4F 4A 2E 20 53 54 41 46 4C 41 47 2B 31 00 |..OJ. STAFLAG+1.|
00002FF0: E2 4F 54 2E 55 45 42 45 52 53 32 20 54 41 59 3B |.OT.UEBERS2 TAY;|
00003000: CB 4F 4F 52 44 49 4E 41 54 45 4E 00 F1 4F 5E 2E |.OORDINATEN..O^.|
00003010: 20 4C 44 41 53 54 41 42 31 31 00 FD 4F 68 2E 20 | LDASTAB11..Oh. |
00003020: 53 54 41 24 31 38 00 0C 50 72 2E 20 4C 44 41 53 |STA$18..Pr. LDAS|
00003030: 54 41 42 32 32 00 18 50 7C 2E 20 53 54 41 24 30 |TAB22..P|. STA$0|
00003040: 35 00 25 50 86 2E 20 4C 44 41 23 24 30 30 00 31 |5.%P.. LDA#$00.1|
00003050: 50 90 2E 20 53 54 41 24 31 39 00 5A 50 9A 2E 20 |P.. STA$19.ZP.. |
00003060: 4C 44 41 53 54 41 42 33 33 2C 59 3B 55 4E 44 20 |LDASTAB33,Y;UND |
00003070: D4 45 58 54 54 41 42 45 4C 4C 45 4E 41 44 52 45 |.EXTTABELLENADRE|
00003080: 53 53 45 00 71 50 A4 2E 20 53 54 41 24 30 32 3B |SSE.qP.. STA$02;|
00003090: 55 45 42 45 52 47 45 42 45 4E 00 82 50 AE 2E 20 |UEBERGEBEN..P.. |
000030A0: 4C 44 41 53 54 41 42 34 34 2C 59 00 9C 50 B8 2E |LDASTAB44,Y..P..|
000030B0: 20 53 54 41 24 30 33 3B 55 4E 44 20 53 43 48 52 | STA$03;UND SCHR|
000030C0: 45 49 42 45 4E 00 B1 50 C2 2E 20 4A 53 52 24 43 |EIBEN..P.. JSR$C|
000030D0: 31 34 38 3B 50 55 54 53 54 52 00 D3 50 C3 2E 20 |148;PUTSTR..P.. |
000030E0: 4C 44 41 46 4C 41 47 3B C6 4C 41 47 2B 31 20 57 |LDAFLAG;.LAG+1 W|
000030F0: 49 52 44 20 4E 55 52 20 46 55 45 52 00 F1 50 C4 |IRD NUR FUER..P.|
00003100: 2E 20 43 4D 50 23 30 33 3B 20 34 58 20 41 55 46 |. CMP#03; 4X AUF|
00003110: 20 31 20 47 45 53 45 54 5A 54 00 02 51 C5 2E 20 | 1 GESETZT..Q.. |
00003120: 42 4E 45 4C 4F 45 53 43 48 45 4E 00 0E 51 C6 2E |BNELOESCHEN..Q..|
00003130: 20 4C 44 41 23 30 31 00 1D 51 C7 2E 20 53 54 41 | LDA#01..Q.. STA|
00003140: 46 4C 41 47 2B 31 00 26 51 C8 2E 20 52 54 53 00 |FLAG+1.&Q.. RTS.|
00003150: 3A 51 C9 2E 4C 4F 45 53 43 48 45 4E 20 4C 44 41 |:Q..LOESCHEN LDA|
00003160: 23 30 30 00 49 51 CA 2E 20 53 54 41 46 4C 41 47 |#00.IQ.. STAFLAG|
00003170: 2B 31 00 52 51 CB 2E 20 52 54 53 00 77 51 CC 2E |+1.RQ.. RTS.wQ..|
00003180: 4E 45 55 50 4C 20 4C 44 58 24 30 38 3B C5 52 57 |NEUPL LDX$08;.RW|
00003190: 45 49 54 45 52 55 4E 47 20 46 55 45 52 20 C8 D1 |EITERUNG FUER ..|
000031A0: 00 98 51 D6 2E 20 4C 44 59 24 30 39 3B 5A 55 4D |..Q.. LDY$09;ZUM|
000031B0: 20 C5 49 4E 53 45 54 5A 45 4E 20 49 4E 20 44 45 | .INSETZEN IN DE|
000031C0: 52 00 B8 51 E0 2E 20 41 53 4C 24 30 38 3B C4 52 |R..Q.. ASL$08;.R|
000031D0: 55 43 4B 57 45 47 4F 50 54 49 4D 49 45 52 55 4E |UCKWEGOPTIMIERUN|
000031E0: 47 00 C4 51 EA 2E 20 52 4F 4C 24 30 39 00 CD 51 |G..Q.. ROL$09..Q|
000031F0: F4 2E 20 54 58 41 00 D6 51 FE 2E 20 43 4C 43 00 |.. TXA..Q.. CLC.|
00003200: E2 51 08 2F 20 41 44 43 24 30 38 00 EE 51 12 2F |.Q./ ADC$08..Q./|
00003210: 20 53 54 41 24 30 38 00 F7 51 1C 2F 20 54 59 41 | STA$08..Q./ TYA|
00003220: 00 03 52 26 2F 20 41 44 43 24 30 39 00 0F 52 30 |..R&/ ADC$09..R0|
00003230: 2F 20 53 54 41 24 30 39 00 3D 52 3A 2F 4E 45 55 |/ STA$09.=R:/NEU|
00003240: 32 50 4C 20 4A 53 52 24 46 46 41 38 3B C5 52 57 |2PL JSR$FFA8;.RW|
00003250: 45 49 54 52 55 4E 47 20 46 55 45 52 20 C8 D1 2E |EITRUNG FUER ...|
00003260: 20 CA 45 44 45 4E 00 65 52 44 2F 20 4A 53 52 24 | .EDEN.eRD/ JSR$|
00003270: 46 46 41 38 3B D0 55 4E 4B 54 20 49 4E 53 47 45 |FFA8;.UNKT INSGE|
00003280: 53 2E 20 33 2A 20 41 55 53 47 45 42 45 4E 00 6D |S. 3* AUSGEBEN.m|
00003290: 52 4E 2F 2E 45 4E 00 00 00 |RN/.EN... |
X.....;.LI1,4,7.....;.....;.! (.; CITI
ZEN 120 D DRUCKERTREIBER FUER GEOS.P 2.;
KORREKTER DRUCK VON DEUTSCHEN UMLAUTE
N. <.; VERSCHIEDENE NLQ- UND GRAFIK D
RUCKMODI.. F.; VERSCHIEDENE DICHTEN BE
I GRAFIKDRUCK.. P.;.. Z.; AUF BASIS DE
S EPSON FX-80 TREIBERS GESCHRIEBEN VON..
D.;..!N.; WOLFGANG DOEHLER.#!X.; ST
AUDENWEG 22A.<!..; 6800 MANNHEIM 31.I!
..; TEL: 0621 / 755067 (PRIV. BEI PIC
K)..!..; 0621 / 23567 (8 BIS 17
UHR)..! .;..!..; MANNHEIM 19.04.1988.
.!..;.R!..;.OB"CITIZEN,P,W"..!H..BA $790
0..!R. JMPMENUE;ZUR AUSWAHLBOX..".. JMPI
NITG;INIT GRAFIKMODUS.;".. JMPDRUCKZ;DRU
CKEN, GRAFIK.Q".. JMPPAPV;FORMFEED.Y"..
JMPINFO;DATEN UEBER DRUCKERTREIBER.."..
JMPDRUCK;DRUCKEN, NLQ-MODUS..".. JMPINIT
D;INIT NLQ-MODUS.X".. JMPMOD;TEXTMODUS A
N DRUCKER..#". .BY$45,$70,$73,$6F,$6E,$2
0,$46,$58..#,. .BY$2D,$38,$30,$00.B#6.TA
BELLE1 .BY0,0,0,0,0,0,0,0,0,0,0,0,0.T#@.
OPEN1 LDA#$04.B#J. JSR$FFB1.O#T. LDA#$F7
.}#^. JSR$FF93..#H. JSR$FFAE..#R. RTS..#
|.OPEN2 LDA#$04..#.. JSR$FFB1.A#.. LDA#$
E7.O#.. JSR$FF93..#.. JSR$FFAE..#.. RTS.
.#..OPEN3 LDA#$04..$B. JSR$FFB1..$L. LDA
#$67.!$V. JSR$FF93.*$.. RTS.=$..CLOSE JS
R$FFAE.F$.. RTS.B$..LESESCHL STATABELLE1
+10.V$.. DECTABELLE1+10..$..LES2 LDYTABE
LLE1+10..$.. LDA(08),Y..$&. JSR$FFA8..$0
. DECTABELLE1+10.L$:. BPLLES2.U$D. RTS..
$N.INITG JSRANGLEICHEN..$P. LDA#$00..%X.
STATABELLE1+12..%B.INI LDA#$04.,%L. JSR
$C2B0.:%V. JSR$C25C.G%.. LDA#$00.S%.. ST
A$90.A%.. JSROPEN1.M%.. LDA$90.|%.. BNEI
NITG2..%.. JSROPEN3..%.. JSRMODD..%F. JS
RCLOSE..%P. JSRPAUSE.A%Z. JSR$C25F.N%..
LDX#$00.W%.. RTS..%..INITG2 PHA..%.. JSR
OPEN2..&.. JSR$C25F..&.. PLA..& . TAX..&
*. RTS./&4.PAUSE LDX#$00.>&>.P1 LDY#$00.
I&H.P2 DEY.T&R. BNEP2.]&\. DEX.H&F. BNEP
1.Q&P. RTS..&Z.DRUCKZ LDA#$04..&.. JSR$C
2B0. &.. JSR$C25C..&.. JSROPEN3.V&.. LDA
FLAG;FLAG F. ANZAHL DER STRIKES..&.. BEQ
DR1..&.. CMP#01..& . BEQDR2..'.. JSRDRUN
T;EINSPRUNG 3X U. 4X.<'.. JSRZV0;ZEILENV
ORSCHUB 0/216.Z'..DR2 JSRDRUNT;EINSPRUNG
2X.{'.. JSRZV1;ZEILENVORSCHUB 1/216..'.
. JSRDRUNT..'.. LDAFLAG+1;FLAG ENTSCHEID
ET 1-3 UND 4X.U'.. BEQDRUEND;ENDE BEI 2X
U. 3X..'.. JSRZV0..'..DR1 JSRDRUNT;EINS
PRUNG 1X.&(..DRUEND JSRZV;ZEILENVORSCHUB
23/216.4(.. JSRCLOSE.B(.. JSR$C25F.K(..
RTS.\(..DRUNT LDA$03.Y(.. STA$09;ZEILE
UEBERGEBEN..(.. LDA$02..(B. STA$08..(D.
JMPZEILE;UND DRUCKEN..(B.PAPV LDA#$04.J(
L. JSR$C2B0.X(V. JSR$C25C..(`. JSROPEN3.
.(J. JSRSEITE..)T. JSRCLOSE..)~. JSROPEN
2..).. JSR$C25F.').. RTS.8)..INFO LDX#$5
0.E).. LDY#$5E.R).. LDA#$00.[).. RTS.M)D
.INITD LDA#$FF..)N. STATABELLE1+12..)X.
JMPINI..)..MOD LDA#$04..).. JSR$C2B0..).
. JSR$C25C.G).. JSROPEN3..).. LDA#>(TABE
LLE2)..).. STA$09..).. LDA#<(TABELLE2)..
*(. STA$08.#*2. LDA#$06;ANZAHL BYTES.4*<
. JSRLESESCHL.B*F. JSRCLOSE.P*P. JSR$C25
F.Y*Z. RTS..*D.TABELLE2 .BY0,$78,$1B,$0,
$21,$1B; NLQ + TEXTMODUS..*N.FLAG .BY0,0
;FLAG FUER DRUCKSTAERKE.S*X.DRUCK LDA#$0
4; TEXTDRUCK..*.. JSR$C2B0..*.. JSR$C25C
..*.. JSROPEN3..+ .DRU1 LDY#$00./+.. LDA
($02),Y;BUCHSTABEN HOLEN.T+.. BEQDRUCKEN
D;GLEICH 0, DANN ENDE.U+.. LDX#12;MIT DE
N 12 BYTES DER..+H.DRU4 CMPUTAB,X;KONVER
TIERUNGSTABELLE UTAB.N+R. BNEDRU5;VERGLE
ICHEN UND GEGBENENFALLS..+.. LDAUTAB2,X;
NEUEN BUCHTABENCODE LADEN. ,.. BNEDRU3;
UNBED. SPRUNG ZUR AUSGABE.&,..;.@,..DRU5
DEX;X VERMINDERN.K,.. BPLDRU4;X>=0, DAN
N WEITER VERGLEICHEN..,.. CMP#$41;ALLGEM
EINE GEOS - CBM..,.. BCCDRU3;UMWANDLUNG.
.,". CMP#$7B..,,. BCSDRU3.M,6. EOR#$20..
,@.DRU3 JSR$FFA8;BUCHSTABEN AUSGEBEN..,J
. INC$02..-T. BNEDRU2..-^. INC$03.)-H.DR
U2 JMPDRU1.F-R.; UTAB UND UTAB2
SIND DIE KONVERTIERUNGSTABELLEN..-|.;
FUER DIE DEUTSCHEN UMLAUTE..P-..UT
AB .BY$84,$94,$81,$E1,$8E,$99,$9A,$EB,$6
0,$5E,$5B,$5C,$5D.....UTAB2 .BY$7B,$7C,$
7D,$7E,$5B,$5C,$5D,$40,$60,$5E,$5B,$5C,$
5D.....;.-...DRUCKEND JSRCLOSE.;... JSR$
C25F.D... RTS.U.B.ZEILE LDA$09.^.L. PHA.
J.V. LDA$08.S... PHA..... JSRZEILE2.....
BCSZEILE3..... PLA..... STA$08..... PLA
..... STA$09.D.&. RTS.W.0.ZEILE3 JSRGMOD
...:. PLA...D. STA$08...N. PLA../X. STA$
09../B. LDA#$50../L. SEC.+/V. SBCTABELLE
1+11.4/.. TAX.A/..ZEI1 TXA.J/.. PHA.X/..
JSRRECHN.E/.. JSRAUSG.N/.. CLC.{/.. LDA
#$08../F. ADC$08../P. STA$08. /Z. LDA#$0
0../.. ADC$09../.. STA$09.A/.. PLA.J/..
TAX.S/.. DEX../.. BNEZEI1../ . RTS../*.Z
EILE2 LDA#$00..04. STATABELLE1+11..0>. L
DX#$07.10H. STXTABELLE1+10.:0R. CLC.G0\.
LDA#$78.S0F. ADC$08._0P. STA$08.L0Z. LD
A#$02.X0.. ADC$09..0.. STA$09..0.. LDX#$
50..0..ZEI3 LDYTABELLE1+10..0..ZEI2 LDA(
$08),Y.L0.. BNEZEILE4.U0.. DEY..0J. BPLZ
EI2..0T. SEC..0.. LDA$08..1.. SBC#$08..1
.. STA$08..1.. LDA$09.)1.. SBC#$00.51..
STA$09.I1.. INCTABELLE1+11.R1$. DEX._1..
BNEZEI3.H18. CLC.Q1B. RTS..1L.ZEILE4 SE
C..1V. RTS..1`.MODD BITTABELLE1+12..1J.
BMIMODG.C1T. LDA#>(TABELLE3).O1~. STA$09
..1.. LDA#<(TABELLE3)..1.. STA$08..1.. L
DA#$05..2.. JMPLESESCHL.'2..MODG LDA#>(T
ABELLE4).32.. STA$09.H2D. LDA#<(TABELLE4
).T2N. STA$08.A2X. LDA#$04.R2.. JMPLESES
CHL..2..TABELLE3 .BY$17,$33,$1B,$40,$1B;
INIT GRAFIKMODUS.W2..TABELLE3A .BY0,$33,
$1B;ZEILENVORSCHUB 0/216..3..TABELLE3B .
BY0,$33,$1B;ZEILENVORSCHUB 1/216(NUR HQ)
.B3..TABELLE4 .BY$32,$1B,$40,$1B;INIT NL
Q UND DRAFT.G3..GMOD LDA#$00;DRUCKWEGOPT
IMIERUNG.S3.. STA$09..3.. LDATABELLE1+11
..3(. STA$08;HIER WERDEN LEERSCHRITTE AM
.L32. ASL$08;ENDE JEDER ZEILE..3<. ROL$0
9;VOM GRAFIKMODUS ABGEZOGEN..3F. ASL$08.
.4P. ROL$09..4Z. ASL$08."4D. ROL$09.F4N.
NEU .BY$EA,$EA;RAUM F. HQ-MODUS.S4X. .BY
$EA,$EA;HIER WIRD BEI AUSWAHL VON HQ..4.
. .BY$EA,$EA;DIE ROUTINE NEUPL..4.. .BY$
EA,$EA;EINGEFUEGT..4.. .BY$EA.H4 . .BY$E
A.X4.. .BY$EA,$EA..4.. .BY$EA,$EA..4.. .
BY$EA..5H. .BY$EA,$EA..5R. .BY$EA,$EA..5
.. SEC.*5.. LDA#$80.65.. SBC$08.I5.. STA
TABELLE5+1.F5..NEU1 LDA#$02;BEI HQ #$07.
R5.. SBC$09..5.. STATABELLE5..5". LDA#>(
TABELLE5)..5,. STA$09..56. LDA#<(TABELLE
5).E5@. STA$08.R5J. LDA#$05..5T. JMPLESE
SCHL..6^.TABELLE5 .BY02,$80,04,$2A,$1B;B
EI HQ 07,$80,03,$2A,$1B./6H.AUSG LDX#$00
.<6R.AUS1 TXA.E6|. PHA.X6.. LDATABELLE1,
X.F6.. JSR$FFA8..6..NEU2 .BY$EA,$EA,$EA;
RAUM FUER HQ-MODUS..6.. .BY$EA,$EA,$EA;
2* JSR $FFA8..6.. PLA.F6.. TAX.O6B. INX
..6L. CPX#$08..6V. BNEAUS1..6.. RTS..7..
ZV LDA#>(TABELLE3); ZEILENVORSCHUB AUS.;
7.. STA$09;TABELLE3 (23/216).Z7.. LDA#<(
TABELLE3); AUSGEBEN.F7.. STA$08.S7.. LDA
#$03..7.. JSRLESESCHL..7&. LDA#$0D..70.
JSR$FFA8..7:. RTS.Q7D.ZV0 LDA#>(TABELLE3
A); ZEILENVORSCHUB..7N. STA$09; 0/216 AU
SGEBEN..8X. LDA#<(TABELLE3A)..8B. STA$08
..8L. LDA#$03.-8V. JSRLESESCHL.:8.. LDA#
$0D.H8.. JSR$FFA8.Q8.. RTS.Z8..ZV1 LDA#>
(TABELLE3B); ZEILENVORSCHUB..8.. STA$09;
1/216 AUSGEBEN..8.. LDA#<(TABELLE3B)..8
.. STA$08.E8.. LDA#$03.V8.. JSRLESESCHL.
.8.. LDA#$0D..8.. JSR$FFA8..8.. RTS..9..
SEITE LDA#$0C;FORMFEED AUSGEBEN.,9.. JSR
$FFA8.59.. RTS.C9..RECHN SEI.P9F. LDY#$0
7.E9P.RECH2 LDA($08),Y.R9Z. LDX#$07..9..
RECH1 ROR..9.. RORTABELLE1,X..9.. DEX..9
.. BPLRECH1..9.. DEY.A9.. BPLRECH2.J9 .
CLI.S9*. RTS..:4.MENUE LDA#<(MENTAB); AD
RESSE DER TABELLE FUER.':>. STA$02; DIAL
OGBOX UEBERGEBEN.::H. LDA#>(MENTAB).F:R.
STA$03.\:\. JSR$C256;DIALBOX.E:F. RTS.K
:P.;..:Z.MENTAB .BY$01;MUSTER1..:..;
POSITION DES FEN
STERS.X:.. .BY42,137,64,00,255,00..:.. .
BY$01;OK-FELD..:.. .BY9,75..;.. .BY$0B;T
EXT'NLQ-MODUS'.-;.. .BY5,12;KOORDINATE.F
;.. .WONMOD;TABELLENADR.W;J. .BY$0B;TEXT
.E;T. .BY31,30.T;.. .WOKURSIV..;.. .BY$0
B;TEXT..;.. .BY31,48. ;.. .WOFETT..;.. .
BY$0B; TEXT..;.. .BY31,66.P;.. .WODOPPEL
T..;$. .BY$0B;TEXT..;.. .BY31,84..;8. .W
ONLQ..<B. .BY$12;ICON 'KURSIV'..<L. .BY1
,20;KOORDINATEN.L<V. .WOICON1;TABELLENAD
RESSE.D<`. .BY$12;ICON 'FETT'.Q<J. .BY1,
38.<T. .WOICON2..<~. .BY$12;ICON 'DOPPE
LT'..<.. .BY1,56..<.. .WOICON3.L<.. .BY$
12;ICON 'NLQ'.Y<.. .BY1,74..<.. .WOICON4
..=.. .BY$12;ICON 'FFEED AUS'..=D. .BY9,
38..=N. .WOICON5.0=X. .BY$0B;TEXT.>=.. .
BY95,44.L=.. .WOFFEED.]=.. .BY$0B;TEXT.K
=.. .BY95,53.W=.. .WOAUS..=.. .BY$0B;TEX
T..=.. .BY104,12..=(. .WOGRAMOD.E=2. .BY
$12;ICON 'DRUCKDICHTE'.S=<. .BY17,38..=F
. .WOICON6..>P. .BY$12;ICON 'DRUCKSTAERK
E'..>Z. .BY17,74..>D. .WOICON7..>N. .BY$
0B;TEXT.=>X. .BY125,30.L>.. .WODICHTE.]>
.. .BY$0B;TEXT.L>.. .BY125,66.|> . .WOST
AERKE..>.. .BY$0B;TEXT..>.. .BY160,48..>
.. .WONORM..>H. .BY$0B;TEXT.I>R. .BY160,
84.V>.. .WOEINS..>.. .BY0;TABELLENENDE..
?..ANGLEICHEN LDATABELLE5+2..?.. CMP#$03
.>?.. BNERUECK;NUR AB HQ 2X ERFOLGT BEI.
A?.. LDAFLAG;HALBZEIT BZW. 2/3 EIN..?..
BEQRUECK;ZEILENVORSCHUB 1/216..?.. LDA#$
16;DER NORMALE ZV WIRD DAFUER.W?.. STATA
BELLE3;UM 1 REDUZIERT AUF 22/216..?.. LD
A#$01..?.. STATABELLE3B..@..RUECK RTS..@
(#;..@2#;.L@<#; *** UNTERROUTINEN U
ND TABELLEN DER DIALOGBOX ***.R@F#;.X@P#
;.V@.'KASTEN .BY160; ICON 1 - 5..@.' .BY
255,255,128,1,128,1,128,1,128,1.D@$' .BY
128,1,128,1,128,1,128,1,128,1..@.' .BY12
8,1,128,1,128,1,128,1,128,1..@8' .BY255,
255..AB'PFEIL .BY158; ICON 6 + 7.GAL' .B
Y255,255,129,129,129,193,129,225,129,241
.WAV' .BY129,249,129,253,129,255,129,253
,129,249..A`' .BY129,241,129,225,129,193
,129,129,255,255.QAJ'ITAB .BY64,8,16;KUR
SIV, FETT, DOPPELT..BT'ITAB1 .BY64,82,10
0,118,82; Y-O KOORDINATEN.7B~'ITAB2 .BY
75,93,111,129,93;Y-UN ZUR INVERTIERNUNG
.KB.'ITAB3 .BY74,74,74,74,138;XL-LI DER
ICONS 1 - 5..B.'ITAB4 .BY85,85,85,85,14
9;XL-RE..B.'NMOD .BY24;FETT..B.' .TX"NLQ
-MODUS"..B.' .BY0.WB.'KURSIV .TX"KURSIV"
..BD' .BY0..BN'FETT .TX"FETT"..BX' .BY0.
.C.'DOPPELT .TX"DOPPELT".!C.' .BY0.2C.'N
LQ .TX"NLQ".<C.( .BY0.BC.(;.HC.(;.LC.(IC
ON1 .WOKASTEN;ICON-DEFINITION.|C(( .BY$2
0,$20..C2( .BY2,16;ICON-GROESSE..C<( .WO
KURSIVI;UNTERROUTINE.GCF(ICON2 .WOKASTEN
.WCP( .BY$20,$20..CZ( .BY2,16..CD( .WOFE
TTI..DN(ICON3 .WOKASTEN..DX( .BY$20,$20.
#D.( .BY2,16.4D.( .WODOPPELTI.HD.(ICON4
.WOKASTEN.XD ( .BY$20,$20.ED.( .BY2,16.R
D.( .WONLQI.XD.(;.~DH(;..DR(KURSIVI LDY#
$00;ICON 1..D.( JSRUINV;INVERTIEREN.UD.(
LDATABELLE2+3;BIT FUER KURSIV..D.( EOR#
64;EIN ODER AUS..E.( STATABELLE2+3..E.)
RTS.#E.)FETTI LDY#$01;ICON 2.<E.) JSRUIN
V;INVERTIEREN.]E") LDATABELLE2+3;BIT FUE
R FETT.UE,) EOR#8;EIN ODER AUS..E6) STAT
ABELLE2+3..E@) RTS..EJ);..ET)DOPPELTI LD
Y#$02;ICON 3.LE^) JSRUINV;INVERTIEREN..E
H) LDATABELLE2+3;BIT FUER DOPPELT..FR) E
OR#16;EIN ODER AUS..F|) STATABELLE2+3.%F
.) RTS.=F.)NLQI LDY#$03;ICON 4.VF.) JSRU
INV;INVERTIEREN.SF.) LDATABELLE2;NLQ-SCH
RIFT..F.) EOR#1;EIN ODER AUS..F.) STATAB
ELLE2..FB) RTS.PFL)UINV LDAITAB1,Y;KOORD
INATEN UEBERGEBEN..FV) STA$06;Y-OBEN..F.
) LDAITAB2,Y..G.) STA$07;Y-UNTEN..G.) LD
AITAB3,Y./G.) STA$08;X-LINKS LOW.?G.* LD
AITAB4,Y.XG.* STA$0A;X-RECHTS LOW.SG.* L
DA#$00;HIGHBYTES VON..G&* STA$09; X SIND
0..G0* STA$0B..G:* JSR$C12A;INVBOX..GD*
RTS.HGN*FFEED .TX"FFEED".RGX* .BY0..GB*
ICON5 .WOKASTEN..GL* .BY$20,$20..HV* .BY
2,16..H.* .WOFFEEDI.,H.*FFEEDI LDY#$04;I
CON 5.EH.* JSRUINV;INVERTIEREN.FH.* LDAS
EITE+1;$0C = FFEED ODER.|H.* EOR#$01;$0D
= CR..H.* STASEITE+1..H.* RTS..HF*AUS .
TX"AUS"..HP* .BY0.FHZ*GRAMOD .BY24;FETT.
.H.* .TX"GRAFIK-MODUS"..H.* .BY0..H.*ICO
N6 .WOPFEIL..I.+ .BY$20,$20..I.+ .BY2,15
.'I.+ .WODICHTEI.:I +ICON7 .WOPFEIL.JI*+
.BY$20,$20.WI4+ .BY2,15.HI>+ .WOSTAERKE
I.{IH+NORM .TX"NORM"..IR+ .BY0..I\+HQ .T
X"HQ. "..IF+ .BY0..IP+EINS .TX"1 X "..I
Z+ .BY0.PI.+ZWEI .TX"2 X".ZI.+ .BY0..I.+
DREI .TX"3 X"..I.+ .BY0..J.+VIER .TX"4 X
"..J.+ .BY0.,J.+DICHTEI LDATABELLE5+2.9J
J+ CMP#$04.EJT+ BEQWHQ.KJ.+ LDA#$EA;NOP'
S IN 'NEU' SCHREIBEN..J.+ LDY#18;HQ > NO
RM..J.+NOPSET STANEU,Y..J.+ DEY..J., BPL
NOPSET..J., LDY#05..J.,NOPSET2 STANEU2,Y
;NOP'S IN NEU2..J$, DEY;HQ > NORM..K., B
PLNOPSET2. K8, LDA#02;$1B,$2A,04,$80,*02
*./KB, STANEU1+1.@KL, STATABELLE5.`KV, L
DA#04;$1B,$2A,*04*,$80,02.SK`, STATABELL
E5+2..KJ, LDY#01;ADRESSE VON 'NORM'..KT,
JMPUEBERS;'HQ' UEBERSCHREIBEN.DK~,WHQ L
DY#18..K.,NEUSET LDANEUPL,Y;HQ-ROUTINE '
NEUPL'..L., STANEU,Y;EINFUEGEN..L., DEY.
.L., BPLNEUSET.)L., LDY#05.UL.,NEUSET2 L
DANEU2PL,Y;HQ-ROUTINE 'NEUPL2'.NLD, STAN
EU2,Y;EINFUEGEN.WLN, DEY..LX, BPLNEUSET2
..L., LDA#07;$1B,$2A,03,$80,*07*..L., ST
ANEU1+1.GL., STATABELLE5..L.- LDA#03;$1B
,$2A,*03*,$80,07..L.- STATABELLE5+2..M.-
LDY#00.1M.-UEBERS LDASTAB1;KOORDINATEN
UEBERGEBEN.=M(- STA$18.IM2- LDA#00.UM<-
STA$19.CMF- LDASTAB2.OMP- STA$05..MZ- LD
ASTAB3,Y;TABELLENADRESSE F. TEXT..MD- ST
A$02..MN- LDASTAB4,Y.NMX- STA$03;UEBERSC
HREIBEN..M.- JMP$C148;PUTSTR..M.-STAB1 .
BY224..N.-STAB2 .BY90.<N -STAB3 .BY<(HQ)
,<(NORM); TABELLE FUER UEBERSCHREIBEN.WN
.-STAB4 .BY>(HQ),>(NORM).TN.-STAERKE .TX
"DRUCKST{RKE".~N.- .BY0..NH-DICHTE .TX"D
RUCKDICHTE"..NR- .BY0..N.-STAB11 .BY224.
HN.-STAB22 .BY126..N.-STAB33 .BY<(EINS),
<(ZWEI),<(DREI),<(VIER).$O.-STAB44 .BY>(
EINS),>(ZWEI),>(DREI),>(VIER).GO..STAERK
EI INCFLAG;FLAG ERHOEHEN.VO.. INCFLAG+1.
CO.. LDAFLAG.~O". CMP#$04;WENN FLAG = 4.
.O,. BNEUEBERS2..O6. LDA#$00; DANN AUF N
ULL..O@. STAFLAG.FOJ. STAFLAG+1..OT.UEBE
RS2 TAY;KOORDINATEN..O^. LDASTAB11..OH.
STA$18..PR. LDASTAB22..P|. STA$05.%P.. L
DA#$00.1P.. STA$19.ZP.. LDASTAB33,Y;UND
TEXTTABELLENADRESSE.QP.. STA$02;UEBERGEB
EN..P.. LDASTAB44,Y..P.. STA$03;UND SCHR
EIBEN..PB. JSR$C148;PUTSTR.SPC. LDAFLAG;
FLAG+1 WIRD NUR FUER..PD. CMP#03; 4X AUF
1 GESETZT..QE. BNELOESCHEN..QF. LDA#01.
.QG. STAFLAG+1.&QH. RTS.:QI.LOESCHEN LDA
#00.IQJ. STAFLAG+1.RQK. RTS.WQL.NEUPL LD
X$08;ERWEITERUNG FUER HQ..QV. LDY$09;ZUM
EINSETZEN IN DER..Q.. ASL$08;DRUCKWEGOP
TIMIERUNG.DQ.. ROL$09.MQ.. TXA.VQ.. CLC.
.Q./ ADC$08..Q./ STA$08..Q./ TYA..R&/ AD
C$09..R0/ STA$09.=R:/NEU2PL JSR$FFA8;ERW
EITRUNG FUER HQ. JEDEN.ERD/ JSR$FFA8;PUN
KT INSGES. 3* AUSGEBEN.MRN/.EN...
> CLICK IMAGE PREVIEW FOR FULL MODAL