LETTERPRINT.SRC
FILE INFORMATION
FILENAME(S): LETTERPRINT.SRC
FILE TYPE(S): PRG
FILE SIZE: 6.8K
FIRST SEEN: 2025-11-30 01:13:11
APPEARS ON: 3 disk(s)
FILE HASH
b5e17d8aa614d925e0a9436a0ef92fbd6527708f8f2c75144b9634e3f65cdf0f
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10905 05 89 | LETTERPRINT.SRC | PRG | C64er | 19 | 5 | DOWNLOAD FILE |
| 10905 05 89 | LETTERPRINT.SRC | PRG | DuncanTwain | 19 | 5 | DOWNLOAD FILE |
| 10905 05 89 | LETTERPRINT.SRC | PRG | DuncanTwain | 19 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0C 08 0A 00 9E 33 36 38 36 34 00 18 08 14 |.......36864....|
00000010: 00 2E 4F 50 54 20 4F 4F 00 25 08 1E 00 AC B2 20 |..OPT OO.%..... |
00000020: 24 43 30 30 30 00 34 08 8E 00 56 49 43 20 B2 24 |$C000.4...VIC .$|
00000030: 44 30 30 30 00 41 08 92 00 54 4D 50 20 B2 32 35 |D000.A...TMP .25|
00000040: 33 00 4F 08 94 00 54 4D 50 32 20 B2 32 35 31 00 |3.O...TMP2 .251.|
00000050: 60 08 96 00 48 49 52 45 53 20 B2 24 32 30 30 30 |`...HIRES .$2000|
00000060: 00 6E 08 98 00 43 B5 20 B2 36 35 34 30 39 00 7F |.n...C. .65409..|
00000070: 08 9A 00 52 45 53 45 54 20 B2 36 34 37 33 38 00 |...RESET .64738.|
00000080: 8C 08 9C 00 4B 45 59 20 B2 31 39 38 00 9A 08 9E |....KEY .198....|
00000090: 00 52 45 50 54 20 B2 36 35 30 00 A7 08 A0 00 93 |.REPT .650......|
000000A0: 20 B2 24 46 46 44 35 00 B7 08 A2 00 53 54 41 54 | .$FFD5.....STAT|
000000B0: 55 53 20 B2 31 35 37 00 C4 08 C8 00 9F 20 B2 24 |US .157...... .$|
000000C0: 46 46 43 30 00 D1 08 CA 00 A0 20 B2 24 46 46 43 |FFC0...... .$FFC|
000000D0: 33 00 E3 08 CC 00 43 48 4B 4F 55 54 20 B2 24 46 |3.....CHKOUT .$F|
000000E0: 46 43 39 00 F3 08 CE 00 9C 43 48 4E 20 B2 24 46 |FC9......CHN .$F|
000000F0: 46 43 43 00 05 09 D0 00 53 45 54 4E 41 4D 20 B2 |FCC.....SETNAM .|
00000100: 24 46 46 42 44 00 17 09 D2 00 53 45 54 50 41 52 |$FFBD.....SETPAR|
00000110: 20 B2 24 46 46 42 41 00 21 09 D4 00 44 52 20 B2 | .$FFBA.!...DR .|
00000120: 34 00 2E 09 D6 00 8E 20 B2 24 41 41 44 37 00 3F |4...... .$AAD7.?|
00000130: 09 D8 00 42 53 4F 55 54 20 B2 24 46 46 44 32 00 |...BSOUT .$FFD2.|
00000140: 51 09 DA 00 53 54 52 4F 55 54 20 B2 24 41 42 31 |Q...STROUT .$AB1|
00000150: 45 00 5E 09 DC 00 A1 20 B2 36 35 35 30 38 00 6B |E.^.... .65508.k|
00000160: 09 DE 00 85 20 B2 36 35 34 38 37 00 79 09 E0 00 |.... .65487.y...|
00000170: 9C 58 20 B2 35 39 39 30 33 00 87 09 E2 00 4E 41 |.X .59903.....NA|
00000180: 4D 45 20 B2 38 32 30 00 98 09 E4 00 43 4C 41 4C |ME .820.....CLAL|
00000190: 4C 20 B2 24 46 46 45 37 00 A9 09 E6 00 53 45 54 |L .$FFE7.....SET|
000001A0: 43 52 20 B2 35 38 37 33 32 00 B8 09 E8 00 5A 45 |CR .58732.....ZE|
000001B0: 49 4C 45 20 B2 32 31 34 00 C8 09 EA 00 53 50 41 |ILE .214.....SPA|
000001C0: 4C 54 45 20 B2 32 31 31 00 D9 09 EC 00 53 50 41 |LTE .211.....SPA|
000001D0: 43 45 20 B2 34 33 38 33 39 00 E7 09 84 03 4A 4D |CE .43839.....JM|
000001E0: 50 20 54 49 54 45 4C 00 0E 0A 4E 04 52 45 42 49 |P TITEL...N.REBI|
000001F0: 54 20 2E 42 59 54 20 24 38 30 2C 24 34 30 2C 24 |T .BYT $80,$40,$|
00000200: 32 30 2C 24 31 30 2C 38 2C 34 2C 32 2C 31 00 1A |20,$10,8,4,2,1..|
00000210: 0A BA 04 4D 55 4C 54 20 B2 AC 00 3A 0A BC 04 2E |...MULT ...:....|
00000220: 57 B0 20 24 32 30 30 30 2C 24 32 31 34 30 2C 24 |W. $2000,$2140,$|
00000230: 32 32 38 30 2C 24 32 33 43 30 00 5A 0A BE 04 2E |2280,$23C0.Z....|
00000240: 57 B0 20 24 32 35 30 30 2C 24 32 36 34 30 2C 24 |W. $2500,$2640,$|
00000250: 32 37 38 30 2C 24 32 38 43 30 00 7A 0A C0 04 2E |2780,$28C0.z....|
00000260: 57 B0 20 24 32 41 30 30 2C 24 32 42 34 30 2C 24 |W. $2A00,$2B40,$|
00000270: 32 43 38 30 2C 24 32 44 43 30 00 9A 0A C2 04 2E |2C80,$2DC0......|
00000280: 57 B0 20 24 32 46 30 30 2C 24 33 30 34 30 2C 24 |W. $2F00,$3040,$|
00000290: 33 31 38 30 2C 24 33 32 43 30 00 BA 0A C4 04 2E |3180,$32C0......|
000002A0: 57 B0 20 24 33 34 30 30 2C 24 33 35 34 30 2C 24 |W. $3400,$3540,$|
000002B0: 33 36 38 30 2C 24 33 37 43 30 00 DA 0A C6 04 2E |3680,$37C0......|
000002C0: 57 B0 20 24 33 39 30 30 2C 24 33 41 34 30 2C 24 |W. $3900,$3A40,$|
000002D0: 33 42 38 30 2C 24 33 43 43 30 00 E8 0A C8 04 2E |3B80,$3CC0......|
000002E0: 57 B0 20 24 33 45 30 30 00 F5 0A 14 05 58 58 20 |W. $3E00.....XX |
000002F0: 2E 57 B0 20 30 00 00 0B 16 05 59 59 20 42 52 4B |.W. 0.....YY BRK|
00000300: 00 0D 0B 18 05 58 31 20 2E 57 B0 20 30 00 18 0B |.....X1 .W. 0...|
00000310: 1A 05 59 31 20 42 52 4B 00 23 0B 1B 05 58 32 20 |..Y1 BRK.#...X2 |
00000320: 42 52 4B 00 2E 0B 1C 05 59 32 20 42 52 4B 00 3A |BRK.....Y2 BRK.:|
00000330: 0B 1E 05 41 4E 5A 20 42 52 4B 00 4A 0B 20 05 58 |...ANZ BRK.J. .X|
00000340: 43 4F B0 44 20 2E 57 B0 20 30 00 55 0B 22 05 58 |CO.D .W. 0.U.".X|
00000350: 33 20 42 52 4B 00 60 0B 24 05 59 33 20 42 52 4B |3 BRK.`.$.Y3 BRK|
00000360: 00 6C 0B 26 05 4B 91 54 20 42 52 4B 00 7C 0B 28 |.l.&.K.T BRK.|.(|
00000370: 05 51 4B 91 54 20 2E 42 59 54 20 31 00 89 0B 2A |.QK.T .BYT 1...*|
00000380: 05 57 45 52 54 20 42 52 4B 00 97 0B 2C 05 4D 4F |.WERT BRK...,.MO|
00000390: 44 55 53 20 42 52 4B 00 A4 0B 2E 05 4D 41 53 4B |DUS BRK.....MASK|
000003A0: 20 42 52 4B 00 B1 0B 30 05 5A 45 49 47 20 42 52 | BRK...0.ZEIG BR|
000003B0: 4B 00 BF 0B 32 05 B0 4D 41 53 4B 20 42 52 4B 00 |K...2..MASK BRK.|
000003C0: CC 0B 34 05 50 52 49 4E 20 42 52 4B 00 EE 0B 78 |..4.PRIN BRK...x|
000003D0: 05 5A 45 49 43 48 45 4E 20 2E C6 20 22 20 2E 2B |.ZEICHEN .. " .+|
000003E0: 49 4A 4C 58 26 46 5A 25 4F 4D 57 23 2A 40 00 FA |IJLX&FZ%OMW#*@..|
000003F0: 0B 82 05 50 52 45 83 20 3D 2A 00 13 0C 83 05 2E |...PRE. =*......|
00000400: 42 59 54 20 25 30 30 30 30 20 3B 20 53 50 41 43 |BYT %0000 ; SPAC|
00000410: 45 20 30 00 22 0C 84 05 2E 42 59 54 20 25 30 30 |E 0."....BYT %00|
00000420: 30 30 00 31 0C 85 05 2E 42 59 54 20 25 30 30 30 |00.1....BYT %000|
00000430: 30 00 40 0C 86 05 2E 42 59 54 20 25 30 30 30 30 |0.@....BYT %0000|
00000440: 00 59 0C 87 05 2E 42 59 54 20 25 30 30 30 30 20 |.Y....BYT %0000 |
00000450: 3B 20 2E 20 20 20 20 20 31 00 68 0C 88 05 2E 42 |; . 1.h....B|
00000460: 59 54 20 25 30 31 30 30 00 77 0C 89 05 2E 42 59 |YT %0100.w....BY|
00000470: 54 20 25 30 30 30 30 00 86 0C 8A 05 2E 42 59 54 |T %0000......BYT|
00000480: 20 25 30 30 30 30 00 9F 0C 8B 05 2E 42 59 54 20 | %0000......BYT |
00000490: 25 30 30 30 30 20 3B 20 AA 20 20 20 20 20 32 00 |%0000 ; . 2.|
000004A0: AE 0C 8C 05 2E 42 59 54 20 25 30 31 30 30 00 BD |.....BYT %0100..|
000004B0: 0C 8D 05 2E 42 59 54 20 25 30 30 31 30 00 CC 0C |....BYT %0010...|
000004C0: 8E 05 2E 42 59 54 20 25 30 30 30 30 00 E5 0C 8F |...BYT %0000....|
000004D0: 05 2E 42 59 54 20 25 30 30 30 30 20 3B 20 49 20 |..BYT %0000 ; I |
000004E0: 20 20 20 20 33 00 F4 0C 90 05 2E 42 59 54 20 25 | 3......BYT %|
000004F0: 30 31 31 31 00 03 0D 91 05 2E 42 59 54 20 25 30 |0111......BYT %0|
00000500: 30 30 30 00 12 0D 92 05 2E 42 59 54 20 25 30 30 |000......BYT %00|
00000510: 30 30 00 2B 0D 93 05 2E 42 59 54 20 25 30 30 30 |00.+....BYT %000|
00000520: 30 20 3B 20 4A 20 20 20 20 20 34 00 3A 0D 94 05 |0 ; J 4.:...|
00000530: 2E 42 59 54 20 25 31 30 30 30 00 49 0D 95 05 2E |.BYT %1000.I....|
00000540: 42 59 54 20 25 30 31 31 31 00 58 0D 96 05 2E 42 |BYT %0111.X....B|
00000550: 59 54 20 25 30 30 30 30 00 71 0D 97 05 2E 42 59 |YT %0000.q....BY|
00000560: 54 20 25 30 30 30 30 20 3B 20 4C 20 20 20 20 20 |T %0000 ; L |
00000570: 35 00 80 0D 98 05 2E 42 59 54 20 25 31 31 31 31 |5......BYT %1111|
00000580: 00 8F 0D 99 05 2E 42 59 54 20 25 31 30 30 30 00 |......BYT %1000.|
00000590: 9E 0D 9A 05 2E 42 59 54 20 25 30 30 30 30 00 B7 |.....BYT %0000..|
000005A0: 0D 9B 05 2E 42 59 54 20 25 31 31 30 31 20 3B 20 |....BYT %1101 ; |
000005B0: 58 20 20 20 20 20 36 00 C6 0D 9C 05 2E 42 59 54 |X 6......BYT|
000005C0: 20 25 30 30 31 30 00 D5 0D 9D 05 2E 42 59 54 20 | %0010......BYT |
000005D0: 25 30 31 30 31 00 E4 0D 9E 05 2E 42 59 54 20 25 |%0101......BYT %|
000005E0: 30 30 30 30 00 FD 0D 9F 05 2E 42 59 54 20 25 30 |0000......BYT %0|
000005F0: 31 31 30 20 3B 20 26 20 20 20 20 20 37 00 0C 0E |110 ; & 7...|
00000600: A0 05 2E 42 59 54 20 25 31 30 30 31 00 1B 0E A1 |...BYT %1001....|
00000610: 05 2E 42 59 54 20 25 31 30 31 30 00 2A 0E A2 05 |..BYT %1010.*...|
00000620: 2E 42 59 54 20 25 31 30 30 30 00 43 0E A3 05 2E |.BYT %1000.C....|
00000630: 42 59 54 20 25 31 31 31 31 20 3B 20 46 20 20 20 |BYT %1111 ; F |
00000640: 20 20 38 00 52 0E A4 05 2E 42 59 54 20 25 30 31 | 8.R....BYT %01|
00000650: 30 31 00 61 0E A5 05 2E 42 59 54 20 25 30 30 30 |01.a....BYT %000|
00000660: 31 00 70 0E A6 05 2E 42 59 54 20 25 30 30 30 31 |1.p....BYT %0001|
00000670: 00 89 0E A7 05 2E 42 59 54 20 25 31 30 30 30 20 |......BYT %1000 |
00000680: 3B 20 5A 20 20 20 20 20 39 00 98 0E A8 05 2E 42 |; Z 9......B|
00000690: 59 54 20 25 31 31 30 31 00 A7 0E A9 05 2E 42 59 |YT %1101......BY|
000006A0: 54 20 25 31 30 31 31 00 B6 0E AA 05 2E 42 59 54 |T %1011......BYT|
000006B0: 20 25 31 30 30 31 00 CF 0E AB 05 2E 42 59 54 20 | %1001......BYT |
000006C0: 25 31 31 30 31 20 3B 20 25 20 20 20 20 31 30 00 |%1101 ; % 10.|
000006D0: DE 0E AC 05 2E 42 59 54 20 25 30 31 30 31 00 ED |.....BYT %0101..|
000006E0: 0E AD 05 2E 42 59 54 20 25 31 30 31 30 00 FC 0E |....BYT %1010...|
000006F0: AE 05 2E 42 59 54 20 25 31 30 31 31 00 15 0F AF |...BYT %1011....|
00000700: 05 2E 42 59 54 20 25 31 31 31 30 20 3B 20 4F 20 |..BYT %1110 ; O |
00000710: 20 20 20 31 31 00 24 0F B0 05 2E 42 59 54 20 25 | 11.$....BYT %|
00000720: 31 30 30 31 00 33 0F B1 05 2E 42 59 54 20 25 31 |1001.3....BYT %1|
00000730: 30 30 31 00 42 0F B2 05 2E 42 59 54 20 25 31 31 |001.B....BYT %11|
00000740: 31 31 00 5B 0F B3 05 2E 42 59 54 20 25 31 31 31 |11.[....BYT %111|
00000750: 31 20 3B 20 4D 20 20 20 20 31 32 00 6A 0F B4 05 |1 ; M 12.j...|
00000760: 2E 42 59 54 20 25 31 31 31 31 00 79 0F B5 05 2E |.BYT %1111.y....|
00000770: 42 59 54 20 25 31 30 30 31 00 88 0F B6 05 2E 42 |BYT %1001......B|
00000780: 59 54 20 25 31 30 30 31 00 A1 0F B7 05 2E 42 59 |YT %1001......BY|
00000790: 54 20 25 31 30 30 31 20 3B 20 57 20 20 20 20 31 |T %1001 ; W 1|
000007A0: 33 00 B0 0F B8 05 2E 42 59 54 20 25 31 30 31 31 |3......BYT %1011|
000007B0: 00 BF 0F B9 05 2E 42 59 54 20 25 31 31 31 31 00 |......BYT %1111.|
000007C0: CE 0F BA 05 2E 42 59 54 20 25 31 31 31 31 00 E7 |.....BYT %1111..|
000007D0: 0F BB 05 2E 42 59 54 20 25 31 31 31 30 20 3B 20 |....BYT %1110 ; |
000007E0: 23 20 20 20 20 31 34 00 F6 0F BC 05 2E 42 59 54 |# 14......BYT|
000007F0: 20 25 31 31 31 31 00 05 10 BD 05 2E 42 59 54 20 | %1111......BYT |
00000800: 25 31 31 31 31 00 14 10 BE 05 2E 42 59 54 20 25 |%1111......BYT %|
00000810: 30 31 31 31 00 2D 10 BF 05 2E 42 59 54 20 25 31 |0111.-....BYT %1|
00000820: 31 31 30 20 3B 20 AC 20 20 20 20 31 35 00 3C 10 |110 ; . 15.<.|
00000830: C0 05 2E 42 59 54 20 25 31 31 31 31 00 4B 10 C1 |...BYT %1111.K..|
00000840: 05 2E 42 59 54 20 25 31 31 31 31 00 5A 10 C2 05 |..BYT %1111.Z...|
00000850: 2E 42 59 54 20 25 31 31 31 31 00 73 10 C3 05 2E |.BYT %1111.s....|
00000860: 42 59 54 20 25 31 31 31 31 20 3B 20 40 20 20 20 |BYT %1111 ; @ |
00000870: 20 31 36 00 82 10 C4 05 2E 42 59 54 20 25 31 31 | 16......BYT %11|
00000880: 31 31 00 91 10 C5 05 2E 42 59 54 20 25 31 31 31 |11......BYT %111|
00000890: 31 00 A0 10 C6 05 2E 42 59 54 20 25 31 31 31 31 |1......BYT %1111|
000008A0: 00 E1 10 DC 05 48 45 4C 4C 4F 20 2E C6 20 22 9E |.....HELLO .. ".|
000008B0: 11 20 4C 45 54 54 45 52 50 52 49 4E 54 20 31 2E |. LETTERPRINT 1.|
000008C0: 33 20 20 20 56 4F 4E 20 4E 49 4B 4F 4C 41 55 53 |3 VON NIKOLAUS|
000008D0: 20 48 45 55 53 4C 45 52 22 3A 2E 42 59 54 20 31 | HEUSLER":.BYT 1|
000008E0: 33 00 1A 11 DE 05 2E C6 20 22 20 A3 A3 A3 A3 A3 |3....... " .....|
000008F0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 20 20 20 20 20 20 |.......... |
00000900: 20 20 5A 57 45 4E 47 41 55 45 52 57 45 47 20 31 | ZWENGAUERWEG 1|
00000910: 38 9D 9D 9D 9D 9D 9D 9D 9D 9D 00 44 11 E0 05 2E |8..........D....|
00000920: C6 20 22 9D 9D 9D 9D 9D 9D 9D 11 38 30 30 30 20 |. "........8000 |
00000930: 4D 55 45 4E 43 48 45 4E 20 37 31 22 3A 2E 42 59 |MUENCHEN 71":.BY|
00000940: 54 20 31 33 00 74 11 E2 05 2E C6 20 22 20 A4 A4 |T 13.t..... " ..|
00000950: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000960: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000970: A4 A4 A4 A4 00 9A 11 E4 05 2E 42 59 54 20 31 33 |..........BYT 13|
00000980: 3A 2E C6 20 22 11 20 42 49 54 54 45 20 57 41 45 |:.. ". BITTE WAE|
00000990: 48 08 4C 45 4E 20 53 49 45 3A 00 C2 11 E6 05 2E |H.LEN SIE:......|
000009A0: 42 59 54 20 31 33 3A 2E C6 20 22 11 20 20 41 3A |BYT 13:.. ". A:|
000009B0: 20 47 52 41 46 49 4B 20 4C 41 44 45 4E 22 3A 42 | GRAFIK LADEN":B|
000009C0: 52 4B 00 E9 11 E8 05 48 32 20 2E 42 59 54 20 31 |RK.....H2 .BYT 1|
000009D0: 33 3A 2E C6 20 22 11 20 20 42 3A 20 47 52 41 46 |3:.. ". B: GRAF|
000009E0: 49 4B 20 5A 45 49 47 45 4E 00 0B 12 EA 05 2E 42 |IK ZEIGEN......B|
000009F0: 59 54 20 31 33 3A 2E C6 20 22 11 20 20 43 3A 20 |YT 13:.. ". C: |
00000A00: 49 4E 56 45 52 54 49 45 52 45 4E 00 3C 12 EC 05 |INVERTIEREN.<...|
00000A10: 2E 42 59 54 20 31 33 3A 2E C6 20 22 11 20 20 44 |.BYT 13:.. ". D|
00000A20: 3A 20 50 52 45 56 49 45 57 20 2F 20 3C 53 48 49 |: PREVIEW / <SHI|
00000A30: 46 54 3E 3A 20 44 52 55 43 4B 45 4E 00 78 12 ED |FT>: DRUCKEN.x..|
00000A40: 05 2E 42 59 54 20 31 33 3A 2E C6 20 22 11 20 20 |..BYT 13:.. ". |
00000A50: 45 3A 20 4B 4F 4E 54 52 41 53 54 3A 22 3A 2E 42 |E: KONTRAST:":.B|
00000A60: 59 54 20 31 33 3A 2E C6 20 22 11 20 20 46 3A 20 |YT 13:.. ". F: |
00000A70: 44 52 55 43 4B 45 52 3A 00 9C 12 EE 05 2E 42 59 |DRUCKER:......BY|
00000A80: 54 20 31 33 3A 2E C6 20 22 11 20 20 47 3A 20 45 |T 13:.. ". G: E|
00000A90: 4E 44 45 22 3A 2E 42 59 54 20 31 33 00 CC 12 EF |NDE":.BYT 13....|
00000AA0: 05 2E C6 20 22 20 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |... " ..........|
00000AB0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000AC0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 00 0A 13 F0 |................|
00000AD0: 05 2E 42 59 54 20 31 33 3A 2E C6 20 22 11 20 45 |..BYT 13:.. ". E|
00000AE0: 49 4E 20 4E 53 53 20 50 52 4F 47 52 41 4D 4D 20 |IN NSS PROGRAMM |
00000AF0: 20 20 20 20 28 57 29 20 4E 48 2D 30 36 30 31 38 | (W) NH-06018|
00000B00: 39 2D 41 52 52 22 3A 42 52 4B 00 2B 13 FA 05 4E |9-ARR":BRK.+...N|
00000B10: 41 4D 54 58 54 20 2E C6 20 22 20 46 49 4C 45 4E |AMTXT .. " FILEN|
00000B20: 41 4D 45 20 3F 20 22 3A 42 52 4B 00 49 13 04 06 |AME ? ":BRK.I...|
00000B30: 50 52 49 54 41 42 20 2E 57 B0 20 50 52 49 31 2C |PRITAB .W. PRI1,|
00000B40: 50 52 49 32 2C 50 52 49 33 00 69 13 06 06 50 52 |PRI2,PRI3.i...PR|
00000B50: 49 31 20 2E C6 20 22 43 4F 4D 4D 4F 44 4F 52 45 |I1 .. "COMMODORE|
00000B60: 20 4D 50 53 22 3A 42 52 4B 00 89 13 08 06 50 52 | MPS":BRK.....PR|
00000B70: 49 32 20 2E C6 20 22 41 53 43 49 49 20 4D 49 54 |I2 .. "ASCII MIT|
00000B80: 20 4C 46 20 22 3A 42 52 4B 00 A9 13 0A 06 50 52 | LF ":BRK.....PR|
00000B90: 49 33 20 2E C6 20 22 41 53 43 49 49 20 4F 48 4E |I3 .. "ASCII OHN|
00000BA0: 45 20 4C 46 22 3A 42 52 4B 00 C7 13 0E 06 57 48 |E LF":BRK.....WH|
00000BB0: 41 54 41 42 20 2E 57 B0 20 57 48 41 31 2C 57 48 |ATAB .W. WHA1,WH|
00000BC0: 41 32 2C 57 48 41 33 00 DF 13 10 06 57 48 41 31 |A2,WHA3.....WHA1|
00000BD0: 20 2E 42 59 54 20 38 2C 31 33 2C 31 35 2C 30 00 | .BYT 8,13,15,0.|
00000BE0: F2 13 12 06 57 48 41 32 20 2E 42 59 54 20 31 33 |....WHA2 .BYT 13|
00000BF0: 2C 30 00 08 14 14 06 57 48 41 33 20 2E 42 59 54 |,0.....WHA3 .BYT|
00000C00: 20 31 33 2C 31 30 2C 30 00 43 14 40 06 4D 45 4E | 13,10,0.C.@.MEN|
00000C10: 54 41 42 20 2E 57 B0 20 4C 41 44 45 2C 4C 4F 4F |TAB .W. LADE,LOO|
00000C20: 4B 2C 49 4E 56 45 52 54 2C 50 52 45 56 49 2C 4B |K,INVERT,PREVI,K|
00000C30: 91 54 52 41 53 54 2C 44 45 4C 50 52 49 2C 52 45 |.TRAST,DELPRI,RE|
00000C40: 53 45 54 00 8A 14 B8 0B 54 49 54 45 4C 20 4A 53 |SET.....TITEL JS|
00000C50: 52 20 43 4C 41 4C 4C 3A 4A 53 52 20 43 B5 3A 4C |R CLALL:JSR C.:L|
00000C60: 44 41 20 23 B3 48 45 4C 4C 4F 3A 4C 44 59 20 23 |DA #.HELLO:LDY #|
00000C70: B1 48 45 4C 4C 4F 3A 4A 53 52 20 53 54 52 4F 55 |.HELLO:JSR STROU|
00000C80: 54 3A 4C 44 41 20 23 31 32 38 00 D8 14 BA 0B 53 |T:LDA #128.....S|
00000C90: 54 41 20 52 45 50 54 3A 4C 44 41 20 23 30 3A 53 |TA REPT:LDA #0:S|
00000CA0: 54 41 20 56 49 43 AA 33 32 3A 4C 44 41 20 23 36 |TA VIC.32:LDA #6|
00000CB0: 3A 53 54 41 20 56 49 43 AA 33 33 3A 4C 44 41 20 |:STA VIC.33:LDA |
00000CC0: 23 B3 48 32 3A 4C 44 59 20 23 B1 48 32 3A 4A 53 |#.H2:LDY #.H2:JS|
00000CD0: 52 20 53 54 52 4F 55 54 00 F5 14 BE 0B 46 55 52 |R STROUT.....FUR|
00000CE0: 20 4A 53 52 20 4B 91 A4 55 54 3A 4A 53 52 20 4F | JSR K..UT:JSR O|
00000CF0: 55 54 50 52 49 00 08 15 C2 0B 4C 44 41 20 23 30 |UTPRI.....LDA #0|
00000D00: 3A 53 54 41 20 4B 45 59 00 3B 15 C4 0B 4D 45 4E |:STA KEY.;...MEN|
00000D10: 20 4A 53 52 20 A1 3A 43 4D 50 20 23 22 13 22 3A | JSR .:CMP #".":|
00000D20: 42 45 51 20 48 4F 4D 45 3A 43 4D 50 20 23 22 C4 |BEQ HOME:CMP #".|
00000D30: 22 3A 42 45 51 20 44 52 55 43 4B 00 72 15 C5 0B |":BEQ DRUCK.r...|
00000D40: 43 4D 50 20 23 22 41 22 3A 42 43 43 20 4D 45 4E |CMP #"A":BCC MEN|
00000D50: 3A 43 4D 50 20 23 22 48 22 3A 42 43 53 20 4D 45 |:CMP #"H":BCS ME|
00000D60: 4E 3A 53 42 43 20 23 22 40 22 3A 41 53 4C 3A 54 |N:SBC #"@":ASL:T|
00000D70: 41 59 00 B5 15 C6 0B 4C 44 41 20 4D 45 4E 54 41 |AY.....LDA MENTA|
00000D80: 42 2C 59 3A 53 54 41 20 54 4D 50 3A 4C 44 41 20 |B,Y:STA TMP:LDA |
00000D90: 4D 45 4E 54 41 42 AA 31 2C 59 3A 53 54 41 20 54 |MENTAB.1,Y:STA T|
00000DA0: 4D 50 AA 31 3A 4A 53 52 20 CB CB 3A 4A 4D 50 20 |MP.1:JSR ..:JMP |
00000DB0: 54 49 54 45 4C 00 E5 15 C8 0B 48 4F 4D 45 20 4C |TITEL.....HOME L|
00000DC0: 44 41 20 23 30 3A 53 54 41 20 4B 91 54 3A 4C 44 |DA #0:STA K.T:LD|
00000DD0: 41 20 23 31 3A 53 54 41 20 51 4B 91 54 3A 42 4E |A #1:STA QK.T:BN|
00000DE0: 45 20 46 55 52 00 FF 15 CA 0B 44 52 55 43 4B 20 |E FUR.....DRUCK |
00000DF0: 4A 53 52 20 99 3A 4A 4D 50 20 54 49 54 45 4C 00 |JSR .:JMP TITEL.|
00000E00: 10 16 CC 0B CB CB 20 4A 4D 50 20 28 54 4D 50 29 |...... JMP (TMP)|
00000E10: 00 3F 16 A0 0F 53 48 4F 57 20 4C 44 41 20 23 35 |.?...SHOW LDA #5|
00000E20: 39 3A 53 54 41 20 56 49 43 AA 31 37 3A 4C 44 41 |9:STA VIC.17:LDA|
00000E30: 20 23 32 39 3A 53 54 41 20 56 49 43 AA 32 34 00 | #29:STA VIC.24.|
00000E40: 6A 16 A2 0F 4C 44 58 20 23 34 3A 53 54 58 20 54 |j...LDX #4:STX T|
00000E50: 4D 50 AA 31 3A 4C 44 59 20 23 30 3A 53 54 59 20 |MP.1:LDY #0:STY |
00000E60: 54 4D 50 3A 4C 44 41 20 23 31 00 AA 16 A4 0F 46 |TMP:LDA #1.....F|
00000E70: 41 45 52 42 20 53 54 41 20 28 54 4D 50 29 2C 59 |AERB STA (TMP),Y|
00000E80: 3A 49 4E 59 3A 42 4E 45 20 46 41 45 52 42 3A 49 |:INY:BNE FAERB:I|
00000E90: 4E 43 20 54 4D 50 AA 31 3A 44 45 58 3A 42 4E 45 |NC TMP.1:DEX:BNE|
00000EA0: 20 46 41 45 52 42 3A 52 54 53 00 DF 16 AA 0F 49 | FAERB:RTS.....I|
00000EB0: 4E 56 45 52 54 20 4A 53 52 20 53 48 4F 57 3A 4C |NVERT JSR SHOW:L|
00000EC0: 44 58 20 23 33 32 3A 53 54 58 20 54 4D 50 AA 31 |DX #32:STX TMP.1|
00000ED0: 3A 4C 44 59 20 23 30 3A 53 54 59 20 54 4D 50 00 |:LDY #0:STY TMP.|
00000EE0: 28 17 AC 0F 49 4E 56 20 4C 44 41 20 28 54 4D 50 |(...INV LDA (TMP|
00000EF0: 29 2C 59 3A 45 B0 20 23 AB 31 3A 53 54 41 20 28 |),Y:E. #.1:STA (|
00000F00: 54 4D 50 29 2C 59 3A 49 4E 59 3A 42 4E 45 20 49 |TMP),Y:INY:BNE I|
00000F10: 4E 56 3A 49 4E 43 20 54 4D 50 AA 31 3A 44 45 58 |NV:INC TMP.1:DEX|
00000F20: 3A 42 4E 45 20 49 4E 56 00 35 17 B2 0F 4A 4D 50 |:BNE INV.5...JMP|
00000F30: 20 92 4B 45 59 00 7B 17 04 10 48 49 44 45 20 4C | .KEY.{...HIDE L|
00000F40: 44 59 20 23 30 3A 53 54 59 20 54 4D 50 3A 53 54 |DY #0:STY TMP:ST|
00000F50: 59 20 54 4D 50 32 3A 4C 44 58 20 23 33 32 3A 53 |Y TMP2:LDX #32:S|
00000F60: 54 58 20 54 4D 50 AA 31 3A 4C 44 41 20 23 36 34 |TX TMP.1:LDA #64|
00000F70: 3A 53 54 41 20 54 4D 50 32 AA 31 00 CA 17 06 10 |:STA TMP2.1.....|
00000F80: 48 49 20 4C 44 41 20 28 54 4D 50 29 2C 59 3A 53 |HI LDA (TMP),Y:S|
00000F90: 54 41 20 28 54 4D 50 32 29 2C 59 3A 49 4E 59 3A |TA (TMP2),Y:INY:|
00000FA0: 42 4E 45 20 48 49 3A 49 4E 43 20 54 4D 50 AA 31 |BNE HI:INC TMP.1|
00000FB0: 3A 49 4E 43 20 54 4D 50 32 AA 31 3A 44 45 58 3A |:INC TMP2.1:DEX:|
00000FC0: 42 4E 45 20 48 49 3A 52 54 53 00 11 18 68 10 52 |BNE HI:RTS...h.R|
00000FD0: 55 45 43 4B 20 4C 44 59 20 23 30 3A 53 54 59 20 |UECK LDY #0:STY |
00000FE0: 54 4D 50 3A 53 54 59 20 54 4D 50 32 3A 4C 44 58 |TMP:STY TMP2:LDX|
00000FF0: 20 23 33 32 3A 53 54 58 20 54 4D 50 AA 31 3A 4C | #32:STX TMP.1:L|
00001000: 44 41 20 23 36 34 3A 53 54 41 20 54 4D 50 32 AA |DA #64:STA TMP2.|
00001010: 31 00 60 18 6A 10 52 55 20 4C 44 41 20 28 54 4D |1.`.j.RU LDA (TM|
00001020: 50 32 29 2C 59 3A 53 54 41 20 28 54 4D 50 29 2C |P2),Y:STA (TMP),|
00001030: 59 3A 49 4E 59 3A 42 4E 45 20 52 55 3A 49 4E 43 |Y:INY:BNE RU:INC|
00001040: 20 54 4D 50 AA 31 3A 49 4E 43 20 54 4D 50 32 AA | TMP.1:INC TMP2.|
00001050: 31 3A 44 45 58 3A 42 4E 45 20 52 55 3A 52 54 53 |1:DEX:BNE RU:RTS|
00001060: 00 72 18 CB 10 4C 4F 4F 4B 20 4A 53 52 20 53 48 |.r...LOOK JSR SH|
00001070: 4F 57 00 8A 18 CC 10 92 4B 45 59 20 4C 44 41 20 |OW......KEY LDA |
00001080: 23 30 3A 53 54 41 20 4B 45 59 00 AC 18 CE 10 57 |#0:STA KEY.....W|
00001090: 4B 20 43 4D 50 20 4B 45 59 3A 42 45 51 20 57 4B |K CMP KEY:BEQ WK|
000010A0: 3A 44 45 43 20 4B 45 59 3A 52 54 53 00 E9 18 88 |:DEC KEY:RTS....|
000010B0: 13 52 45 49 48 45 20 4C 44 41 20 23 B3 33 31 36 |.REIHE LDA #.316|
000010C0: 3A 53 54 41 20 58 58 3A 4C 44 41 20 23 B1 33 31 |:STA XX:LDA #.31|
000010D0: 36 3A 53 54 41 20 58 58 AA 31 3A 4C 44 41 20 23 |6:STA XX.1:LDA #|
000010E0: 37 39 3A 53 54 41 20 58 33 00 09 19 8A 13 52 35 |79:STA X3.....R5|
000010F0: 20 4C 44 41 20 4D 4F 44 55 53 3A 42 4E 45 20 52 | LDA MODUS:BNE R|
00001100: 36 3A 4C 44 58 20 23 31 35 00 25 19 8C 13 52 AF |6:LDX #15.%...R.|
00001110: 20 4A 53 52 20 53 50 41 43 45 3A 44 45 58 3A 42 | JSR SPACE:DEX:B|
00001120: 4E 45 20 52 AF 00 49 19 8E 13 52 36 20 4C 44 41 |NE R..I...R6 LDA|
00001130: 20 23 30 3A 53 54 41 20 59 59 3A 4C 44 41 20 23 | #0:STA YY:LDA #|
00001140: 34 39 3A 53 54 41 20 59 33 00 7B 19 92 13 52 31 |49:STA Y3.{...R1|
00001150: 20 4C 44 41 20 23 30 3A 53 54 41 20 41 4E 5A 3A | LDA #0:STA ANZ:|
00001160: 4C 44 41 20 23 33 3A 53 54 41 20 59 32 3A 4C 44 |LDA #3:STA Y2:LD|
00001170: 41 20 59 59 3A 53 54 41 20 59 31 00 99 19 94 13 |A YY:STA Y1.....|
00001180: 4A 53 52 20 A1 3A 43 4D 50 20 23 22 03 22 3A 42 |JSR .:CMP #".":B|
00001190: 4E 45 20 52 33 3A 52 54 53 00 CE 19 97 13 52 33 |NE R3:RTS.....R3|
000011A0: 20 4C 44 41 20 23 33 3A 53 54 41 20 58 32 3A 4C | LDA #3:STA X2:L|
000011B0: 44 41 20 58 58 3A 53 54 41 20 58 31 3A 4C 44 41 |DA XX:STA X1:LDA|
000011C0: 20 58 58 AA 31 3A 53 54 41 20 58 31 AA 31 00 0A | XX.1:STA X1.1..|
000011D0: 1A 9E 13 52 34 20 4C 44 58 20 59 31 3A 4C 44 41 |...R4 LDX Y1:LDA|
000011E0: 20 58 31 3A 53 54 41 20 58 43 4F B0 44 3A 4C 44 | X1:STA XCO.D:LD|
000011F0: 41 20 58 31 AA 31 3A 53 54 41 20 58 43 4F B0 44 |A X1.1:STA XCO.D|
00001200: AA 31 3A 4A 53 52 20 50 4F B5 00 2C 1A A0 13 54 |.1:JSR PO..,...T|
00001210: 41 58 3A AF 20 28 54 4D 50 29 2C 59 3A 42 45 51 |AX:. (TMP),Y:BEQ|
00001220: 20 41 55 53 3A 49 4E 43 20 41 4E 5A 00 66 1A A2 | AUS:INC ANZ.f..|
00001230: 13 41 55 53 20 54 58 41 3A 45 B0 20 28 54 4D 50 |.AUS TXA:E. (TMP|
00001240: 29 2C 59 3A 53 54 41 20 28 54 4D 50 29 2C 59 3A |),Y:STA (TMP),Y:|
00001250: 49 4E 43 20 58 31 3A 42 4E 45 20 4E 31 3A 49 4E |INC X1:BNE N1:IN|
00001260: 43 20 58 31 AA 31 00 7B 1A A4 13 4E 31 20 44 45 |C X1.1.{...N1 DE|
00001270: 43 20 58 32 3A 42 50 4C 20 52 34 00 94 1A A6 13 |C X2:BPL R4.....|
00001280: 49 4E 43 20 59 31 3A 44 45 43 20 59 32 3A 42 50 |INC Y1:DEC Y2:BP|
00001290: 4C 20 52 33 00 BB 1A A8 13 4C 44 41 20 41 4E 5A |L R3.....LDA ANZ|
000012A0: 3A 43 4C 43 3A 41 44 43 20 4B 91 54 3A 42 50 4C |:CLC:ADC K.T:BPL|
000012B0: 20 B9 49 54 3A 4C 44 41 20 23 30 00 DC 1A AA 13 | .IT:LDA #0.....|
000012C0: B9 49 54 20 43 4D 50 20 23 31 36 3A 42 43 43 20 |.IT CMP #16:BCC |
000012D0: 4B 4C 31 36 3A 4C 44 41 20 23 31 36 00 0F 1B AC |KL16:LDA #16....|
000012E0: 13 4B 4C 31 36 20 54 41 58 3A 4C 44 41 20 4D 4F |.KL16 TAX:LDA MO|
000012F0: 44 55 53 3A 42 45 51 20 48 41 52 44 3A 4A 53 52 |DUS:BEQ HARD:JSR|
00001300: 20 53 4F 46 54 3A 4A 4D 50 20 42 45 49 44 45 00 | SOFT:JMP BEIDE.|
00001310: 30 1B AE 13 48 41 52 44 20 4C 44 41 20 5A 45 49 |0...HARD LDA ZEI|
00001320: 43 48 45 4E 2C 58 3A 4A 53 52 20 42 53 4F 55 54 |CHEN,X:JSR BSOUT|
00001330: 00 74 1B B0 13 42 45 49 44 45 20 4C 44 41 20 59 |.t...BEIDE LDA Y|
00001340: 59 3A 43 4C 43 3A 41 44 43 20 23 34 3A 53 54 41 |Y:CLC:ADC #4:STA|
00001350: 20 59 59 3A 44 45 43 20 59 33 3A 42 50 4C 20 51 | YY:DEC Y3:BPL Q|
00001360: 52 31 3A 4C 44 41 20 4D 4F 44 55 53 3A 42 4E 45 |R1:LDA MODUS:BNE|
00001370: 20 4E 52 54 00 B0 1B B2 13 4C 44 41 20 50 52 49 | NRT.....LDA PRI|
00001380: 4E 3A 41 53 4C 3A 54 41 58 3A 4C 44 41 20 57 48 |N:ASL:TAX:LDA WH|
00001390: 41 54 41 42 2C 58 3A 4C 44 59 20 57 48 41 54 41 |ATAB,X:LDY WHATA|
000013A0: 42 AA 31 2C 58 3A 4A 53 52 20 53 54 52 4F 55 54 |B.1,X:JSR STROUT|
000013B0: 00 EA 1B BA 13 4E 52 54 20 4C 44 41 20 58 58 3A |.....NRT LDA XX:|
000013C0: 53 45 43 3A 53 42 43 20 23 34 3A 53 54 41 20 58 |SEC:SBC #4:STA X|
000013D0: 58 3A 4C 44 41 20 58 58 AA 31 3A 53 42 43 20 23 |X:LDA XX.1:SBC #|
000013E0: 30 3A 53 54 41 20 58 58 AA 31 00 04 1C BC 13 44 |0:STA XX.1.....D|
000013F0: 45 43 20 58 33 3A 42 4D 49 20 4E 52 35 3A 4A 4D |EC X3:BMI NR5:JM|
00001400: 50 20 52 35 00 10 1C BE 13 4E 52 35 20 52 54 53 |P R5.....NR5 RTS|
00001410: 00 1F 1C C0 13 51 52 31 20 4A 4D 50 20 52 31 00 |.....QR1 JMP R1.|
00001420: 4B 1C EC 13 53 4F 46 54 20 54 58 41 3A 41 53 4C |K...SOFT TXA:ASL|
00001430: 3A 41 53 4C 3A 53 54 41 20 5A 45 49 47 3A 4C 44 |:ASL:STA ZEIG:LD|
00001440: 41 20 23 33 3A 53 54 41 20 59 32 00 84 1C 00 14 |A #3:STA Y2.....|
00001450: 4C 44 58 20 59 59 3A 4C 44 41 20 58 58 3A 53 54 |LDX YY:LDA XX:ST|
00001460: 41 20 58 43 4F B0 44 3A 4C 44 41 20 58 58 AA 31 |A XCO.D:LDA XX.1|
00001470: 3A 53 54 41 20 58 43 4F B0 44 AA 31 3A 4A 53 52 |:STA XCO.D.1:JSR|
00001480: 20 50 4F B5 00 AC 1C 04 14 43 4D 50 20 23 31 30 | PO......CMP #10|
00001490: 3A 42 43 43 20 4C 4F 57 3A 4C 44 41 20 23 25 31 |:BCC LOW:LDA #%1|
000014A0: 31 31 31 3A 2E 42 59 54 20 24 32 43 00 CC 1C 08 |111:.BYT $2C....|
000014B0: 14 4C 4F 57 20 4C 44 41 20 23 25 31 31 31 31 30 |.LOW LDA #%11110|
000014C0: 30 30 30 3A 53 54 41 20 4D 41 53 4B 00 F0 1C 09 |000:STA MASK....|
000014D0: 14 53 35 20 4C 44 58 20 5A 45 49 47 3A 49 4E 43 |.S5 LDX ZEIG:INC|
000014E0: 20 5A 45 49 47 3A 4C 44 41 20 50 52 45 83 2C 58 | ZEIG:LDA PRE.,X|
000014F0: 00 18 1D 0A 14 42 49 54 20 4D 41 53 4B 3A 42 4D |.....BIT MASK:BM|
00001500: 49 20 4E 4F 53 48 8B 54 3A 41 53 4C 3A 41 53 4C |I NOSH.T:ASL:ASL|
00001510: 3A 41 53 4C 3A 41 53 4C 00 55 1D 0C 14 4E 4F 53 |:ASL:ASL.U...NOS|
00001520: 48 8B 54 20 53 54 41 20 B0 4D 41 53 4B 3A 4C 44 |H.T STA .MASK:LD|
00001530: 41 20 28 54 4D 50 29 2C 59 3A AF 20 4D 41 53 4B |A (TMP),Y:. MASK|
00001540: 3A B0 41 20 B0 4D 41 53 4B 3A 53 54 41 20 28 54 |:.A .MASK:STA (T|
00001550: 4D 50 29 2C 59 00 6F 1D 0E 14 49 4E 59 3A 44 45 |MP),Y.o...INY:DE|
00001560: 43 20 59 32 3A 42 50 4C 20 53 35 3A 52 54 53 00 |C Y2:BPL S5:RTS.|
00001570: 7B 1D 8E 17 50 4F B5 20 54 58 41 00 C2 1D 92 17 |{...PO. TXA.....|
00001580: 4C 53 52 3A 4C 53 52 3A 4C 53 52 3A 41 53 4C 3A |LSR:LSR:LSR:ASL:|
00001590: 54 41 59 3A 4C 44 41 20 4D 55 4C 54 AA 31 2C 59 |TAY:LDA MULT.1,Y|
000015A0: 3A 53 54 41 20 54 4D 50 AA 31 3A 54 58 41 3A AF |:STA TMP.1:TXA:.|
000015B0: 20 23 37 3A 43 4C 43 3A 41 44 43 20 4D 55 4C 54 | #7:CLC:ADC MULT|
000015C0: 2C 59 00 EF 1D 93 17 53 54 41 20 54 4D 50 3A 4C |,Y.....STA TMP:L|
000015D0: 44 41 20 58 43 4F B0 44 3A AF 20 23 24 46 38 3A |DA XCO.D:. #$F8:|
000015E0: 41 44 43 20 54 4D 50 3A 53 54 41 20 54 4D 50 00 |ADC TMP:STA TMP.|
000015F0: 32 1E 94 17 4C 44 41 20 54 4D 50 AA 31 3A 41 44 |2...LDA TMP.1:AD|
00001600: 43 20 58 43 4F B0 44 AA 31 3A 53 54 41 20 54 4D |C XCO.D.1:STA TM|
00001610: 50 AA 31 3A 4C 44 41 20 58 43 4F B0 44 3A AF 20 |P.1:LDA XCO.D:. |
00001620: 23 37 3A 54 41 58 3A 4C 44 41 20 52 45 42 49 54 |#7:TAX:LDA REBIT|
00001630: 2C 58 00 41 1E 96 17 4C 44 59 20 23 30 3A 52 54 |,X.A...LDY #0:RT|
00001640: 53 00 7C 1E 58 1B 41 55 46 20 4C 44 41 20 23 30 |S.|.X.AUF LDA #0|
00001650: 3A 4A 53 52 20 53 45 54 4E 41 4D 3A 54 41 59 3A |:JSR SETNAM:TAY:|
00001660: 4C 44 41 20 23 44 52 3A 54 41 58 3A 4A 53 52 20 |LDA #DR:TAX:JSR |
00001670: 53 45 54 50 41 52 3A 4A 53 52 20 9F 00 97 1E 5A |SETPAR:JSR ....Z|
00001680: 1B 4C 44 58 20 23 44 52 3A 4A 53 52 20 43 48 4B |.LDX #DR:JSR CHK|
00001690: 4F 55 54 3A 52 54 53 00 D1 1E BC 1B 4C 41 44 45 |OUT:RTS.....LADE|
000016A0: 20 4A 53 52 20 8E 3A 4C 44 58 20 23 32 33 3A 4A | JSR .:LDX #23:J|
000016B0: 53 52 20 9C 58 3A 4C 44 41 20 23 32 33 3A 53 54 |SR .X:LDA #23:ST|
000016C0: 41 20 5A 45 49 4C 45 3A 4A 53 52 20 53 45 54 43 |A ZEILE:JSR SETC|
000016D0: 52 00 0C 1F BE 1B 4C 44 41 20 23 B3 4E 41 4D 54 |R.....LDA #.NAMT|
000016E0: 58 54 3A 4C 44 59 20 23 B1 4E 41 4D 54 58 54 3A |XT:LDY #.NAMTXT:|
000016F0: 4A 53 52 20 53 54 52 4F 55 54 3A 4C 44 58 20 23 |JSR STROUT:LDX #|
00001700: 30 3A 53 54 58 20 53 54 41 54 55 53 00 4D 1F C0 |0:STX STATUS.M..|
00001710: 1B A1 4E 41 4D 45 20 4A 53 52 20 85 3A 43 4D 50 |..NAME JSR .:CMP|
00001720: 20 23 31 33 3A 42 45 51 20 52 45 54 3A 53 54 41 | #13:BEQ RET:STA|
00001730: 20 4E 41 4D 45 2C 58 3A 49 4E 58 3A 43 50 58 20 | NAME,X:INX:CPX |
00001740: 23 31 36 3A 42 43 43 20 A1 4E 41 4D 45 00 68 1F |#16:BCC .NAME.h.|
00001750: C2 1B 52 45 54 20 54 58 41 3A 42 4E 45 20 57 41 |..RET TXA:BNE WA|
00001760: 52 57 41 53 3A 52 54 53 00 98 1F C4 1B 57 41 52 |RWAS:RTS.....WAR|
00001770: 57 41 53 20 54 58 41 3A 4C 44 58 20 23 B3 4E 41 |WAS TXA:LDX #.NA|
00001780: 4D 45 3A 4C 44 59 20 23 B1 4E 41 4D 45 3A 4A 53 |ME:LDY #.NAME:JS|
00001790: 52 20 53 45 54 4E 41 4D 00 D7 1F C6 1B 4A 53 52 |R SETNAM.....JSR|
000017A0: 20 53 48 4F 57 3A 4C 44 58 20 23 38 3A 4C 44 59 | SHOW:LDX #8:LDY|
000017B0: 20 23 30 3A 4A 53 52 20 53 45 54 50 41 52 3A 4C | #0:JSR SETPAR:L|
000017C0: 44 41 20 23 30 3A 54 41 58 3A 4C 44 59 20 23 33 |DA #0:TAX:LDY #3|
000017D0: 32 3A 4A 53 52 20 93 00 E4 1F C8 1B 4A 4D 50 20 |2:JSR ......JMP |
000017E0: 92 4B 45 59 00 29 20 40 1F 99 20 4C 44 41 20 23 |.KEY.) @.. LDA #|
000017F0: 30 3A 53 54 41 20 4D 4F 44 55 53 3A 4A 53 52 20 |0:STA MODUS:JSR |
00001800: 48 49 44 45 3A 4A 53 52 20 53 48 4F 57 3A 4A 53 |HIDE:JSR SHOW:JS|
00001810: 52 20 41 55 46 3A 4A 53 52 20 52 45 49 48 45 3A |R AUF:JSR REIHE:|
00001820: 4A 53 52 20 52 55 45 43 4B 00 3B 20 42 1F 4C 44 |JSR RUECK.; B.LD|
00001830: 41 20 23 44 52 3A 4A 4D 50 20 A0 00 72 20 4A 1F |A #DR:JMP ..r J.|
00001840: 50 52 45 56 49 20 4C 44 41 20 23 31 3A 53 54 41 |PREVI LDA #1:STA|
00001850: 20 4D 4F 44 55 53 3A 4A 53 52 20 48 49 44 45 3A | MODUS:JSR HIDE:|
00001860: 4A 53 52 20 53 48 4F 57 3A 4A 53 52 20 52 45 49 |JSR SHOW:JSR REI|
00001870: 48 45 00 89 20 4C 1F 4A 53 52 20 92 4B 45 59 3A |HE.. L.JSR .KEY:|
00001880: 4A 4D 50 20 52 55 45 43 4B 00 C3 20 28 23 4B 91 |JMP RUECK.. (#K.|
00001890: 54 52 41 53 54 20 4C 44 41 20 4B 91 54 3A 43 4C |TRAST LDA K.T:CL|
000018A0: 43 3A 41 44 43 20 51 4B 91 54 3A 53 54 41 20 4B |C:ADC QK.T:STA K|
000018B0: 91 54 3A 43 4D 50 20 23 AB 31 36 3A 42 45 51 20 |.T:CMP #.16:BEQ |
000018C0: 57 80 45 00 D9 20 2A 23 43 4D 50 20 23 31 36 3A |W.E.. *#CMP #16:|
000018D0: 42 4E 45 20 4E 4F 57 80 45 00 FA 20 2C 23 57 80 |BNE NOW.E.. ,#W.|
000018E0: 45 20 4C 44 41 20 51 4B 91 54 3A 45 B0 20 23 AB |E LDA QK.T:E. #.|
000018F0: 32 3A 53 54 41 20 51 4B 91 54 00 14 21 2E 23 4E |2:STA QK.T..!.#N|
00001900: 4F 57 80 45 20 50 4C 41 3A 50 4C 41 3A 4A 4D 50 |OW.E PLA:PLA:JMP|
00001910: 20 46 55 52 00 4D 21 32 23 4B 91 A4 55 54 20 4C | FUR.M!2#K..UT L|
00001920: 44 41 20 23 31 35 3A 53 54 41 20 53 50 41 4C 54 |DA #15:STA SPALT|
00001930: 45 3A 4C 44 41 20 23 31 36 3A 53 54 41 20 5A 45 |E:LDA #16:STA ZE|
00001940: 49 4C 45 3A 4A 53 52 20 53 45 54 43 52 00 79 21 |ILE:JSR SETCR.y!|
00001950: 34 23 4C 44 41 20 4B 91 54 3A 42 4E 45 20 44 41 |4#LDA K.T:BNE DA|
00001960: 3A 4C 44 41 20 23 22 30 22 3A 4A 53 52 20 42 53 |:LDA #"0":JSR BS|
00001970: 4F 55 54 3A 42 4E 45 20 9A 00 C8 21 36 23 44 41 |OUT:BNE ...!6#DA|
00001980: 20 53 54 41 20 57 45 52 54 3A 42 50 4C 20 50 4C | STA WERT:BPL PL|
00001990: 55 53 3A 4C 44 41 20 23 AB 31 3A 45 B0 20 57 45 |US:LDA #.1:E. WE|
000019A0: 52 54 3A 43 4C 43 3A 41 44 43 20 23 31 3A 53 54 |RT:CLC:ADC #1:ST|
000019B0: 41 20 57 45 52 54 3A 4C 44 41 20 23 22 2D 22 3A |A WERT:LDA #"-":|
000019C0: 2E 42 59 54 20 24 32 43 00 11 22 38 23 50 4C 55 |.BYT $2C.."8#PLU|
000019D0: 53 20 4C 44 41 20 23 22 2B 22 3A 4A 53 52 20 42 |S LDA #"+":JSR B|
000019E0: 53 4F 55 54 3A 4C 44 41 20 57 45 52 54 3A 43 4D |SOUT:LDA WERT:CM|
000019F0: 50 20 23 31 30 3A 42 43 43 20 4B 4C 31 30 3A 4C |P #10:BCC KL10:L|
00001A00: 44 41 20 23 22 31 22 3A 4A 53 52 20 42 53 4F 55 |DA #"1":JSR BSOU|
00001A10: 54 00 33 22 3A 23 4C 44 41 20 57 45 52 54 3A 53 |T.3":#LDA WERT:S|
00001A20: 45 43 3A 53 42 43 20 23 31 30 3A 53 54 41 20 57 |EC:SBC #10:STA W|
00001A30: 45 52 54 00 57 22 3C 23 4B 4C 31 30 20 4C 44 41 |ERT.W"<#KL10 LDA|
00001A40: 20 57 45 52 54 3A B0 41 20 23 22 30 22 3A 4A 53 | WERT:.A #"0":JS|
00001A50: 52 20 42 53 4F 55 54 00 71 22 82 23 9A 20 4A 53 |R BSOUT.q".#. JS|
00001A60: 52 20 53 50 41 43 45 3A 4A 4D 50 20 53 50 41 43 |R SPACE:JMP SPAC|
00001A70: 45 00 9F 22 1C 25 44 45 4C 50 52 49 20 4C 44 58 |E..".%DELPRI LDX|
00001A80: 20 50 52 49 4E 3A 49 4E 58 3A 43 50 58 20 23 33 | PRIN:INX:CPX #3|
00001A90: 3A 42 43 43 20 4B 4C 33 3A 4C 44 58 20 23 30 00 |:BCC KL3:LDX #0.|
00001AA0: BA 22 1E 25 4B 4C 33 20 53 54 58 20 50 52 49 4E |.".%KL3 STX PRIN|
00001AB0: 3A 4A 4D 50 20 4E 4F 57 80 45 00 F4 22 26 25 4F |:JMP NOW.E.."&%O|
00001AC0: 55 54 50 52 49 20 4C 44 41 20 23 31 34 3A 53 54 |UTPRI LDA #14:ST|
00001AD0: 41 20 53 50 41 4C 54 45 3A 4C 44 41 20 23 31 38 |A SPALTE:LDA #18|
00001AE0: 3A 53 54 41 20 5A 45 49 4C 45 3A 4A 53 52 20 53 |:STA ZEILE:JSR S|
00001AF0: 45 54 43 52 00 30 23 28 25 4C 44 41 20 50 52 49 |ETCR.0#(%LDA PRI|
00001B00: 4E 3A 41 53 4C 3A 54 41 58 3A 4C 44 41 20 50 52 |N:ASL:TAX:LDA PR|
00001B10: 49 54 41 42 2C 58 3A 4C 44 59 20 50 52 49 54 41 |ITAB,X:LDY PRITA|
00001B20: 42 AA 31 2C 58 3A 4A 4D 50 20 53 54 52 4F 55 54 |B.1,X:JMP STROUT|
00001B30: 00 00 00 |... |
.......36864......OPT OO.%..... $C000.4.
..VIC .$D000.A...TMP .253.O...TMP2 .251.
`...HIRES .$2000.N...C. .65409....RESET
.64738.....KEY .198.....REPT .650... ..
.$FFD5.....STATUS .157.D.H.. .$FFC0.Q.J
. .$FFC3...L.CHKOUT .$FFC9...N..CHN .$F
FCC...P.SETNAM .$FFBD...R.SETPAR .$FFBA.
!.T.DR .4...V.. .$AAD7.?.X.BSOUT .$FFD2.
Q.Z.STROUT .$AB1E.^.... .65508.K.... .65
487.Y....X .59903.....NAME .820.....CLAL
L .$FFE7.....SETCR .58732.....ZEILE .214
.H...SPALTE .211.Y...SPACE .43839.....JM
P TITEL...N.REBIT .BYT $80,$40,$20,$10,8
,4,2,1.....MULT ...:....W. $2000,$2140,$
2280,$23C0.Z....W. $2500,$2640,$2780,$28
C0.Z....W. $2A00,$2B40,$2C80,$2DC0...B..
W. $2F00,$3040,$3180,$32C0...D..W. $3400
,$3540,$3680,$37C0.Z.F..W. $3900,$3A40,$
3B80,$3CC0...H..W. $3E00.....XX .W. 0...
..YY BRK.....X1 .W. 0.....Y1 BRK.#...X2
BRK.....Y2 BRK.:...ANZ BRK.J. .XCO.D .W.
0.U.".X3 BRK.`.$.Y3 BRK.L.&.K.T BRK.|.(
.QK.T .BYT 1...*.WERT BRK...,.MODUS BRK.
....MASK BRK...0.ZEIG BRK...2..MASK BRK.
L.4.PRIN BRK...X.ZEICHEN .F " .+IJLX&FZ%
OMW#*@.....PRE. =*......BYT %0000 ; SPAC
E 0."....BYT %0000.1....BYT %0000.@....B
YT %0000.Y....BYT %0000 ; . 1.H....B
YT %0100.W....BYT %0000......BYT %0000..
....BYT %0000 ; . 2......BYT %0100..
....BYT %0010.L....BYT %0000......BYT %0
000 ; I 3......BYT %0111......BYT %0
000......BYT %0000.+....BYT %0000 ; J
4.:....BYT %1000.I....BYT %0111.X....B
YT %0000.Q....BYT %0000 ; L 5......B
YT %1111......BYT %1000......BYT %0000..
....BYT %1101 ; X 6.F....BYT %0010.U
....BYT %0101......BYT %0000......BYT %0
110 ; & 7... ..BYT %1001......BYT %1
010.*....BYT %1000.C....BYT %1111 ; F
8.R....BYT %0101.A....BYT %0001.P....B
YT %0001......BYT %1000 ; Z 9......B
YT %1101......BYT %1011......BYT %1001.O
....BYT %1101 ; % 10......BYT %0101..
....BYT %1010......BYT %1011......BYT %1
110 ; O 11.$....BYT %1001.3....BYT %1
001.B....BYT %1111.[....BYT %1111 ; M
12.J....BYT %1111.Y....BYT %1001......B
YT %1001......BYT %1001 ; W 13......B
YT %1011......BYT %1111.N....BYT %1111..
....BYT %1110 ; # 14......BYT %1111..
....BYT %1111......BYT %0111.-....BYT %1
110 ; . 15.<....BYT %1111.K.A..BYT %1
111.Z.B..BYT %1111.S.C..BYT %1111 ; @
16...D..BYT %1111...E..BYT %1111. .F..B
YT %1111.....HELLO .F ".. LETTERPRINT 1.
3 VON NIKOLAUS HEUSLER":.BYT 13......F
" ............... ZWENGAUERWEG 1
8..........D....F "........8000 MUENCHEN
71":.BYT 13.T....F " ..................
..........................BYT 13:.F ". B
ITTE WAEH.LEN SIE:.B....BYT 13:.F ". A:
GRAFIK LADEN":BRK.....H2 .BYT 13:.F ".
B: GRAFIK ZEIGEN......BYT 13:.F ". C:
INVERTIEREN.<....BYT 13:.F ". D: PREVIE
W / <SHIFT>: DRUCKEN.X....BYT 13:.F ".
E: KONTRAST:":.BYT 13:.F ". F: DRUCKER:
......BYT 13:.F ". G: ENDE":.BYT 13.L..
..F " ..................................
..........BYT 13:.F ". EIN NSS PROGRAMM
(W) NH-060189-ARR":BRK.+...NAMTXT .F
" FILENAME ? ":BRK.I...PRITAB .W. PRI1,
PRI2,PRI3.I...PRI1 .F "COMMODORE MPS":BR
K.....PRI2 .F "ASCII MIT LF ":BRK.....PR
I3 .F "ASCII OHNE LF":BRK.G...WHATAB .W.
WHA1,WHA2,WHA3.....WHA1 .BYT 8,13,15,0.
....WHA2 .BYT 13,0.....WHA3 .BYT 13,10,0
.C.@.MENTAB .W. LADE,LOOK,INVERT,PREVI,K
.TRAST,DELPRI,RESET.....TITEL JSR CLALL:
JSR C.:LDA #.HELLO:LDY #.HELLO:JSR STROU
T:LDA #128.X...STA REPT:LDA #0:STA VIC.3
2:LDA #6:STA VIC.33:LDA #.H2:LDY #.H2:JS
R STROUT.....FUR JSR K..UT:JSR OUTPRI...
B.LDA #0:STA KEY.;.D.MEN JSR .:CMP #".":
BEQ HOME:CMP #"D":BEQ DRUCK.R.E.CMP #"A"
:BCC MEN:CMP #"H":BCS MEN:SBC #"@":ASL:T
AY...F.LDA MENTAB,Y:STA TMP:LDA MENTAB.1
,Y:STA TMP.1:JSR KK:JMP TITEL...H.HOME L
DA #0:STA K.T:LDA #1:STA QK.T:BNE FUR...
J.DRUCK JSR .:JMP TITEL...L.KK JMP (TMP)
.?. .SHOW LDA #59:STA VIC.17:LDA #29:STA
VIC.24.J...LDX #4:STX TMP.1:LDY #0:STY
TMP:LDA #1.....FAERB STA (TMP),Y:INY:BNE
FAERB:INC TMP.1:DEX:BNE FAERB:RTS.....I
NVERT JSR SHOW:LDX #32:STX TMP.1:LDY #0:
STY TMP.(...INV LDA (TMP),Y:E. #.1:STA (
TMP),Y:INY:BNE INV:INC TMP.1:DEX:BNE INV
.5...JMP .KEY.{...HIDE LDY #0:STY TMP:ST
Y TMP2:LDX #32:STX TMP.1:LDA #64:STA TMP
2.1.J...HI LDA (TMP),Y:STA (TMP2),Y:INY:
BNE HI:INC TMP.1:INC TMP2.1:DEX:BNE HI:R
TS...H.RUECK LDY #0:STY TMP:STY TMP2:LDX
#32:STX TMP.1:LDA #64:STA TMP2.1.`.J.RU
LDA (TMP2),Y:STA (TMP),Y:INY:BNE RU:INC
TMP.1:INC TMP2.1:DEX:BNE RU:RTS.R.K.LOO
K JSR SHOW...L..KEY LDA #0:STA KEY...N.W
K CMP KEY:BEQ WK:DEC KEY:RTS.....REIHE L
DA #.316:STA XX:LDA #.316:STA XX.1:LDA #
79:STA X3.....R5 LDA MODUS:BNE R6:LDX #1
5.%...R. JSR SPACE:DEX:BNE R..I...R6 LDA
#0:STA YY:LDA #49:STA Y3.{...R1 LDA #0:
STA ANZ:LDA #3:STA Y2:LDA YY:STA Y1.....
JSR .:CMP #".":BNE R3:RTS.N...R3 LDA #3:
STA X2:LDA XX:STA X1:LDA XX.1:STA X1.1..
...R4 LDX Y1:LDA X1:STA XCO.D:LDA X1.1:S
TA XCO.D.1:JSR PO..,. .TAX:. (TMP),Y:BEQ
AUS:INC ANZ.F...AUS TXA:E. (TMP),Y:STA
(TMP),Y:INC X1:BNE N1:INC X1.1.{...N1 DE
C X2:BPL R4.....INC Y1:DEC Y2:BPL R3....
.LDA ANZ:CLC:ADC K.T:BPL .IT:LDA #0.....
.IT CMP #16:BCC KL16:LDA #16.....KL16 TA
X:LDA MODUS:BEQ HARD:JSR SOFT:JMP BEIDE.
0...HARD LDA ZEICHEN,X:JSR BSOUT.T...BEI
DE LDA YY:CLC:ADC #4:STA YY:DEC Y3:BPL Q
R1:LDA MODUS:BNE NRT.....LDA PRIN:ASL:TA
X:LDA WHATAB,X:LDY WHATAB.1,X:JSR STROUT
.....NRT LDA XX:SEC:SBC #4:STA XX:LDA XX
.1:SBC #0:STA XX.1.....DEC X3:BMI NR5:JM
P R5.....NR5 RTS.....QR1 JMP R1.K...SOFT
TXA:ASL:ASL:STA ZEIG:LDA #3:STA Y2.....
LDX YY:LDA XX:STA XCO.D:LDA XX.1:STA XCO
.D.1:JSR PO......CMP #10:BCC LOW:LDA #%1
111:.BYT $2C.L...LOW LDA #%11110000:STA
MASK.....S5 LDX ZEIG:INC ZEIG:LDA PRE.,X
.....BIT MASK:BMI NOSH.T:ASL:ASL:ASL:ASL
.U...NOSH.T STA .MASK:LDA (TMP),Y:. MASK
:.A .MASK:STA (TMP),Y.O...INY:DEC Y2:BPL
S5:RTS.{...PO. TXA.B...LSR:LSR:LSR:ASL:
TAY:LDA MULT.1,Y:STA TMP.1:TXA:. #7:CLC:
ADC MULT,Y.....STA TMP:LDA XCO.D:. #$F8:
ADC TMP:STA TMP.2...LDA TMP.1:ADC XCO.D.
1:STA TMP.1:LDA XCO.D:. #7:TAX:LDA REBIT
,X.A...LDY #0:RTS.|.X.AUF LDA #0:JSR SET
NAM:TAY:LDA #DR:TAX:JSR SETPAR:JSR ....Z
.LDX #DR:JSR CHKOUT:RTS.Q...LADE JSR .:L
DX #23:JSR .X:LDA #23:STA ZEILE:JSR SETC
R.....LDA #.NAMTXT:LDY #.NAMTXT:JSR STRO
UT:LDX #0:STX STATUS.M....NAME JSR .:CMP
#13:BEQ RET:STA NAME,X:INX:CPX #16:BCC
.NAME.H.B.RET TXA:BNE WARWAS:RTS...D.WAR
WAS TXA:LDX #.NAME:LDY #.NAME:JSR SETNAM
.W.F.JSR SHOW:LDX #8:LDY #0:JSR SETPAR:L
DA #0:TAX:LDY #32:JSR ....H.JMP .KEY.) @
.. LDA #0:STA MODUS:JSR HIDE:JSR SHOW:JS
R AUF:JSR REIHE:JSR RUECK.; B.LDA #DR:JM
P .R J.PREVI LDA #1:STA MODUS:JSR HIDE:
JSR SHOW:JSR REIHE.. L.JSR .KEY:JMP RUEC
K.C (#K.TRAST LDA K.T:CLC:ADC QK.T:STA K
.T:CMP #.16:BEQ W.E.Y *#CMP #16:BNE NOW.
E.. ,#W.E LDA QK.T:E. #.2:STA QK.T..!.#N
OW.E PLA:PLA:JMP FUR.M!2#K..UT LDA #15:S
TA SPALTE:LDA #16:STA ZEILE:JSR SETCR.Y!
4#LDA K.T:BNE DA:LDA #"0":JSR BSOUT:BNE
..H!6#DA STA WERT:BPL PLUS:LDA #.1:E. WE
RT:CLC:ADC #1:STA WERT:LDA #"-":.BYT $2C
.."8#PLUS LDA #"+":JSR BSOUT:LDA WERT:CM
P #10:BCC KL10:LDA #"1":JSR BSOUT.3":#LD
A WERT:SEC:SBC #10:STA WERT.W"<#KL10 LDA
WERT:.A #"0":JSR BSOUT.Q".#. JSR SPACE:
JMP SPACE..".%DELPRI LDX PRIN:INX:CPX #3
:BCC KL3:LDX #0..".%KL3 STX PRIN:JMP NOW
.E.."&%OUTPRI LDA #14:STA SPALTE:LDA #18
:STA ZEILE:JSR SETCR.0#(%LDA PRIN:ASL:TA
X:LDA PRITAB,X:LDY PRITAB.1,X:JMP STROUT
...
> CLICK IMAGE PREVIEW FOR FULL MODAL