CHARAKTER-G
FILE INFORMATION
FILENAME(S): CHARAKTER-G
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-11-30 16:10:53
APPEARS ON: 1 disk(s)
FILE HASH
15a5f401083bcebc6cec52862d7e57d04a62848614a3529a3b6ae7e8d23018a8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ADLER DISK C53 A | CHARAKTER-G | PRG | BrainSkull, Sammlung | 6 | 15 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 0A 00 8F 20 43 48 41 52 41 4B 54 45 |....... CHARAKTE| 00000010: 52 47 45 4E 45 52 41 54 4F 52 00 3B 08 14 00 8F |RGENERATOR.;....| 00000020: 20 2A 2A 2A 20 50 45 54 45 52 20 4E 49 53 54 45 | *** PETER NISTE| 00000030: 4C 42 45 52 47 45 52 20 2A 2A 2A 00 5C 08 1E 00 |LBERGER ***.\...| 00000040: 8F 20 2A 2A 2A 20 20 20 57 45 49 44 45 4E 47 41 |. *** WEIDENGA| 00000050: 53 53 45 20 32 30 20 20 20 2A 2A 2A 00 7D 08 28 |SSE 20 ***.}.(| 00000060: 00 8F 20 2A 2A 2A 20 20 20 20 20 32 33 32 35 20 |.. *** 2325 | 00000070: 20 56 45 4C 4D 20 20 20 20 20 2A 2A 2A 00 9E 08 | VELM ***...| 00000080: 32 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |2.. ************| 00000090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C0 |**************..| 000000A0: 08 3C 00 41 31 24 B2 22 13 11 11 11 11 11 11 11 |.<.A1$."........| 000000B0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |..............."| 000000C0: 00 F1 08 46 00 41 32 24 B2 22 20 20 20 20 20 20 |...F.A2$." | 000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000F0: 22 00 06 09 50 00 97 36 34 36 2C 31 34 3A 97 36 |"...P..646,14:.6| 00000100: 35 30 2C 31 32 38 00 28 09 5A 00 99 22 93 11 22 |50,128.(.Z..".."| 00000110: A3 31 30 29 22 12 43 48 41 52 41 4B 54 45 52 47 |.10)".CHARAKTERG| 00000120: 45 4E 45 52 41 54 4F 52 00 57 09 64 00 99 22 D5 |ENERATOR.W.d..".| 00000130: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................| 00000140: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................| 00000150: C3 C3 C3 C3 C3 C9 22 00 70 09 6E 00 81 49 B2 31 |......".p.n..I.1| 00000160: A4 33 3A 99 22 C2 22 A3 33 38 29 22 C2 22 3A 82 |.3:.".".38)".":.| 00000170: 00 9F 09 78 00 99 22 CA C3 C3 C3 C3 C3 C3 C3 C3 |...x..".........| 00000180: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................| 00000190: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 CB 22 00 |..............".| 000001A0: CF 09 82 00 99 22 11 1D 12 4E 45 55 45 53 20 5A |....."...NEUES Z| 000001B0: 45 49 43 48 45 4E 92 20 20 20 20 20 20 20 20 20 |EICHEN. | 000001C0: 20 12 41 4C 54 45 53 20 5A 45 49 43 48 45 4E 00 | .ALTES ZEICHEN.| 000001D0: FA 09 8C 00 99 22 11 1D 1D 1D 1D 31 32 33 34 35 |.....".....12345| 000001E0: 36 37 38 20 20 20 20 20 20 20 20 20 20 20 20 20 |678 | 000001F0: 20 20 31 32 33 34 35 36 37 38 00 26 0A 96 00 99 | 12345678.&....| 00000200: 22 1D 1D 1D D5 C3 C3 C3 C3 C3 C3 C3 C3 C9 20 20 |"............. | 00000210: 20 20 20 20 20 20 20 20 20 20 20 D5 C3 C3 C3 C3 | .....| 00000220: C3 C3 C3 C3 C9 22 00 54 0A A0 00 81 49 B2 31 A4 |.....".T....I.1.| 00000230: 32 3A 99 22 1D 22 49 22 9D C2 22 A3 31 32 29 22 |2:."."I"..".12)"| 00000240: C2 22 A3 32 34 29 49 22 9D C2 22 A3 33 35 29 22 |.".24)I"..".35)"| 00000250: C2 22 3A 82 00 80 0A AA 00 99 22 1D 1D 33 C2 20 |.":......."..3. | 00000260: 20 20 20 20 20 20 20 C2 20 D5 C3 C3 C3 C9 D5 C3 | . .......| 00000270: C3 C3 C9 20 33 C2 20 20 20 20 20 20 20 20 C2 22 |... 3. ."| 00000280: 00 B0 0A B4 00 99 22 1D 1D 34 C2 20 20 20 20 20 |......"..4. | 00000290: 20 20 20 C2 20 C2 12 4E 55 4D 92 C2 C2 12 5A 45 | . ..NUM....ZE| 000002A0: 49 92 C2 20 34 C2 20 20 20 20 20 20 20 20 C2 22 |I.. 4. ."| 000002B0: 00 E0 0A BE 00 99 22 1D 1D 35 C2 20 20 20 20 20 |......"..5. | 000002C0: 20 20 20 C2 20 C2 20 20 20 C2 C2 20 20 20 C2 20 | . . .. . | 000002D0: 35 C2 20 20 20 20 20 20 20 20 20 20 20 20 C2 22 |5. ."| 000002E0: 00 10 0B C8 00 99 22 1D 1D 36 C2 20 20 20 20 20 |......"..6. | 000002F0: 20 20 20 C2 20 CA C3 C3 C3 CB CA C3 C3 C3 CB 20 | . .......... | 00000300: 36 C2 20 20 20 20 20 20 20 20 20 20 20 20 C2 22 |6. ."| 00000310: 00 3E 0B D2 00 81 49 B2 37 A4 38 3A 99 22 1D 22 |.>....I.7.8:."."| 00000320: 49 22 9D C2 22 A3 31 32 29 22 C2 22 A3 32 34 29 |I"..".12)".".24)| 00000330: 49 22 9D C2 22 A3 33 35 29 22 C2 22 3A 82 00 6A |I"..".35)".":..j| 00000340: 0B DC 00 99 22 1D 1D 1D CA C3 C3 C3 C3 C3 C3 C3 |...."...........| 00000350: C3 CB 20 20 20 20 20 20 20 20 20 20 20 20 20 CA |.. .| 00000360: C3 C3 C3 C3 C3 C3 C3 C3 CB 22 00 9E 0B E6 00 99 |........."......| 00000370: 22 13 11 11 11 1D 1D 1D 12 3C 92 20 4F 44 45 52 |"........<. ODER| 00000380: 20 12 3E 92 20 5A 41 45 48 4C 45 4E 20 20 20 20 | .>. ZAEHLEN | 00000390: 20 12 42 92 45 41 52 42 45 49 54 45 4E 22 00 D4 | .B.EARBEITEN"..| 000003A0: 0B F0 00 99 22 11 22 A3 35 29 22 12 50 92 52 4F |....".".5)".P.RO| 000003B0: 47 52 41 4D 4D 45 4E 44 45 20 20 20 20 20 20 20 |GRAMMENDE | 000003C0: 3E 45 49 4E 47 41 42 45 3C 22 3A 5A 4E B2 30 3A |>EINGABE<":ZN.0:| 000003D0: 89 33 32 30 00 E9 0B FA 00 8D 36 30 30 3A 8B 54 |.320......600:.T| 000003E0: 24 B2 22 42 22 A7 33 35 30 00 FA 0B 04 01 8B 54 |$."B".350......T| 000003F0: 24 B2 22 50 22 A7 31 31 30 30 00 13 0C 0E 01 8B |$."P".1100......| 00000400: 54 24 B2 22 3C 22 A7 5A 4E B2 5A 4E AB 31 3A 89 |T$."<".ZN.ZN.1:.| 00000410: 33 31 30 00 24 0C 18 01 8B 54 24 B3 B1 22 3E 22 |310.$....T$..">"| 00000420: A7 32 35 30 00 30 0C 22 01 5A 4E B2 5A 4E AA 31 |.250.0.".ZN.ZN.1| 00000430: 00 47 0C 2C 01 8B 5A 4E B1 B2 31 32 38 A7 5A 4E |.G.,..ZN..128.ZN| 00000440: B2 30 3A 89 33 32 30 00 58 0C 36 01 8B 5A 4E B3 |.0:.320.X.6..ZN.| 00000450: 30 A7 5A 4E B2 31 32 37 00 86 0C 40 01 99 C8 28 |0.ZN.127...@...(| 00000460: 41 31 24 2C 31 37 29 A3 31 35 29 22 20 20 20 9D |A1$,17).15)" .| 00000470: 9D 9D 22 C9 28 C4 28 5A 4E 29 2C C3 28 C4 28 5A |..".(.(ZN),.(.(Z| 00000480: 4E 29 29 AB 31 29 00 9D 0C 4A 01 97 31 36 38 35 |N)).1)...J..1685| 00000490: 2C 5A 4E 3A 97 35 35 39 35 37 2C 31 34 00 A6 0C |,ZN:.55957,14...| 000004A0: 54 01 89 32 35 30 00 B0 0C 5E 01 8D 31 33 35 30 |T..250...^..1350| 000004B0: 00 E9 0C 68 01 99 C8 28 41 31 24 2C 34 29 22 1D |...h...(A1$,4)".| 000004C0: 1D 12 4E 92 45 55 45 53 20 5A 45 49 43 48 45 4E |..N.EUES ZEICHEN| 000004D0: 20 12 41 92 4C 54 45 53 20 5A 45 49 43 48 45 4E | .A.LTES ZEICHEN| 000004E0: 20 41 45 4E 44 45 52 4E 22 00 01 0D 72 01 99 22 | AENDERN"...r.."| 000004F0: 11 22 A3 31 35 29 22 12 45 49 4E 47 41 42 45 92 |.".15)".EINGABE.| 00000500: 22 00 15 0D 7C 01 53 53 B2 32 37 3A 8D 35 30 30 |"...|.SS.27:.500| 00000510: 3A 8D 36 30 30 00 2C 0D 86 01 8B 54 24 B2 22 4E |:.600.,....T$."N| 00000520: 22 A7 8D 31 33 35 30 3A 89 36 32 30 00 3D 0D 90 |"..1350:.620.=..| 00000530: 01 8B 54 24 B3 B1 22 41 22 A7 33 38 30 00 56 0D |..T$.."A".380.V.| 00000540: 9A 01 53 53 B2 34 3A 8D 31 33 35 30 3A 8D 35 30 |..SS.4:.1350:.50| 00000550: 30 3A 89 36 32 30 00 67 0D AE 01 8B 54 24 B3 B1 |0:.620.g....T$..| 00000560: 22 41 22 A7 34 30 30 00 7A 0D B8 01 53 53 B2 34 |"A".400.z...SS.4| 00000570: 3A 8D 35 30 30 3A 89 36 35 30 00 95 0D F4 01 8F |:.500:.650......| 00000580: 20 5A 45 49 43 48 45 4E 20 56 45 52 47 52 4F 45 | ZEICHEN VERGROE| 00000590: 53 53 45 52 4E 00 BD 0D FE 01 99 C8 28 41 31 24 |SSERN.......(A1$| 000005A0: 2C 31 33 29 3B 3A 81 4A B2 30 A4 37 3A 97 35 36 |,13);:.J.0.7:.56| 000005B0: 33 33 33 2C 31 32 37 3A 97 31 2C 35 31 00 E8 0D |333,127:.1,51...| 000005C0: 08 02 58 B2 C2 28 35 33 32 34 38 AA 38 AC 5A 4E |..X..(53248.8.ZN| 000005D0: AA 4A 29 AD 31 32 38 3A 97 31 2C 35 35 3A 97 35 |.J).128:.1,55:.5| 000005E0: 36 33 33 33 2C 31 32 39 00 18 0E 12 02 99 A3 53 |6333,129.......S| 000005F0: 53 29 3B 3A 81 4B B2 31 A4 38 3A 58 25 B2 58 3A |S);:.K.1.8:X%.X:| 00000600: 58 B2 28 58 AB 58 25 29 AC 32 3A 99 C7 28 33 32 |X.(X.X%).2:..(32| 00000610: AA 58 25 AC 38 31 29 3B 00 22 0E 1C 02 82 3A 99 |.X%.81);."....:.| 00000620: 3A 82 00 28 0E 26 02 8E 00 3C 0E 58 02 8F 20 45 |:..(.&...<.X.. E| 00000630: 49 4E 46 41 43 48 45 53 20 47 45 54 00 54 0E 62 |INFACHES GET.T.b| 00000640: 02 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 |..198,0:.198,1:.| 00000650: 54 24 3A 8E 00 7E 0E 6C 02 99 22 13 11 11 11 22 |T$:..~.l.."...."| 00000660: A3 36 29 22 53 54 45 55 45 52 55 4E 47 20 4D 49 |.6)"STEUERUNG MI| 00000670: 54 20 43 55 52 53 4F 52 54 41 53 54 45 4E 00 B3 |T CURSORTASTEN..| 00000680: 0E 76 02 99 22 11 1D 12 40 92 3D 4C 4F 45 53 43 |.v.."...@.=LOESC| 00000690: 48 45 4E 20 12 46 31 92 3D 55 45 42 45 52 4E 41 |HEN .F1.=UEBERNA| 000006A0: 48 4D 45 20 12 53 50 41 43 45 92 3D 53 45 54 5A |HME .SPACE.=SETZ| 000006B0: 45 4E 22 00 C9 0E 8A 02 8F 20 43 55 52 53 4F 52 |EN"...... CURSOR| 000006C0: 53 54 45 55 45 52 55 4E 47 00 E0 0E 94 02 53 50 |STEUERUNG.....SP| 000006D0: B2 31 3A 53 B2 31 3A 5A 5A B2 31 3A 50 45 B2 30 |.1:S.1:ZZ.1:PE.0| 000006E0: 00 0B 0F 9E 02 50 4F B2 31 30 32 34 AA 53 50 AA |.....PO.1024.SP.| 000006F0: 33 AA 28 5A 5A AA 31 31 29 AC 34 30 3A 8B C2 28 |3.(ZZ.11).40:..(| 00000700: 50 4F 29 B2 38 31 A7 50 45 B2 31 00 23 0F A8 02 |PO).81.PE.1.#...| 00000710: 5A 45 B2 38 31 3A 46 41 B2 37 3A 8D 39 30 30 3A |ZE.81:FA.7:.900:| 00000720: A1 54 24 00 53 0F B2 02 5A 45 B2 33 32 3A 46 41 |.T$.S...ZE.32:FA| 00000730: B2 31 34 3A 8D 39 30 30 3A 8B 50 45 B2 31 A7 5A |.14:.900:.PE.1.Z| 00000740: 45 B2 38 31 3A 46 41 B2 37 3A 50 45 B2 30 3A 8D |E.81:FA.7:PE.0:.| 00000750: 39 30 30 00 62 0F BC 02 8B 54 24 B2 22 22 A7 36 |900.b....T$."".6| 00000760: 37 30 00 79 0F C6 02 8B 54 24 B2 22 1D 22 B0 54 |70.y....T$.".".T| 00000770: 24 B2 22 20 22 A7 37 38 30 00 89 0F D0 02 8B 54 |$." ".780......T| 00000780: 24 B2 22 9D 22 A7 38 32 30 00 99 0F DA 02 8B 54 |$.".".820......T| 00000790: 24 B2 22 91 22 A7 38 34 30 00 A9 0F E4 02 8B 54 |$.".".840......T| 000007A0: 24 B2 22 11 22 A7 38 36 30 00 B9 0F EE 02 8B 54 |$.".".860......T| 000007B0: 24 B2 22 40 22 A7 38 38 30 00 CD 0F F8 02 8B C6 |$."@".880.......| 000007C0: 28 54 24 29 B2 31 33 33 A7 31 30 30 30 00 D6 0F |(T$).133.1000...| 000007D0: 02 03 89 36 37 30 00 FD 0F 0C 03 8B 54 24 B2 22 |...670......T$."| 000007E0: 20 22 A7 8B C2 28 50 4F 29 B3 B1 38 31 A7 5A 45 | "...(PO)..81.ZE| 000007F0: B2 38 31 3A 46 41 B2 37 3A 8D 39 30 30 00 22 10 |.81:FA.7:.900.".| 00000800: 16 03 8B 53 50 B2 38 AF 5A 5A B3 38 A7 5A 5A B2 |...SP.8.ZZ.8.ZZ.| 00000810: 5A 5A AA 31 3A 53 B2 31 3A 53 50 B2 31 3A 89 36 |ZZ.1:S.1:SP.1:.6| 00000820: 37 30 00 30 10 20 03 8B 53 50 B2 38 A7 36 37 30 |70.0. ..SP.8.670| 00000830: 00 41 10 2A 03 53 50 B2 53 50 AA 31 3A 89 36 37 |.A.*.SP.SP.1:.67| 00000840: 30 00 4F 10 34 03 8B 53 50 B2 31 A7 36 37 30 00 |0.O.4..SP.1.670.| 00000850: 60 10 3E 03 53 50 B2 53 50 AB 31 3A 89 36 37 30 |`.>.SP.SP.1:.670| 00000860: 00 73 10 48 03 8B 5A 5A B3 B1 31 A7 5A 5A B2 5A |.s.H..ZZ..1.ZZ.Z| 00000870: 5A AB 31 00 7C 10 52 03 89 36 37 30 00 8F 10 5C |Z.1.|.R..670...\| 00000880: 03 8B 5A 5A B3 B1 38 A7 5A 5A B2 5A 5A AA 31 00 |..ZZ..8.ZZ.ZZ.1.| 00000890: 98 10 66 03 89 36 37 30 00 B8 10 70 03 8B C2 28 |..f..670...p...(| 000008A0: 50 4F 29 B3 B1 33 32 A7 5A 45 B2 33 32 3A 46 41 |PO)..32.ZE.32:FA| 000008B0: B2 31 34 3A 8D 39 30 30 00 C1 10 7A 03 89 36 37 |.14:.900...z..67| 000008C0: 30 00 CD 10 84 03 8F 20 50 4F 4B 45 4E 00 E7 10 |0...... POKEN...| 000008D0: 8E 03 97 50 4F 2C 5A 45 3A 97 35 34 32 37 32 AA |...PO,ZE:.54272.| 000008E0: 50 4F 2C 46 41 3A 8E 00 F9 10 E8 03 8F 20 55 45 |PO,FA:....... UE| 000008F0: 42 45 52 4E 45 48 4D 45 4E 00 07 11 F2 03 44 4E |BERNEHMEN.....DN| 00000900: B2 20 36 30 30 30 37 00 26 11 FC 03 42 24 B2 22 |. 60007.&...B$."| 00000910: 22 3A 81 49 B2 31 A4 38 3A 81 4A B2 31 A4 38 3A |":.I.1.8:.J.1.8:| 00000920: 42 53 B2 38 AB 4A 00 5B 11 06 04 50 4F B2 31 30 |BS.8.J.[...PO.10| 00000930: 32 34 AA 4A AA 33 AA 28 49 AA 31 31 29 AC 34 30 |24.J.3.(I.11).40| 00000940: 3A 8B C2 28 50 4F 29 B2 38 31 A7 42 53 28 49 29 |:..(PO).81.BS(I)| 00000950: B2 42 53 28 49 29 AA 32 AE 42 53 00 76 11 10 04 |.BS(I).2.BS.v...| 00000960: 82 3A 42 24 B2 42 24 AA C4 28 42 53 28 49 29 29 |.:B$.B$..(BS(I))| 00000970: AA 22 2C 22 3A 82 00 93 11 1A 04 99 22 93 22 3A |.",":.......".":| 00000980: 99 41 31 24 22 12 42 49 54 54 45 20 57 41 52 54 |.A1$".BITTE WART| 00000990: 45 4E 22 00 C7 11 24 04 97 36 34 36 2C 36 3A 99 |EN"...$..646,6:.| 000009A0: 22 13 22 3A 44 4E B2 44 4E AA 31 3A 99 44 4E 22 |".":DN.DN.1:.DN"| 000009B0: 44 41 54 41 22 5A 4E 22 2C 22 C8 28 42 24 2C C3 |DATA"ZN",".(B$,.| 000009C0: 28 42 24 29 AB 31 29 00 D8 11 2E 04 99 22 31 30 |(B$).1)......"10| 000009D0: 31 30 44 4E 3D 22 44 4E 00 EA 11 38 04 99 44 4E |10DN="DN...8..DN| 000009E0: AA 31 22 44 41 54 41 2D 31 22 00 FB 11 42 04 99 |.1"DATA-1"...B..| 000009F0: 22 52 55 4E 22 3A 89 31 34 30 30 00 0B 12 4C 04 |"RUN":.1400...L.| 00000A00: 8F 20 50 52 4F 47 20 45 4E 44 45 00 28 12 56 04 |. PROG ENDE.(.V.| 00000A10: 99 22 93 22 3A 99 41 31 24 22 12 42 49 54 54 45 |.".":.A1$".BITTE| 00000A20: 20 57 41 52 54 45 4E 22 00 35 12 60 04 44 4E B2 | WARTEN".5.`.DN.| 00000A30: 36 30 30 30 30 00 59 12 6A 04 97 36 34 36 2C 36 |60000.Y.j..646,6| 00000A40: 3A 99 22 13 22 44 4E 22 52 45 4D 20 4E 45 55 45 |:."."DN"REM NEUE| 00000A50: 20 5A 45 49 43 48 45 4E 22 00 93 12 74 04 99 44 | ZEICHEN"...t..D| 00000A60: 4E AA 31 22 50 4F 4B 45 35 36 33 33 34 2C 50 45 |N.1"POKE56334,PE| 00000A70: 45 4B 28 35 36 33 33 34 29 41 4E 44 32 35 34 3A |EK(56334)AND254:| 00000A80: 50 4F 4B 45 31 2C 50 45 45 4B 28 31 29 41 4E 44 |POKE1,PEEK(1)AND| 00000A90: 32 35 31 00 C9 12 7E 04 99 44 4E AA 32 22 46 4F |251...~..DN.2"FO| 00000AA0: 52 49 3D 30 54 4F 31 30 32 32 3A 50 4F 4B 45 31 |RI=0TO1022:POKE1| 00000AB0: 32 32 38 38 2B 49 2C 50 45 45 4B 28 35 33 32 34 |2288+I,PEEK(5324| 00000AC0: 38 2B 49 29 3A 4E 45 58 54 00 FD 12 88 04 99 44 |8+I):NEXT......D| 00000AD0: 4E AA 33 22 50 4F 4B 45 31 2C 50 45 45 4B 28 31 |N.3"POKE1,PEEK(1| 00000AE0: 29 4F 52 34 3A 50 4F 4B 45 35 36 33 33 34 2C 50 |)OR4:POKE56334,P| 00000AF0: 45 45 4B 28 35 36 33 33 34 29 4F 52 31 00 29 13 |EEK(56334)OR1.).| 00000B00: 92 04 99 44 4E AA 34 22 50 4F 4B 45 35 33 32 37 |...DN.4"POKE5327| 00000B10: 32 2C 28 50 45 45 4B 28 35 33 32 37 32 29 41 4E |2,(PEEK(53272)AN| 00000B20: 44 32 34 30 29 4F 52 31 32 00 4B 13 9C 04 99 44 |D240)OR12.K....D| 00000B30: 4E AA 35 22 52 45 41 44 41 3A 49 46 41 3D 2D 31 |N.5"READA:IFA=-1| 00000B40: 54 48 45 4E 52 45 54 55 52 4E 22 00 86 13 A6 04 |THENRETURN".....| 00000B50: 99 44 4E AA 36 22 46 4F 52 4A 3D 30 54 4F 37 3A |.DN.6"FORJ=0TO7:| 00000B60: 52 45 41 44 42 3A 50 4F 4B 45 31 32 32 38 38 2B |READB:POKE12288+| 00000B70: 41 2A 38 2B 4A 2C 42 3A 4E 45 58 54 3A 47 4F 54 |A*8+J,B:NEXT:GOT| 00000B80: 4F 22 44 4E AA 35 00 9C 13 B0 04 99 22 47 4F 54 |O"DN.5......"GOT| 00000B90: 4F 31 32 31 30 22 3A 89 31 34 30 30 00 A5 13 BA |O1210":.1400....| 00000BA0: 04 99 22 93 22 00 B5 13 C4 04 5A 41 B2 31 30 3A |..".".....ZA.10:| 00000BB0: 5A 45 B2 37 30 00 D7 13 CE 04 97 36 34 36 2C 36 |ZE.70......646,6| 00000BC0: 3A 99 22 13 22 3B 3A 81 5A B2 5A 41 A4 5A 45 A9 |:.".";:.Z.ZA.ZE.| 00000BD0: 31 30 3A 99 5A 3A 82 00 F6 13 D8 04 99 22 31 32 |10:.Z:......."12| 00000BE0: 32 30 5A 41 3D 22 5A 45 AA 31 30 22 3A 5A 45 3D |20ZA="ZE.10":ZE=| 00000BF0: 22 5A 45 AA 37 30 00 06 14 E2 04 99 22 47 4F 54 |"ZE.70......"GOT| 00000C00: 4F 31 32 32 30 22 00 18 14 32 05 8B 5A 41 B3 31 |O1220"...2..ZA.1| 00000C10: 32 37 30 A7 31 34 30 30 00 47 14 3C 05 97 36 34 |270.1400.G.<..64| 00000C20: 36 2C 36 3A 99 22 93 31 32 32 30 22 3A 81 49 B2 |6,6:.".1220":.I.| 00000C30: 31 33 33 30 A4 31 34 30 30 A9 31 30 3A 99 49 3A |1330.1400.10:.I:| 00000C40: 82 3A 89 31 34 30 30 00 5E 14 46 05 8F 20 46 45 |.:.1400.^.F.. FE| 00000C50: 4E 53 54 45 52 20 4C 4F 45 53 43 48 45 4E 00 79 |NSTER LOESCHEN.y| 00000C60: 14 50 05 99 C8 28 41 31 24 2C 34 29 22 1D 1D 22 |.P...(A1$,4)".."| 00000C70: C8 28 41 32 24 2C 33 35 29 00 8C 14 5A 05 99 22 |.(A2$,35)...Z.."| 00000C80: 1D 1D 22 C8 28 41 32 24 2C 33 35 29 00 9F 14 64 |..".(A2$,35)...d| 00000C90: 05 99 22 1D 1D 22 C8 28 41 32 24 2C 33 35 29 00 |.."..".(A2$,35).| 00000CA0: A5 14 6E 05 8E 00 D6 14 78 05 97 36 34 36 2C 31 |..n.....x..646,1| 00000CB0: 34 3A 97 36 33 31 2C 31 39 3A 81 49 B2 31 A4 39 |4:.631,19:.I.1.9| 00000CC0: 3A 97 36 33 31 AA 49 2C 31 33 3A 82 3A 97 31 39 |:.631.I,13:.:.19| 00000CD0: 38 2C 31 30 3A 80 00 00 00 |8,10:.... |
....... CHARAKTERGENERATOR.;.... *** PET
ER NISTELBERGER ***.\.... *** WEIDENGA
SSE 20 ***.}.(.. *** 2325 VELM
***...2.. **************************..
.<.A1$."......................."...F.A2$
."
"...P..646,14:.650,128.(.Z.."..".10)".CH
ARAKTERGENERATOR.W.D.."UCCCCCCCCCCCCCCCC
CCCCCCCCCCCCCCCCCCCCCI".P.N..I.1.3:."B".
38)"B":....X.."JCCCCCCCCCCCCCCCCCCCCCCCC
CCCCCCCCCCCCCK".O...."...NEUES ZEICHEN.
.ALTES ZEICHEN......".....12345
678 12345678.&...."...UCCC
CCCCCI UCCCCCCCCI".T. ..I.1.
2:."."I".B".12)"B".24)I".B".35)"B":.....
.."..3B B UCCCIUCCCI 3B B"
......"..4B B B.NUM.BB.ZEI.B 4B
B"......"..5B B B BB B
5B B"...H.."..6B B JCC
CKJCCCK 6B B".>.R..I.7.8:."."
I".B".12)"B".24)I".B".35)"B":..J...."...
JCCCCCCCCK JCCCCCCCCK"......
"........<. ODER .>. ZAEHLEN .B.EARB
EITEN".T....".".5)".P.ROGRAMMENDE
>EINGABE<":ZN.0:.320......600:.T$."B".35
0......T$."P".1100......T$."<".ZN.ZN.1:.
310.$....T$..">".250.0.".ZN.ZN.1.G.,..ZN
..128.ZN.0:.320.X.6..ZN.0.ZN.127...@..H(
A1$,17).15)" ..."I(D(ZN),C(D(ZN)).1)..
.J..1685,ZN:.55957,14...T..250...^..1350
...H..H(A1$,4)"...N.EUES ZEICHEN .A.LTES
ZEICHEN AENDERN"...R..".".15)".EINGABE.
"...|.SS.27:.500:.600.,....T$."N"..1350:
.620.=....T$.."A".380.V...SS.4:.1350:.50
0:.620.G....T$.."A".400.Z...SS.4:.500:.6
50...... ZEICHEN VERGROESSERN......H(A1$
,13);:.J.0.7:.56333,127:.1,51.....X.B(53
248.8.ZN.J).128:.1,55:.56333,129.......S
S);:.K.1.8:X%.X:X.(X.X%).2:.G(32.X%.81);
."....:.:..(.&...<.X.. EINFACHES GET.T.B
..198,0:.198,1:.T$:..~.L.."....".6)"STEU
ERUNG MIT CURSORTASTEN...V.."...@.=LOESC
HEN .F1.=UEBERNAHME .SPACE.=SETZEN".I...
. CURSORSTEUERUNG.....SP.1:S.1:ZZ.1:PE.0
.....PO.1024.SP.3.(ZZ.11).40:.B(PO).81.P
E.1.#...ZE.81:FA.7:.900:.T$.S...ZE.32:FA
.14:.900:.PE.1.ZE.81:FA.7:PE.0:.900.B...
.T$."".670.Y.F..T$.".".T$." ".780...P..T
$.".".820...Z..T$.".".840......T$.".".86
0......T$."@".880.M....F(T$).133.1000.V.
...670......T$." "..B(PO)..81.ZE.81:FA.7
:.900."....SP.8.ZZ.8.ZZ.ZZ.1:S.1:SP.1:.6
70.0. ..SP.8.670.A.*.SP.SP.1:.670.O.4..S
P.1.670.`.>.SP.SP.1:.670.S.H..ZZ..1.ZZ.Z
Z.1.|.R..670...\..ZZ..8.ZZ.ZZ.1...F..670
...P..B(PO)..32.ZE.32:FA.14:.900.A.Z..67
0.M.... POKEN......PO,ZE:.54272.PO,FA:..
..... UEBERNEHMEN.....DN. 60007.&...B$."
":.I.1.8:.J.1.8:BS.8.J.[...PO.1024.J.3.(
I.11).40:.B(PO).81.BS(I).BS(I).2.BS.V...
.:B$.B$.D(BS(I)).",":.......".":.A1$".BI
TTE WARTEN".G.$..646,6:.".":DN.DN.1:.DN"
DATA"ZN","H(B$,C(B$).1).X...."1010DN="DN
...8..DN.1"DATA-1"...B.."RUN":.1400...L.
. PROG ENDE.(.V..".":.A1$".BITTE WARTEN"
.5.`.DN.60000.Y.J..646,6:."."DN"REM NEUE
ZEICHEN"...T..DN.1"POKE56334,PEEK(56334
)AND254:POKE1,PEEK(1)AND251.I.~..DN.2"FO
RI=0TO1022:POKE12288+I,PEEK(53248+I):NEX
T......DN.3"POKE1,PEEK(1)OR4:POKE56334,P
EEK(56334)OR1.)....DN.4"POKE53272,(PEEK(
53272)AND240)OR12.K....DN.5"READA:IFA=-1
THENRETURN"......DN.6"FORJ=0TO7:READB:PO
KE12288+A*8+J,B:NEXT:GOTO"DN.5......"GOT
O1210":.1400......"."...D.ZA.10:ZE.70.W.
N..646,6:.".";:.Z.ZA.ZE.10:.Z:....X.."12
20ZA="ZE.10":ZE="ZE.70......"GOTO1220"..
.2..ZA.1270.1400.G.<..646,6:.".1220":.I.
1330.1400.10:.I:.:.1400.^.F.. FENSTER LO
ESCHEN.Y.P..H(A1$,4)".."H(A2$,35)...Z.."
.."H(A2$,35)...D..".."H(A2$,35)...N...V.
X..646,14:.631,19:.I.1.9:.631.I,13:.:.19
8,10:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL