ADRESSDATEI
FILE INFORMATION
FILENAME(S): ADRESSDATEI
FILE TYPE(S): PRG
FILE SIZE: 6.2K
FIRST SEEN: 2025-11-02 16:39:51
APPEARS ON: 2 disk(s)
FILE HASH
d10a7771a12620c8be9c2972a37f8430eaea885327eaa51bbabbaaf77d499a1e
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER SONDERH 62 | ADRESSDATEI | PRG | Treasure Chest - Plattfuss | 14 | 0 | DOWNLOAD FILE |
| 64 ER SONDERH 62 | ADRESSDATEI | PRG | C64er | 14 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 25 08 64 00 8F 20 49 4E 44 45 58 53 45 51 |..%.d.. INDEXSEQ| 00000010: 55 45 4E 54 49 45 4C 4C 45 20 41 44 52 45 53 53 |UENTIELLE ADRESS| 00000020: 44 41 54 45 49 00 47 08 6E 00 8F 20 49 44 45 45 |DATEI.G.n.. IDEE| 00000030: 3A 31 39 38 35 20 4D 41 52 54 49 4E 20 48 45 43 |:1985 MARTIN HEC| 00000040: 48 54 2C 53 54 47 54 00 6A 08 78 00 8F 20 47 45 |HT,STGT.j.x.. GE| 00000050: 41 45 4E 44 45 52 54 20 46 2E 20 45 58 42 41 53 |AENDERT F. EXBAS| 00000060: 49 43 20 4C 45 56 45 4C 20 32 00 8D 08 82 00 8F |IC LEVEL 2......| 00000070: 20 36 34 27 45 52 20 53 4F 4E 44 45 52 48 45 46 | 64'ER SONDERHEF| 00000080: 54 20 36 32 2F 48 2E 42 45 49 4C 45 52 00 B3 08 |T 62/H.BEILER...| 00000090: 8C 00 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |... ------------| 000000A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000000B0: 2D 2D 2D 00 CB 08 96 00 8F 20 44 49 4D 45 4E 53 |---...... DIMENS| 000000C0: 49 4F 4E 49 45 52 55 4E 47 45 4E 00 E0 08 A0 00 |IONIERUNGEN.....| 000000D0: 81 49 B2 31 A4 35 3A 87 44 58 24 28 49 29 3A 82 |.I.1.5:.DX$(I):.| 000000E0: 00 06 09 AA 00 44 4D B2 33 30 30 3A 8F 20 4D 41 |.....DM.300:. MA| 000000F0: 58 49 4D 41 4C 45 20 44 41 54 45 4E 53 41 54 5A |XIMALE DATENSATZ| 00000100: 41 4E 5A 41 48 4C 00 35 09 BE 00 86 20 49 44 24 |ANZAHL.5.... ID$| 00000110: 28 44 4D 29 3A 8F 20 49 4E 44 45 58 46 45 4C 44 |(DM):. INDEXFELD| 00000120: 20 28 45 4E 54 48 41 45 4C 54 20 4E 41 43 48 4E | (ENTHAELT NACHN| 00000130: 41 4D 45 4E 29 00 67 09 C8 00 86 20 49 4E 28 44 |AMEN).g.... IN(D| 00000140: 4D 29 3A 8F 20 45 4E 54 48 41 45 4C 54 20 5A 55 |M):. ENTHAELT ZU| 00000150: 47 45 48 4F 45 52 49 47 45 20 52 45 43 4F 52 44 |GEHOERIGE RECORD| 00000160: 4E 55 4D 4D 45 52 4E 00 82 09 D2 00 86 20 44 53 |NUMMERN...... DS| 00000170: 24 28 35 29 3A 8F 20 44 41 54 45 4E 46 45 4C 44 |$(5):. DATENFELD| 00000180: 45 52 00 96 09 F0 00 8D 34 39 30 3A 99 22 93 22 |ER......490:."."| 00000190: 3A 8D 35 30 30 30 00 AA 09 F1 00 8F 20 2A 2A 2A |:.5000...... ***| 000001A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 BE 09 FA 00 8F |**********......| 000001B0: 20 2A 20 48 41 55 50 54 4D 45 4E 55 45 2A 00 D2 | * HAUPTMENUE*..| 000001C0: 09 FB 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.... ***********| 000001D0: 2A 2A 00 E8 09 04 01 09 31 3A E4 31 3A 12 32 3A |**......1:.1:.2:| 000001E0: 97 36 35 30 2C 31 32 38 00 02 0A 0E 01 57 4C B2 |.650,128.....WL.| 000001F0: 30 3A 99 22 93 0E 22 3A 58 59 B2 32 3A 8D 35 31 |0:."..":XY.2:.51| 00000200: 30 30 00 15 0A 10 01 58 B2 31 30 3A 59 B2 32 3A |00.....X.10:Y.2:| 00000210: 8D 33 30 30 30 00 32 0A 18 01 99 22 12 20 C1 44 |.3000.2....". .D| 00000220: 52 45 53 53 45 4E 56 45 52 57 41 4C 54 55 4E 47 |RESSENVERWALTUNG| 00000230: 20 22 00 5B 0A 1A 01 99 A3 37 29 22 12 4D 49 54 | ".[.....7)".MIT| 00000240: 20 C5 D8 D0 C1 CE C4 C5 C4 20 C2 C1 D3 C9 C3 20 | ........ ..... | 00000250: CC C5 D6 C5 CC 20 C9 C9 22 3A 99 00 6B 0A 22 01 |..... ..":..k.".| 00000260: 58 59 B2 31 30 3A 8D 35 31 30 30 00 7D 0A 24 01 |XY.10:.5100.}.$.| 00000270: 58 B2 37 3A 59 B2 36 3A 8D 33 30 30 30 00 A2 0A |X.7:Y.6:.3000...| 00000280: 27 01 99 22 12 3C CC 3E 20 CC 49 53 54 45 20 44 |'..".<.> .ISTE D| 00000290: 45 52 20 D3 55 43 48 42 45 47 52 49 46 46 45 11 |ER .UCHBEGRIFFE.| 000002A0: 11 22 00 C4 0A 36 01 99 A3 37 29 22 12 3C 31 3E |."...6...7)".<1>| 000002B0: 20 C1 44 52 45 53 53 45 4E 20 45 49 4E 47 45 42 | .DRESSEN EINGEB| 000002C0: 45 4E 11 22 00 E6 0A 40 01 99 A3 37 29 22 12 3C |EN."...@...7)".<| 000002D0: 32 3E 20 C1 44 52 45 53 53 45 4E 20 41 55 53 47 |2> .DRESSEN AUSG| 000002E0: 45 42 45 4E 11 22 00 0B 0B 4A 01 99 A3 37 29 22 |EBEN."...J...7)"| 000002F0: 12 3C 33 3E 20 C4 41 54 45 49 20 53 43 48 4C 49 |.<3> .ATEI SCHLI| 00000300: 45 53 53 45 4E 2F C5 CE C4 C5 22 00 20 0B 54 01 |ESSEN/....". .T.| 00000310: A1 54 24 3A 8B 54 24 B2 22 4C 22 A7 32 35 30 30 |.T$:.T$."L".2500| 00000320: 00 30 0B 55 01 8B 54 24 B2 22 31 22 A7 37 31 30 |.0.U..T$."1".710| 00000330: 00 41 0B 56 01 8B 54 24 B2 22 32 22 A7 31 31 31 |.A.V..T$."2".111| 00000340: 30 00 52 0B 57 01 8B 54 24 B2 22 33 22 A7 31 34 |0.R.W..T$."3".14| 00000350: 38 30 00 77 0B AE 01 89 33 34 30 3A 8F 20 57 41 |80.w....340:. WA| 00000360: 52 54 45 53 43 48 4C 45 49 46 45 20 54 41 53 54 |RTESCHLEIFE TAST| 00000370: 45 4E 44 52 55 43 4B 00 7D 0B B8 01 3A 00 98 0B |ENDRUCK.}...:...| 00000380: CC 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************| 00000390: 2A 2A 2A 2A 2A 2A 2A 2A 00 B3 0B D6 01 8F 20 2A |********...... *| 000003A0: 20 44 41 54 45 49 20 45 52 4F 45 46 46 4E 45 4E | DATEI EROEFFNEN| 000003B0: 20 20 2A 00 CE 0B E0 01 8F 20 2A 2A 2A 2A 2A 2A | *...... ******| 000003C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 18 |**************..| 000003D0: 0C EA 01 4C 46 B2 31 3A 53 41 B2 32 3A 44 4E 24 |...LF.1:SA.2:DN$| 000003E0: B2 22 52 45 4C 41 44 52 22 3A 52 4C B2 31 31 35 |."RELADR":RL.115| 000003F0: 3A 8D 31 38 30 30 3A 8F 20 52 45 4C 41 54 49 56 |:.1800:. RELATIV| 00000400: 45 20 44 41 54 45 49 20 27 52 45 4C 41 44 52 27 |E DATEI 'RELADR'| 00000410: 20 4F 45 46 46 4E 45 4E 00 1E 0C F4 01 3A 00 66 | OEFFNEN.....:.f| 00000420: 0C FE 01 9F 32 2C 38 2C 33 2C 22 53 45 51 41 44 |....2,8,3,"SEQAD| 00000430: 52 2C 53 2C 52 22 3A 8F 20 53 45 51 55 45 4E 54 |R,S,R":. SEQUENT| 00000440: 49 45 4C 4C 45 20 44 41 54 45 49 20 27 53 45 51 |IELLE DATEI 'SEQ| 00000450: 41 44 52 27 20 5A 55 4D 20 4C 45 53 45 4E 20 4F |ADR' ZUM LESEN O| 00000460: 45 46 46 4E 45 4E 00 6C 0C 08 02 3A 00 95 0C 12 |EFFNEN.l...:....| 00000470: 02 8D 20 31 36 32 30 3A 8F 20 46 4C 4F 50 50 59 |.. 1620:. FLOPPY| 00000480: 2D 46 45 48 4C 45 52 4B 41 4E 41 4C 20 41 55 53 |-FEHLERKANAL AUS| 00000490: 4C 45 53 45 4E 00 CE 0C 1C 02 8B 20 45 52 B3 B1 |LESEN...... ER..| 000004A0: 30 20 A7 20 41 44 B2 30 3A 89 20 35 39 30 3A 8F |0 . AD.0:. 590:.| 000004B0: 20 44 41 54 45 49 20 49 53 54 20 4E 4F 43 48 20 | DATEI IST NOCH | 000004C0: 4E 49 43 48 54 20 41 4E 47 45 4C 45 47 54 00 D4 |NICHT ANGELEGT..| 000004D0: 0C 26 02 3A 00 F7 0C 30 02 84 32 2C 41 44 3A 8F |.&.:...0..2,AD:.| 000004E0: 20 41 4E 5A 41 48 4C 20 44 45 52 20 44 41 54 45 | ANZAHL DER DATE| 000004F0: 4E 53 41 45 54 5A 45 00 30 0D 3A 02 81 20 49 B2 |NSAETZE.0.:.. I.| 00000500: 31 20 A4 20 41 44 3A 84 32 2C 49 44 24 28 49 29 |1 . AD:.2,ID$(I)| 00000510: 2C 49 4E 28 49 29 3A 82 20 49 3A 8F 20 49 4E 44 |,IN(I):. I:. IND| 00000520: 45 58 44 41 54 45 49 20 45 49 4E 4C 45 53 45 4E |EXDATEI EINLESEN| 00000530: 00 36 0D 44 02 3A 00 67 0D 4E 02 46 4C B2 31 3A |.6.D.:.g.N.FL.1:| 00000540: 8F 20 4B 45 4E 4E 5A 45 49 43 48 4E 55 4E 47 20 |. KENNZEICHNUNG | 00000550: 46 55 45 52 20 27 44 41 54 45 49 20 49 4D 20 52 |FUER 'DATEI IM R| 00000560: 45 43 48 4E 45 52 27 00 6D 0D 58 02 3A 00 95 0D |ECHNER'.m.X.:...| 00000570: 62 02 A0 20 32 3A 8F 20 53 45 51 55 45 4E 54 49 |b.. 2:. SEQUENTI| 00000580: 45 4C 4C 45 20 44 41 54 45 49 20 53 43 48 4C 49 |ELLE DATEI SCHLI| 00000590: 45 53 53 45 4E 00 C2 0D 6C 02 58 B2 34 3A 59 B2 |ESSEN...l.X.4:Y.| 000005A0: 31 37 3A 8D 33 30 30 30 3A 58 59 B2 31 3A 8D 35 |17:.3000:XY.1:.5| 000005B0: 31 30 30 3A 58 B2 37 3A 59 B2 31 38 3A 8D 33 30 |100:X.7:Y.18:.30| 000005C0: 30 30 00 E2 0D 76 02 99 A3 39 29 22 12 C4 41 54 |00...v...9)"..AT| 000005D0: 45 4E 20 45 49 4E 47 45 42 45 4E 2F 4C 45 53 45 |EN EINGEBEN/LESE| 000005E0: 4E 22 00 E8 0D 80 02 3A 00 EE 0D 8A 02 8E 00 F4 |N".....:........| 000005F0: 0D 94 02 3A 00 10 0E A8 02 8F 20 2A 2A 2A 2A 2A |...:...... *****| 00000600: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000610: 00 2C 0E B2 02 8F 20 2A 20 41 44 52 45 53 53 45 |.,.... * ADRESSE| 00000620: 4E 20 45 49 4E 47 45 42 45 4E 20 2A 00 48 0E BC |N EINGEBEN *.H..| 00000630: 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************| 00000640: 2A 2A 2A 2A 2A 2A 2A 2A 00 80 0E C6 02 8B 46 4C |********......FL| 00000650: B2 30 A7 58 B2 37 3A 59 B2 32 33 3A 8D 33 30 30 |.0.X.7:Y.23:.300| 00000660: 30 3A 99 22 12 20 C4 41 54 45 49 20 4E 49 43 48 |0:.". .ATEI NICH| 00000670: 54 20 47 45 4F 45 46 46 4E 45 54 20 20 21 20 22 |T GEOEFFNET ! "| 00000680: 00 A6 0E C8 02 8B 46 4C B2 30 A7 EE 32 3A 58 B2 |......FL.0..2:X.| 00000690: 30 3A 59 B2 32 33 3A 8D 33 30 30 30 3A 99 4C 45 |0:Y.23:.3000:.LE| 000006A0: 24 3A 89 33 34 30 00 E2 0E D0 02 99 22 93 22 3A |$:.340......".":| 000006B0: 58 59 B2 31 3A 8D 35 31 30 30 3A 58 B2 37 3A 59 |XY.1:.5100:X.7:Y| 000006C0: B2 32 3A 8D 33 30 30 30 3A 99 22 12 20 C1 44 52 |.2:.3000:.". .DR| 000006D0: 45 53 53 44 41 54 45 4E 20 45 49 4E 47 45 42 45 |ESSDATEN EINGEBE| 000006E0: 4E 22 00 F9 0E DA 02 8F 20 41 44 52 45 53 53 45 |N"...... ADRESSE| 000006F0: 20 45 49 4E 47 45 42 45 4E 00 03 0F E4 02 8D 35 | EINGEBEN......5| 00000700: 32 30 30 00 10 0F E6 02 58 B2 31 32 3A 59 B2 34 |200.....X.12:Y.4| 00000710: 00 37 0F E9 02 81 49 B2 31 A4 34 3A 59 B2 59 AA |.7....I.1.4:Y.Y.| 00000720: 32 3A 8D 33 30 30 30 3A EA 22 22 3B 44 53 24 28 |2:.3000:."";DS$(| 00000730: 49 29 2C 32 35 3A 82 00 55 0F EA 02 59 B2 59 AA |I),25:..U...Y.Y.| 00000740: 32 3A 8D 33 30 30 30 3A EA 22 22 3B 44 53 24 28 |2:.3000:."";DS$(| 00000750: 35 29 2C 31 35 00 5B 0F 20 03 3A 00 81 0F 2A 03 |5),15.[. .:...*.| 00000760: 8F 20 41 44 52 45 53 53 45 20 49 4E 20 49 4E 44 |. ADRESSE IN IND| 00000770: 45 58 44 41 54 45 49 20 56 45 52 4D 45 52 4B 45 |EXDATEI VERMERKE| 00000780: 4E 00 B1 0F 34 03 41 44 B2 41 44 AA 31 3A 8F 20 |N...4.AD.AD.1:. | 00000790: 41 4E 5A 41 48 4C 20 44 45 52 20 41 44 52 45 53 |ANZAHL DER ADRES| 000007A0: 53 45 4E 20 55 4D 20 31 20 45 52 48 4F 45 48 45 |SEN UM 1 ERHOEHE| 000007B0: 4E 00 CF 0F 3E 03 49 44 24 28 41 44 29 B2 44 53 |N...>.ID$(AD).DS| 000007C0: 24 28 31 29 3A 8F 20 4E 41 43 48 4E 41 4D 45 00 |$(1):. NACHNAME.| 000007D0: EC 0F 48 03 49 4E 28 41 44 29 B2 52 4E 3A 8F 20 |..H.IN(AD).RN:. | 000007E0: 52 45 43 4F 52 44 4E 55 4D 4D 45 52 00 F2 0F 52 |RECORDNUMMER...R| 000007F0: 03 3A 00 19 10 5C 03 8F 20 41 44 52 45 53 53 46 |.:...\.. ADRESSF| 00000800: 45 4C 44 45 52 20 41 55 46 20 52 49 43 48 54 49 |ELDER AUF RICHTI| 00000810: 47 45 20 4C 41 45 4E 47 45 00 48 10 70 03 44 53 |GE LAENGE.H.p.DS| 00000820: 24 28 31 29 B2 C8 28 44 53 24 28 31 29 AA C8 28 |$(1)..(DS$(1)..(| 00000830: 4C 45 24 2C B6 28 32 35 AB C3 28 44 53 24 28 31 |LE$,.(25..(DS$(1| 00000840: 29 29 29 29 2C 32 35 29 00 77 10 7A 03 44 53 24 |)))),25).w.z.DS$| 00000850: 28 32 29 B2 C8 28 44 53 24 28 32 29 AA C8 28 4C |(2)..(DS$(2)..(L| 00000860: 45 24 2C B6 28 32 35 AB C3 28 44 53 24 28 32 29 |E$,.(25..(DS$(2)| 00000870: 29 29 29 2C 32 35 29 00 A6 10 84 03 44 53 24 28 |))),25).....DS$(| 00000880: 33 29 B2 C8 28 44 53 24 28 33 29 AA C8 28 4C 45 |3)..(DS$(3)..(LE| 00000890: 24 2C B6 28 32 35 AB C3 28 44 53 24 28 33 29 29 |$,.(25..(DS$(3))| 000008A0: 29 29 2C 32 35 29 00 D5 10 8E 03 44 53 24 28 34 |)),25).....DS$(4| 000008B0: 29 B2 C8 28 44 53 24 28 34 29 AA C8 28 4C 45 24 |)..(DS$(4)..(LE$| 000008C0: 2C B6 28 32 35 AB C3 28 44 53 24 28 34 29 29 29 |,.(25..(DS$(4)))| 000008D0: 29 2C 32 35 29 00 04 11 98 03 44 53 24 28 35 29 |),25).....DS$(5)| 000008E0: B2 C8 28 44 53 24 28 35 29 AA C8 28 4C 45 24 2C |..(DS$(5)..(LE$,| 000008F0: B6 28 31 35 AB C3 28 44 53 24 28 35 29 29 29 29 |.(15..(DS$(5))))| 00000900: 2C 31 35 29 00 0A 11 A2 03 3A 00 38 11 AC 03 8F |,15).....:.8....| 00000910: 20 41 44 52 45 53 53 45 20 46 55 45 52 20 53 50 | ADRESSE FUER SP| 00000920: 45 49 43 48 45 52 55 4E 47 20 5A 55 53 41 4D 4D |EICHERUNG ZUSAMM| 00000930: 45 4E 46 41 53 53 45 4E 00 43 11 B6 03 52 43 24 |ENFASSEN.C...RC$| 00000940: B2 22 22 00 64 11 C0 03 81 20 49 B2 31 20 A4 20 |."".d.... I.1 . | 00000950: 35 3A 52 43 24 B2 52 43 24 AA 44 53 24 28 49 29 |5:RC$.RC$.DS$(I)| 00000960: 3A 82 20 49 00 6A 11 CA 03 3A 00 82 11 D4 03 8F |:. I.j...:......| 00000970: 20 41 44 52 45 53 53 45 20 53 50 45 49 43 48 45 | ADRESSE SPEICHE| 00000980: 52 4E 00 BC 11 DE 03 52 4E B2 41 44 3A 52 50 B2 |RN.....RN.AD:RP.| 00000990: 31 3A 8D 20 31 39 33 30 3A 8F 20 41 55 46 20 52 |1:. 1930:. AUF R| 000009A0: 45 43 4F 52 44 20 28 4E 52 2E 3D 41 44 29 20 50 |ECORD (NR.=AD) P| 000009B0: 4F 53 49 54 49 4F 4E 49 45 52 45 4E 00 E6 11 E8 |OSITIONIEREN....| 000009C0: 03 98 4C 46 2C 52 43 24 3A 8F 20 41 44 52 45 53 |..LF,RC$:. ADRES| 000009D0: 53 45 20 49 4E 20 52 45 43 4F 52 44 20 53 43 48 |SE IN RECORD SCH| 000009E0: 52 45 49 42 45 4E 00 0F 12 F2 03 8D 20 31 36 30 |REIBEN...... 160| 000009F0: 30 3A 8F 20 46 4C 4F 50 50 59 2D 46 45 48 4C 45 |0:. FLOPPY-FEHLE| 00000A00: 52 4B 41 4E 41 4C 20 41 55 53 4C 45 53 45 4E 00 |RKANAL AUSLESEN.| 00000A10: 15 12 FC 03 3A 00 4B 12 06 04 58 B2 37 3A 59 B2 |....:.K...X.7:Y.| 00000A20: 32 33 3A 8D 33 30 30 30 3A 99 22 12 20 C1 44 52 |23:.3000:.". .DR| 00000A30: 45 53 53 45 20 49 53 54 20 47 45 53 50 45 49 43 |ESSE IST GESPEIC| 00000A40: 48 45 52 54 20 21 20 22 3A EE 32 00 63 12 10 04 |HERT ! ":.2.c...| 00000A50: 58 B2 30 3A 59 B2 32 33 3A 8D 33 30 30 30 3A 99 |X.0:Y.23:.3000:.| 00000A60: 4C 45 24 00 6C 12 1A 04 89 32 36 30 00 88 12 38 |LE$.l....260...8| 00000A70: 04 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************| 00000A80: 2A 2A 2A 2A 2A 2A 2A 2A 00 A4 12 42 04 8F 20 2A |********...B.. *| 00000A90: 20 41 44 52 45 53 53 45 4E 20 41 55 53 47 45 42 | ADRESSEN AUSGEB| 00000AA0: 45 4E 20 2A 00 C0 12 4C 04 8F 20 2A 2A 2A 2A 2A |EN *...L.. *****| 00000AB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000AC0: 00 F8 12 56 04 8B 46 4C B2 30 A7 58 B2 37 3A 59 |...V..FL.0.X.7:Y| 00000AD0: B2 32 33 3A 8D 33 30 30 30 3A 99 22 12 20 C4 41 |.23:.3000:.". .A| 00000AE0: 54 45 49 20 4E 49 43 48 54 20 47 45 4F 45 46 46 |TEI NICHT GEOEFF| 00000AF0: 4E 45 54 20 20 21 20 22 00 1E 13 57 04 8B 46 4C |NET ! "...W..FL| 00000B00: B2 30 A7 EE 32 3A 58 B2 30 3A 59 B2 32 33 3A 8D |.0..2:X.0:Y.23:.| 00000B10: 33 30 30 30 3A 99 4C 45 24 3A 89 33 34 30 00 5A |3000:.LE$:.340.Z| 00000B20: 13 58 04 99 22 93 22 3A 58 59 B2 31 3A 8D 35 31 |.X..".":XY.1:.51| 00000B30: 30 30 3A 58 B2 37 3A 59 B2 32 3A 8D 33 30 30 30 |00:X.7:Y.2:.3000| 00000B40: 3A 99 22 12 20 C1 44 52 45 53 53 44 41 54 45 4E |:.". .DRESSDATEN| 00000B50: 20 41 55 53 47 45 42 45 4E 22 00 64 13 59 04 8D | AUSGEBEN".d.Y..| 00000B60: 35 32 30 30 00 77 13 5A 04 58 B2 31 32 3A 59 B2 |5200.w.Z.X.12:Y.| 00000B70: 36 3A 8D 33 30 30 30 00 97 13 6A 04 EA 22 22 3B |6:.3000...j.."";| 00000B80: 4E 4E 24 2C 32 35 3A 8F 20 49 4E 44 45 58 20 45 |NN$,25:. INDEX E| 00000B90: 52 46 52 41 47 45 4E 00 9D 13 74 04 3A 00 C5 13 |RFRAGEN...t.:...| 00000BA0: 7E 04 81 20 49 B2 31 20 A4 20 41 44 3A 8F 20 49 |~.. I.1 . AD:. I| 00000BB0: 4E 44 45 58 44 41 54 45 49 20 44 55 52 43 48 53 |NDEXDATEI DURCHS| 00000BC0: 55 43 48 45 4E 00 F9 13 88 04 8B 4E 4E 24 B2 49 |UCHEN......NN$.I| 00000BD0: 44 24 28 49 29 A7 47 4E B2 49 3A 49 B2 41 44 3A |D$(I).GN.I:I.AD:| 00000BE0: 82 49 3A 89 31 32 32 30 3A 8F 20 49 4E 44 45 58 |.I:.1220:. INDEX| 00000BF0: 20 47 45 46 55 4E 44 45 4E 00 00 14 92 04 82 49 | GEFUNDEN......I| 00000C00: 00 06 14 9C 04 3A 00 3E 14 A6 04 58 B2 34 3A 59 |.....:.>...X.4:Y| 00000C10: B2 32 33 3A 8D 33 30 30 30 3A 99 22 12 20 20 C1 |.23:.3000:.". .| 00000C20: 44 52 45 53 53 45 20 49 53 54 20 4E 49 43 48 54 |DRESSE IST NICHT| 00000C30: 20 56 4F 52 48 41 4E 44 45 4E 20 21 20 22 00 5F | VORHANDEN ! "._| 00000C40: 14 B0 04 EE 32 3A 58 B2 30 3A 59 B2 32 33 3A 8D |....2:X.0:Y.23:.| 00000C50: 33 30 30 30 3A 99 4C 45 24 3A 89 31 31 31 34 00 |3000:.LE$:.1114.| 00000C60: 65 14 BA 04 3A 00 A3 14 C4 04 52 4E B2 47 4E 3A |e...:.....RN.GN:| 00000C70: 52 50 B2 31 3A 8D 31 39 33 30 3A 8F 20 41 55 46 |RP.1:.1930:. AUF| 00000C80: 20 52 45 43 4F 52 44 20 28 4E 52 2E 20 3D 20 49 | RECORD (NR. = I| 00000C90: 4E 28 49 29 29 20 50 4F 53 49 54 49 4F 4E 49 45 |N(I)) POSITIONIE| 00000CA0: 52 45 4E 00 B6 14 C6 04 52 43 24 B2 22 22 3A 81 |REN.....RC$."":.| 00000CB0: 49 B2 31 A4 52 4C 00 E1 14 CE 04 A1 23 4C 46 2C |I.1.RL......#LF,| 00000CC0: 52 54 24 3A 52 43 24 B2 52 43 24 AA 52 54 24 3A |RT$:RC$.RC$.RT$:| 00000CD0: 8F 20 52 45 43 4F 52 44 20 45 49 4E 4C 45 53 45 |. RECORD EINLESE| 00000CE0: 4E 00 E7 14 D8 04 82 00 FE 14 E2 04 8F 20 52 45 |N............ RE| 00000CF0: 43 4F 52 44 20 41 55 46 54 45 49 4C 45 4E 00 20 |CORD AUFTEILEN. | 00000D00: 15 EC 04 44 53 24 28 31 29 B2 CA 28 52 43 24 2C |...DS$(1)..(RC$,| 00000D10: 31 2C 32 35 29 3A 8F 20 4E 41 43 48 4E 41 4D 45 |1,25):. NACHNAME| 00000D20: 00 42 15 F6 04 44 53 24 28 32 29 B2 CA 28 52 43 |.B...DS$(2)..(RC| 00000D30: 24 2C 32 36 2C 32 35 29 3A 8F 20 56 4F 52 4E 41 |$,26,25):. VORNA| 00000D40: 4D 45 00 64 15 00 05 44 53 24 28 33 29 B2 CA 28 |ME.d...DS$(3)..(| 00000D50: 52 43 24 2C 35 31 2C 32 35 29 3A 8F 20 53 54 52 |RC$,51,25):. STR| 00000D60: 41 53 53 45 00 86 15 0A 05 44 53 24 28 34 29 B2 |ASSE.....DS$(4).| 00000D70: CA 28 52 43 24 2C 37 36 2C 32 35 29 3A 8F 20 57 |.(RC$,76,25):. W| 00000D80: 4F 48 4E 4F 52 54 00 A9 15 14 05 44 53 24 28 35 |OHNORT.....DS$(5| 00000D90: 29 B2 CA 28 52 43 24 2C 31 30 31 2C 31 35 29 3A |)..(RC$,101,15):| 00000DA0: 8F 20 54 45 4C 45 46 4F 4E 00 AF 15 1E 05 3A 00 |. TELEFON.....:.| 00000DB0: C5 15 28 05 8F 20 52 45 43 4F 52 44 20 41 55 53 |..(.. RECORD AUS| 00000DC0: 47 45 42 45 4E 00 EF 15 32 05 58 B2 31 32 3A 59 |GEBEN...2.X.12:Y| 00000DD0: B2 36 3A 81 49 B2 32 A4 35 3A 59 B2 59 AA 32 3A |.6:.I.2.5:Y.Y.2:| 00000DE0: 8D 33 30 30 30 3A 99 44 53 24 28 49 29 3A 82 00 |.3000:.DS$(I):..| 00000DF0: 0D 16 3C 05 58 B2 34 3A 59 B2 31 37 3A 8D 33 30 |..<.X.4:Y.17:.30| 00000E00: 30 30 3A 58 59 B2 33 3A 8D 35 31 30 30 00 20 16 |00:XY.3:.5100. .| 00000E10: 46 05 58 B2 37 3A 59 B2 31 38 3A 8D 33 30 30 30 |F.X.7:Y.18:.3000| 00000E20: 00 3C 16 48 05 99 22 12 3C C4 3E 20 C1 44 52 45 |.<.H..".<.> .DRE| 00000E30: 53 53 45 20 44 52 55 43 4B 45 4E 22 00 5F 16 4A |SSE DRUCKEN"._.J| 00000E40: 05 99 A3 37 29 22 12 3C CE 3E 20 CE 45 55 45 20 |...7)".<.> .EUE | 00000E50: C1 44 52 45 53 53 45 20 53 55 43 48 45 4E 22 00 |.DRESSE SUCHEN".| 00000E60: 79 16 4C 05 99 A3 37 29 22 12 3C C8 3E 20 C8 41 |y.L...7)".<.> .A| 00000E70: 55 50 54 4D 45 4E 55 45 22 00 81 16 50 05 A1 54 |UPTMENUE"...P..T| 00000E80: 24 00 A8 16 52 05 8B 54 24 B2 22 44 22 A7 8D 34 |$...R..T$."D"..4| 00000E90: 30 30 30 3A 8F 20 5A 55 52 20 44 52 55 43 4B 45 |000:. ZUR DRUCKE| 00000EA0: 52 52 4F 55 54 49 4E 45 00 CB 16 54 05 8B 54 24 |RROUTINE...T..T$| 00000EB0: B2 22 4E 22 A7 33 31 30 30 3A 8F 20 4E 45 55 45 |."N".3100:. NEUE| 00000EC0: 52 20 44 41 54 45 4E 53 41 54 5A 00 E8 16 56 05 |R DATENSATZ...V.| 00000ED0: 8B 54 24 B2 22 48 22 A7 32 36 30 3A 8F 20 48 41 |.T$."H".260:. HA| 00000EE0: 55 50 54 4D 45 4E 55 45 00 F2 16 96 05 89 31 33 |UPTMENUE......13| 00000EF0: 36 30 00 F8 16 A0 05 3A 00 16 17 B4 05 8F 20 2A |60.....:...... *| 00000F00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000F10: 2A 2A 2A 2A 2A 2A 00 34 17 BE 05 8F 20 2A 20 44 |******.4.... * D| 00000F20: 41 54 45 49 41 52 42 45 49 54 20 42 45 45 4E 44 |ATEIARBEIT BEEND| 00000F30: 45 4E 20 2A 00 52 17 BF 05 8F 20 2A 2A 2A 2A 2A |EN *.R.... *****| 00000F40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000F50: 2A 2A 00 8A 17 C8 05 8B 46 4C B2 30 A7 58 B2 37 |**......FL.0.X.7| 00000F60: 3A 59 B2 32 33 3A 8D 33 30 30 30 3A 99 22 12 20 |:Y.23:.3000:.". | 00000F70: CB 45 49 4E 45 20 C4 41 54 45 49 20 49 4D 20 D3 |.EINE .ATEI IM .| 00000F80: 50 45 49 43 48 45 52 21 20 22 00 B0 17 CA 05 8B |PEICHER! "......| 00000F90: 46 4C B2 30 A7 EE 32 3A 58 B2 30 3A 59 B2 32 33 |FL.0..2:X.0:Y.23| 00000FA0: 3A 8D 33 30 30 30 3A 99 4C 45 24 3A 89 33 34 30 |:.3000:.LE$:.340| 00000FB0: 00 E6 17 D1 05 98 31 35 2C 22 53 3A 53 45 51 41 |......15,"S:SEQA| 00000FC0: 44 52 22 3A 8F 20 49 4E 44 45 58 44 41 54 45 49 |DR":. INDEXDATEI| 00000FD0: 20 41 55 46 20 44 49 53 4B 45 54 54 45 20 4C 4F | AUF DISKETTE LO| 00000FE0: 45 53 43 48 45 4E 00 EC 17 D2 05 3A 00 31 18 DC |ESCHEN.....:.1..| 00000FF0: 05 9F 20 32 2C 38 2C 33 2C 22 53 45 51 41 44 52 |.. 2,8,3,"SEQADR| 00001000: 2C 53 2C 57 22 3A 8F 20 53 45 51 2E 20 44 41 54 |,S,W":. SEQ. DAT| 00001010: 45 49 20 27 53 45 51 41 44 52 27 20 5A 55 4D 20 |EI 'SEQADR' ZUM | 00001020: 53 43 48 52 45 49 42 45 4E 20 4F 45 46 46 4E 45 |SCHREIBEN OEFFNE| 00001030: 4E 00 54 18 E6 05 98 32 2C 41 44 3A 8F 20 41 4E |N.T....2,AD:. AN| 00001040: 5A 41 48 4C 20 44 45 52 20 44 41 54 45 4E 53 41 |ZAHL DER DATENSA| 00001050: 45 54 5A 45 00 90 18 F0 05 81 20 49 B2 31 20 A4 |ETZE...... I.1 .| 00001060: 20 41 44 3A 98 32 2C 49 44 24 28 49 29 22 2C 22 | AD:.2,ID$(I)","| 00001070: 49 4E 28 49 29 3A 82 20 49 3A 8F 20 49 4E 44 45 |IN(I):. I:. INDE| 00001080: 58 44 41 54 45 49 20 53 50 45 49 43 48 45 52 4E |XDATEI SPEICHERN| 00001090: 00 96 18 FA 05 3A 00 BC 18 04 06 8D 32 30 34 30 |.....:......2040| 000010A0: 3A 8F 20 52 45 4C 41 54 49 56 45 20 44 41 54 45 |:. RELATIVE DATE| 000010B0: 49 20 53 43 48 4C 49 45 53 53 45 4E 00 C2 18 0E |I SCHLIESSEN....| 000010C0: 06 3A 00 E0 18 18 06 99 22 93 22 3A 80 3A 8F 20 |.:......".":.:. | 000010D0: 50 52 4F 47 52 41 4D 4D 20 42 45 45 4E 44 45 4E |PROGRAMM BEENDEN| 000010E0: 00 E6 18 22 06 3A 00 EC 18 2C 06 3A 00 11 19 36 |...".:...,.:...6| 000010F0: 06 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************| 00001100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001110: 2A 00 36 19 40 06 8F 20 2A 46 4C 4F 50 50 59 2D |*.6.@.. *FLOPPY-| 00001120: 46 45 48 4C 45 52 4B 41 4E 41 4C 20 41 55 53 4C |FEHLERKANAL AUSL| 00001130: 45 53 45 4E 20 2A 00 5B 19 4A 06 8F 20 2A 2A 2A |ESEN *.[.J.. ***| 00001140: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 70 19 54 06 |***********.p.T.| 00001160: 84 31 35 2C 45 52 2C 45 52 24 2C 54 52 2C 53 4B |.15,ER,ER$,TR,SK| 00001170: 00 76 19 68 06 8E 00 7C 19 86 06 3A 00 B6 19 90 |.v.h...|...:....| 00001180: 06 8F 20 55 4E 54 45 52 50 52 4F 47 52 41 4D 4D |.. UNTERPROGRAMM| 00001190: 45 20 5A 55 52 20 56 45 52 57 41 4C 54 55 4E 47 |E ZUR VERWALTUNG| 000011A0: 20 56 4F 4E 20 52 45 4C 41 54 49 56 45 4E 20 44 | VON RELATIVEN D| 000011B0: 41 54 45 49 45 4E 00 BC 19 A4 06 3A 00 E0 19 C2 |ATEIEN.....:....| 000011C0: 06 8F 20 4F 45 46 46 4E 45 4E 20 45 49 4E 45 52 |.. OEFFNEN EINER| 000011D0: 20 52 45 4C 41 54 49 56 45 4E 20 44 41 54 45 49 | RELATIVEN DATEI| 000011E0: 00 04 1A CC 06 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |...... ---------| 000011F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001200: 2D 2D 2D 2D 00 24 1A D6 06 8F 20 20 4C 46 20 3D |----.$.... LF =| 00001210: 20 4C 4F 47 49 53 43 48 45 20 46 49 4C 45 4E 55 | LOGISCHE FILENU| 00001220: 4D 4D 45 52 00 41 1A E0 06 8F 20 20 53 41 20 3D |MMER.A.... SA =| 00001230: 20 53 45 4B 55 4E 44 41 45 52 41 44 52 45 53 53 | SEKUNDAERADRESS| 00001240: 45 00 57 1A EA 06 8F 20 20 44 4E 24 3D 20 44 41 |E.W.... DN$= DA| 00001250: 54 45 49 4E 41 4D 45 00 70 1A F4 06 8F 20 20 52 |TEINAME.p.... R| 00001260: 4C 20 3D 20 52 45 43 4F 52 44 4C 41 45 4E 47 45 |L = RECORDLAENGE| 00001270: 00 76 1A FE 06 3A 00 A3 1A 08 07 9F 20 31 35 2C |.v...:...... 15,| 00001280: 38 2C 31 35 3A 8F 20 46 4C 4F 50 50 59 2D 4B 4F |8,15:. FLOPPY-KO| 00001290: 4D 4D 41 4E 44 4F 4B 41 4E 41 4C 20 4F 45 46 46 |MMANDOKANAL OEFF| 000012A0: 4E 45 4E 00 D1 1A 12 07 9F 20 4C 46 2C 38 2C 53 |NEN...... LF,8,S| 000012B0: 41 2C 44 4E 24 AA 22 2C 4C 2C 22 AA C7 28 52 4C |A,DN$.",L,"..(RL| 000012C0: 29 3A 8F 20 44 41 54 45 49 20 4F 45 46 46 4E 45 |):. DATEI OEFFNE| 000012D0: 4E 00 D7 1A 1C 07 3A 00 DD 1A 26 07 8E 00 E3 1A |N.....:...&.....| 000012E0: 30 07 3A 00 08 1B 4E 07 8F 20 50 4F 53 49 54 49 |0.:...N.. POSITI| 000012F0: 4F 4E 49 45 52 45 4E 20 41 55 46 20 45 49 4E 45 |ONIEREN AUF EINE| 00001300: 4E 20 52 45 43 4F 52 44 00 2D 1B 58 07 8F 20 2D |N RECORD.-.X.. -| 00001310: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001320: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 4A 1B |-------------.J.| 00001330: 62 07 8F 20 20 53 41 20 3D 20 53 45 4B 55 4E 44 |b.. SA = SEKUND| 00001340: 41 45 52 41 44 52 45 53 53 45 00 63 1B 6C 07 8F |AERADRESSE.c.l..| 00001350: 20 20 52 4E 20 3D 20 52 45 43 4F 52 44 4E 55 4D | RN = RECORDNUM| 00001360: 4D 45 52 00 8E 1B 76 07 8F 20 20 52 50 20 3D 20 |MER...v.. RP = | 00001370: 50 4F 53 49 54 49 4F 4E 20 49 4E 4E 45 52 48 41 |POSITION INNERHA| 00001380: 4C 42 20 44 45 53 20 52 45 43 4F 52 44 53 00 94 |LB DES RECORDS..| 00001390: 1B 80 07 3A 00 D7 1B 8A 07 48 42 B2 B5 28 52 4E |...:.....HB..(RN| 000013A0: AD 32 35 36 29 3A 4C 42 B2 52 4E AB 32 35 36 AC |.256):LB.RN.256.| 000013B0: 48 42 3A 8F 20 52 45 43 4F 52 44 4E 55 4D 4D 45 |HB:. RECORDNUMME| 000013C0: 52 20 49 4E 20 4C 4F 57 2F 48 49 47 48 20 41 55 |R IN LOW/HIGH AU| 000013D0: 46 54 45 49 4C 45 4E 00 FB 1B 94 07 98 31 35 2C |FTEILEN......15,| 000013E0: 22 50 22 AA C7 28 53 41 29 AA C7 28 4C 42 29 AA |"P"..(SA)..(LB).| 000013F0: C7 28 48 42 29 AA C7 28 52 50 29 00 01 1C 9E 07 |.(HB)..(RP).....| 00001400: 3A 00 07 1C A8 07 8E 00 0D 1C B2 07 3A 00 36 1C |:...........:.6.| 00001410: D0 07 8F 20 53 43 48 4C 49 45 53 53 45 4E 20 45 |... SCHLIESSEN E| 00001420: 49 4E 45 52 20 28 52 45 4C 41 54 49 56 45 4E 29 |INER (RELATIVEN)| 00001430: 20 44 41 54 45 49 00 5F 1C DA 07 8F 20 2D 2D 2D | DATEI._.... ---| 00001440: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001450: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.| 00001460: 7F 1C E4 07 8F 20 20 4C 46 20 3D 20 4C 4F 47 49 |..... LF = LOGI| 00001470: 53 43 48 45 20 46 49 4C 45 4E 55 4D 4D 45 52 00 |SCHE FILENUMMER.| 00001480: 85 1C EE 07 3A 00 AA 1C F8 07 A0 20 4C 46 3A 8F |....:...... LF:.| 00001490: 20 52 45 4C 41 54 49 56 45 20 44 41 54 45 49 20 | RELATIVE DATEI | 000014A0: 53 43 48 4C 49 45 53 53 45 4E 00 D2 1C 02 08 A0 |SCHLIESSEN......| 000014B0: 31 35 3A 8F 20 46 4C 4F 50 50 59 2D 46 45 48 4C |15:. FLOPPY-FEHL| 000014C0: 45 52 4B 41 4E 41 4C 20 53 43 48 4C 49 45 53 53 |ERKANAL SCHLIESS| 000014D0: 45 4E 00 D8 1C 0C 08 3A 00 DE 1C 16 08 8E 00 16 |EN.....:........| 000014E0: 1D C4 09 8B 46 4C B2 30 A7 58 B2 37 3A 59 B2 32 |....FL.0.X.7:Y.2| 000014F0: 33 3A 8D 33 30 30 30 3A 99 22 12 20 C4 41 54 45 |3:.3000:.". .ATE| 00001500: 49 20 4E 49 43 48 54 20 47 45 4F 45 46 46 4E 45 |I NICHT GEOEFFNE| 00001510: 54 20 20 21 20 22 00 3C 1D CE 09 8B 46 4C B2 30 |T ! ".<....FL.0| 00001520: A7 EE 32 3A 58 B2 30 3A 59 B2 32 33 3A 8D 33 30 |..2:X.0:Y.23:.30| 00001530: 30 30 3A 99 4C 45 24 3A 89 33 34 30 00 45 1D D8 |00:.LE$:.340.E..| 00001540: 09 99 22 93 22 00 51 1D E2 09 81 49 B2 31 A4 41 |..".".Q....I.1.A| 00001550: 44 00 5D 1D EC 09 99 49 44 24 28 49 29 00 63 1D |D.]....ID$(I).c.| 00001560: F6 09 82 00 7A 1D 00 0A 97 31 39 38 2C 30 3A 92 |....z....198,0:.| 00001570: 31 39 38 2C 31 3A 89 32 36 30 00 95 1D B8 0B 97 |198,1:.260......| 00001580: 32 31 31 2C 58 3A 97 32 31 34 2C 59 3A 9E 35 38 |211,X:.214,Y:.58| 00001590: 36 34 30 3A 8E 00 B6 1D 17 0C 8F 20 2A 2A 2A 2A |640:....... ****| 000015A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000015B0: 2A 2A 2A 2A 2A 2A 00 D7 1D 18 0C 8F 20 2A 20 4E |******...... * N| 000015C0: 45 55 45 4E 20 44 41 54 45 4E 53 41 54 5A 20 53 |EUEN DATENSATZ S| 000015D0: 55 43 48 45 4E 20 2A 00 F8 1D 19 0C 8F 20 2A 2A |UCHEN *...... **| 000015E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000015F0: 2A 2A 2A 2A 2A 2A 2A 2A 00 18 1E 1C 0C 58 B2 31 |********.....X.1| 00001600: 32 3A 59 B2 34 3A 81 49 B2 31 A4 35 3A 59 B2 59 |2:Y.4:.I.1.5:Y.Y| 00001610: AA 32 3A 8D 33 30 30 30 00 29 1E 1E 0C 99 C8 28 |.2:.3000.).....(| 00001620: 4C 45 24 2C 32 35 29 3A 82 00 33 1E 26 0C 89 31 |LE$,25):..3.&..1| 00001630: 31 31 34 00 51 1E 9B 0F 8F 20 2A 2A 2A 2A 2A 2A |114.Q.... ******| 00001640: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001650: 2A 00 6F 1E 9C 0F 8F 20 2A 20 41 44 52 45 53 53 |*.o.... * ADRESS| 00001660: 45 4E 20 41 55 53 44 52 55 43 4B 45 4E 20 2A 00 |EN AUSDRUCKEN *.| 00001670: 8D 1E 9D 0F 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..... **********| 00001680: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A4 1E |*************...| 00001690: 9F 0F 8F 20 41 44 52 45 53 53 45 4E 20 44 52 55 |... ADRESSEN DRU| 000016A0: 43 4B 45 4E 00 AF 1E A0 0F 9F 34 2C 34 2C 37 00 |CKEN......4,4,7.| 000016B0: BA 1E AA 0F 81 49 B2 31 A4 35 00 CF 1E B4 0F 98 |.....I.1.5......| 000016C0: 34 2C 44 58 24 28 49 29 3B 44 53 24 28 49 29 00 |4,DX$(I);DS$(I).| 000016D0: D5 1E BE 0F 82 00 DF 1E C8 0F 98 34 3A A0 34 00 |...........4:.4.| 000016E0: E5 1E D2 0F 8E 00 F2 1E 87 13 8F 20 57 49 4E 44 |........... WIND| 000016F0: 4F 57 00 0B 1F 88 13 4F 4C 24 B2 22 22 3A 4F 4C |OW.....OL$."":OL| 00001700: 24 B2 4F 4C 24 AA 22 12 B0 92 22 00 49 1F 8A 13 |$.OL$."...".I...| 00001710: 4C 45 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 |LE$." | 00001720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001730: 20 20 20 20 20 20 20 20 20 20 20 22 3A 8F 20 4C | ":. L| 00001740: 45 45 52 53 54 52 49 4E 47 00 6F 1F 92 13 81 49 |EERSTRING.o....I| 00001750: B2 31 A4 33 30 3A 4D 4F 24 B2 4D 4F 24 AA 22 C0 |.1.30:MO$.MO$.".| 00001760: 22 3A 4D 4C 24 B2 4D 4C 24 AA 22 20 22 3A 82 00 |":ML$.ML$." ":..| 00001770: 95 1F A6 13 4F 4C 24 B2 4F 4C 24 AA 22 12 22 AA |....OL$.OL$.".".| 00001780: 4D 4F 24 AA 22 92 22 3A 4F 4C 24 B2 4F 4C 24 AA |MO$.".":OL$.OL$.| 00001790: 22 12 AE 92 22 00 B5 1F B0 13 4D 4D 24 B2 22 12 |"...".....MM$.".| 000017A0: DD 92 22 AA 22 12 22 AA 4D 4C 24 AA 22 92 22 AA |..".".".ML$.".".| 000017B0: 22 12 DD 92 22 00 CE 1F B2 13 55 4C 24 B2 22 22 |"...".....UL$.""| 000017C0: 3A 55 4C 24 B2 55 4C 24 AA 22 12 AD 92 22 00 F4 |:UL$.UL$."..."..| 000017D0: 1F B3 13 55 4C 24 B2 55 4C 24 AA 22 12 22 AA 4D |...UL$.UL$.".".M| 000017E0: 4F 24 AA 22 92 22 3A 55 4C 24 B2 55 4C 24 AA 22 |O$.".":UL$.UL$."| 000017F0: 12 BD 92 22 00 FA 1F BA 13 8E 00 06 20 EC 13 99 |..."........ ...| 00001800: A3 34 29 4F 4C 24 00 1C 20 F6 13 81 49 B2 31 A4 |.4)OL$.. ...I.1.| 00001810: 58 59 3A 99 A3 34 29 4D 4D 24 3A 82 00 28 20 00 |XY:..4)MM$:..( .| 00001820: 14 99 A3 34 29 55 4C 24 00 2E 20 0A 14 8E 00 48 |...4)UL$.. ....H| 00001830: 20 50 14 4D 42 24 B2 22 12 22 AA C8 28 4D 4C 24 | P.MB$."."..(ML$| 00001840: 2C 31 32 29 AA 22 92 22 00 5F 20 5A 14 99 3A 99 |,12)."."._ Z..:.| 00001850: 3A 81 49 B2 31 A4 31 32 3A 99 4D 42 24 3A 82 00 |:.I.1.12:.MB$:..| 00001860: 8C 20 5C 14 59 B2 34 3A 81 49 B2 31 A4 35 3A 58 |. \.Y.4:.I.1.5:X| 00001870: B2 32 3A 59 B2 59 AA 32 3A 8D 33 30 30 30 3A 99 |.2:Y.Y.2:.3000:.| 00001880: 22 12 22 AA 44 58 24 28 49 29 3A 82 00 92 20 64 |".".DX$(I):... d| 00001890: 14 8E 00 D3 20 50 C3 83 22 CE C1 CD C5 20 31 2E |.... P..".... 1.| 000018A0: 2E 2E 22 2C 22 CE C1 CD C5 20 32 2E 2E 2E 22 2C |..",".... 2...",| 000018B0: 22 D3 D4 D2 C1 D3 D3 C5 2E 2E 22 2C 22 D7 CF C8 |".........","...| 000018C0: CE CF D2 D4 2E 2E 22 2C 22 D4 C5 CC C5 C6 CF CE |......",".......| 000018D0: 2E 2E 22 00 00 00 |.."... |
..%.D.. INDEXSEQUENTIELLE ADRESSDATEI.G.
N.. IDEE:1985 MARTIN HECHT,STGT.J.X.. GE
AENDERT F. EXBASIC LEVEL 2...... 64'ER S
ONDERHEFT 62/H.BEILER...... ------------
-------------------.K.... DIMENSIONIERUN
GEN... ..I.1.5:.DX$(I):......DM.300:. MA
XIMALE DATENSATZANZAHL.5.... ID$(DM):. I
NDEXFELD (ENTHAELT NACHNAMEN).G.H.. IN(D
M):. ENTHAELT ZUGEHOERIGE RECORDNUMMERN.
..R.. DS$(5):. DATENFELDER......490:."."
:.5000...... *************...... * HAUPT
MENUE*.R.... *************......1:.1:.2:
.650,128.....WL.0:."..":XY.2:.5100.....X
.10:Y.2:.3000.2....". ADRESSENVERWALTUNG
".[.....7)".MIT EXPANDED BASIC LEVEL II
":..K.".XY.10:.5100.}.$.X.7:Y.6:.3000...
'..".<L> LISTE DER SUCHBEGRIFFE..".D.6..
.7)".<1> ADRESSEN EINGEBEN."...@...7)".<
2> ADRESSEN AUSGEBEN."...J...7)".<3> DAT
EI SCHLIESSEN/ENDE". .T..T$:.T$."L".2500
.0.U..T$."1".710.A.V..T$."2".1110.R.W..T
$."3".1480.W....340:. WARTESCHLEIFE TAST
ENDRUCK.}...:...L.. ********************
...V.. * DATEI EROEFFNEN *.N.... ******
**************.....LF.1:SA.2:DN$."RELADR
":RL.115:.1800:. RELATIVE DATEI 'RELADR'
OEFFNEN.....:.F....2,8,3,"SEQADR,S,R":.
SEQUENTIELLE DATEI 'SEQADR' ZUM LESEN O
EFFNEN.L...:...... 1620:. FLOPPY-FEHLERK
ANAL AUSLESEN.N.... ER..0 . AD.0:. 590:.
DATEI IST NOCH NICHT ANGELEGT.T.&.:...0
..2,AD:. ANZAHL DER DATENSAETZE.0.:.. I.
1 . AD:.2,ID$(I),IN(I):. I:. INDEXDATEI
EINLESEN.6.D.:.G.N.FL.1:. KENNZEICHNUNG
FUER 'DATEI IM RECHNER'.M.X.:...B. 2:.
SEQUENTIELLE DATEI SCHLIESSEN.B.L.X.4:Y.
17:.3000:XY.1:.5100:X.7:Y.18:.3000...V..
.9)".DATEN EINGEBEN/LESEN".....:........
...:...... *********************.,.... *
ADRESSEN EINGEBEN *.H.... *************
********...F..FL.0.X.7:Y.23:.3000:.". DA
TEI NICHT GEOEFFNET ! "...H..FL.0..2:X.
0:Y.23:.3000:.LE$:.340...P..".":XY.1:.51
00:X.7:Y.2:.3000:.". ADRESSDATEN EINGEBE
N"...Z.. ADRESSE EINGEBEN......5200.....
X.12:Y.4.7....I.1.4:Y.Y.2:.3000:."";DS$(
I),25:..U...Y.Y.2:.3000:."";DS$(5),15.[.
.:...*.. ADRESSE IN INDEXDATEI VERMERKE
N...4.AD.AD.1:. ANZAHL DER ADRESSEN UM 1
ERHOEHEN.O.>.ID$(AD).DS$(1):. NACHNAME.
..H.IN(AD).RN:. RECORDNUMMER...R.:...\..
ADRESSFELDER AUF RICHTIGE LAENGE.H.P.DS
$(1).H(DS$(1).H(LE$,.(25.C(DS$(1)))),25)
.W.Z.DS$(2).H(DS$(2).H(LE$,.(25.C(DS$(2)
))),25).....DS$(3).H(DS$(3).H(LE$,.(25.C
(DS$(3)))),25).U...DS$(4).H(DS$(4).H(LE$
,.(25.C(DS$(4)))),25).....DS$(5).H(DS$(5
).H(LE$,.(15.C(DS$(5)))),15).....:.8....
ADRESSE FUER SPEICHERUNG ZUSAMMENFASSEN
.C...RC$."".D.... I.1 . 5:RC$.RC$.DS$(I)
:. I.J.J.:...T.. ADRESSE SPEICHERN.....R
N.AD:RP.1:. 1930:. AUF RECORD (NR.=AD) P
OSITIONIEREN......LF,RC$:. ADRESSE IN RE
CORD SCHREIBEN...... 1600:. FLOPPY-FEHLE
RKANAL AUSLESEN.....:.K...X.7:Y.23:.3000
:.". ADRESSE IST GESPEICHERT ! ":.2.C...
X.0:Y.23:.3000:.LE$.L....260...8.. *****
****************...B.. * ADRESSEN AUSGEB
EN *...L.. *********************...V..FL
.0.X.7:Y.23:.3000:.". DATEI NICHT GEOEFF
NET ! "...W..FL.0..2:X.0:Y.23:.3000:.LE
$:.340.Z.X..".":XY.1:.5100:X.7:Y.2:.3000
:.". ADRESSDATEN AUSGEBEN".D.Y..5200.W.Z
.X.12:Y.6:.3000...J.."";NN$,25:. INDEX E
RFRAGEN...T.:.E.~.. I.1 . AD:. INDEXDATE
I DURCHSUCHEN......NN$.ID$(I).GN.I:I.AD:
.I:.1220:. INDEX GEFUNDEN......I.....:.>
...X.4:Y.23:.3000:.". ADRESSE IST NICHT
VORHANDEN ! "._....2:X.0:Y.23:.3000:.LE
$:.1114.E...:...D.RN.GN:RP.1:.1930:. AUF
RECORD (NR. = IN(I)) POSITIONIEREN...F.
RC$."":.I.1.RL...N..#LF,RT$:RC$.RC$.RT$:
. RECORD EINLESEN...X........ RECORD AUF
TEILEN. ...DS$(1).J(RC$,1,25):. NACHNAME
.B...DS$(2).J(RC$,26,25):. VORNAME.D...D
S$(3).J(RC$,51,25):. STRASSE.....DS$(4).
J(RC$,76,25):. WOHNORT.....DS$(5).J(RC$,
101,15):. TELEFON.....:.E.(.. RECORD AUS
GEBEN...2.X.12:Y.6:.I.2.5:Y.Y.2:.3000:.D
S$(I):....<.X.4:Y.17:.3000:XY.3:.5100. .
F.X.7:Y.18:.3000.<.H..".<D> ADRESSE DRUC
KEN"._.J...7)".<N> NEUE ADRESSE SUCHEN".
Y.L...7)".<H> HAUPTMENUE"...P..T$...R..T
$."D"..4000:. ZUR DRUCKERROUTINE.K.T..T$
."N".3100:. NEUER DATENSATZ...V..T$."H".
260:. HAUPTMENUE......1360... .:...... *
**********************.4.... * DATEIARBE
IT BEENDEN *.R.... *********************
**...H..FL.0.X.7:Y.23:.3000:.". KEINE DA
TEI IM SPEICHER! "...J..FL.0..2:X.0:Y.23
:.3000:.LE$:.340...Q..15,"S:SEQADR":. IN
DEXDATEI AUF DISKETTE LOESCHEN...R.:.1..
.. 2,8,3,"SEQADR,S,W":. SEQ. DATEI 'SEQA
DR' ZUM SCHREIBEN OEFFNEN.T....2,AD:. AN
ZAHL DER DATENSAETZE...... I.1 . AD:.2,I
D$(I)","IN(I):. I:. INDEXDATEI SPEICHERN
.....:......2040:. RELATIVE DATEI SCHLIE
SSEN.B...:......".":.:. PROGRAMM BEENDEN
...".:...,.:...6.. *********************
*********.6.@.. *FLOPPY-FEHLERKANAL AUSL
ESEN *.[.J.. ***************************
***.P.T..15,ER,ER$,TR,SK.V.H...|...:....
.. UNTERPROGRAMME ZUR VERWALTUNG VON REL
ATIVEN DATEIEN.....:...B.. OEFFNEN EINER
RELATIVEN DATEI...L.. -----------------
------------.$.V.. LF = LOGISCHE FILENU
MMER.A.... SA = SEKUNDAERADRESSE.W....
DN$= DATEINAME.P.... RL = RECORDLAENGE
.V...:...... 15,8,15:. FLOPPY-KOMMANDOKA
NAL OEFFNEN.Q.... LF,8,SA,DN$.",L,".G(RL
):. DATEI OEFFNEN.W...:...&.....0.:...N.
. POSITIONIEREN AUF EINEN RECORD.-.X.. -
-----------------------------.J.B.. SA
= SEKUNDAERADRESSE.C.L.. RN = RECORDNUM
MER...V.. RP = POSITION INNERHALB DES R
ECORDS.....:.W...HB..(RN.256):LB.RN.256.
HB:. RECORDNUMMER IN LOW/HIGH AUFTEILEN.
.....15,"P".G(SA).G(LB).G(HB).G(RP).....
:...........:.6.P.. SCHLIESSEN EINER (RE
LATIVEN) DATEI._.Z.. -------------------
---------------..... LF = LOGISCHE FIL
ENUMMER.....:..... LF:. RELATIVE DATEI
SCHLIESSEN.R... 15:. FLOPPY-FEHLERKANAL
SCHLIESSEN.X...:.........D..FL.0.X.7:Y.2
3:.3000:.". DATEI NICHT GEOEFFNET ! ".<
.N..FL.0..2:X.0:Y.23:.3000:.LE$:.340.E.X
..".".Q....I.1.AD.]....ID$(I).C.....Z...
.198,0:.198,1:.260......211,X:.214,Y:.58
640:....... **************************.W
.... * NEUEN DATENSATZ SUCHEN *...... **
************************.....X.12:Y.4:.I
.1.5:Y.Y.2:.3000.)....H(LE$,25):..3.&..1
114.Q.... ***********************.O....
* ADRESSEN AUSDRUCKEN *...... **********
*************...... ADRESSEN DRUCKEN...
..4,4,7......I.1.5.O....4,DX$(I);DS$(I).
U.......H..4: 4...R........ WINDOW.....O
L$."":OL$.OL$."...".I...LE$."
":. LEERSTRIN
G.O....I.1.30:MO$.MO$.".":ML$.ML$." ":..
....OL$.OL$.".".MO$.".":OL$.OL$."..."...
..MM$."...".".".ML$."."."...".N...UL$.""
:UL$.UL$."...".....UL$.UL$.".".MO$.".":U
L$.UL$."..."........ ....4)OL$.. ...I.1.
XY:..4)MM$:..( ....4)UL$.. ....H P.MB$."
.".H(ML$,12)."."._ Z..:.:.I.1.12:.MB$:..
. \.Y.4:.I.1.5:X.2:Y.Y.2:.3000:.".".DX$(
I):... D...S PC."NAME 1...","NAME 2...",
"STRASSE..","WOHNORT..","TELEFON.."...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL