ED
FILE INFORMATION
FILENAME(S): ED
FILE TYPE(S): PRG
FILE SIZE: 3.8K
FIRST SEEN: 2025-12-02 23:48:11
APPEARS ON: 1 disk(s)
FILE HASH
4f61488a1c7b3d79ddc401aa552f2b564fc0aeed98c22163ab90d0bfacd22d8f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FRISCH | ED | PRG | swasti, flohmarkt | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 01 00 86 57 52 24 28 32 30 30 30 29 |..$....WR$(2000)| 00000010: 3A 86 52 47 28 32 30 30 30 29 3A 86 4C 47 28 32 |:.RG(2000):.LG(2| 00000020: 30 30 30 29 00 2D 08 02 00 59 59 B2 31 00 36 08 |000).-...YY.1.6.| 00000030: 05 00 99 22 93 22 00 5D 08 0A 00 99 3A 99 3A 99 |...".".]....:.:.| 00000040: 3A 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |:." | 00000050: 20 20 20 4D 20 45 20 4E 20 55 20 45 22 00 85 08 | M E N U E"...| 00000060: 14 00 99 3A 99 3A 99 22 20 20 20 20 20 20 31 2E |...:.:." 1.| 00000070: 29 20 45 49 4E 4C 45 53 45 4E 20 44 49 52 45 43 |) EINLESEN DIREC| 00000080: 54 4F 52 59 22 00 AF 08 1E 00 99 3A 99 22 20 20 |TORY"......:." | 00000090: 20 20 20 20 32 2E 29 20 41 4C 50 48 41 50 45 54 | 2.) ALPHAPET| 000000A0: 49 53 43 48 20 53 4F 52 54 49 45 52 45 4E 22 00 |ISCH SORTIEREN".| 000000B0: D1 08 28 00 99 3A 99 22 20 20 20 20 20 20 33 2E |..(..:." 3.| 000000C0: 29 20 44 41 54 45 4E 20 4C 4F 45 53 43 48 45 4E |) DATEN LOESCHEN| 000000D0: 22 00 F6 08 32 00 99 3A 99 22 20 20 20 20 20 20 |"...2..:." | 000000E0: 34 2E 29 20 44 41 54 45 4E 20 41 42 53 50 45 49 |4.) DATEN ABSPEI| 000000F0: 43 48 45 52 4E 22 00 18 09 3C 00 99 3A 99 22 20 |CHERN"...<..:." | 00000100: 20 20 20 20 20 35 2E 29 20 44 41 54 45 4E 20 45 | 5.) DATEN E| 00000110: 49 4E 4C 45 53 45 4E 22 00 3C 09 46 00 99 3A 99 |INLESEN".<.F..:.| 00000120: 22 20 20 20 20 20 20 36 2E 29 20 44 41 54 45 4E |" 6.) DATEN| 00000130: 20 41 55 53 44 52 55 43 4B 45 4E 22 00 65 09 50 | AUSDRUCKEN".e.P| 00000140: 00 99 3A 99 3A 99 22 20 20 20 20 20 20 42 49 54 |..:.:." BIT| 00000150: 54 45 20 47 45 57 55 45 4E 53 43 48 54 45 20 54 |TE GEWUENSCHTE T| 00000160: 41 53 54 45 22 00 83 09 5A 00 99 22 20 20 20 20 |ASTE"...Z.." | 00000170: 20 20 20 20 20 20 20 20 20 44 52 55 45 43 4B 45 | DRUECKE| 00000180: 4E 21 22 00 98 09 64 00 A1 5A 5A 24 3A 8B 5A 5A |N!"...d..ZZ$:.ZZ| 00000190: 24 B2 22 22 A7 31 30 30 00 D7 09 6E 00 8B 5A 5A |$."".100...n..ZZ| 000001A0: 24 B3 B1 22 31 22 AF 5A 5A 24 B3 B1 22 32 22 AF |$.."1".ZZ$.."2".| 000001B0: 5A 5A 24 B3 B1 22 33 22 AF 5A 5A 24 B3 B1 22 34 |ZZ$.."3".ZZ$.."4| 000001C0: 22 AF 5A 5A 24 B3 B1 22 35 22 AF 5A 5A 24 B3 B1 |".ZZ$.."5".ZZ$..| 000001D0: 22 36 22 A7 31 30 30 00 E5 09 78 00 45 45 B2 C5 |"6".100...x.EE..| 000001E0: 28 5A 5A 24 29 00 11 0A 82 00 91 45 45 89 32 30 |(ZZ$)......EE.20| 000001F0: 31 30 30 2C 31 30 30 30 30 2C 33 30 30 30 30 2C |100,10000,30000,| 00000200: 33 35 30 30 30 2C 34 30 30 30 30 2C 34 35 30 30 |35000,40000,4500| 00000210: 30 00 45 0A 10 27 99 22 93 22 3A 99 3A 99 3A 99 |0.E..'.".":.:.:.| 00000220: 3A 99 3A 99 3A 99 3A 99 22 20 20 20 20 20 20 20 |:.:.:.:." | 00000230: 20 20 20 20 20 20 20 42 49 54 54 45 20 57 41 52 | BITTE WAR| 00000240: 54 54 45 4E 22 00 55 0A 1A 27 58 B2 30 3A 59 B2 |TTEN".U..'X.0:Y.| 00000250: 30 3A 5A B2 30 00 7C 0A 24 27 54 B2 54 49 3A 4C |0:Z.0.|.$'T.TI:L| 00000260: 47 28 31 29 B2 31 3A 52 47 28 31 29 B2 59 59 AB |G(1).1:RG(1).YY.| 00000270: 31 3A 5A B2 30 3A 8D 31 30 30 34 30 00 83 0A 2E |1:Z.0:.10040....| 00000280: 27 89 35 00 A0 0A 38 27 5A B2 5A AA 31 3A 8B 4C |'.5...8'Z.Z.1:.L| 00000290: 47 28 5A 29 B2 52 47 28 5A 29 A7 31 30 31 37 30 |G(Z).RG(Z).10170| 000002A0: 00 C2 0A 42 27 58 B2 4C 47 28 5A 29 3A 59 B2 52 |...B'X.LG(Z):Y.R| 000002B0: 47 28 5A 29 3A 8B 59 B3 B2 58 AA 31 89 31 30 31 |G(Z):.Y..X.1.101| 000002C0: 37 30 00 E2 0A 4C 27 42 B2 28 58 AA 59 29 AD 32 |70...L'B.(X.Y).2| 000002D0: 3A 42 B2 B5 28 42 29 3A 56 47 24 B2 57 52 24 28 |:B..(B):VG$.WR$(| 000002E0: 42 29 00 F1 0A 56 27 8B 58 B1 59 A7 31 30 31 35 |B)...V'.X.Y.1015| 000002F0: 30 00 0E 0B 60 27 8B 57 52 24 28 58 29 B3 56 47 |0...`'.WR$(X).VG| 00000300: 24 A7 58 B2 58 AA 31 3A 89 31 30 30 38 30 00 2B |$.X.X.1:.10080.+| 00000310: 0B 6A 27 8B 57 52 24 28 59 29 B1 56 47 24 A7 59 |.j'.WR$(Y).VG$.Y| 00000320: B2 59 AB 31 3A 89 31 30 30 39 30 00 3A 0B 74 27 |.Y.1:.10090.:.t'| 00000330: 8B 58 B1 59 A7 31 30 31 35 30 00 60 0B 7E 27 53 |.X.Y.10150.`.~'S| 00000340: 24 B2 57 52 24 28 58 29 3A 57 52 24 28 58 29 B2 |$.WR$(X):WR$(X).| 00000350: 57 52 24 28 59 29 3A 57 52 24 28 59 29 B2 53 24 |WR$(Y):WR$(Y).S$| 00000360: 00 77 0B 88 27 58 B2 58 AA 31 3A 59 B2 59 AB 31 |.w..'X.X.1:Y.Y.1| 00000370: 3A 89 31 30 30 37 30 00 92 0B 92 27 8B 57 52 24 |:.10070....'.WR$| 00000380: 28 58 29 B3 B2 57 52 24 28 59 29 A7 89 31 30 31 |(X)..WR$(Y)..101| 00000390: 37 30 00 BF 0B 9C 27 53 24 B2 57 52 24 28 58 29 |70....'S$.WR$(X)| 000003A0: 3A 57 52 24 28 58 29 B2 57 52 24 28 59 29 3A 57 |:WR$(X).WR$(Y):W| 000003B0: 52 24 28 59 29 B2 53 24 3A 89 31 30 31 37 30 00 |R$(Y).S$:.10170.| 000003C0: E2 0B A6 27 52 47 28 5A AA 31 29 B2 59 3A 4C 47 |...'RG(Z.1).Y:LG| 000003D0: 28 5A AA 31 29 B2 4C 47 28 5A 29 3A 8D 31 30 30 |(Z.1).LG(Z):.100| 000003E0: 34 30 00 0D 0C B0 27 4C 47 28 5A AA 31 29 B2 52 |40....'LG(Z.1).R| 000003F0: 47 28 5A AA 31 29 AA 31 3A 52 47 28 5A AA 31 29 |G(Z.1).1:RG(Z.1)| 00000400: B2 52 47 28 5A 29 3A 8D 31 30 30 34 30 00 19 0C |.RG(Z):.10040...| 00000410: BA 27 5A B2 5A AB 31 3A 8E 00 28 0C 84 4E 53 50 |.'Z.Z.1:..(..NSP| 00000420: B2 31 38 3A 53 45 B2 31 00 34 0C 8E 4E 9F 31 2C |.18:SE.1.4..N.1,| 00000430: 38 2C 31 35 00 43 0C 98 4E 9F 32 2C 38 2C 32 2C |8,15.C..N.2,8,2,| 00000440: 22 23 22 00 59 0C A2 4E 98 31 2C 22 55 31 20 32 |"#".Y..N.1,"U1 2| 00000450: 20 30 22 3B 53 50 3B 53 45 00 67 0C 06 4F A1 23 | 0";SP;SE.g..O.#| 00000460: 32 2C 41 24 2C 42 24 00 7E 0C 12 4F 8B 53 45 B2 |2,A$,B$.~..O.SE.| 00000470: C6 28 42 24 29 A7 A0 31 3A A0 32 3A 89 35 00 87 |.(B$)..1:.2:.5..| 00000480: 0C 15 4F 42 50 B2 35 00 99 0C 1A 4F 98 31 2C 22 |..OBP.5....O.1,"| 00000490: 42 2D 50 20 32 22 3B 42 50 00 A5 0C 1F 4F 81 49 |B-P 2";BP....O.I| 000004A0: B2 31 A4 31 36 00 C1 0C 24 4F A1 23 32 2C 43 24 |.1.16...$O.#2,C$| 000004B0: 3A 8B 43 24 B2 C7 28 31 36 30 29 A7 32 31 30 30 |:.C$..(160).2100| 000004C0: 30 00 CE 0C 2E 4F 44 24 B2 44 24 AA 43 24 00 D5 |0....OD$.D$.C$..| 000004D0: 0C 38 4F 82 49 00 F0 0C 08 52 8B 44 24 B2 22 31 |.8O.I....R.D$."1| 000004E0: 22 B0 44 24 B2 22 22 A7 A0 31 3A A0 32 3A 89 35 |".D$.""..1:.2:.5| 000004F0: 00 FD 0C 0D 52 42 50 B2 42 50 AA 32 35 00 0F 0D |....RBP.BP.25...| 00000500: 12 52 98 31 2C 22 42 2D 50 20 32 22 3B 42 50 00 |.R.1,"B-P 2";BP.| 00000510: 1D 0D 1C 52 A1 23 32 2C 45 24 2C 46 24 00 37 0D |...R.#2,E$,F$.7.| 00000520: 21 52 8B 45 24 B2 22 22 A7 44 24 B2 22 22 3A A0 |!R.E$."".D$."":.| 00000530: 31 3A A0 32 3A 89 35 00 43 0D 26 52 41 B2 C6 28 |1:.2:.5.C.&RA..(| 00000540: 45 24 29 00 57 0D 27 52 8B C3 28 44 24 29 B2 31 |E$).W.'R..(D$).1| 00000550: 36 A7 32 31 30 34 30 00 7C 0D 28 52 4C B2 31 36 |6.21040.|.(RL.16| 00000560: AB C3 28 44 24 29 3A 81 58 B2 31 A4 4C 3A 44 24 |..(D$):.X.1.L:D$| 00000570: B2 44 24 AA C7 28 33 32 29 3A 82 58 00 87 0D 30 |.D$..(32):.X...0| 00000580: 52 8D 32 31 31 30 30 00 A9 0D 35 52 8B 42 50 B1 |R.21100...5R.BP.| 00000590: 32 35 30 A7 53 45 B2 C6 28 42 24 29 3A 44 24 B2 |250.SE..(B$):D$.| 000005A0: 22 22 3A 89 32 30 31 33 30 00 C4 0D 3A 52 42 50 |"":.20130...:RBP| 000005B0: B2 42 50 AA 37 3A 44 24 B2 22 22 3A 20 20 89 32 |.BP.7:D$."": .2| 000005C0: 30 32 35 30 00 DC 0D 6C 52 99 22 93 22 3A 99 22 |0250...lR.".":."| 000005D0: 55 45 42 45 52 4E 45 48 4D 45 4E 22 00 F3 0D 76 |UEBERNEHMEN"...v| 000005E0: 52 99 44 24 3B 41 3B 22 20 20 20 20 20 20 20 4A |R.D$;A;" J| 000005F0: 2F 4E 22 00 0A 0E 80 52 A1 58 58 24 3A 8B 58 58 |/N"....R.XX$:.XX| 00000600: 24 B2 22 22 A7 32 31 31 32 30 00 27 0E 8A 52 8B |$."".21120.'..R.| 00000610: 58 58 24 B3 B1 22 4A 22 AF 58 58 24 B3 B1 22 4E |XX$.."J".XX$.."N| 00000620: 22 A7 32 31 31 32 30 00 36 0E 94 52 8B 58 58 24 |".21120.6..R.XX$| 00000630: B2 22 4E 22 A7 8E 00 5D 0E 95 52 99 3A 99 22 20 |."N"...]..R.:." | 00000640: 4E 41 4D 45 4E 20 55 45 42 45 52 4E 45 48 4D 45 |NAMEN UEBERNEHME| 00000650: 4E 3F 20 20 20 20 20 20 20 4A 2F 4E 22 00 74 0E |N? J/N".t.| 00000660: 96 52 A1 44 4D 24 3A 8B 44 4D 24 B2 22 22 A7 32 |.R.DM$:.DM$."".2| 00000670: 31 31 34 32 00 91 0E 97 52 8B 44 4D 24 B3 B1 22 |1142....R.DM$.."| 00000680: 4A 22 AF 44 4D 24 B3 B1 22 4E 22 A7 32 31 31 34 |J".DM$.."N".2114| 00000690: 32 00 A4 0E 98 52 8B 44 4D 24 B2 22 4A 22 A7 32 |2....R.DM$."J".2| 000006A0: 31 31 35 30 00 C7 0E 99 52 99 3A 99 22 4E 45 55 |1150....R.:."NEU| 000006B0: 45 52 20 4E 41 4D 45 20 4D 41 58 2E 31 36 20 5A |ER NAME MAX.16 Z| 000006C0: 45 49 43 48 45 4E 22 00 DB 0E 9A 52 85 44 24 3A |EICHEN"....R.D$:| 000006D0: 44 24 B2 C8 28 44 24 2C 31 36 29 00 EF 0E 9B 52 |D$..(D$,16)....R| 000006E0: 8B C3 28 44 24 29 B2 31 36 A7 32 31 31 35 30 00 |..(D$).16.21150.| 000006F0: 14 0F 9C 52 4C B2 31 36 AB C3 28 44 24 29 3A 81 |...RL.16..(D$):.| 00000700: 58 B2 31 A4 4C 3A 44 24 B2 44 24 AA C7 28 33 32 |X.1.L:D$.D$..(32| 00000710: 29 3A 82 58 00 3B 0F 9E 52 99 22 57 49 45 56 49 |):.X.;..R."WIEVI| 00000720: 45 4C 45 20 42 4C 4F 45 43 4B 45 20 20 4D 41 58 |ELE BLOECKE MAX| 00000730: 2E 33 20 5A 45 49 43 48 45 4E 22 00 4E 0F A8 52 |.3 ZEICHEN".N..R| 00000740: 85 56 24 3A 56 24 B2 C8 28 56 24 2C 33 29 00 61 |.V$:V$..(V$,3).a| 00000750: 0F A9 52 8B C3 28 56 24 29 B2 33 A7 32 31 31 37 |..R..(V$).3.2117| 00000760: 30 00 86 0F AA 52 48 48 B2 33 AB C3 28 56 24 29 |0....RHH.3..(V$)| 00000770: 3A 81 58 B2 31 A4 48 48 3A 56 24 B2 C7 28 33 32 |:.X.1.HH:V$..(32| 00000780: 29 AA 56 24 3A 82 00 A2 0F B2 52 57 52 24 28 59 |).V$:.....RWR$(Y| 00000790: 59 29 B2 44 24 AA 56 24 3A 59 59 B2 59 59 AA 31 |Y).D$.V$:YY.YY.1| 000007A0: 3A 8E 00 CE 0F 30 75 99 22 93 22 3A 99 3A 99 3A |:....0u.".":.:.:| 000007B0: 99 22 47 45 42 45 4E 20 53 49 45 20 44 45 4E 20 |."GEBEN SIE DEN | 000007C0: 4E 41 4D 45 4E 20 55 4E 44 20 44 49 45 22 00 F6 |NAMEN UND DIE"..| 000007D0: 0F 31 75 99 22 42 4C 4F 45 43 4B 45 20 44 55 52 |.1u."BLOECKE DUR| 000007E0: 43 48 20 4B 4F 4D 4D 41 20 47 45 54 52 45 4E 4E |CH KOMMA GETRENN| 000007F0: 54 20 45 49 4E 22 00 0F 10 3A 75 85 57 24 2C 50 |T EIN"...:u.W$,P| 00000800: 50 24 3A 50 50 24 B2 C8 28 50 50 24 2C 33 29 00 |P$:PP$..(PP$,3).| 00000810: 23 10 3F 75 8B C3 28 50 50 24 29 B2 33 A7 33 30 |#.?u..(PP$).3.30| 00000820: 30 32 30 00 4C 10 40 75 52 54 B2 33 AB C3 28 50 |020.L.@uRT.3..(P| 00000830: 50 24 29 3A 81 52 58 B2 31 A4 52 54 3A 50 50 24 |P$):.RX.1.RT:PP$| 00000840: B2 C7 28 33 32 29 AA 50 50 24 3A 82 00 60 10 44 |..(32).PP$:..`.D| 00000850: 75 8B C3 28 57 24 29 B2 31 36 A7 33 30 30 33 30 |u..(W$).16.30030| 00000860: 00 87 10 45 75 4A 4A B2 31 36 AB C3 28 57 24 29 |...EuJJ.16..(W$)| 00000870: 3A 81 58 B2 31 A4 4A 4A 3A 57 24 B2 57 24 AA C7 |:.X.1.JJ:W$.W$..| 00000880: 28 33 32 29 3A 82 58 00 96 10 4E 75 59 5A 24 B2 |(32):.X...NuYZ$.| 00000890: 57 24 AA 50 50 24 00 9F 10 58 75 54 54 B2 31 00 |W$.PP$...XuTT.1.| 000008A0: B2 10 59 75 99 3A 99 22 49 43 48 20 53 55 43 48 |..Yu.:."ICH SUCH| 000008B0: 45 22 00 D9 10 62 75 8B 57 52 24 28 54 54 29 B2 |E"...bu.WR$(TT).| 000008C0: 59 5A 24 A7 57 52 24 28 54 54 29 B2 C7 28 31 39 |YZ$.WR$(TT)..(19| 000008D0: 31 29 3A 89 33 31 30 30 30 00 F2 10 6C 75 54 54 |1):.31000...luTT| 000008E0: B2 54 54 AA 31 3A 8B 54 54 B2 59 59 A7 33 30 35 |.TT.1:.TT.YY.305| 000008F0: 30 30 00 FD 10 76 75 89 33 30 30 35 30 00 2E 11 |00...vu.30050...| 00000900: 24 77 99 3A 99 22 4E 41 4D 45 4E 20 4E 49 43 48 |$w.:."NAMEN NICH| 00000910: 54 20 47 45 46 55 4E 44 45 4E 22 3A 81 49 B2 31 |T GEFUNDEN":.I.1| 00000920: A4 31 30 30 3A 82 49 3A 89 33 31 30 31 30 00 47 |.100:.I:.31010.G| 00000930: 11 18 79 99 3A 99 22 4E 41 4D 45 4E 20 47 45 4C |..y.:."NAMEN GEL| 00000940: 4F 45 53 43 48 54 22 00 78 11 22 79 99 3A 99 22 |OESCHT".x."y.:."| 00000950: 57 4F 4C 4C 45 4E 20 53 49 45 20 57 45 49 54 45 |WOLLEN SIE WEITE| 00000960: 52 45 4E 20 4E 41 4D 45 4E 20 4C 4F 45 53 43 48 |REN NAMEN LOESCH| 00000970: 45 4E 20 20 4A 2F 4E 22 00 8F 11 2C 79 A1 57 45 |EN J/N"...,y.WE| 00000980: 24 3A 8B 57 45 24 B2 22 22 A7 33 31 30 32 30 00 |$:.WE$."".31020.| 00000990: AC 11 36 79 8B 57 45 24 B3 B1 22 4A 22 AF 57 45 |..6y.WE$.."J".WE| 000009A0: 24 B3 B1 22 4E 22 A7 33 31 30 32 30 00 BF 11 40 |$.."N".31020...@| 000009B0: 79 8B 57 45 24 B2 22 4A 22 A7 33 30 30 30 30 00 |y.WE$."J".30000.| 000009C0: CE 11 4A 79 8B 57 45 24 B2 22 4E 22 A7 35 00 D7 |..Jy.WE$."N".5..| 000009D0: 11 B8 88 4C 4C B2 31 00 0D 12 BD 88 99 22 93 22 |...LL.1......"."| 000009E0: 3A 99 3A 99 3A 99 3A 99 3A 99 22 20 20 20 20 20 |:.:.:.:.:." | 000009F0: 20 20 44 41 54 45 4E 20 57 45 52 44 45 4E 20 41 | DATEN WERDEN A| 00000A00: 42 47 45 53 50 45 49 43 48 45 52 54 22 00 1F 12 |BGESPEICHERT"...| 00000A10: BF 88 8B 57 52 24 28 4C 4C 29 B2 22 22 A7 35 00 |...WR$(LL)."".5.| 00000A20: 59 12 C2 88 8B C6 28 C8 28 57 52 24 28 4C 4C 29 |Y.....(.(WR$(LL)| 00000A30: 2C 31 29 29 B1 39 30 B0 C6 28 C8 28 57 52 24 28 |,1)).90..(.(WR$(| 00000A40: 4C 4C 29 2C 31 29 29 B3 36 35 A7 53 48 24 B2 22 |LL),1)).65.SH$."| 00000A50: 30 22 3A 89 33 36 30 30 30 00 6E 12 CC 88 53 48 |0":.36000.n...SH| 00000A60: 24 B2 C8 28 57 52 24 28 4C 4C 29 2C 31 29 00 84 |$..(WR$(LL),1)..| 00000A70: 12 A0 8C 9F 31 2C 38 2C 32 2C 53 48 24 AA 22 2C |....1,8,2,SH$.",| 00000A80: 53 2C 41 22 00 A5 12 AA 8C 98 31 2C 57 52 24 28 |S,A"......1,WR$(| 00000A90: 4C 4C 29 3A 4C 4C B2 4C 4C AA 31 3A A0 31 3A 89 |LL):LL.LL.1:.1:.| 00000AA0: 33 35 30 30 37 00 C7 12 40 9C 99 22 93 22 3A 99 |35007...@..".":.| 00000AB0: 22 20 47 45 42 45 4E 20 53 49 45 20 4E 41 4D 45 |" GEBEN SIE NAME| 00000AC0: 4E 20 45 49 4E 2E 22 00 D0 12 41 9C 85 53 4E 24 |N EIN."...A..SN$| 00000AD0: 00 06 13 49 9C 99 22 93 22 3A 99 3A 99 3A 99 3A |...I..".":.:.:.:| 00000AE0: 99 22 20 20 20 20 20 20 20 20 20 20 44 41 54 45 |." DATE| 00000AF0: 4E 20 57 45 52 44 45 4E 20 47 45 4C 45 53 45 4E |N WERDEN GELESEN| 00000B00: 22 3A 59 59 B2 31 00 1C 13 4A 9C 9F 31 2C 38 2C |":YY.1...J..1,8,| 00000B10: 32 2C 53 4E 24 AA 22 2C 53 2C 52 22 00 4E 13 54 |2,SN$.",S,R".N.T| 00000B20: 9C 84 31 2C 57 52 24 28 59 59 29 3A 8B 57 52 24 |..1,WR$(YY):.WR$| 00000B30: 28 59 59 29 B2 22 51 51 51 51 51 22 A7 57 52 24 |(YY)."QQQQQ".WR$| 00000B40: 28 59 59 29 B2 22 22 3A 89 34 31 30 30 30 00 77 |(YY)."":.41000.w| 00000B50: 13 5E 9C 57 52 24 28 59 59 29 B2 C8 28 57 52 24 |.^.WR$(YY)..(WR$| 00000B60: 28 59 59 29 2C 31 39 29 3A 59 59 B2 59 59 AA 31 |(YY),19):YY.YY.1| 00000B70: 3A 89 34 30 30 32 30 00 81 13 28 A0 A0 31 3A 89 |:.40020...(..1:.| 00000B80: 35 00 AE 13 C8 AF 99 22 93 22 3A 99 3A 99 3A 99 |5......".":.:.:.| 00000B90: 3A 99 22 20 44 20 52 55 43 4B 45 52 20 4F 44 45 |:." D RUCKER ODE| 00000BA0: 52 20 42 20 49 4C 44 53 43 48 49 52 4D 22 00 C5 |R B ILDSCHIRM"..| 00000BB0: 13 D2 AF A1 4C 4D 24 3A 8B 4C 4D 24 B2 22 22 A7 |....LM$:.LM$."".| 00000BC0: 34 35 30 31 30 00 E2 13 DC AF 8B 4C 4D 24 B3 B1 |45010......LM$..| 00000BD0: 22 44 22 AF 4C 4D 24 B3 B1 22 42 22 A7 34 35 30 |"D".LM$.."B".450| 00000BE0: 30 30 00 F5 13 E6 AF 8B 4C 4D 24 B2 22 44 22 A7 |00......LM$."D".| 00000BF0: 35 30 30 30 30 00 FD 13 F0 AF 4C B2 31 00 06 14 |50000.....L.1...| 00000C00: FA AF 99 22 93 22 00 13 14 FF AF 81 53 53 B2 30 |..."."......SS.0| 00000C10: A4 32 33 00 31 14 04 B0 99 57 52 24 28 53 53 AA |.23.1....WR$(SS.| 00000C20: 4C 29 22 DD 22 57 52 24 28 53 53 AA 4C AA 32 34 |L)"."WR$(SS.L.24| 00000C30: 29 00 39 14 0E B0 82 53 53 00 4E 14 18 B0 A1 41 |).9....SS.N....A| 00000C40: 24 3A 8B 41 24 B2 22 22 A7 34 35 30 38 30 00 65 |$:.A$."".45080.e| 00000C50: 14 1D B0 8B 57 52 24 28 53 53 AA 4C AA 32 34 29 |....WR$(SS.L.24)| 00000C60: B2 22 22 A7 35 00 77 14 22 B0 4C B2 4C AA 34 38 |."".5.w.".L.L.48| 00000C70: 3A 89 34 35 30 35 30 00 A6 14 50 C3 99 22 93 22 |:.45050...P.."."| 00000C80: 3A 99 3A 99 3A 99 3A 99 22 20 20 20 20 20 20 20 |:.:.:.:." | 00000C90: 20 20 44 52 55 43 4B 45 52 20 45 49 4E 53 43 48 | DRUCKER EINSCH| 00000CA0: 41 4C 54 45 4E 22 00 C9 14 5A C3 99 3A 99 22 20 |ALTEN"...Z..:." | 00000CB0: 20 20 20 20 20 20 20 20 20 20 54 41 53 54 45 20 | TASTE | 00000CC0: 44 52 55 45 43 4B 45 4E 22 00 E0 14 64 C3 A1 41 |DRUECKEN"...d..A| 00000CD0: 4C 24 3A 8B 41 4C 24 B2 22 22 A7 35 30 30 32 30 |L$:.AL$."".50020| 00000CE0: 00 03 15 B4 C3 99 22 93 22 3A 99 3A 99 3A 99 3A |......".":.:.:.:| 00000CF0: 99 22 20 57 49 45 56 49 45 4C 20 5A 45 49 4C 45 |." WIEVIEL ZEILE| 00000D00: 4E 3F 22 00 0B 15 BE C3 85 47 47 00 31 15 C8 C3 |N?"......GG.1...| 00000D10: 99 22 20 53 49 4E 44 20 53 49 45 20 53 49 43 48 |." SIND SIE SICH| 00000D20: 45 52 20 3F 20 20 20 20 20 20 20 20 20 4A 2F 4E |ER ? J/N| 00000D30: 22 00 53 15 D2 C3 A1 41 4C 24 3A 8B 41 4C 24 B3 |".S....AL$:.AL$.| 00000D40: B1 22 4A 22 AF 41 4C 24 B3 B1 22 4E 22 A7 35 30 |."J".AL$.."N".50| 00000D50: 31 33 30 00 66 15 DC C3 8B 41 4C 24 B2 22 4E 22 |130.f....AL$."N"| 00000D60: A7 35 30 31 30 30 00 74 15 E6 C3 4F 4F B2 31 3A |.50100.t...OO.1:| 00000D70: 46 46 B2 31 00 7D 15 F0 C3 9F 31 2C 34 00 A2 15 |FF.1.}....1,4...| 00000D80: FA C3 99 22 93 22 3A 99 3A 99 3A 99 3A 99 3A 99 |...".":.:.:.:.:.| 00000D90: 22 20 20 20 20 20 22 46 46 22 2E 20 53 45 49 54 |" "FF". SEIT| 00000DA0: 45 22 00 BE 15 04 C4 99 3A 99 22 20 20 20 20 54 |E"......:." T| 00000DB0: 41 53 54 45 20 44 52 55 45 43 4B 45 4E 22 00 D5 |ASTE DRUECKEN"..| 00000DC0: 15 0E C4 A1 41 4C 24 3A 8B 41 4C 24 B2 22 22 A7 |....AL$:.AL$."".| 00000DD0: 35 30 31 39 30 00 FC 15 13 C4 8B 57 52 24 28 4F |50190......WR$(O| 00000DE0: 4F 29 B2 22 22 B0 57 52 24 28 4F 4F 29 B2 22 51 |O)."".WR$(OO)."Q| 00000DF0: 51 51 51 51 22 A7 A0 31 3A 89 31 30 00 26 16 18 |QQQQ"..1:.10.&..| 00000E00: C4 8B 57 52 24 28 4F 4F AA 47 47 AB 31 29 B2 22 |..WR$(OO.GG.1)."| 00000E10: 51 51 51 51 51 22 A7 57 52 24 28 4F 4F AA 47 47 |QQQQQ".WR$(OO.GG| 00000E20: AB 31 29 B2 22 22 00 54 16 22 C4 8B 57 52 24 28 |.1)."".T."..WR$(| 00000E30: 4F 4F AA 32 AC 47 47 AB 31 29 B2 22 51 51 51 51 |OO.2.GG.1)."QQQQ| 00000E40: 51 22 A7 57 52 24 28 4F 4F AA 32 AC 47 47 AB 31 |Q".WR$(OO.2.GG.1| 00000E50: 29 B2 22 22 00 82 16 2C C4 8B 57 52 24 28 4F 4F |).""...,..WR$(OO| 00000E60: AA 33 AC 47 47 AB 31 29 B2 22 51 51 51 51 51 22 |.3.GG.1)."QQQQQ"| 00000E70: A7 57 52 24 28 4F 4F AA 33 AC 47 47 AB 31 29 B2 |.WR$(OO.3.GG.1).| 00000E80: 22 22 00 C8 16 36 C4 98 31 2C 57 52 24 28 4F 4F |""...6..1,WR$(OO| 00000E90: 29 3B 22 DD 22 3B 57 52 24 28 4F 4F AA 47 47 AB |);".";WR$(OO.GG.| 00000EA0: 31 29 3B 22 DD 22 3B 57 52 24 28 4F 4F AA 32 AC |1);".";WR$(OO.2.| 00000EB0: 47 47 AB 31 29 3B 22 DD 22 3B 57 52 24 28 4F 4F |GG.1);".";WR$(OO| 00000EC0: AA 33 AC 47 47 AB 31 29 00 ED 16 40 C4 8B 4F 4F |.3.GG.1)...@..OO| 00000ED0: B2 47 47 A7 46 46 B2 46 46 AA 31 3A 4F 4F B2 4F |.GG.FF.FF.1:OO.O| 00000EE0: 4F AA 33 AC 47 47 3A 89 35 30 31 37 30 00 00 17 |O.3.GG:.50170...| 00000EF0: 4A C4 4F 4F B2 4F 4F AA 31 3A 89 35 30 32 30 30 |J.OO.OO.1:.50200| 00000F00: 00 00 00 |... |
..$....WR$(2000):.RG(2000):.LG(2000).-..
.YY.1.6....".".]....:.:.:."
M E N U E"......:.:." 1.) EINLES
EN DIRECTORY"......:." 2.) ALPHAPET
ISCH SORTIEREN".Q.(..:." 3.) DATEN
LOESCHEN"...2..:." 4.) DATEN ABSPEI
CHERN"...<..:." 5.) DATEN EINLESEN"
.<.F..:." 6.) DATEN AUSDRUCKEN".E.P
..:.:." BITTE GEWUENSCHTE TASTE"...
Z.." DRUECKEN!"...D..ZZ$:.ZZ
$."".100.W.N..ZZ$.."1".ZZ$.."2".ZZ$.."3"
.ZZ$.."4".ZZ$.."5".ZZ$.."6".100...X.EE.E
(ZZ$)......EE.20100,10000,30000,35000,40
000,45000.E..'.".":.:.:.:.:.:.:."
BITTE WARTTEN".U..'X.0:Y.0:Z.0.|.
$'T.TI:LG(1).1:RG(1).YY.1:Z.0:.10040....
'.5. .8'Z.Z.1:.LG(Z).RG(Z).10170.B.B'X.L
G(Z):Y.RG(Z):.Y..X.1.10170...L'B.(X.Y).2
:B..(B):VG$.WR$(B)...V'.X.Y.10150...`'.W
R$(X).VG$.X.X.1:.10080.+.J'.WR$(Y).VG$.Y
.Y.1:.10090.:.T'.X.Y.10150.`.~'S$.WR$(X)
:WR$(X).WR$(Y):WR$(Y).S$.W..'X.X.1:Y.Y.1
:.10070....'.WR$(X)..WR$(Y)..10170....'S
$.WR$(X):WR$(X).WR$(Y):WR$(Y).S$:.10170.
...'RG(Z.1).Y:LG(Z.1).LG(Z):.10040....'L
G(Z.1).RG(Z.1).1:RG(Z.1).RG(Z):.10040...
.'Z.Z.1:..(..NSP.18:SE.1.4..N.1,8,15.C..
N.2,8,2,"#".Y..N.1,"U1 2 0";SP;SE.G..O.#
2,A$,B$.~..O.SE.F(B$). 1: 2:.5....OBP.5.
...O.1,"B-P 2";BP....O.I.1.16.A.$O.#2,C$
:.C$.G(160).21000.N..OD$.D$.C$.U.8O.I...
.R.D$."1".D$."". 1: 2:.5....RBP.BP.25...
.R.1,"B-P 2";BP....R.#2,E$,F$.7.!R.E$.""
.D$."": 1: 2:.5.C.&RA.F(E$).W.'R.C(D$).1
6.21040.|.(RL.16.C(D$):.X.1.L:D$.D$.G(32
):.X...0R.21100...5R.BP.250.SE.F(B$):D$.
"":.20130.D.:RBP.BP.7:D$."": .20250...L
R.".":."UEBERNEHMEN"...VR.D$;A;" J
/N"....R.XX$:.XX$."".21120.'..R.XX$.."J"
.XX$.."N".21120.6..R.XX$."N"...]..R.:."
NAMEN UEBERNEHMEN? J/N".T..R.DM$:.
DM$."".21142....R.DM$.."J".DM$.."N".2114
2....R.DM$."J".21150.G..R.:."NEUER NAME
MAX.16 ZEICHEN"....R.D$:D$.H(D$,16)....R
.C(D$).16.21150....RL.16.C(D$):.X.1.L:D$
.D$.G(32):.X.;..R."WIEVIELE BLOECKE MAX
.3 ZEICHEN".N..R.V$:V$.H(V$,3).A..R.C(V$
).3.21170....RHH.3.C(V$):.X.1.HH:V$.G(32
).V$:.....RWR$(YY).D$.V$:YY.YY.1:..N.0U.
".":.:.:."GEBEN SIE DEN NAMEN UND DIE"..
.1U."BLOECKE DURCH KOMMA GETRENNT EIN"..
.:U.W$,PP$:PP$.H(PP$,3).#.?U.C(PP$).3.30
020.L.@URT.3.C(PP$):.RX.1.RT:PP$.G(32).P
P$:..`.DU.C(W$).16.30030...EUJJ.16.C(W$)
:.X.1.JJ:W$.W$.G(32):.X...NUYZ$.W$.PP$..
.XUTT.1...YU.:."ICH SUCHE".Y.BU.WR$(TT).
YZ$.WR$(TT).G(191):.31000...LUTT.TT.1:.T
T.YY.30500...VU.30050...$W.:."NAMEN NICH
T GEFUNDEN":.I.1.100:.I:.31010.G..Y.:."N
AMEN GELOESCHT".X."Y.:."WOLLEN SIE WEITE
REN NAMEN LOESCHEN J/N"...,Y.WE$:.WE$."
".31020...6Y.WE$.."J".WE$.."N".31020...@
Y.WE$."J".30000.N.JY.WE$."N".5.W...LL.1.
.....".":.:.:.:.:." DATEN WERDEN A
BGESPEICHERT"......WR$(LL)."".5.Y.B..F(H
(WR$(LL),1)).90.F(H(WR$(LL),1)).65.SH$."
0":.36000.N.L.SH$.H(WR$(LL),1)... ..1,8,
2,SH$.",S,A"......1,WR$(LL):LL.LL.1: 1:.
35007.G.@..".":." GEBEN SIE NAMEN EIN.".
P.A..SN$...I..".":.:.:.:." DATE
N WERDEN GELESEN":YY.1...J..1,8,2,SN$.",
S,R".N.T..1,WR$(YY):.WR$(YY)."QQQQQ".WR$
(YY)."":.41000.W.^.WR$(YY).H(WR$(YY),19)
:YY.YY.1:.40020...( 1:.5...H..".":.:.:.
:." D RUCKER ODER B ILDSCHIRM".E.R..LM$:
.LM$."".45010......LM$.."D".LM$.."B".450
00......LM$."D".50000.....L.1......"."..
....SS.0.23.1....WR$(SS.L)"."WR$(SS.L.24
).9....SS.N....A$:.A$."".45080.E....WR$(
SS.L.24)."".5.W.".L.L.48:.45050...PC."."
:.:.:.:." DRUCKER EINSCHALTEN".I
.ZC.:." TASTE DRUECKEN"...DC.A
L$:.AL$."".50020....C.".":.:.:.:." WIEVI
EL ZEILEN?"....C.GG.1.HC." SIND SIE SICH
ER ? J/N".S.RC.AL$:.AL$.."J".AL$
.."N".50130.F..C.AL$."N".50100.T..COO.1:
FF.1.}..C.1,4....C.".":.:.:.:.:." "F
F". SEITE"....D.:." TASTE DRUECKEN".U
..D.AL$:.AL$."".50190....D.WR$(OO)."".WR
$(OO)."QQQQQ". 1:.10.&..D.WR$(OO.GG.1)."
QQQQQ".WR$(OO.GG.1)."".T."D.WR$(OO.2.GG.
1)."QQQQQ".WR$(OO.2.GG.1).""...,D.WR$(OO
.3.GG.1)."QQQQQ".WR$(OO.3.GG.1)."".H.6D.
1,WR$(OO);".";WR$(OO.GG.1);".";WR$(OO.2.
GG.1);".";WR$(OO.3.GG.1)...@D.OO.GG.FF.F
F.1:OO.OO.3.GG:.50170...JDOO.OO.1:.50200
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL