ZEICHENGENERATOR
FILE INFORMATION
FILENAME(S): ZEICHENGENERATOR
FILE TYPE(S): PRG
FILE SIZE: 3.9K
FIRST SEEN: 2025-11-02 16:54:37
APPEARS ON: 1 disk(s)
FILE HASH
75ffbc2c1f643830d0e86a19c7f9e2a9e928c0e11bb87f27a263eef6965ca238
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TOOLS | ZEICHENGENERATOR | PRG | Treasure Chest - Reamigation | 24 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 09 08 0A 00 89 36 30 00 1E 08 14 00 5A 45 |.......60.....ZE| 00000010: 49 43 48 45 4E 20 41 55 53 57 41 45 48 C3 00 42 |ICHEN AUSWAEH..B| 00000020: 08 15 00 56 45 52 47 52 4F 45 53 53 45 52 54 45 |...VERGROESSERTE| 00000030: 20 44 41 52 53 54 45 4C 4C 55 4E 47 20 44 45 53 | DARSTELLUNG DES| 00000040: 20 5A 00 81 08 16 00 57 41 48 4C 2C 20 4F 42 20 | Z.....WAHL, OB | 00000050: 5A 45 49 43 48 45 4E 20 56 45 52 41 80 45 52 54 |ZEICHEN VERA.ERT| 00000060: 20 57 49 52 44 2C 20 4F 44 2E 20 20 20 4E 45 55 | WIRD, OD. NEU| 00000070: 20 47 45 53 54 41 4C 54 45 53 54 20 57 49 52 44 | GESTALTEST WIRD| 00000080: 2E 00 A6 08 17 00 4D 49 54 20 43 55 52 53 B0 54 |......MIT CURS.T| 00000090: 41 53 54 45 4E 20 B9 49 54 49 91 45 4E 20 41 4E |ASTEN .ITI.EN AN| 000000A0: 46 41 48 52 45 4E 00 C0 08 18 00 53 50 41 43 45 |FAHREN.....SPACE| 000000B0: 20 20 20 B2 50 55 4E 4B 54 20 53 45 54 5A 45 4E | .PUNKT SETZEN| 000000C0: 00 DC 08 19 00 40 20 20 20 20 20 20 20 B2 27 20 |.....@ .' | 000000D0: 20 20 20 20 4C 4F 45 53 43 48 45 4E 00 F9 08 1A | LOESCHEN....| 000000E0: 00 5A 45 49 43 48 45 4E 56 45 52 41 45 4E 2E 20 |.ZEICHENVERAEN. | 000000F0: 42 45 80 45 4E 20 AB 46 31 00 15 09 1B 00 50 52 |BE.EN .F1.....PR| 00000100: 4F 47 52 41 4D 4D 20 42 45 80 45 4E 20 20 20 20 |OGRAMM BE.EN | 00000110: 20 20 20 AB 50 00 1B 09 1C 00 2E 00 21 09 1D 00 | .P.......!...| 00000120: 2E 00 49 09 1E 00 44 49 45 20 49 4D 50 4C 45 4D |..I...DIE IMPLEM| 00000130: 45 4E 54 49 45 52 54 45 20 52 4F 55 54 49 4E 45 |ENTIERTE ROUTINE| 00000140: 20 4B 41 4E 4E 20 4E 55 4E 00 6B 09 1F 00 41 4C | KANN NUN.k...AL| 00000150: 53 20 55 4E 54 45 52 50 52 4F 47 52 41 4D 4D 20 |S UNTERPROGRAMM | 00000160: 4D 49 54 20 8D 20 36 30 30 30 30 00 82 09 20 00 |MIT . 60000... .| 00000170: 41 55 46 47 45 52 55 46 45 4E 20 57 45 52 44 45 |AUFGERUFEN WERDE| 00000180: 4E 2E 00 88 09 21 00 2E 00 8E 09 22 00 2E 00 B4 |N....!....."....| 00000190: 09 23 00 AC AC AC AC AC 57 49 43 48 54 49 47 45 |.#......WICHTIGE| 000001A0: 20 50 52 4F 47 52 41 4D 4D 54 45 49 4C 45 AC AC | PROGRAMMTEILE..| 000001B0: AC AC AC AC 00 BB 09 24 00 2E 2E 00 E2 09 25 00 |.......$......%.| 000001C0: 2E 35 30 30 AB 35 35 30 20 56 45 52 47 52 2E 20 |.500.550 VERGR. | 000001D0: B0 49 47 49 4E 41 4C 5A 45 49 43 48 45 4E 53 41 |.IGINALZEICHENSA| 000001E0: 54 5A 00 FD 09 26 00 2E 97 35 36 33 33 2C 31 32 |TZ...&...5633,12| 000001F0: 37 20 B5 45 52 52 55 50 54 20 41 55 53 00 10 0A |7 .ERRUPT AUS...| 00000200: 27 00 2E 97 31 2C 35 31 20 49 AD 4F 20 41 55 53 |'...1,51 I.O AUS| 00000210: 00 23 0A 28 00 2E 97 31 2C 35 35 20 49 AD 4F 20 |.#.(...1,55 I.O | 00000220: 45 49 4E 00 3E 0A 29 00 2E 97 35 36 33 33 2C 31 |EIN.>.)...5633,1| 00000230: 32 39 20 B5 45 52 52 55 50 54 20 45 49 4E 00 66 |29 .ERRUPT EIN.f| 00000240: 0A 2A 00 2E 41 44 52 45 53 53 45 20 35 33 32 34 |.*..ADRESSE 5324| 00000250: 38 20 41 4E 46 41 4E 47 20 43 48 41 52 41 4B 54 |8 ANFANG CHARAKT| 00000260: 45 52 53 41 54 5A 00 8F 0A 2B 00 2E 31 30 30 30 |ERSATZ...+..1000| 00000270: AB 31 30 39 30 20 41 42 46 52 41 47 45 20 44 45 |.1090 ABFRAGE DE| 00000280: 53 20 46 45 4E 53 54 45 52 53 2C 20 42 45 AB 00 |S FENSTERS, BE..| 00000290: B4 0A 2C 00 2E 52 45 43 48 4E 55 4E 47 20 44 45 |..,..RECHNUNG DE| 000002A0: 52 20 83 2D 57 45 52 54 45 20 55 4E 44 20 55 45 |R .-WERTE UND UE| 000002B0: 42 45 52 2D 00 CC 0A 2D 00 2E 4E 41 48 4D 45 20 |BER-...-..NAHME | 000002C0: 49 4E 20 83 20 5A 45 49 4C 45 4E 2E 00 F4 0A 2E |IN . ZEILEN.....| 000002D0: 00 2E 31 31 30 30 AB 31 32 30 30 20 55 45 42 45 |..1100.1200 UEBE| 000002E0: 52 4E 41 48 4D 45 20 44 45 53 20 50 52 4F 47 52 |RNAHME DES PROGR| 000002F0: 41 4D 4D 53 00 0F 0B 2F 00 2E 49 4E 20 44 41 53 |AMMS.../..IN DAS| 00000300: 20 48 41 55 50 54 50 52 4F 47 52 41 4D 4D 2E 00 | HAUPTPROGRAMM..| 00000310: 2D 0B 30 00 2E 31 32 31 30 AB 31 33 34 30 20 4C |-.0..1210.1340 L| 00000320: 4F 45 53 43 48 50 52 4F 47 52 41 4D 4D 00 49 0B |OESCHPROGRAMM.I.| 00000330: 31 00 2E 31 34 30 30 20 55 45 42 45 52 4E 41 48 |1..1400 UEBERNAH| 00000340: 4D 45 52 4F 55 54 49 4E 45 00 4F 0B 32 00 2E 00 |MEROUTINE.O.2...| 00000350: 55 0B 33 00 2E 00 7D 0B 34 00 AC AC AC AC AC AC |U.3...}.4.......| 00000360: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................| 00000370: AC AC AC AC AC AC AC AC AC AC AC AC AC 00 9F 0B |................| 00000380: 3C 00 41 31 24 B2 22 13 11 11 11 11 11 11 11 11 |<.A1$.".........| 00000390: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 |..............".| 000003A0: CF 0B 46 00 41 32 24 B2 22 20 20 20 20 20 20 20 |..F.A2$." | 000003B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000003C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".| 000003D0: E4 0B 50 00 97 36 34 36 2C 31 34 3A 97 36 35 30 |..P..646,14:.650| 000003E0: 2C 31 32 38 00 07 0C 5A 00 99 22 93 11 22 A3 31 |,128...Z.."..".1| 000003F0: 30 29 22 12 43 48 41 52 41 4B 54 45 52 47 45 4E |0)".CHARAKTERGEN| 00000400: 45 52 41 54 4F 52 22 00 36 0C 64 00 99 22 D5 C4 |ERATOR".6.d.."..| 00000410: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |................| 00000420: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |................| 00000430: C4 C4 C4 C4 C9 22 00 4F 0C 6E 00 81 49 B2 31 A4 |.....".O.n..I.1.| 00000440: 33 3A 99 22 C2 22 A3 33 38 29 22 C8 22 3A 82 00 |3:.".".38)".":..| 00000450: 7E 0C 78 00 99 22 CA C6 C6 C6 C6 C6 C6 C6 C6 C6 |~.x.."..........| 00000460: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |................| 00000470: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 CB 22 00 AF |............."..| 00000480: 0C 82 00 99 22 11 1D 12 4E 45 55 45 53 20 5A 45 |...."...NEUES ZE| 00000490: 49 43 48 45 4E 92 20 20 20 20 20 20 20 20 20 20 |ICHEN. | 000004A0: 92 41 4C 54 45 53 20 5A 45 49 43 48 45 4E 22 00 |.ALTES ZEICHEN".| 000004B0: DB 0C 8C 00 99 22 11 1D 1D 1D 1D 31 32 33 34 35 |.....".....12345| 000004C0: 36 37 38 20 20 20 20 20 20 20 20 20 20 20 20 20 |678 | 000004D0: 20 20 31 32 33 34 35 36 37 38 22 00 07 0D 96 00 | 12345678".....| 000004E0: 99 22 1D 1D 1D D5 C4 C4 C4 C4 C4 C4 C4 C4 C9 A0 |."..............| 000004F0: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 D5 C3 C3 C3 |................| 00000500: C3 C3 C3 C3 C3 C9 22 00 35 0D A0 00 81 49 B2 31 |......".5....I.1| 00000510: A4 32 3A 99 22 1D 22 49 22 9D C8 22 A3 31 32 29 |.2:."."I"..".12)| 00000520: 22 C8 22 A3 32 34 29 49 22 9D C8 22 A3 33 35 29 |".".24)I"..".35)| 00000530: 22 C8 22 3A 82 00 61 0D AA 00 99 22 1D 1D 33 C7 |".":..a...."..3.| 00000540: 20 20 20 20 20 20 20 20 C8 20 D5 C4 C4 C4 C9 D5 | . ......| 00000550: C4 C4 C4 C9 20 33 C8 20 20 20 20 20 20 20 20 C7 |.... 3. .| 00000560: 22 00 91 0D B4 00 99 22 1D 1D 34 C7 20 20 20 20 |"......"..4. | 00000570: 20 20 20 20 C8 20 C8 12 4E 55 4D 92 C8 C8 12 5A | . ..NUM....Z| 00000580: 45 49 92 C8 20 34 C8 20 20 20 20 20 20 20 20 C8 |EI.. 4. .| 00000590: 22 00 BD 0D BE 00 99 22 1D 1D 35 C7 20 20 20 20 |"......"..5. | 000005A0: 20 20 20 20 C8 20 C8 20 20 20 C8 C8 20 20 20 C8 | . . .. .| 000005B0: 20 35 C8 20 20 20 20 20 20 20 20 C8 22 00 E9 0D | 5. ."...| 000005C0: C8 00 99 22 1D 1D 36 C7 20 20 20 20 20 20 20 20 |..."..6. | 000005D0: C8 20 CA C6 C6 C6 CB CA C6 C6 C6 CB 20 36 C8 20 |. .......... 6. | 000005E0: 20 20 20 20 20 20 20 C8 22 00 17 0E D2 00 81 49 | ."......I| 000005F0: B2 37 A4 38 3A 99 22 1D 22 49 22 9D C8 22 A3 31 |.7.8:."."I"..".1| 00000600: 32 29 22 C8 22 A3 32 34 29 49 22 9D C8 22 A3 33 |2)".".24)I"..".3| 00000610: 35 29 22 C7 22 3A 82 00 43 0E DC 00 99 22 1D 1D |5)".":..C...."..| 00000620: 1D CA C6 C6 C6 C6 C6 C6 C6 C6 CB 20 20 20 20 20 |........... | 00000630: 20 20 20 20 20 20 20 20 CA C6 C6 C6 C6 C6 C6 C6 | ........| 00000640: C6 CB 22 00 77 0E E6 00 99 22 13 11 11 11 1D 1D |..".w...."......| 00000650: 1D 12 3C 92 20 4F 44 45 52 20 12 3E 92 20 5A 41 |..<. ODER .>. ZA| 00000660: 45 48 4C 45 4E 20 20 20 20 20 12 42 92 45 41 52 |EHLEN .B.EAR| 00000670: 42 45 49 54 45 4E 22 00 AD 0E F0 00 99 22 11 22 |BEITEN"......"."| 00000680: A3 35 29 22 12 50 92 52 4F 47 52 41 4D 4D 45 4E |.5)".P.ROGRAMMEN| 00000690: 44 45 20 20 20 20 20 20 20 3E 45 49 4E 47 41 42 |DE >EINGAB| 000006A0: 45 3C 22 3A 5A 4E B2 30 3A 89 33 32 30 00 C2 0E |E<":ZN.0:.320...| 000006B0: FA 00 8D 36 30 30 3A 8B 54 24 B2 22 42 22 A7 33 |...600:.T$."B".3| 000006C0: 35 30 00 D3 0E 04 01 8B 54 24 B2 22 50 22 A7 31 |50......T$."P".1| 000006D0: 31 30 30 00 EC 0E 0E 01 8B 54 24 B2 22 3C 22 A7 |100......T$."<".| 000006E0: 5A 4E B2 5A 4E AB 31 3A 89 33 31 30 00 FD 0E 18 |ZN.ZN.1:.310....| 000006F0: 01 8B 54 24 B3 B1 22 3E 22 A7 32 35 30 00 09 0F |..T$..">".250...| 00000700: 22 01 5A 4E B2 5A 4E AA 31 00 20 0F 2C 01 8B 5A |".ZN.ZN.1. .,..Z| 00000710: 4E B1 B2 31 32 38 A7 5A 4E B2 30 3A 89 33 32 30 |N..128.ZN.0:.320| 00000720: 00 31 0F 36 01 8B 5A 4E B3 30 A7 5A 4E B2 31 32 |.1.6..ZN.0.ZN.12| 00000730: 37 00 5F 0F 40 01 99 C8 28 41 31 24 2C 31 37 29 |7._.@...(A1$,17)| 00000740: A3 31 35 29 22 20 20 20 9D 9D 9D 22 C9 28 C4 28 |.15)" ...".(.(| 00000750: 5A 4E 29 2C C3 28 C4 28 5A 4E 29 29 AB 31 29 00 |ZN),.(.(ZN)).1).| 00000760: 76 0F 4A 01 97 31 36 38 35 2C 5A 4E 3A 97 35 35 |v.J..1685,ZN:.55| 00000770: 39 35 37 2C 31 34 00 7F 0F 54 01 89 32 35 30 00 |957,14...T..250.| 00000780: 89 0F 5E 01 8D 31 33 35 30 00 C2 0F 68 01 99 C8 |..^..1350...h...| 00000790: 28 41 31 24 2C 34 29 22 1D 1D 12 4E 92 45 55 45 |(A1$,4)"...N.EUE| 000007A0: 53 20 5A 45 49 43 48 45 4E 20 12 41 92 4C 54 45 |S ZEICHEN .A.LTE| 000007B0: 53 20 5A 45 49 43 48 45 4E 20 41 45 4E 44 45 52 |S ZEICHEN AENDER| 000007C0: 4E 22 00 DA 0F 72 01 99 22 11 22 A3 31 35 29 22 |N"...r..".".15)"| 000007D0: 12 45 49 4E 47 41 42 45 92 22 00 EE 0F 7C 01 53 |.EINGABE."...|.S| 000007E0: 53 B2 32 37 3A 8D 35 30 30 3A 8D 36 30 30 00 05 |S.27:.500:.600..| 000007F0: 10 86 01 8B 54 24 B2 22 4E 22 A7 8D 31 33 35 30 |....T$."N"..1350| 00000800: 3A 89 36 32 30 00 16 10 90 01 8B 54 24 B3 B1 22 |:.620......T$.."| 00000810: 41 22 A7 33 38 30 00 2F 10 9A 01 53 53 B2 34 3A |A".380./...SS.4:| 00000820: 8D 31 33 35 30 3A 8D 35 30 30 3A 89 36 32 30 00 |.1350:.500:.620.| 00000830: 40 10 AE 01 8B 54 24 B3 B1 22 41 22 A7 34 30 30 |@....T$.."A".400| 00000840: 00 53 10 B8 01 53 53 B2 34 3A 8D 35 30 30 3A 89 |.S...SS.4:.500:.| 00000850: 36 35 30 00 6E 10 F4 01 8F 20 5A 45 49 43 48 45 |650.n.... ZEICHE| 00000860: 4E 20 56 45 52 47 52 4F 45 53 53 45 52 4E 00 96 |N VERGROESSERN..| 00000870: 10 FE 01 99 C8 28 41 31 24 2C 31 33 29 3B 3A 81 |.....(A1$,13);:.| 00000880: 4A B2 30 A4 37 3A 97 35 36 33 33 33 2C 31 32 37 |J.0.7:.56333,127| 00000890: 3A 97 31 2C 35 31 00 C1 10 08 02 58 B2 C2 28 35 |:.1,51.....X..(5| 000008A0: 33 32 34 38 AA 38 AC 5A 4E AA 4A 29 AD 31 32 38 |3248.8.ZN.J).128| 000008B0: 3A 97 31 2C 35 35 3A 97 35 36 33 33 33 2C 31 32 |:.1,55:.56333,12| 000008C0: 39 00 F1 10 12 02 99 A3 53 53 29 3B 3A 81 4B B2 |9.......SS);:.K.| 000008D0: 31 A4 38 3A 58 25 B2 58 3A 58 B2 28 58 AB 58 25 |1.8:X%.X:X.(X.X%| 000008E0: 29 AC 32 3A 99 C7 28 33 32 AA 58 25 AC 38 31 29 |).2:..(32.X%.81)| 000008F0: 3B 00 FB 10 1C 02 82 3A 99 3A 82 00 01 11 26 02 |;......:.:....&.| 00000900: 8E 00 15 11 58 02 8F 20 45 49 4E 46 41 43 48 45 |....X.. EINFACHE| 00000910: 53 20 47 45 54 00 2D 11 62 02 97 31 39 38 2C 30 |S GET.-.b..198,0| 00000920: 3A 92 31 39 38 2C 31 3A A1 54 24 3A 8E 00 58 11 |:.198,1:.T$:..X.| 00000930: 6C 02 99 22 13 11 11 11 22 A3 36 29 22 53 54 45 |l.."....".6)"STE| 00000940: 55 45 52 55 4E 47 20 4D 49 54 20 43 55 52 53 4F |UERUNG MIT CURSO| 00000950: 52 54 41 53 54 45 4E 22 00 8D 11 76 02 99 22 11 |RTASTEN"...v..".| 00000960: 1D 12 40 92 3D 4C 4F 45 53 43 48 45 4E 20 12 46 |..@.=LOESCHEN .F| 00000970: 31 92 3D 55 45 42 45 52 4E 41 48 4D 45 20 12 53 |1.=UEBERNAHME .S| 00000980: 50 41 43 45 92 3D 53 45 54 5A 45 4E 22 00 A3 11 |PACE.=SETZEN"...| 00000990: 8A 02 8F 20 43 55 52 53 4F 52 53 54 45 55 45 52 |... CURSORSTEUER| 000009A0: 55 4E 47 00 BA 11 94 02 53 50 B2 31 3A 53 B2 31 |UNG.....SP.1:S.1| 000009B0: 3A 5A 5A B2 31 3A 50 45 B2 30 00 E5 11 9E 02 50 |:ZZ.1:PE.0.....P| 000009C0: 4F B2 31 30 32 34 AA 53 50 AA 33 AA 28 5A 5A AA |O.1024.SP.3.(ZZ.| 000009D0: 31 31 29 AC 34 30 3A 8B C2 28 50 4F 29 B2 38 31 |11).40:..(PO).81| 000009E0: A7 50 45 B2 31 00 FD 11 A8 02 5A 45 B2 38 31 3A |.PE.1.....ZE.81:| 000009F0: 46 41 B2 37 3A 8D 39 30 30 3A A1 54 24 00 2D 12 |FA.7:.900:.T$.-.| 00000A00: B2 02 5A 45 B2 33 32 3A 46 41 B2 31 34 3A 8D 39 |..ZE.32:FA.14:.9| 00000A10: 30 30 3A 8B 50 45 B2 31 A7 5A 45 B2 38 31 3A 46 |00:.PE.1.ZE.81:F| 00000A20: 41 B2 37 3A 50 45 B2 30 3A 8D 39 30 30 00 3C 12 |A.7:PE.0:.900.<.| 00000A30: BC 02 8B 54 24 B2 22 22 A7 36 37 30 00 53 12 C6 |...T$."".670.S..| 00000A40: 02 8B 54 24 B2 22 1D 22 B0 54 24 B2 22 20 22 A7 |..T$.".".T$." ".| 00000A50: 37 38 30 00 63 12 D0 02 8B 54 24 B2 22 9D 22 A7 |780.c....T$.".".| 00000A60: 38 32 30 00 73 12 DA 02 8B 54 24 B2 22 91 22 A7 |820.s....T$.".".| 00000A70: 38 34 30 00 83 12 E4 02 8B 54 24 B2 22 11 22 A7 |840......T$.".".| 00000A80: 38 36 30 00 93 12 EE 02 8B 54 24 B2 22 40 22 A7 |860......T$."@".| 00000A90: 38 38 30 00 A7 12 F8 02 8B C6 28 54 24 29 B2 31 |880.......(T$).1| 00000AA0: 33 33 A7 31 30 30 30 00 B0 12 02 03 89 36 37 30 |33.1000......670| 00000AB0: 00 D7 12 0C 03 8B 54 24 B2 22 20 22 A7 8B C2 28 |......T$." "...(| 00000AC0: 50 4F 29 B3 B1 38 31 A7 5A 45 B2 38 31 3A 46 41 |PO)..81.ZE.81:FA| 00000AD0: B2 37 3A 8D 39 30 30 00 FC 12 16 03 8B 53 50 B2 |.7:.900......SP.| 00000AE0: 38 AF 5A 5A B3 38 A7 5A 5A B2 5A 5A AA 31 3A 53 |8.ZZ.8.ZZ.ZZ.1:S| 00000AF0: B2 31 3A 53 50 B2 31 3A 89 36 37 30 00 0A 13 20 |.1:SP.1:.670... | 00000B00: 03 8B 53 50 B2 38 A7 36 37 30 00 1B 13 2A 03 53 |..SP.8.670...*.S| 00000B10: 50 B2 53 50 AA 31 3A 89 36 37 30 00 29 13 34 03 |P.SP.1:.670.).4.| 00000B20: 8B 53 50 B2 31 A7 36 37 30 00 3A 13 3E 03 53 50 |.SP.1.670.:.>.SP| 00000B30: B2 53 50 AB 31 3A 89 36 37 30 00 4D 13 48 03 8B |.SP.1:.670.M.H..| 00000B40: 5A 5A B3 B1 31 A7 5A 5A B2 5A 5A AB 31 00 56 13 |ZZ..1.ZZ.ZZ.1.V.| 00000B50: 52 03 89 36 37 30 00 69 13 5C 03 8B 5A 5A B3 B1 |R..670.i.\..ZZ..| 00000B60: 38 A7 5A 5A B2 5A 5A AA 31 00 72 13 66 03 89 36 |8.ZZ.ZZ.1.r.f..6| 00000B70: 37 30 00 92 13 70 03 8B C2 28 50 4F 29 B3 B1 33 |70...p...(PO)..3| 00000B80: 32 A7 5A 45 B2 33 32 3A 46 41 B2 31 34 3A 8D 39 |2.ZE.32:FA.14:.9| 00000B90: 30 30 00 9B 13 7A 03 89 36 37 30 00 A7 13 84 03 |00...z..670.....| 00000BA0: 8F 20 50 4F 4B 45 4E 00 C1 13 8E 03 97 50 4F 2C |. POKEN......PO,| 00000BB0: 5A 45 3A 97 35 34 32 37 32 AA 50 4F 2C 46 41 3A |ZE:.54272.PO,FA:| 00000BC0: 8E 00 D3 13 E8 03 8F 20 55 45 42 45 52 4E 45 48 |....... UEBERNEH| 00000BD0: 4D 45 4E 00 E0 13 F2 03 44 4E B2 36 30 30 30 37 |MEN.....DN.60007| 00000BE0: 00 FF 13 FC 03 42 24 B2 22 22 3A 81 49 B2 31 A4 |.....B$."":.I.1.| 00000BF0: 38 3A 81 4A B2 31 A4 38 3A 42 53 B2 38 AB 4A 00 |8:.J.1.8:BS.8.J.| 00000C00: 34 14 06 04 50 4F B2 31 30 32 34 AA 4A AA 33 AA |4...PO.1024.J.3.| 00000C10: 28 49 AA 31 31 29 AC 34 30 3A 8B C2 28 50 4F 29 |(I.11).40:..(PO)| 00000C20: B2 38 31 A7 42 53 28 49 29 B2 42 53 28 49 29 AA |.81.BS(I).BS(I).| 00000C30: 32 AE 42 53 00 4F 14 10 04 82 3A 42 24 B2 42 24 |2.BS.O....:B$.B$| 00000C40: AA C4 28 42 53 28 49 29 29 AA 22 2C 22 3A 82 00 |..(BS(I)).",":..| 00000C50: 6C 14 1A 04 99 22 93 22 3A 99 41 31 24 22 12 42 |l....".":.A1$".B| 00000C60: 49 54 54 45 20 57 41 52 54 45 4E 22 00 A0 14 24 |ITTE WARTEN"...$| 00000C70: 04 97 36 34 36 2C 36 3A 99 22 13 22 3A 44 4E B2 |..646,6:.".":DN.| 00000C80: 44 4E AA 31 3A 99 44 4E 22 44 41 54 41 22 5A 4E |DN.1:.DN"DATA"ZN| 00000C90: 22 2C 22 C8 28 42 24 2C C3 28 42 24 29 AB 31 29 |",".(B$,.(B$).1)| 00000CA0: 00 B1 14 2E 04 99 22 31 30 31 30 44 4E 3D 22 44 |......"1010DN="D| 00000CB0: 4E 00 C3 14 38 04 99 44 4E AA 31 22 44 41 54 41 |N...8..DN.1"DATA| 00000CC0: 2D 31 22 00 D4 14 42 04 99 22 52 55 4E 22 3A 89 |-1"...B.."RUN":.| 00000CD0: 31 34 30 30 00 E4 14 4C 04 8F 20 50 52 4F 47 20 |1400...L.. PROG | 00000CE0: 45 4E 44 45 00 01 15 56 04 99 22 93 22 3A 99 41 |ENDE...V..".":.A| 00000CF0: 31 24 22 12 42 49 54 54 45 20 57 41 52 54 45 4E |1$".BITTE WARTEN| 00000D00: 22 00 0E 15 60 04 44 4E B2 36 30 30 30 30 00 32 |"...`.DN.60000.2| 00000D10: 15 6A 04 97 36 34 36 2C 36 3A 99 22 13 22 44 4E |.j..646,6:."."DN| 00000D20: 22 52 45 4D 20 4E 45 55 45 20 5A 45 49 43 48 45 |"REM NEUE ZEICHE| 00000D30: 4E 22 00 6A 15 74 04 99 44 4E AA 31 22 50 4F 4B |N".j.t..DN.1"POK| 00000D40: 45 35 36 33 33 34 2C 50 45 45 4B 28 35 36 33 33 |E56334,PEEK(5633| 00000D50: 34 29 41 4E 44 32 35 34 3A 50 CF 31 2C 50 45 45 |4)AND254:P.1,PEE| 00000D60: 4B 28 31 29 41 4E 44 32 35 31 00 A0 15 7E 04 99 |K(1)AND251...~..| 00000D70: 44 4E AA 32 22 46 4F 52 49 3D 30 54 4F 31 30 32 |DN.2"FORI=0TO102| 00000D80: 32 3A 50 4F 4B 45 31 32 32 38 38 2B 49 2C 50 45 |2:POKE12288+I,PE| 00000D90: 45 4B 28 35 33 32 34 38 2B 49 29 3A 4E 45 58 54 |EK(53248+I):NEXT| 00000DA0: 00 D4 15 88 04 99 44 4E AA 33 22 50 4F 4B 45 31 |......DN.3"POKE1| 00000DB0: 2C 50 45 45 4B 28 31 29 4F 52 34 3A 50 4F 4B 45 |,PEEK(1)OR4:POKE| 00000DC0: 35 36 33 33 34 2C 50 45 45 4B 28 35 36 33 33 34 |56334,PEEK(56334| 00000DD0: 29 4F 52 31 00 00 16 92 04 99 44 4E AA 34 22 50 |)OR1......DN.4"P| 00000DE0: 4F 4B 45 35 33 32 37 32 2C 28 50 45 45 4B 28 35 |OKE53272,(PEEK(5| 00000DF0: 33 32 37 32 29 41 4E 44 32 34 30 29 4F 52 31 32 |3272)AND240)OR12| 00000E00: 00 22 16 9C 04 99 44 4E AA 35 22 52 45 41 44 41 |."....DN.5"READA| 00000E10: 3A 49 46 41 3D 2D 31 54 48 45 4E 52 45 54 55 52 |:IFA=-1THENRETUR| 00000E20: 4E 22 00 5D 16 A6 04 99 44 4E AA 36 22 46 4F 52 |N".]....DN.6"FOR| 00000E30: 4A 3D 30 54 4F 37 3A 52 45 41 44 42 3A 50 4F 4B |J=0TO7:READB:POK| 00000E40: 45 31 32 32 38 38 2B 41 2A 38 2B 4A 2C 42 3A 4E |E12288+A*8+J,B:N| 00000E50: 45 58 54 3A 47 4F 54 4F 22 44 4E AA 35 00 73 16 |EXT:GOTO"DN.5.s.| 00000E60: B0 04 99 22 47 4F 54 4F 31 32 31 30 22 3A 89 31 |..."GOTO1210":.1| 00000E70: 34 30 30 00 7C 16 BA 04 99 22 93 22 00 8C 16 C4 |400.|...."."....| 00000E80: 04 5A 41 B2 31 30 3A 5A 45 B2 37 30 00 AE 16 CE |.ZA.10:ZE.70....| 00000E90: 04 97 36 34 36 2C 36 3A 99 22 13 22 3B 3A 81 5A |..646,6:.".";:.Z| 00000EA0: B2 5A 41 A4 5A 45 A9 31 30 3A 99 5A 3A 82 00 CD |.ZA.ZE.10:.Z:...| 00000EB0: 16 D8 04 99 22 31 32 32 30 5A 41 3D 22 5A 45 AA |...."1220ZA="ZE.| 00000EC0: 31 30 22 3A 5A 45 3D 22 5A 45 AA 37 30 00 DD 16 |10":ZE="ZE.70...| 00000ED0: E2 04 99 22 47 4F 54 4F 31 32 32 30 22 00 EF 16 |..."GOTO1220"...| 00000EE0: 32 05 8B 5A 41 B3 31 32 37 30 A7 31 34 30 30 00 |2..ZA.1270.1400.| 00000EF0: 1E 17 3C 05 97 36 34 36 2C 36 3A 99 22 93 31 32 |..<..646,6:.".12| 00000F00: 32 30 22 3A 81 49 B2 31 33 33 30 A4 31 34 30 30 |20":.I.1330.1400| 00000F10: A9 31 30 3A 99 49 3A 82 3A 89 31 34 30 30 00 35 |.10:.I:.:.1400.5| 00000F20: 17 46 05 8F 20 46 45 4E 53 54 45 52 20 4C 4F 45 |.F.. FENSTER LOE| 00000F30: 53 43 48 45 4E 00 50 17 50 05 99 C8 28 41 31 24 |SCHEN.P.P...(A1$| 00000F40: 2C 34 29 22 1D 1D 22 C8 28 41 32 24 2C 33 35 29 |,4)"..".(A2$,35)| 00000F50: 00 63 17 5A 05 99 22 1D 1D 22 C8 28 41 32 24 2C |.c.Z.."..".(A2$,| 00000F60: 33 35 29 00 76 17 64 05 99 22 1D 1D 22 C8 28 41 |35).v.d.."..".(A| 00000F70: 32 24 2C 33 35 29 00 7C 17 6E 05 8E 00 AD 17 78 |2$,35).|.n.....x| 00000F80: 05 97 36 34 36 2C 31 34 3A 97 36 33 31 2C 31 39 |..646,14:.631,19| 00000F90: 3A 81 49 B2 31 A4 39 3A 97 36 33 31 AA 49 2C 31 |:.I.1.9:.631.I,1| 00000FA0: 33 3A 82 3A 97 31 39 38 2C 31 30 3A 80 00 00 00 |3:.:.198,10:....| 00000FB0: FF FF 45 |..E |
.......60.....ZEICHEN AUSWAEHC.B...VERGR
OESSERTE DARSTELLUNG DES Z.....WAHL, OB
ZEICHEN VERA.ERT WIRD, OD. NEU GESTALT
EST WIRD......MIT CURS.TASTEN .ITI.EN AN
FAHREN.....SPACE .PUNKT SETZEN.....@
.' LOESCHEN.....ZEICHENVERAEN.
BE.EN .F1.....PROGRAMM BE.EN .P...
....!.....I...DIE IMPLEMENTIERTE ROUTINE
KANN NUN.K...ALS UNTERPROGRAMM MIT . 60
000... .AUFGERUFEN WERDEN....!....."....
.#......WICHTIGE PROGRAMMTEILE.........$
......%..500.550 VERGR. .IGINALZEICHENSA
TZ...&...5633,127 .ERRUPT AUS...'...1,51
I.O AUS.#.(...1,55 I.O EIN.>.)...5633,1
29 .ERRUPT EIN.F.*..ADRESSE 53248 ANFANG
CHARAKTERSATZ...+..1000.1090 ABFRAGE DE
S FENSTERS, BE....,..RECHNUNG DER .-WERT
E UND UEBER-.L.-..NAHME IN . ZEILEN.....
..1100.1200 UEBERNAHME DES PROGRAMMS.../
..IN DAS HAUPTPROGRAMM..-.0..1210.1340 L
OESCHPROGRAMM.I.1..1400 UEBERNAHMEROUTIN
E.O.2...U.3...}.4.......................
................<.A1$.".................
......".O.F.A2$."
"...P..646,14:.650,128...Z
.."..".10)".CHARAKTERGENERATOR".6.D.."UD
DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDI".O
.N..I.1.3:."B".38)"H":..~.X.."JFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFK"......"...
NEUES ZEICHEN. .ALTES ZEICHEN".
.....".....12345678 123456
78"......"...UDDDDDDDDI UCCC
CCCCCI".5. ..I.1.2:."."I".H".12)"H".24)I
".H".35)"H":..A...."..3G H UDDDIU
DDDI 3H G"......"..4G H H.
NUM.HH.ZEI.H 4H H"......"..5G
H H HH H 5H H"...H.."..6G
H JFFFKJFFFK 6H H"...R..I
.7.8:."."I".H".12)"H".24)I".H".35)"G":..
C...."...JFFFFFFFFK JFFFFFFF
FK".W...."........<. ODER .>. ZAEHLEN
.B.EARBEITEN"......".".5)".P.ROGRAMMEN
DE >EINGABE<":ZN.0:.320.B....600:.
T$."B".350.S....T$."P".1100......T$."<".
ZN.ZN.1:.310......T$..">".250...".ZN.ZN.
1. .,..ZN..128.ZN.0:.320.1.6..ZN.0.ZN.12
7._.@..H(A1$,17).15)" ..."I(D(ZN),C(D(
ZN)).1).V.J..1685,ZN:.55957,14..T..250.
..^..1350.B.H..H(A1$,4)"...N.EUES ZEICHE
N .A.LTES ZEICHEN AENDERN".Z.R..".".15)"
.EINGABE."...|.SS.27:.500:.600......T$."
N"..1350:.620......T$.."A".380./...SS.4:
.1350:.500:.620.@....T$.."A".400.S...SS.
4:.500:.650.N.... ZEICHEN VERGROESSERN..
....H(A1$,13);:.J.0.7:.56333,127:.1,51.A
...X.B(53248.8.ZN.J).128:.1,55:.56333,12
9.......SS);:.K.1.8:X%.X:X.(X.X%).2:.G(3
2.X%.81);......:.:....&.....X.. EINFACHE
S GET.-.B..198,0:.198,1:.T$:..X.L.."....
".6)"STEUERUNG MIT CURSORTASTEN"...V..".
..@.=LOESCHEN .F1.=UEBERNAHME .SPACE.=SE
TZEN"...... CURSORSTEUERUNG.....SP.1:S.1
:ZZ.1:PE.0.....PO.1024.SP.3.(ZZ.11).40:.
B(PO).81.PE.1.....ZE.81:FA.7:.900:.T$.-.
..ZE.32:FA.14:.900:.PE.1.ZE.81:FA.7:PE.0
:.900.<....T$."".670.S.F..T$.".".T$." ".
780.C.P..T$.".".820.S.Z..T$.".".840.....
.T$.".".860......T$."@".880......F(T$).1
33.1000......670.W....T$." "..B(PO)..81.
ZE.81:FA.7:.900......SP.8.ZZ.8.ZZ.ZZ.1:S
.1:SP.1:.670... ..SP.8.670...*.SP.SP.1:.
670.).4..SP.1.670.:.>.SP.SP.1:.670.M.H..
ZZ..1.ZZ.ZZ.1.V.R..670.I.\..ZZ..8.ZZ.ZZ.
1.R.F..670...P..B(PO)..32.ZE.32:FA.14:.9
00...Z..670...... POKEN.A....PO,ZE:.5427
2.PO,FA:..S.... UEBERNEHMEN.....DN.60007
.....B$."":.I.1.8:.J.1.8:BS.8.J.4...PO.1
024.J.3.(I.11).40:.B(PO).81.BS(I).BS(I).
2.BS.O....:B$.B$.D(BS(I)).",":..L...."."
:.A1$".BITTE WARTEN". .$..646,6:.".":DN.
DN.1:.DN"DATA"ZN","H(B$,C(B$).1)......"1
010DN="DN.C.8..DN.1"DATA-1".T.B.."RUN":.
1400...L.. PROG ENDE...V..".":.A1$".BITT
E WARTEN"...`.DN.60000.2.J..646,6:."."DN
"REM NEUE ZEICHEN".J.T..DN.1"POKE56334,P
EEK(56334)AND254:PO1,PEEK(1)AND251. .~..
DN.2"FORI=0TO1022:POKE12288+I,PEEK(53248
+I):NEXT.T....DN.3"POKE1,PEEK(1)OR4:POKE
56334,PEEK(56334)OR1......DN.4"POKE53272
,(PEEK(53272)AND240)OR12."....DN.5"READA
:IFA=-1THENRETURN".]....DN.6"FORJ=0TO7:R
EADB:POKE12288+A*8+J,B:NEXT:GOTO"DN.5.S.
..."GOTO1210":.1400.|...."."...D.ZA.10:Z
E.70...N..646,6:.".";:.Z.ZA.ZE.10:.Z:..M
.X.."1220ZA="ZE.10":ZE="ZE.70......"GOTO
1220"...2..ZA.1270.1400...<..646,6:.".12
20":.I.1330.1400.10:.I:.:.1400.5.F.. FEN
STER LOESCHEN.P.P..H(A1$,4)".."H(A2$,35)
.C.Z..".."H(A2$,35).V.D..".."H(A2$,35).|
.N.....X..646,14:.631,19:.I.1.9:.631.I,1
3:.:.198,10:......E
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL