5
FILE INFORMATION
FILENAME(S): 5
FILE TYPE(S): PRG
FILE SIZE: 4.4K
FIRST SEEN: 2025-11-02 16:39:22
APPEARS ON: 1 disk(s)
FILE HASH
e77efba2dc203bdb4343c9bf19468904d48f847e101ad82ea3fab2555e7c7a18
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RUN O THEK 9 87 | 5 | PRG | Treasure Chest - Plattfuss | 21 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 08 00 97 35 33 32 38 30 2C 31 34 3A |.......53280,14:|
00000010: 97 35 33 32 38 31 2C 36 00 2E 08 09 00 97 20 38 |.53281,6...... 8|
00000020: 30 38 2C 32 32 35 3A 97 37 38 38 2C 35 32 00 56 |08,225:.788,52.V|
00000030: 08 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.... ***********|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000050: 2A 2A 2A 2A 2A 2A 00 7D 08 0B 00 8F 20 4D 41 53 |******.}.... MAS|
00000060: 4B 45 4E 47 45 4E 45 4E 45 52 41 54 4F 52 20 49 |KENGENENERATOR I|
00000070: 4E 49 54 49 41 4C 49 53 49 45 52 45 4E 00 A5 08 |NITIALISIEREN...|
00000080: 0C 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00000090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000A0: 2A 2A 2A 2A 2A 00 C1 08 0D 00 49 41 25 B2 30 20 |*****.....IA%.0 |
000000B0: 20 3A 20 20 8F 20 41 4E 5A 2E 20 46 45 4C 44 45 | : . ANZ. FELDE|
000000C0: 52 00 E4 08 0E 00 49 58 20 B2 30 20 20 3A 20 20 |R.....IX .0 : |
000000D0: 8F 20 50 4F 49 4E 54 45 52 20 46 45 4C 44 4E 55 |. POINTER FELDNU|
000000E0: 4D 4D 45 52 00 FB 08 0F 00 49 47 25 B2 30 20 20 |MMER.....IG%.0 |
000000F0: 3A 20 20 8F 20 53 50 41 4C 54 45 00 1C 09 10 00 |: . SPALTE.....|
00000100: 49 42 24 B2 22 22 20 3A 20 20 8F 20 54 41 53 54 |IB$."" : . TAST|
00000110: 45 4E 57 45 52 54 20 41 4C 50 48 41 00 3B 09 11 |ENWERT ALPHA.;..|
00000120: 00 49 42 20 B2 30 20 20 3A 20 20 8F 20 54 41 53 |.IB .0 : . TAS|
00000130: 54 45 4E 57 45 52 54 20 4E 55 4D 00 54 09 12 00 |TENWERT NUM.T...|
00000140: 49 59 20 B2 30 20 20 3A 20 20 8F 20 4C 41 55 46 |IY .0 : . LAUF|
00000150: 56 41 52 2E 00 73 09 13 00 49 43 20 B2 30 20 20 |VAR..s...IC .0 |
00000160: 3A 20 20 8F 20 42 49 4C 44 53 43 48 49 52 4D 43 |: . BILDSCHIRMC|
00000170: 4F 44 45 00 8D 09 14 00 49 4D 25 B2 35 20 20 3A |ODE.....IM%.5 :|
00000180: 20 20 8F 20 46 45 4C 44 46 41 52 42 45 00 B2 09 | . FELDFARBE...|
00000190: 15 00 49 4C 25 B2 31 34 34 3A 20 20 8F 20 4E 4F |..IL%.144: . NO|
000001A0: 52 4D 41 4C 45 20 5A 45 49 43 48 45 4E 46 41 52 |RMALE ZEICHENFAR|
000001B0: 42 45 00 D4 09 16 00 49 56 25 B2 30 20 20 3A 20 |BE.....IV%.0 : |
000001C0: 20 8F 20 46 45 4C 44 4E 52 2E 20 56 4F 52 53 43 | . FELDNR. VORSC|
000001D0: 48 4C 41 47 00 F3 09 17 00 86 20 44 41 24 28 32 |HLAG...... DA$(2|
000001E0: 30 29 3A 20 8F 20 41 4E 5A 2E 20 45 2D 46 45 4C |0): . ANZ. E-FEL|
000001F0: 44 45 52 00 0B 0A 18 00 86 20 49 5A 25 28 32 30 |DER...... IZ%(20|
00000200: 29 3A 20 8F 20 5A 45 49 4C 45 4E 00 24 0A 19 00 |): . ZEILEN.$...|
00000210: 86 20 49 53 25 28 32 30 29 3A 20 8F 20 53 50 41 |. IS%(20): . SPA|
00000220: 4C 54 45 4E 00 40 0A 1A 00 86 20 49 4C 25 28 32 |LTEN.@.... IL%(2|
00000230: 30 29 3A 20 8F 20 46 45 4C 44 4C 41 45 4E 47 45 |0): . FELDLAENGE|
00000240: 00 60 0A 1B 00 99 20 C7 28 31 34 29 2C C7 28 38 |.`.... .(14),.(8|
00000250: 29 3A 20 8F 20 47 52 4F 53 53 2F 4B 4C 45 49 4E |): . GROSS/KLEIN|
00000260: 00 92 0A 1C 00 99 20 C7 28 49 4C 25 29 3A 20 20 |...... .(IL%): |
00000270: 20 20 20 20 20 20 8F 20 4E 4F 52 4D 41 4C 45 20 | . NORMALE |
00000280: 5A 45 49 43 48 2E 46 41 52 42 45 20 53 45 54 5A |ZEICH.FARBE SETZ|
00000290: 45 4E 00 BA 0A 1D 00 8F 20 2A 2A 2A 2A 2A 2A 2A |EN...... *******|
000002A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DF 0A E5 03 8F |**********......|
000002C0: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
000002D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000002E0: FF 0A E6 03 8F 20 48 20 41 20 55 20 50 20 54 20 |..... H A U P T |
000002F0: 50 20 52 20 4F 20 47 20 52 20 41 20 4D 20 4D 00 |P R O G R A M M.|
00000300: 24 0B E7 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |$.... **********|
00000310: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000320: 2A 2A 2A 2A 00 2E 0B E8 03 99 20 22 93 22 00 4F |****...... ".".O|
00000330: 0B F2 03 99 20 22 C2 45 49 53 50 49 45 4C 20 45 |.... ".EISPIEL E|
00000340: 49 4E 45 53 20 C1 55 46 52 55 46 45 53 3A 22 00 |INES .UFRUFES:".|
00000350: 81 0B FC 03 99 20 22 11 A2 A2 A2 A2 A2 A2 A2 A2 |..... ".........|
00000360: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00000370: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00000380: 22 00 91 0B 06 04 99 20 22 11 11 CE 41 4D 45 3A |"...... "...AME:|
00000390: 22 00 A3 0B 10 04 99 20 22 11 D6 4F 52 4E 41 4D |"...... "..ORNAM|
000003A0: 45 3A 22 00 CE 0B 1A 04 99 20 22 11 11 D7 4F 48 |E:"...... "...OH|
000003B0: 4E 4F 52 54 3A 20 20 20 20 20 20 20 20 20 20 20 |NORT: |
000003C0: 20 20 20 20 20 20 20 20 20 D0 CC DA 3A 22 00 DD | ...:"..|
000003D0: 0B 24 04 99 20 22 11 11 C2 45 4D 3A 22 00 10 0C |.$.. "...EM:"...|
000003E0: 2E 04 99 20 22 11 11 B8 B8 B8 B8 B8 B8 B8 B8 B8 |... "...........|
000003F0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000400: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 22 |..............."|
00000410: 00 34 0C 38 04 99 20 22 91 C6 4F 4C 47 45 4E 44 |.4.8.. "..OLGEND|
00000420: 45 20 D4 41 53 54 45 4E 46 55 4E 4B 54 49 4F 4E |E .ASTENFUNKTION|
00000430: 45 4E 3A 22 00 5E 0C 42 04 99 20 22 12 C3 53 52 |EN:".^.B.. "..SR|
00000440: 2D D3 54 45 55 45 52 54 41 53 54 45 4E 92 20 2F |-.TEUERTASTEN. /|
00000450: 20 12 C3 4C 52 92 20 2F 20 12 C6 31 92 22 00 8A | ..LR. / ..1."..|
00000460: 0C 4C 04 99 20 22 11 CD 41 53 4B 45 20 41 42 53 |.L.. "..ASKE ABS|
00000470: 43 48 4C 49 45 53 53 45 4E 20 4D 2E 20 D2 C5 D4 |CHLIESSEN M. ...|
00000480: D5 D2 CE 2C 20 57 45 4E 4E 22 00 B8 0C 56 04 99 |..., WENN"...V..|
00000490: 20 22 44 45 52 20 C3 55 52 53 4F 52 20 41 55 46 | "DER .URSOR AUF|
000004A0: 20 4C 45 54 5A 54 45 4D 20 C6 45 4C 44 20 45 52 | LETZTEM .ELD ER|
000004B0: 53 43 48 45 49 4E 54 22 00 DE 0C 60 04 8F 20 2A |SCHEINT"...`.. *|
000004C0: 2A 2A 20 56 41 52 49 41 42 4C 45 4E 55 45 42 45 |** VARIABLENUEBE|
000004D0: 52 47 41 42 45 20 2B 20 41 55 46 52 55 46 00 1C |RGABE + AUFRUF..|
000004E0: 0D 6A 04 49 5A 25 28 31 29 B2 30 37 20 3A 20 49 |.j.IZ%(1).07 : I|
000004F0: 53 25 28 31 29 B2 31 30 20 3A 20 49 4C 25 28 31 |S%(1).10 : IL%(1|
00000500: 29 B2 31 35 3A 20 20 20 20 20 20 44 41 24 28 31 |).15: DA$(1|
00000510: 29 B2 22 D2 45 49 4E 4D 41 4E 4E 22 00 52 0D 74 |).".EINMANN".R.t|
00000520: 04 49 5A 25 28 32 29 B2 30 39 20 3A 20 49 53 25 |.IZ%(2).09 : IS%|
00000530: 28 32 29 B2 31 30 20 3A 20 49 4C 25 28 32 29 B2 |(2).10 : IL%(2).|
00000540: 31 35 3A 20 20 20 20 20 20 44 41 24 28 32 29 B2 |15: DA$(2).|
00000550: 22 22 00 93 0D 7E 04 49 5A 25 28 33 29 B2 31 32 |""...~.IZ%(3).12|
00000560: 20 3A 20 49 53 25 28 33 29 B2 31 30 20 3A 20 49 | : IS%(3).10 : I|
00000570: 4C 25 28 33 29 B2 31 35 3A 20 20 20 20 20 20 44 |L%(3).15: D|
00000580: 41 24 28 33 29 B2 22 D7 49 45 44 4C 49 53 42 41 |A$(3).".IEDLISBA|
00000590: 43 48 22 00 C9 0D 88 04 49 5A 25 28 34 29 B2 31 |CH".....IZ%(4).1|
000005A0: 32 20 3A 20 49 53 25 28 34 29 B2 33 35 20 3A 20 |2 : IS%(4).35 : |
000005B0: 49 4C 25 28 34 29 B2 30 34 3A 20 20 20 20 20 20 |IL%(4).04: |
000005C0: 44 41 24 28 34 29 B2 22 22 00 FF 0D 92 04 49 5A |DA$(4)."".....IZ|
000005D0: 25 28 35 29 B2 31 35 20 3A 20 49 53 25 28 35 29 |%(5).15 : IS%(5)|
000005E0: B2 31 30 20 3A 20 49 4C 25 28 35 29 B2 32 39 3A |.10 : IL%(5).29:|
000005F0: 20 20 20 20 20 20 44 41 24 28 35 29 B2 22 22 00 | DA$(5)."".|
00000600: 3A 0E 9C 04 49 41 25 B2 35 3A 49 56 25 B2 32 3A |:...IA%.5:IV%.2:|
00000610: 8D 20 36 30 30 30 30 3A 20 8F 20 5F 5F 20 45 49 |. 60000: . __ EI|
00000620: 4E 53 50 52 55 4E 47 41 44 52 2E 20 42 45 49 20 |NSPRUNGADR. BEI |
00000630: 45 52 53 54 41 55 46 52 55 46 00 68 0E A6 04 8B |ERSTAUFRUF.h....|
00000640: 20 44 41 24 28 34 29 B2 C9 28 C4 28 C5 28 44 41 | DA$(4)..(.(.(DA|
00000650: 24 28 34 29 29 29 2C C3 28 44 41 24 28 34 29 29 |$(4))),.(DA$(4))|
00000660: 29 20 A7 20 31 32 33 30 00 72 0E B0 04 49 56 25 |) . 1230.r...IV%|
00000670: B2 34 00 A8 0E BA 04 8D 20 36 30 30 37 35 3A 20 |.4...... 60075: |
00000680: 8F 20 5F 5F 20 45 49 4E 53 50 52 55 4E 47 41 44 |. __ EINSPRUNGAD|
00000690: 52 45 53 53 45 20 42 45 49 20 45 49 4E 45 52 20 |RESSE BEI EINER |
000006A0: 4D 55 54 41 54 49 4F 4E 00 B3 0E C4 04 89 20 31 |MUTATION...... 1|
000006B0: 31 39 30 00 C5 0E CE 04 8F 20 2A 2A 2A 20 41 55 |190...... *** AU|
000006C0: 53 47 41 42 45 00 EE 0E D8 04 99 20 22 93 11 D6 |SGABE...... "...|
000006D0: 41 52 2E 20 20 20 20 20 C9 4E 48 41 4C 54 20 20 |AR. .NHALT |
000006E0: 20 20 20 20 20 20 20 CC 41 45 4E 47 45 22 00 1F | .AENGE"..|
000006F0: 0F E2 04 99 20 22 11 B7 B7 B7 B7 B7 B7 B7 B7 B7 |.... "..........|
00000700: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00000710: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 00 |..............".|
00000720: 2D 0F EC 04 81 20 58 B2 31 20 A4 20 35 00 59 0F |-.... X.1 . 5.Y.|
00000730: F6 04 3A 20 99 20 22 11 44 41 24 28 22 3B 58 3B |..: . ".DA$(";X;|
00000740: 22 29 22 A3 39 29 44 41 24 28 58 29 A3 32 34 29 |")".9)DA$(X).24)|
00000750: C3 28 44 41 24 28 58 29 29 00 61 0F 00 05 82 20 |.(DA$(X)).a.... |
00000760: 58 00 8E 0F 03 05 99 3A 99 22 CD 49 54 20 CD C1 |X......:.".IT ..|
00000770: D3 CB C5 CE 2D CD C1 CE C1 C7 C5 D2 20 4B 4F 45 |....-....... KOE|
00000780: 4E 4E 45 4E 20 53 49 45 20 53 49 43 48 22 00 B9 |NNEN SIE SICH"..|
00000790: 0F 04 05 99 3A 99 22 53 45 4C 42 53 54 20 CD 41 |....:."SELBST .A|
000007A0: 53 4B 45 4E 20 45 52 53 54 45 4C 4C 45 4E 20 55 |SKEN ERSTELLEN U|
000007B0: 4E 44 20 44 49 45 53 45 22 00 E6 0F 05 05 99 3A |ND DIESE"......:|
000007C0: 99 22 44 41 4E 4E 20 49 4E 20 45 49 47 45 4E 45 |."DANN IN EIGENE|
000007D0: 20 D0 52 4F 47 52 41 4D 4D 45 20 45 49 4E 42 49 | .ROGRAMME EINBI|
000007E0: 4E 44 45 4E 2E 22 00 14 10 06 05 99 3A 99 22 D2 |NDEN."......:.".|
000007F0: D5 CE 2D CF 2D D4 C8 C5 CB 20 C4 49 53 4B 45 54 |..-.-.... .ISKET|
00000800: 54 45 20 39 2F 38 36 20 42 45 53 54 45 4C 4C 45 |TE 9/86 BESTELLE|
00000810: 4E 20 21 22 00 2C 10 0A 05 A1 20 52 24 3A 8B 20 |N !".,.... R$:. |
00000820: 52 24 B2 22 22 20 89 20 31 32 39 30 00 3B 10 14 |R$."" . 1290.;..|
00000830: 05 8B 20 52 24 B2 22 5F 22 A7 8A 00 4D 10 19 05 |.. R$."_"...M...|
00000840: 52 24 B2 22 52 55 4E 2D 4D 41 49 4E 22 00 6B 10 |R$."RUN-MAIN".k.|
00000850: 1E 05 99 22 93 1F 4C 4F 41 44 22 C7 28 33 34 29 |..."..LOAD".(34)|
00000860: 52 24 C7 28 33 34 29 2C 38 2C 32 00 7A 10 28 05 |R$.(34),8,2.z.(.|
00000870: 99 22 11 11 11 11 52 55 4E 22 00 AC 10 32 05 97 |."....RUN"...2..|
00000880: 20 35 33 32 37 32 2C 32 31 3A 97 36 33 31 2C 31 | 53272,21:.631,1|
00000890: 39 3A 97 20 36 33 32 2C 31 33 3A 97 20 36 33 33 |9:. 632,13:. 633|
000008A0: 2C 31 33 3A 97 31 39 38 2C 33 3A 80 00 D0 10 60 |,13:.198,3:....`|
000008B0: EA 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
000008C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000008D0: 00 F4 10 65 EA 8F 20 4D 20 41 20 53 20 4B 20 45 |...e.. M A S K E|
000008E0: 20 4E 20 47 20 45 20 4E 20 45 20 52 20 41 20 54 | N G E N E R A T|
000008F0: 20 4F 20 52 00 18 11 6A EA 8F 20 2A 2A 2A 2A 2A | O R...j.. *****|
00000900: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000910: 2A 2A 2A 2A 2A 2A 2A 2A 00 30 11 6F EA 8F 20 2A |********.0.o.. *|
00000920: 2A 2A 20 50 55 4E 4B 54 45 20 53 45 54 5A 45 4E |** PUNKTE SETZEN|
00000930: 00 41 11 74 EA 81 20 49 58 B2 31 20 A4 20 49 41 |.A.t.. IX.1 . IA|
00000940: 25 00 59 11 79 EA 3A 20 49 4C 25 28 49 58 29 B2 |%.Y.y.: IL%(IX).|
00000950: 49 4C 25 28 49 58 29 AB 31 00 66 11 7E EA 3A 20 |IL%(IX).1.f.~.: |
00000960: 49 42 24 B2 22 22 00 8B 11 83 EA 3A 20 81 20 49 |IB$."".....: . I|
00000970: 59 B2 49 53 25 28 49 58 29 20 A4 20 49 53 25 28 |Y.IS%(IX) . IS%(|
00000980: 49 58 29 AA 49 4C 25 28 49 58 29 00 9E 11 88 EA |IX).IL%(IX).....|
00000990: 3A 20 20 49 42 24 B2 49 42 24 AA 22 2E 22 00 A6 |: IB$.IB$."."..|
000009A0: 11 8D EA 3A 20 82 00 BF 11 92 EA 3A 20 49 42 24 |...: ......: IB$|
000009B0: B2 C7 28 49 4D 25 29 AA 49 42 24 AA 22 5F 22 00 |..(IM%).IB$."_".|
000009C0: EF 11 97 EA 3A 20 97 20 32 31 31 2C 49 53 25 28 |....: . 211,IS%(|
000009D0: 49 58 29 3A 97 20 32 31 34 2C 49 5A 25 28 49 58 |IX):. 214,IZ%(IX|
000009E0: 29 3A 9E 20 35 38 36 34 30 3A 99 20 49 42 24 00 |):. 58640:. IB$.|
000009F0: 0B 12 9C EA 3A 20 20 8B 20 44 41 24 28 49 58 29 |....: . DA$(IX)|
00000A00: B2 22 22 20 A7 20 36 30 30 37 30 00 3F 12 A1 EA |."" . 60070.?...|
00000A10: 3A 20 97 20 32 31 31 2C 49 53 25 28 49 58 29 3A |: . 211,IS%(IX):|
00000A20: 97 20 32 31 34 2C 49 5A 25 28 49 58 29 3A 9E 20 |. 214,IZ%(IX):. |
00000A30: 35 38 36 34 30 3A 99 20 44 41 24 28 49 58 29 00 |58640:. DA$(IX).|
00000A40: 45 12 A6 EA 82 00 93 12 AB EA 8F 20 2A 2A 2A 20 |E.......... *** |
00000A50: 48 41 55 50 54 56 45 52 41 52 42 45 49 54 55 4E |HAUPTVERARBEITUN|
00000A60: 47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |G |
00000A70: 5F 20 5F 20 20 45 49 4E 53 50 52 55 4E 47 41 44 |_ _ EINSPRUNGAD|
00000A80: 52 2E 20 42 45 49 20 57 49 45 44 45 52 48 4F 4C |R. BEI WIEDERHOL|
00000A90: 55 4E 47 00 A0 12 B0 EA 49 58 B2 49 56 25 AB 31 |UNG.....IX.IV%.1|
00000AA0: 00 AC 12 B5 EA 49 58 B2 49 58 AA 31 00 BC 12 BA |.....IX.IX.1....|
00000AB0: EA 49 47 25 B2 49 53 25 28 49 58 29 00 D2 12 BF |.IG%.IS%(IX)....|
00000AC0: EA 49 53 25 28 49 58 29 B2 49 53 25 28 49 58 29 |.IS%(IX).IS%(IX)|
00000AD0: AB 31 00 EE 12 C4 EA 8D 20 36 30 31 38 35 20 3A |.1...... 60185 :|
00000AE0: 20 8F 20 46 45 4C 44 45 49 4E 47 41 42 45 00 05 | . FELDEINGABE..|
00000AF0: 13 C9 EA 3A 20 8B 20 49 58 B2 49 41 25 20 A7 20 |...: . IX.IA% . |
00000B00: 36 30 31 31 35 00 11 13 CE EA 89 20 36 30 30 38 |60115...... 6008|
00000B10: 35 00 2E 13 D3 EA 3A 20 8B 20 49 42 B2 31 37 20 |5.....: . IB.17 |
00000B20: A7 20 49 58 B2 30 3A 89 20 36 30 30 38 35 00 4D |. IX.0:. 60085.M|
00000B30: 13 D8 EA 8F 20 2A 2A 2A 20 46 45 4C 44 49 4E 48 |.... *** FELDINH|
00000B40: 41 4C 54 45 20 45 49 4E 4C 45 53 45 4E 00 5E 13 |ALTE EINLESEN.^.|
00000B50: DD EA 81 20 49 58 B2 31 20 A4 20 49 41 25 00 6F |... IX.1 . IA%.o|
00000B60: 13 E2 EA 3A 20 44 41 24 28 49 58 29 B2 22 22 00 |...: DA$(IX)."".|
00000B70: 99 13 E7 EA 3A 20 81 20 49 59 B2 49 53 25 28 49 |....: . IY.IS%(I|
00000B80: 58 29 AA 49 4C 25 28 49 58 29 20 A4 20 49 53 25 |X).IL%(IX) . IS%|
00000B90: 28 49 58 29 20 A9 20 AB 31 00 B9 13 EC EA 3A 20 |(IX) . .1.....: |
00000BA0: 20 49 43 B2 C2 28 31 30 32 34 AA 49 59 AA 34 30 | IC..(1024.IY.40|
00000BB0: AC 49 5A 25 28 49 58 29 29 00 EF 13 F1 EA 3A 20 |.IZ%(IX)).....: |
00000BC0: 20 49 43 B2 49 43 AA 36 34 AA 36 34 AC 28 49 43 | IC.IC.64.64.(IC|
00000BD0: B3 36 34 20 AF 20 49 43 B1 33 31 29 AA 33 32 AC |.64 . IC.31).32.|
00000BE0: 28 49 43 B3 39 36 20 AF 20 49 43 B1 36 33 29 00 |(IC.96 . IC.63).|
00000BF0: 0D 14 F6 EA 3A 20 20 20 8B 20 44 41 24 28 49 58 |....: . DA$(IX|
00000C00: 29 B3 B1 22 22 20 A7 20 36 30 31 36 30 00 2D 14 |).."" . 60160.-.|
00000C10: FB EA 3A 20 20 20 8B 20 49 43 B2 33 32 20 B0 20 |..: . IC.32 . |
00000C20: 49 43 B2 34 36 20 A7 20 36 30 31 36 35 00 4A 14 |IC.46 . 60165.J.|
00000C30: 00 EB 3A 20 20 44 41 24 28 49 58 29 B2 C7 28 49 |..: DA$(IX)..(I|
00000C40: 43 29 AA 44 41 24 28 49 58 29 00 52 14 05 EB 3A |C).DA$(IX).R...:|
00000C50: 20 82 00 58 14 0A EB 82 00 65 14 0F EB 99 20 C7 | ..X.....e.... .|
00000C60: 28 49 4C 25 29 00 6B 14 14 EB 8E 00 81 14 19 EB |(IL%).k.........|
00000C70: 8F 20 2A 2A 2A 20 46 45 4C 44 45 49 4E 47 41 42 |. *** FELDEINGAB|
00000C80: 45 00 97 14 1E EB 49 53 25 28 49 58 29 B2 49 53 |E.....IS%(IX).IS|
00000C90: 25 28 49 58 29 AA 31 00 C1 14 23 EB 3A 20 8B 20 |%(IX).1...#.: . |
00000CA0: 49 53 25 28 49 58 29 B1 49 47 25 AA 49 4C 25 28 |IS%(IX).IG%.IL%(|
00000CB0: 49 58 29 20 A7 20 49 53 25 28 49 58 29 B2 49 47 |IX) . IS%(IX).IG|
00000CC0: 25 00 DD 14 28 EB 8D 20 36 30 33 36 35 3A 8F 20 |%...(.. 60365:. |
00000CD0: 43 55 52 53 4F 52 20 53 45 54 5A 45 4E 00 F8 14 |CURSOR SETZEN...|
00000CE0: 2D EB A1 20 49 42 24 3A 8B 20 49 42 24 B2 22 22 |-.. IB$:. IB$.""|
00000CF0: 20 A7 20 36 30 32 30 35 00 08 15 32 EB 3A 20 49 | . 60205...2.: I|
00000D00: 42 B2 C6 28 49 42 24 29 00 3A 15 37 EB 3A 20 20 |B..(IB$).:.7.: |
00000D10: 8B 20 49 42 B1 B2 33 32 20 AF 20 49 42 B3 B2 31 |. IB..32 . IB..1|
00000D20: 32 37 20 A7 20 36 30 32 35 30 3A 8F 20 4E 4F 52 |27 . 60250:. NOR|
00000D30: 4D 41 4C 45 20 54 41 53 54 45 00 68 15 3C EB 3A |MALE TASTE.h.<.:|
00000D40: 20 20 8B 20 49 42 B2 32 39 20 20 A7 20 8D 20 36 | . IB.29 . . 6|
00000D50: 30 33 38 35 3A 89 20 36 30 31 39 30 3A 8F 20 43 |0385:. 60190:. C|
00000D60: 53 52 20 52 49 47 48 54 00 95 15 41 EB 3A 20 20 |SR RIGHT...A.: |
00000D70: 8B 20 49 42 B2 31 35 37 20 A7 20 8D 20 36 30 32 |. IB.157 . . 602|
00000D80: 36 30 3A 89 20 36 30 31 39 30 3A 8F 20 43 53 52 |60:. 60190:. CSR|
00000D90: 20 4C 45 46 54 00 BA 15 46 EB 3A 20 20 8B 20 49 | LEFT...F.: . I|
00000DA0: 42 B2 31 34 35 20 A7 20 8D 20 36 30 32 38 30 3A |B.145 . . 60280:|
00000DB0: 8E 3A 8F 20 43 53 52 20 55 50 00 F2 15 4B EB 3A |.:. CSR UP...K.:|
00000DC0: 20 20 8B 20 49 42 B2 31 33 20 B0 20 49 42 B2 31 | . IB.13 . IB.1|
00000DD0: 37 20 A7 20 8D 20 36 30 33 30 30 3A 8E 3A 20 8F |7 . . 60300:.: .|
00000DE0: 20 52 45 54 55 52 4E 20 2F 20 43 53 52 20 44 4F | RETURN / CSR DO|
00000DF0: 57 4E 00 25 16 50 EB 3A 20 20 8B 20 49 42 B2 31 |WN.%.P.: . IB.1|
00000E00: 33 33 20 A7 20 8D 20 36 30 33 33 30 3A 89 20 36 |33 . . 60330:. 6|
00000E10: 30 32 30 30 3A 8F 20 43 4C 52 20 46 49 45 4C 44 |0200:. CLR FIELD|
00000E20: 20 28 46 31 29 00 47 16 55 EB 3A 20 20 8B 20 49 | (F1).G.U.: . I|
00000E30: 42 B2 31 39 20 20 A7 20 8D 20 36 30 33 31 35 3A |B.19 . . 60315:|
00000E40: 8E 3A 8F 20 43 4C 52 00 8B 16 5A EB 49 42 B2 49 |.:. CLR...Z.IB.I|
00000E50: 42 AA 33 33 AC 28 49 42 B2 32 35 35 29 AA 36 34 |B.33.(IB.255).64|
00000E60: AC 28 49 42 B1 36 33 29 AA 33 32 AC 28 49 42 B3 |.(IB.63).32.(IB.|
00000E70: 39 36 29 AB 33 32 AC 28 49 42 B3 31 36 30 29 AA |96).32.(IB.160).|
00000E80: 36 34 AC 28 49 42 B1 31 39 31 29 00 B4 16 5F EB |64.(IB.191)..._.|
00000E90: 97 20 31 30 32 34 AA 49 53 25 28 49 58 29 AA 34 |. 1024.IS%(IX).4|
00000EA0: 30 AC 49 5A 25 28 49 58 29 2C 49 42 3A 89 20 36 |0.IZ%(IX),IB:. 6|
00000EB0: 30 31 39 30 00 CA 16 64 EB 8F 20 2A 2A 2A 20 43 |0190...d.. *** C|
00000EC0: 55 52 53 4F 52 20 4C 45 46 54 00 E8 16 69 EB 8D |URSOR LEFT...i..|
00000ED0: 20 36 30 33 38 35 3A 49 53 25 28 49 58 29 B2 49 | 60385:IS%(IX).I|
00000EE0: 53 25 28 49 58 29 AB 32 00 16 17 6E EB 3A 20 8B |S%(IX).2...n.: .|
00000EF0: 20 49 53 25 28 49 58 29 B3 49 47 25 AB 31 20 A7 | IS%(IX).IG%.1 .|
00000F00: 20 49 53 25 28 49 58 29 B2 49 47 25 AA 49 4C 25 | IS%(IX).IG%.IL%|
00000F10: 28 49 58 29 AB 31 00 1C 17 73 EB 8E 00 30 17 78 |(IX).1...s...0.x|
00000F20: EB 8F 20 2A 2A 2A 20 43 55 52 53 4F 52 20 55 50 |.. *** CURSOR UP|
00000F30: 00 50 17 7D EB 8D 20 36 30 33 38 35 3A 49 53 25 |.P.}.. 60385:IS%|
00000F40: 28 49 58 29 B2 49 47 25 3A 49 58 B2 49 58 AB 32 |(IX).IG%:IX.IX.2|
00000F50: 00 68 17 82 EB 3A 20 8B 20 49 58 B3 30 20 A7 20 |.h...: . IX.0 . |
00000F60: 49 58 B2 49 41 25 AB 31 00 6E 17 87 EB 8E 00 8D |IX.IA%.1.n......|
00000F70: 17 8C EB 8F 20 2A 2A 2A 20 52 45 54 55 52 4E 20 |.... *** RETURN |
00000F80: 2B 20 43 55 52 53 4F 52 20 44 4F 57 4E 00 A5 17 |+ CURSOR DOWN...|
00000F90: 91 EB 8D 20 36 30 33 38 35 3A 49 53 25 28 49 58 |... 60385:IS%(IX|
00000FA0: 29 B2 49 47 25 00 AB 17 96 EB 8E 00 BD 17 9B EB |).IG%...........|
00000FB0: 8F 20 2A 2A 2A 20 52 45 4D 20 43 4C 52 00 DE 17 |. *** REM CLR...|
00000FC0: A0 EB 8D 20 36 30 33 38 35 3A 49 53 25 28 49 58 |... 60385:IS%(IX|
00000FD0: 29 B2 49 47 25 3A 49 58 B2 49 56 25 AB 31 00 E4 |).IG%:IX.IV%.1..|
00000FE0: 17 A5 EB 8E 00 FD 17 AA EB 8F 20 2A 2A 2A 20 43 |.......... *** C|
00000FF0: 4C 52 20 46 49 45 4C 44 20 28 46 31 29 00 15 18 |LR FIELD (F1)...|
00001000: AF EB 8D 20 36 30 33 38 35 3A 49 53 25 28 49 58 |... 60385:IS%(IX|
00001010: 29 B2 49 47 25 00 37 18 B4 EB 81 20 49 59 B2 49 |).IG%.7.... IY.I|
00001020: 53 25 28 49 58 29 A4 20 49 53 25 28 49 58 29 AA |S%(IX). IS%(IX).|
00001030: 49 4C 25 28 49 58 29 00 57 18 B9 EB 3A 20 97 20 |IL%(IX).W...: . |
00001040: 31 30 32 34 AA 49 59 AA 34 30 AC 28 49 5A 25 28 |1024.IY.40.(IZ%(|
00001050: 49 58 29 29 2C 34 36 00 5D 18 BE EB 82 00 96 18 |IX)),46.].......|
00001060: C3 EB 97 20 32 31 31 2C 49 53 25 28 49 58 29 3A |... 211,IS%(IX):|
00001070: 97 20 32 31 34 2C 49 5A 25 28 49 58 29 3A 9E 20 |. 214,IZ%(IX):. |
00001080: 35 38 36 34 30 3A 99 20 C7 28 49 4D 25 29 AA 44 |58640:. .(IM%).D|
00001090: 41 24 28 49 58 29 00 9C 18 C8 EB 8E 00 B4 18 CD |A$(IX)..........|
000010A0: EB 8F 20 2A 2A 2A 20 43 55 52 53 4F 52 20 53 45 |.. *** CURSOR SE|
000010B0: 54 5A 45 4E 00 D3 18 D2 EB 49 43 B2 31 30 32 34 |TZEN.....IC.1024|
000010C0: AA 49 53 25 28 49 58 29 AA 34 30 AC 49 5A 25 28 |.IS%(IX).40.IZ%(|
000010D0: 49 58 29 00 E6 18 D7 EB 97 20 49 43 2C C2 28 49 |IX)...... IC,.(I|
000010E0: 43 29 AA 31 32 38 00 EC 18 DC EB 8E 00 06 19 E1 |C).128..........|
000010F0: EB 8F 20 2A 2A 2A 20 43 55 52 53 4F 52 20 4C 4F |.. *** CURSOR LO|
00001100: 45 53 43 48 45 4E 00 25 19 E6 EB 49 43 B2 31 30 |ESCHEN.%...IC.10|
00001110: 32 34 AA 49 53 25 28 49 58 29 AA 34 30 AC 49 5A |24.IS%(IX).40.IZ|
00001120: 25 28 49 58 29 00 46 19 EB EB 8B 20 C2 28 49 43 |%(IX).F.... .(IC|
00001130: 29 B1 31 32 37 20 A7 20 97 20 49 43 2C C2 28 49 |).127 . . IC,.(I|
00001140: 43 29 AB 31 32 38 00 4C 19 F0 EB 8E 00 70 19 F5 |C).128.L.....p..|
00001150: EB 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00001160: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001170: 00 00 00 |... |
.......53280,14:.53281,6...... 808,225:.
788,52.V.... ***************************
******.}.... MASKENGENENERATOR INITIALIS
IEREN...... ****************************
*****.A...IA%.0 : . ANZ. FELDER.....IX
.0 : . POINTER FELDNUMMER.....IG%.0
: . SPALTE.....IB$."" : . TASTENWERT A
LPHA.;...IB .0 : . TASTENWERT NUM.T...
IY .0 : . LAUFVAR..S...IC .0 : . BIL
DSCHIRMCODE.....IM%.5 : . FELDFARBE...
..IL%.144: . NORMALE ZEICHENFARBE.T...I
V%.0 : . FELDNR. VORSCHLAG...... DA$(2
0): . ANZ. E-FELDER...... IZ%(20): . ZEI
LEN.$.... IS%(20): . SPALTEN.@.... IL%(2
0): . FELDLAENGE.`.... G(14),G(8): . GRO
SS/KLEIN...... G(IL%): . NORMALE
ZEICH.FARBE SETZEN...... ***************
******************...... ***************
***************...... H A U P T P R O G
R A M M.$.... **************************
****...... ".".O.... "BEISPIEL EINES AUF
RUFES:"...... ".........................
................"...... "..NAME:"......
".VORNAME:".N.... "..WOHNORT:
PLZ:"...$.. "..BEM:"...... "...
......................................."
.4.8.. ".FOLGENDE TASTENFUNKTIONEN:".^.B
.. ".CSR-STEUERTASTEN. / .CLR. / .F1."..
.L.. ".MASKE ABSCHLIESSEN M. RETURN, WEN
N"...V.. "DER CURSOR AUF LETZTEM FELD ER
SCHEINT"...`.. *** VARIABLENUEBERGABE +
AUFRUF...J.IZ%(1).07 : IS%(1).10 : IL%(1
).15: DA$(1)."REINMANN".R.T.IZ%(2).
09 : IS%(2).10 : IL%(2).15: DA$(2).
""...~.IZ%(3).12 : IS%(3).10 : IL%(3).15
: DA$(3)."WIEDLISBACH".I...IZ%(4).1
2 : IS%(4).35 : IL%(4).04: DA$(4)."
".....IZ%(5).15 : IS%(5).10 : IL%(5).29:
DA$(5)."".:...IA%.5:IV%.2:. 60000:
. __ EINSPRUNGADR. BEI ERSTAUFRUF.H....
DA$(4).I(D(E(DA$(4))),C(DA$(4))) . 1230
.R...IV%.4...... 60075: . __ EINSPRUNGAD
RESSE BEI EINER MUTATION...D.. 1190.E.N.
. *** AUSGABE...X.. "..VAR. INHALT
LAENGE"...... "..................
......................".-.... X.1 . 5.Y.
..: . ".DA$(";X;")".9)DA$(X).24)C(DA$(X)
).A.... X......:."MIT MASKEN-MANAGER KOE
NNEN SIE SICH"......:."SELBST MASKEN ERS
TELLEN UND DIESE"......:."DANN IN EIGENE
PROGRAMME EINBINDEN."......:."RUN-O-THE
K DISKETTE 9/86 BESTELLEN !".,.... R$:.
R$."" . 1290.;.... R$."_"...M...R$."RUN-
MAIN".K...."..LOAD"G(34)R$G(34),8,2.Z.(.
."....RUN"...2.. 53272,21:.631,19:. 632,
13:. 633,13:.198,3:..P.`.. *************
****************...E.. M A S K E N G E N
E R A T O R...J.. *********************
********.0.O.. *** PUNKTE SETZEN.A.T.. I
X.1 . IA%.Y.Y.: IL%(IX).IL%(IX).1.F.~.:
IB$."".....: . IY.IS%(IX) . IS%(IX).IL%(
IX).....: IB$.IB$.".".....: ......: IB$
.G(IM%).IB$."_".....: . 211,IS%(IX):. 21
4,IZ%(IX):. 58640:. IB$.....: . DA$(IX)
."" . 60070.?...: . 211,IS%(IX):. 214,IZ
%(IX):. 58640:. DA$(IX).E.......... ***
HAUPTVERARBEITUNG _ _ EIN
SPRUNGADR. BEI WIEDERHOLUNG. ...IX.IV%.1
.....IX.IX.1.....IG%.IS%(IX).R...IS%(IX)
.IS%(IX).1...D.. 60185 : . FELDEINGABE..
.I.: . IX.IA% . 60115...N.. 60085...S.:
. IB.17 . IX.0:. 60085.M.X.. *** FELDINH
ALTE EINLESEN.^.... IX.1 . IA%.O...: DA$
(IX)."".....: . IY.IS%(IX).IL%(IX) . IS%
(IX) . .1.....: IC.B(1024.IY.40.IZ%(IX)
).....: IC.IC.64.64.(IC.64 . IC.31).32.
(IC.96 . IC.63).....: . DA$(IX).."" .
60160.-...: . IC.32 . IC.46 . 60165.J.
..: DA$(IX).G(IC).DA$(IX).R...: ..X....
.E.... G(IL%).K.......... *** FELDEINGAB
E.....IS%(IX).IS%(IX).1.A.#.: . IS%(IX).
IG%.IL%(IX) . IS%(IX).IG%...(.. 60365:.
CURSOR SETZEN...-.. IB$:. IB$."" . 60205
...2.: IB.F(IB$).:.7.: . IB..32 . IB..1
27 . 60250:. NORMALE TASTE.H.<.: . IB.2
9 . . 60385:. 60190:. CSR RIGHT...A.:
. IB.157 . . 60260:. 60190:. CSR LEFT...
F.: . IB.145 . . 60280:.:. CSR UP...K.:
. IB.13 . IB.17 . . 60300:.: . RETURN
/ CSR DOWN.%.P.: . IB.133 . . 60330:. 6
0200:. CLR FIELD (F1).G.U.: . IB.19 .
. 60315:.:. CLR...Z.IB.IB.33.(IB.255).64
.(IB.63).32.(IB.96).32.(IB.160).64.(IB.1
91)..._.. 1024.IS%(IX).40.IZ%(IX),IB:. 6
0190.J.D.. *** CURSOR LEFT...I.. 60385:I
S%(IX).IS%(IX).2...N.: . IS%(IX).IG%.1 .
IS%(IX).IG%.IL%(IX).1...S...0.X.. *** C
URSOR UP.P.}.. 60385:IS%(IX).IG%:IX.IX.2
.H...: . IX.0 . IX.IA%.1.N.......... ***
RETURN + CURSOR DOWN...... 60385:IS%(IX
).IG%............ *** REM CLR... .. 6038
5:IS%(IX).IG%:IX.IV%.1............ *** C
LR FIELD (F1)...... 60385:IS%(IX).IG%.7.
... IY.IS%(IX). IS%(IX).IL%(IX).W...: .
1024.IY.40.(IZ%(IX)),46.].......C.. 211,
IS%(IX):. 214,IZ%(IX):. 58640:. G(IM%).D
A$(IX)...H.....M.. *** CURSOR SETZEN.S.R
.IC.1024.IS%(IX).40.IZ%(IX)...W.. IC,B(I
C).128............ *** CURSOR LOESCHEN.%
...IC.1024.IS%(IX).40.IZ%(IX).F.... B(IC
).127 . . IC,B(IC).128.L.....P.... *****
************************...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL