ADRESSEN
FILE INFORMATION
FILENAME(S): ADRESSEN
FILE TYPE(S): PRG
FILE SIZE: 8.3K
FIRST SEEN: 2025-12-02 22:47:39
APPEARS ON: 1 disk(s)
FILE HASH
9c7ba25c35f84f037be8e8d5fe07f9a7bac20a81e7de6970453cce3040c25cf7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NUETZLICHES 1 | ADRESSEN | PRG | swasti, charly | 16 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 01 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |....... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3B |**************.;|
00000020: 08 02 00 8F 20 2A 20 41 44 52 45 53 53 45 4E 56 |.... * ADRESSENV|
00000030: 45 52 57 41 4C 54 55 4E 47 20 2A 00 58 08 03 00 |ERWALTUNG *.X...|
00000040: 8F 20 2A 20 46 55 45 52 20 44 45 4E 20 43 2D 36 |. * FUER DEN C-6|
00000050: 34 20 50 4C 55 53 20 2A 00 75 08 04 00 8F 20 2A |4 PLUS *.u.... *|
00000060: 20 20 20 44 41 54 41 53 45 54 54 45 20 4F 44 45 | DATASETTE ODE|
00000070: 52 20 20 20 2A 00 92 08 05 00 8F 20 2A 20 20 44 |R *...... * D|
00000080: 49 53 4B 45 54 54 45 4E 53 54 41 44 49 4F 4E 20 |ISKETTENSTADION |
00000090: 20 2A 00 AF 08 06 00 8F 20 2A 20 20 20 20 20 20 | *...... * |
000000A0: 20 50 4C 55 53 20 20 20 20 20 20 20 20 20 2A 00 | PLUS *.|
000000B0: CC 08 07 00 8F 20 2A 20 43 4F 4D 4D 4F 44 4F 52 |..... * COMMODOR|
000000C0: 45 20 50 52 49 4E 54 45 52 20 20 2A 00 E9 08 08 |E PRINTER *....|
000000D0: 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 EF 08 09 00 8F 00 |*********.......|
000000F0: 0E 09 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..... **********|
00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2D |**************.-|
00000110: 09 0B 00 8F 20 2A 20 41 55 54 4F 52 20 55 4E 44 |.... * AUTOR UND|
00000120: 20 45 49 4E 4C 45 49 54 55 4E 47 20 2A 00 4C 09 | EINLEITUNG *.L.|
00000130: 0C 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00000140: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 62 09 14 |************.b..|
00000150: 00 97 35 33 32 38 30 2C 30 3A 97 35 33 32 38 31 |..53280,0:.53281|
00000160: 2C 30 00 8C 09 15 00 99 22 9E 93 11 11 11 20 20 |,0......"..... |
00000170: 20 20 20 20 20 20 20 CF B7 B7 B7 B7 B7 B7 B7 B7 | .........|
00000180: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 D0 22 00 B1 09 16 |..........."....|
00000190: 00 99 22 20 20 20 20 20 20 20 20 20 B4 41 44 52 |.." .ADR|
000001A0: 45 53 53 45 4E 56 45 52 57 41 4C 54 55 4E 47 AA |ESSENVERWALTUNG.|
000001B0: 22 00 D6 09 17 00 99 22 20 20 20 20 20 20 20 20 |"......" |
000001C0: 20 CC AF AF AF AF AF AF AF AF AF AF AF AF AF AF | ...............|
000001D0: AF AF AF AF BA 22 00 FC 09 18 00 99 22 11 11 11 |....."......"...|
000001E0: 9F 20 20 20 20 20 20 20 20 20 20 20 20 57 45 52 |. WER|
000001F0: 4E 45 52 20 20 48 45 52 5A 4F 47 22 00 21 0A 19 |NER HERZOG".!..|
00000200: 00 99 22 11 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
00000210: 42 55 43 4B 48 41 55 53 53 54 52 2E 20 37 20 20 |BUCKHAUSSTR. 7 |
00000220: 22 00 47 0A 1A 00 99 22 11 20 20 20 20 20 20 20 |".G....". |
00000230: 20 20 20 20 20 38 38 30 30 20 20 20 41 4E 53 42 | 8800 ANSB|
00000240: 41 43 48 20 20 20 22 00 69 0A 1B 00 99 22 11 20 |ACH ".i....". |
00000250: 20 20 20 20 20 20 20 20 20 20 20 54 45 4C 20 30 | TEL 0|
00000260: 39 38 30 32 2F 38 37 36 30 00 9A 0A 1C 00 99 22 |9802/8760......"|
00000270: 11 11 11 11 9C 20 20 20 20 20 45 49 4E 57 45 49 |..... EINWEI|
00000280: 53 55 4E 47 20 49 4E 53 20 50 52 4F 47 52 41 4D |SUNG INS PROGRAM|
00000290: 4D 20 28 4A 2F 4E 29 20 3F 22 00 AC 0A 1D 00 A1 |M (J/N) ?"......|
000002A0: 41 24 3A 8B 41 24 B2 22 22 A7 32 39 00 BC 0A 1E |A$:.A$."".29....|
000002B0: 00 8B 41 24 B2 22 4E 22 A7 31 39 30 00 CC 0A 1F |..A$."N".190....|
000002C0: 00 8B 41 24 B3 B1 22 4A 22 A7 32 39 00 EF 0A 23 |..A$.."J".29...#|
000002D0: 00 99 22 93 20 20 20 20 20 20 20 20 20 20 20 4D |..". M|
000002E0: 45 4E 55 45 45 52 4B 4C 41 45 52 55 4E 47 22 00 |ENUEERKLAERUNG".|
000002F0: 1F 0B 28 00 99 22 11 45 49 4E 54 52 41 47 45 4E |..(..".EINTRAGEN|
00000300: 20 3D 20 45 49 4E 47 41 42 45 20 44 45 52 20 44 | = EINGABE DER D|
00000310: 41 54 45 4E 20 28 56 4F 52 4E 41 4D 45 2C 22 00 |ATEN (VORNAME,".|
00000320: 51 0B 2A 00 99 22 91 20 20 20 20 20 20 20 20 20 |Q.*..". |
00000330: 20 20 4E 41 43 48 4E 41 4D 45 2C 53 54 52 41 53 | NACHNAME,STRAS|
00000340: 53 45 2C 4F 52 54 2C 54 45 4C 45 46 4F 4E 29 2E |SE,ORT,TELEFON).|
00000350: 22 00 7B 0B 2C 00 99 22 11 42 4C 41 45 54 54 45 |".{.,..".BLAETTE|
00000360: 52 4E 20 3D 20 4B 41 52 54 45 49 20 44 55 52 43 |RN = KARTEI DURC|
00000370: 48 42 4C 41 45 54 54 45 52 4E 2E 00 AB 0B 2E 00 |HBLAETTERN......|
00000380: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 28 56 |." (V|
00000390: 4F 52 57 41 45 52 54 53 20 4F 44 45 52 20 52 55 |ORWAERTS ODER RU|
000003A0: 45 43 4B 57 41 45 52 54 53 29 22 00 DC 0B 30 00 |ECKWAERTS)"...0.|
000003B0: 99 22 11 4C 4F 45 53 43 48 45 4E 20 20 3D 20 45 |.".LOESCHEN = E|
000003C0: 49 4E 5A 45 4C 4C 4F 45 53 43 48 55 4E 47 20 56 |INZELLOESCHUNG V|
000003D0: 4F 4E 20 41 44 52 45 53 53 45 4E 22 00 0D 0C 32 |ON ADRESSEN"...2|
000003E0: 00 99 22 91 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
000003F0: 4E 41 43 48 20 45 49 4E 47 41 42 45 20 44 45 52 |NACH EINGABE DER|
00000400: 20 41 44 52 45 53 53 45 4E 20 4E 52 22 00 3B 0C | ADRESSEN NR".;.|
00000410: 34 00 99 22 11 41 45 4E 44 45 52 4E 20 20 20 3D |4..".AENDERN =|
00000420: 20 41 45 4E 44 45 52 4E 20 44 45 52 20 41 44 52 | AENDERN DER ADR|
00000430: 45 53 53 45 2E 20 4E 41 43 48 22 00 67 0C 36 00 |ESSE. NACH".g.6.|
00000440: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 45 49 |." EI|
00000450: 4E 47 41 42 45 20 44 45 52 20 41 44 52 45 53 53 |NGABE DER ADRESS|
00000460: 45 4E 20 4E 52 2E 22 00 98 0C 38 00 99 22 11 53 |EN NR."...8..".S|
00000470: 55 43 48 45 4E 20 20 20 20 3D 20 44 55 52 43 48 |UCHEN = DURCH|
00000480: 53 55 43 48 45 4E 20 44 45 52 20 4B 41 52 54 45 |SUCHEN DER KARTE|
00000490: 49 2E 20 45 49 4E 2D 22 00 C6 0C 3A 00 99 22 91 |I. EIN-"...:..".|
000004A0: 20 20 20 20 20 20 20 20 20 20 20 20 47 41 42 45 | GABE|
000004B0: 20 57 41 48 4C 57 45 49 53 45 20 28 4E 41 43 48 | WAHLWEISE (NACH|
000004C0: 4E 41 4D 45 2C 22 00 F6 0C 3C 00 99 22 20 20 20 |NAME,"...<.." |
000004D0: 20 20 20 20 20 20 20 20 20 56 4F 52 4E 41 4D 45 | VORNAME|
000004E0: 2C 4F 52 54 2C 53 54 52 41 53 53 45 2C 54 45 4C |,ORT,STRASSE,TEL|
000004F0: 45 46 4F 4E 29 22 00 20 0D 3E 00 99 22 20 20 20 |EFON)". .>.." |
00000500: 20 20 20 20 20 20 20 20 20 12 20 4C 45 45 52 54 | . LEERT|
00000510: 41 53 52 45 20 44 52 55 45 43 4B 45 4E 20 92 22 |ASRE DRUECKEN ."|
00000520: 00 32 0D 40 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 |.2.@..A$:.A$."".|
00000530: 36 34 00 42 0D 42 00 8B 41 24 B3 B1 22 20 22 A7 |64.B.B..A$.." ".|
00000540: 36 34 00 73 0D 44 00 99 22 93 44 41 54 45 49 20 |64.s.D..".DATEI |
00000550: 4C 4F 45 53 43 48 45 4E 20 20 20 20 3D 20 4C 4F |LOESCHEN = LO|
00000560: 45 53 43 48 45 4E 20 41 4C 4C 45 52 20 44 41 54 |ESCHEN ALLER DAT|
00000570: 45 4E 22 00 A3 0D 46 00 99 22 42 45 53 54 49 4D |EN"...F.."BESTIM|
00000580: 4D 54 45 20 41 44 52 45 53 53 45 20 3D 20 45 49 |MTE ADRESSE = EI|
00000590: 4E 47 41 42 45 20 41 44 52 45 53 53 45 4E 20 4E |NGABE ADRESSEN N|
000005A0: 52 2E 22 00 D3 0D 47 00 99 22 91 20 20 20 20 20 |R."...G..". |
000005B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 3D 20 41 | = A|
000005C0: 55 53 47 41 42 45 20 44 45 52 20 41 44 52 45 53 |USGABE DER ADRES|
000005D0: 53 45 22 00 03 0E 48 00 99 22 11 44 41 54 45 4E |SE"...H..".DATEN|
000005E0: 20 41 42 53 50 45 49 43 48 45 52 4E 20 3D 20 53 | ABSPEICHERN = S|
000005F0: 50 45 49 43 48 45 52 4E 20 44 45 52 20 44 41 54 |PEICHERN DER DAT|
00000600: 45 4E 22 00 31 0E 4E 00 99 22 20 20 20 20 20 20 |EN".1.N.." |
00000610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 41 | WA|
00000620: 48 4C 57 45 49 53 45 20 41 55 46 20 43 41 53 2E |HLWEISE AUF CAS.|
00000630: 22 00 5B 0E 50 00 99 22 20 20 20 20 20 20 20 20 |".[.P.." |
00000640: 20 20 20 20 20 20 20 20 20 20 20 20 4F 44 45 52 | ODER|
00000650: 20 44 49 53 4B 45 54 54 45 2E 22 00 8B 0E 52 00 | DISKETTE."...R.|
00000660: 99 22 11 50 52 4F 47 52 41 4D 4D 20 42 45 45 4E |.".PROGRAMM BEEN|
00000670: 44 45 4E 20 20 3D 20 4C 4F 45 53 43 48 54 20 44 |DEN = LOESCHT D|
00000680: 41 53 20 47 45 53 41 4D 54 45 22 00 BA 0E 54 00 |AS GESAMTE"...T.|
00000690: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
000006A0: 20 20 20 20 20 20 49 4D 20 53 50 45 49 43 48 45 | IM SPEICHE|
000006B0: 52 20 42 45 46 49 4E 44 2D 22 00 E4 0E 56 00 99 |R BEFIND-"...V..|
000006C0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
000006D0: 20 20 20 20 20 4C 49 43 48 45 20 50 52 4F 47 52 | LICHE PROGR|
000006E0: 41 4D 4D 22 00 15 0F 58 00 99 22 11 44 41 54 45 |AMM"...X..".DATE|
000006F0: 4E 20 41 55 53 44 52 55 43 4B 45 4E 20 20 3D 20 |N AUSDRUCKEN = |
00000700: 41 55 53 44 52 55 43 4B 20 45 49 4E 45 52 20 4C |AUSDRUCK EINER L|
00000710: 49 53 54 45 22 00 44 0F 5A 00 99 22 91 20 20 20 |ISTE".D.Z..". |
00000720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000730: 20 4D 49 54 20 41 4C 4C 45 4E 20 41 44 52 45 53 | MIT ALLEN ADRES|
00000740: 53 45 4E 22 00 71 0F 5C 00 99 22 11 44 41 54 45 |SEN".q.\..".DATE|
00000750: 4E 20 4C 41 44 45 4E 20 20 20 20 20 20 20 3D 20 |N LADEN = |
00000760: 4C 41 44 45 4E 20 44 45 52 20 44 41 54 45 4E 20 |LADEN DER DATEN |
00000770: 22 00 9F 0F 5E 00 99 22 20 20 20 20 20 20 20 20 |"...^.." |
00000780: 20 20 20 20 20 20 20 20 20 20 20 20 57 41 48 4C | WAHL|
00000790: 57 45 49 53 45 20 41 55 46 20 43 41 53 2E 22 00 |WEISE AUF CAS.".|
000007A0: C8 0F 60 00 99 22 20 20 20 20 20 20 20 20 20 20 |..`.." |
000007B0: 20 20 20 20 20 20 20 20 20 20 4F 44 45 52 20 44 | ODER D|
000007C0: 49 53 4B 45 54 54 45 22 00 F4 0F 62 00 99 22 11 |ISKETTE"...b..".|
000007D0: 20 20 20 20 20 20 20 20 20 20 12 20 46 31 20 3D | . F1 =|
000007E0: 20 4D 45 4E 55 45 45 52 4B 4C 41 45 52 55 4E 47 | MENUEERKLAERUNG|
000007F0: 20 92 20 22 00 1F 10 64 00 99 22 11 20 20 20 20 | . "...d..". |
00000800: 20 20 20 20 20 20 12 20 46 33 20 3D 20 50 52 4F | . F3 = PRO|
00000810: 47 52 41 4D 4D 53 54 41 52 54 20 20 20 92 22 00 |GRAMMSTART .".|
00000820: 32 10 66 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 |2.f..A$:.A$."".1|
00000830: 30 32 00 44 10 68 00 8B 41 24 B2 C7 28 31 33 33 |02.D.h..A$..(133|
00000840: 29 A7 33 35 00 58 10 6A 00 8B 41 24 B3 B1 C7 28 |).35.X.j..A$...(|
00000850: 31 33 34 29 A7 31 30 32 00 71 10 BE 00 8F 20 2A |134).102.q.... *|
00000860: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000870: 2A 00 8A 10 C0 00 8F 20 2A 20 50 52 4F 47 52 41 |*...... * PROGRA|
00000880: 4D 4D 20 53 54 41 52 54 20 2A 00 A3 10 C2 00 8F |MM START *......|
00000890: 20 2A 20 20 41 55 53 57 41 48 4C 4D 45 4E 55 45 | * AUSWAHLMENUE|
000008A0: 20 20 2A 00 BC 10 C4 00 8F 20 2A 2A 2A 2A 2A 2A | *...... ******|
000008B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C6 10 C8 |************....|
000008C0: 00 9C 3A 54 B2 31 00 DC 10 D2 00 97 35 33 32 38 |..:T.1......5328|
000008D0: 31 2C 31 3A 97 35 33 32 38 30 2C 31 00 F2 10 DC |1,1:.53280,1....|
000008E0: 00 86 41 24 28 35 30 30 2C 35 29 3A 41 44 B2 35 |..A$(500,5):AD.5|
000008F0: 30 30 00 28 11 E6 00 5A B2 30 3A 99 22 90 93 2A |00.(...Z.0:."..*|
00000900: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000910: 20 4D 45 4E 55 45 20 2A 2A 2A 2A 2A 2A 2A 2A 2A | MENUE *********|
00000920: 2A 2A 2A 2A 2A 2A 2A 22 00 57 11 FA 00 99 22 11 |*******".W....".|
00000930: 11 20 31 2D 2D 45 49 4E 54 52 41 47 45 4E 20 20 |. 1--EINTRAGEN |
00000940: 20 20 20 20 20 36 2D 2D 44 41 54 45 49 20 4C 4F | 6--DATEI LO|
00000950: 45 53 43 48 45 4E 22 00 88 11 04 01 99 22 11 20 |ESCHEN"......". |
00000960: 32 2D 2D 42 4C 41 45 54 54 45 52 4E 20 20 20 20 |2--BLAETTERN |
00000970: 20 20 20 37 2D 2D 42 45 53 54 49 4D 4D 54 45 20 | 7--BESTIMMTE |
00000980: 41 44 52 45 53 53 45 22 00 B8 11 0E 01 99 22 20 |ADRESSE"......" |
00000990: 33 2D 2D 4C 4F 45 53 43 48 45 4E 20 20 20 20 20 |3--LOESCHEN |
000009A0: 20 20 20 38 2D 2D 44 41 54 45 4E 20 41 42 53 50 | 8--DATEN ABSP|
000009B0: 45 49 43 48 45 52 4E 22 00 E7 11 18 01 99 22 20 |EICHERN"......" |
000009C0: 34 2D 2D 41 45 4E 44 45 52 4E 20 20 20 20 20 20 |4--AENDERN |
000009D0: 20 20 20 45 2D 2D 50 52 4F 47 52 41 4D 4D 20 42 | E--PROGRAMM B|
000009E0: 45 45 4E 44 45 4E 22 00 17 12 22 01 99 22 11 20 |EENDEN"..."..". |
000009F0: 35 2D 2D 53 55 43 48 45 4E 20 20 20 20 20 20 20 |5--SUCHEN |
00000A00: 20 20 20 44 2D 2D 44 41 54 45 4E 20 41 55 53 44 | D--DATEN AUSD|
00000A10: 52 55 43 4B 45 4E 22 00 45 12 2C 01 99 22 11 20 |RUCKEN".E.,..". |
00000A20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A30: 20 20 20 4C 2D 2D 44 41 54 45 4E 20 4C 41 44 45 | L--DATEN LADE|
00000A40: 4E 11 11 11 22 00 77 12 36 01 99 22 2A 2A 2A 2A |N...".w.6.."****|
00000A50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A70: 2A 2A 2A 2A 11 11 22 00 9B 12 40 01 99 22 20 20 |****.."...@.." |
00000A80: 20 20 20 20 20 20 20 20 42 49 54 54 45 20 57 41 | BITTE WA|
00000A90: 45 48 4C 45 4E 20 53 49 45 20 22 00 C0 12 4A 01 |EHLEN SIE "...J.|
00000AA0: 99 22 20 20 20 20 20 20 20 20 B8 B8 B8 B8 B8 B8 |." ......|
00000AB0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 22 |..............."|
00000AC0: 00 D3 12 54 01 A1 44 24 3A 8B 44 24 B2 22 22 A7 |...T..D$:.D$."".|
00000AD0: 33 34 30 00 E9 12 5E 01 41 B2 C5 28 44 24 29 3A |340...^.A..(D$):|
00000AE0: 8B 41 B1 31 38 A7 33 34 30 00 FC 12 63 01 8B 44 |.A.18.340...c..D|
00000AF0: 24 B2 22 45 22 A7 99 22 93 22 3A A2 00 0D 13 64 |$."E"..".":....d|
00000B00: 01 8B 44 24 B2 22 4C 22 A7 31 33 33 30 00 1E 13 |..D$."L".1330...|
00000B10: 65 01 8B 44 24 B2 22 44 22 A7 32 32 30 30 00 48 |e..D$."D".2200.H|
00000B20: 13 68 01 91 41 89 33 37 30 2C 35 35 30 2C 37 31 |.h..A.370,550,71|
00000B30: 30 2C 38 31 30 2C 39 31 30 2C 32 30 34 30 2C 32 |0,810,910,2040,2|
00000B40: 30 39 30 2C 31 35 35 30 00 64 13 6A 01 8F 20 2A |090,1550.d.j.. *|
00000B50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B60: 2A 2A 2A 2A 00 80 13 6C 01 8F 20 2A 20 41 44 52 |****...l.. * ADR|
00000B70: 45 53 53 45 4E 20 45 49 4E 47 45 42 45 4E 20 2A |ESSEN EINGEBEN *|
00000B80: 00 9C 13 6E 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...n.. *********|
00000B90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A4 13 72 |************...r|
00000BA0: 01 54 B2 30 00 AE 13 7C 01 54 B2 54 AA 31 00 BE |.T.0...|.T.T.1..|
00000BB0: 13 86 01 8B 54 B1 35 30 30 A7 31 37 34 30 00 F4 |....T.500.1740..|
00000BC0: 13 90 01 8B 41 24 28 54 2C 31 29 AA 41 24 28 54 |....A$(T,1).A$(T|
00000BD0: 2C 32 29 AA 41 24 28 54 2C 33 29 AA 41 24 28 54 |,2).A$(T,3).A$(T|
00000BE0: 2C 34 29 AA 41 24 28 54 2C 34 29 B3 B1 22 22 A7 |,4).A$(T,4).."".|
00000BF0: 89 33 38 30 00 1F 14 9A 01 99 22 93 11 11 11 11 |.380......".....|
00000C00: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000C10: 11 20 20 20 20 20 20 30 3D 4D 45 4E 55 45 22 00 |. 0=MENUE".|
00000C20: 4E 14 A4 01 99 22 13 1D 1D 1D 20 20 20 20 20 20 |N....".... |
00000C30: 20 20 20 20 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 | ........... |
00000C40: 41 44 52 45 53 53 45 20 4E 52 2E 92 22 54 00 6F |ADRESSE NR.."T.o|
00000C50: 14 B8 01 85 22 11 11 11 12 20 56 4F 52 4E 41 4D |....".... VORNAM|
00000C60: 45 20 20 3A 92 20 22 3B 41 24 28 54 2C 31 29 00 |E :. ";A$(T,1).|
00000C70: 90 14 C2 01 8B 41 24 28 54 2C 31 29 B2 22 30 22 |.....A$(T,1)."0"|
00000C80: A7 41 24 28 54 2C 31 29 B2 22 22 3A 89 32 33 30 |.A$(T,1)."":.230|
00000C90: 00 AF 14 CC 01 85 22 11 12 20 4E 41 43 48 4E 41 |......".. NACHNA|
00000CA0: 4D 45 20 3A 92 20 22 3B 41 24 28 54 2C 32 29 00 |ME :. ";A$(T,2).|
00000CB0: CE 14 D6 01 85 22 11 12 20 53 54 52 41 53 53 45 |.....".. STRASSE|
00000CC0: 20 20 3A 92 20 22 3B 41 24 28 54 2C 33 29 00 ED | :. ";A$(T,3)..|
00000CD0: 14 E0 01 85 22 11 12 20 4F 52 54 20 20 20 20 20 |....".. ORT |
00000CE0: 20 3A 92 20 22 3B 41 24 28 54 2C 34 29 00 0C 15 | :. ";A$(T,4)...|
00000CF0: EA 01 85 22 11 12 20 54 45 4C 45 46 4F 4E 20 20 |...".. TELEFON |
00000D00: 3A 92 20 22 3B 41 24 28 54 2C 35 29 00 49 15 FE |:. ";A$(T,5).I..|
00000D10: 01 85 22 11 11 11 20 20 20 20 20 12 20 45 49 4E |.."... . EIN|
00000D20: 47 41 42 45 4E 20 4F 2E 4B 2E 20 92 20 12 28 4A |GABEN O.K. . .(J|
00000D30: 2F 4E 29 92 20 20 4A 9D 9D 9D 22 3B 41 24 3A 8B |/N). J...";A$:.|
00000D40: 54 B1 48 53 A7 48 53 B2 54 00 75 15 08 02 8B C8 |T.HS.HS.T.u.....|
00000D50: 28 41 24 2C 31 29 B3 B1 22 4A 22 A7 81 47 B2 31 |(A$,1).."J"..G.1|
00000D60: A4 35 3A 41 24 28 54 2C 47 29 B2 22 22 3A 82 47 |.5:A$(T,G)."":.G|
00000D70: 3A 89 34 31 30 00 89 15 12 02 8B 47 24 B2 22 42 |:.410......G$."B|
00000D80: 22 A7 47 24 B2 22 22 3A 8E 00 92 15 1C 02 89 33 |".G$."":.......3|
00000D90: 38 30 00 B0 15 1E 02 8F 20 2A 2A 2A 2A 2A 2A 2A |80...... *******|
00000DA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000DB0: 00 CE 15 20 02 8F 20 2A 20 42 4C 41 45 54 54 45 |... .. * BLAETTE|
00000DC0: 52 4E 20 49 4E 20 4B 41 52 54 45 49 20 2A 00 EC |RN IN KARTEI *..|
00000DD0: 15 22 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.".. ***********|
00000DE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 F4 15 26 |************...&|
00000DF0: 02 49 B2 31 00 24 16 30 02 99 22 93 20 20 20 20 |.I.1.$.0..". |
00000E00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E10: 20 20 20 12 20 41 44 52 45 53 53 45 20 4E 52 2E | . ADRESSE NR.|
00000E20: 92 22 49 22 00 5A 16 3A 02 99 22 13 11 11 11 11 |."I".Z.:..".....|
00000E30: 11 11 11 11 11 11 11 11 11 11 11 11 11 20 20 20 |............. |
00000E40: 20 20 20 20 20 20 12 20 30 20 92 20 20 20 20 20 | . 0 . |
00000E50: 3D 20 4D 45 4E 55 45 22 3A 99 00 7C 16 44 02 99 |= MENUE":..|.D..|
00000E60: 22 20 20 20 20 20 12 4C 45 45 52 54 41 53 54 45 |" .LEERTASTE|
00000E70: 20 92 20 20 3D 20 56 4F 52 22 3A 99 00 A0 16 4E | . = VOR":....N|
00000E80: 02 99 22 20 20 20 20 20 12 43 55 52 53 4F 52 2D |.." .CURSOR-|
00000E90: 44 4F 57 4E 92 20 3D 20 5A 55 52 55 45 43 4B 22 |DOWN. = ZURUECK"|
00000EA0: 00 CC 16 50 02 99 22 11 20 20 20 20 20 20 20 20 |...P..". |
00000EB0: 12 20 46 31 20 92 20 20 20 20 20 3D 20 45 49 4E |. F1 . = EIN|
00000EC0: 5A 45 4C 41 55 53 44 52 55 43 4B 22 00 E3 16 58 |ZELAUSDRUCK"...X|
00000ED0: 02 99 22 13 11 11 11 11 20 20 22 3B 41 24 28 49 |.."..... ";A$(I|
00000EE0: 2C 31 29 00 F5 16 5D 02 99 22 11 20 20 22 41 24 |,1)...]..". "A$|
00000EF0: 28 49 2C 32 29 00 07 17 62 02 99 22 11 20 20 22 |(I,2)...b..". "|
00000F00: 41 24 28 49 2C 33 29 00 19 17 6C 02 99 22 11 20 |A$(I,3)...l..". |
00000F10: 20 22 41 24 28 49 2C 34 29 00 2B 17 76 02 99 22 | "A$(I,4).+.v.."|
00000F20: 11 20 20 22 41 24 28 49 2C 35 29 00 3F 17 8A 02 |. "A$(I,5).?...|
00000F30: 8B 47 24 B2 22 42 22 A7 47 24 B2 22 22 3A 8E 00 |.G$."B".G$."":..|
00000F40: 52 17 94 02 A1 41 24 3A 8B 41 24 B2 22 22 A7 36 |R....A$:.A$."".6|
00000F50: 36 30 00 62 17 9E 02 8B 41 24 B2 22 30 22 A7 32 |60.b....A$."0".2|
00000F60: 33 30 00 7D 17 A8 02 8B 41 24 B2 22 11 22 AF 49 |30.}....A$.".".I|
00000F70: B1 31 A7 49 B2 49 AB 31 3A 89 35 36 30 00 99 17 |.1.I.I.1:.560...|
00000F80: B2 02 8B 41 24 B2 22 20 22 AF 49 B3 41 44 A7 49 |...A$." ".I.AD.I|
00000F90: B2 49 AA 31 3A 89 35 36 30 00 AD 17 B4 02 8B 41 |.I.1:.560......A|
00000FA0: 24 B2 C7 28 31 33 33 29 A7 32 33 30 30 00 B6 17 |$..(133).2300...|
00000FB0: BC 02 89 36 36 30 00 DA 17 BE 02 8F 20 2A 2A 2A |...660...... ***|
00000FC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000FD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 FE 17 C0 02 8F |**********......|
00000FE0: 20 2A 20 41 44 52 45 53 53 45 4E 20 45 49 4E 5A | * ADRESSEN EINZ|
00000FF0: 45 4C 4E 20 4C 4F 45 53 43 48 45 4E 20 2A 00 22 |ELN LOESCHEN *."|
00001000: 18 C2 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.... ***********|
00001010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001020: 2A 2A 00 6E 18 C6 02 41 B2 30 3A 99 22 93 41 55 |**.n...A.0:.".AU|
00001030: 46 20 57 45 4C 43 48 45 52 20 53 45 49 54 45 20 |F WELCHER SEITE |
00001040: 53 54 45 48 54 20 44 49 45 20 5A 55 20 20 20 20 |STEHT DIE ZU |
00001050: 20 20 20 20 20 20 11 4C 4F 45 53 43 48 45 4E 44 | .LOESCHEND|
00001060: 45 20 41 44 52 45 53 53 45 20 3A 11 11 22 00 75 |E ADRESSE :..".u|
00001070: 18 CB 02 85 41 00 88 18 E4 02 8B 41 B1 35 30 30 |....A......A.500|
00001080: B0 41 B3 31 A7 37 31 30 00 B6 18 EE 02 99 22 93 |.A.1.710......".|
00001090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000010A0: 20 20 20 20 20 20 12 20 41 44 52 45 53 53 45 20 | . ADRESSE |
000010B0: 4E 52 2E 92 22 41 00 CA 18 F8 02 49 B2 41 3A 47 |NR.."A.....I.A:G|
000010C0: 24 B2 22 42 22 3A 8D 36 30 30 00 EE 18 02 03 85 |$."B":.600......|
000010D0: 22 11 11 11 11 20 4C 4F 45 53 43 48 45 4E 20 28 |".... LOESCHEN (|
000010E0: 4A 2F 4E 29 20 20 4A 9D 9D 9D 22 3B 41 24 00 00 |J/N) J...";A$..|
000010F0: 19 0C 03 8B 41 24 B3 B1 22 4A 22 A7 89 32 33 30 |....A$.."J"..230|
00001100: 00 1D 19 16 03 81 59 B2 31 A4 35 3A 41 24 28 41 |......Y.1.5:A$(A|
00001110: 2C 59 29 B2 22 22 3A 82 59 3A 59 B2 30 00 52 19 |,Y)."":.Y:Y.0.R.|
00001120: 20 03 99 22 11 20 12 20 41 44 52 45 53 53 45 20 | ..". . ADRESSE |
00001130: 47 45 4C 4F 45 53 43 48 54 20 92 22 3A 81 59 B2 |GELOESCHT .":.Y.|
00001140: 31 A4 31 30 30 30 3A 82 59 3A 59 B2 30 3A 89 32 |1.1000:.Y:Y.0:.2|
00001150: 33 30 00 6D 19 22 03 8F 20 2A 2A 2A 2A 2A 2A 2A |30.m.".. *******|
00001160: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 88 19 |*************...|
00001170: 24 03 8F 20 2A 20 41 44 52 45 53 53 45 4E 20 41 |$.. * ADRESSEN A|
00001180: 45 4E 44 45 52 4E 20 2A 00 A3 19 26 03 8F 20 2A |ENDERN *...&.. *|
00001190: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000011A0: 2A 2A 2A 00 E9 19 2A 03 99 22 93 41 55 46 20 57 |***...*..".AUF W|
000011B0: 45 4C 43 48 45 52 20 53 45 49 54 45 20 53 54 45 |ELCHER SEITE STE|
000011C0: 48 54 20 44 49 45 20 5A 55 20 20 20 20 20 20 20 |HT DIE ZU |
000011D0: 20 20 20 11 41 45 4E 44 45 52 4E 44 45 20 41 44 | .AENDERNDE AD|
000011E0: 52 45 53 53 45 20 11 11 22 00 04 1A 48 03 85 59 |RESSE .."...H..Y|
000011F0: 3A 49 B2 59 3A 8B 59 B1 35 30 30 B0 59 B3 31 A7 |:I.Y:.Y.500.Y.1.|
00001200: 89 38 31 30 00 44 1A 52 03 47 24 B2 22 42 22 3A |.810.D.R.G$."B":|
00001210: 99 22 93 20 20 20 20 20 20 20 20 20 20 20 20 20 |.". |
00001220: 20 20 20 20 20 20 20 20 20 20 20 12 20 41 44 52 | . ADR|
00001230: 45 53 53 45 20 4E 52 2E 92 22 49 3A 8D 36 30 30 |ESSE NR.."I:.600|
00001240: 3A 49 B2 30 00 67 1A 5C 03 85 22 11 11 11 11 20 |:I.0.g.\..".... |
00001250: 41 45 4E 44 45 52 4E 20 28 4A 2F 4E 29 20 20 4A |AENDERN (J/N) J|
00001260: 9D 9D 9D 22 3B 41 24 00 79 1A 66 03 8B 41 24 B3 |...";A$.y.f..A$.|
00001270: B1 22 4A 22 A7 89 32 33 30 00 A6 1A 70 03 81 54 |."J"..230...p..T|
00001280: B2 31 A4 35 3A 41 24 28 59 2C 54 29 B2 22 22 3A |.1.5:A$(Y,T)."":|
00001290: 82 3A 54 B2 59 3A 47 24 B2 22 42 22 3A 99 22 93 |.:T.Y:G$."B":.".|
000012A0: 22 3A 8D 34 32 30 00 E9 1A 7A 03 99 22 93 11 11 |":.420...z.."...|
000012B0: 11 11 11 11 11 11 11 11 20 20 20 20 20 20 20 20 |........ |
000012C0: 20 20 41 44 52 45 53 53 45 20 47 45 41 45 4E 44 | ADRESSE GEAEND|
000012D0: 45 52 54 20 21 21 22 3A 81 54 B2 31 A4 31 30 30 |ERT !!":.T.1.100|
000012E0: 30 3A 82 54 3A 89 32 33 30 00 07 1B 7C 03 8F 20 |0:.T:.230...|.. |
000012F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001300: 2A 2A 2A 2A 2A 2A 2A 00 25 1B 7E 03 8F 20 2A 20 |*******.%.~.. * |
00001310: 53 55 43 48 45 4E 20 56 4F 4E 20 41 44 52 45 53 |SUCHEN VON ADRES|
00001320: 53 45 4E 20 2A 00 43 1B 80 03 8F 20 2A 2A 2A 2A |SEN *.C.... ****|
00001330: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001340: 2A 2A 2A 00 82 1B 8E 03 99 22 93 11 11 20 53 49 |***......"... SI|
00001350: 45 20 4B 4F 45 4E 4E 45 4E 20 45 49 4E 20 42 45 |E KOENNEN EIN BE|
00001360: 4C 49 45 42 49 47 45 53 20 53 55 43 48 57 4F 52 |LIEBIGES SUCHWOR|
00001370: 54 20 20 20 20 20 45 49 4E 47 45 42 45 4E 2E 11 |T EINGEBEN..|
00001380: 11 22 00 9E 1B AC 03 85 22 20 22 3B 53 24 3A 5A |."......" ";S$:Z|
00001390: B2 C3 28 53 24 29 3A 81 54 B2 31 A4 48 53 00 D0 |..(S$):.T.1.HS..|
000013A0: 1B CA 03 99 22 93 11 11 11 11 11 11 11 11 11 20 |....".......... |
000013B0: 20 20 20 20 20 20 20 44 41 54 45 49 20 57 49 52 | DATEI WIR|
000013C0: 44 20 44 55 52 43 48 53 55 43 48 54 20 21 21 22 |D DURCHSUCHT !!"|
000013D0: 00 EB 1B D4 03 81 55 B2 31 A4 35 3A 81 59 B2 31 |......U.1.5:.Y.1|
000013E0: A4 C3 28 41 24 28 54 2C 55 29 29 00 08 1C E8 03 |..(A$(T,U)).....|
000013F0: 8B CA 28 41 24 28 54 2C 55 29 2C 59 2C 5A 29 B2 |..(A$(T,U),Y,Z).|
00001400: 53 24 A7 89 31 30 35 30 00 12 1C F2 03 82 59 3A |S$..1050......Y:|
00001410: 82 55 00 19 1C 06 04 82 54 00 23 1C 10 04 89 31 |.U......T.#....1|
00001420: 31 31 30 00 57 1C 1A 04 47 24 B2 22 42 22 3A 99 |110.W...G$."B":.|
00001430: 22 93 20 20 12 20 41 44 52 45 53 53 45 20 4E 52 |". . ADRESSE NR|
00001440: 2E 92 22 54 3B 3A 99 22 92 22 3A 49 B2 54 3A 8D |.."T;:.".":I.T:.|
00001450: 36 30 30 3A 49 B2 30 00 78 1C 24 04 99 22 11 11 |600:I.0.x.$.."..|
00001460: 11 20 12 46 31 3D 57 45 49 54 45 52 20 2F 20 30 |. .F1=WEITER / 0|
00001470: 3D 4D 45 4E 55 45 92 22 00 8C 1C 2E 04 A1 41 24 |=MENUE."......A$|
00001480: 3A 8B 41 24 B2 22 22 A7 31 30 37 30 00 A9 1C 38 |:.A$."".1070...8|
00001490: 04 8B 41 24 B2 22 30 22 A7 55 B2 30 3A 54 B2 30 |..A$."0".U.0:T.0|
000014A0: 3A 59 B2 30 3A 89 32 33 30 00 BE 1C 42 04 8B 41 |:Y.0:.230...B..A|
000014B0: 24 B3 B1 C7 28 31 33 33 29 A7 31 30 37 30 00 CF |$...(133).1070..|
000014C0: 1C 4C 04 8B 54 B3 B2 48 53 A7 89 31 30 33 30 00 |.L..T..HS..1030.|
000014D0: FE 1C 56 04 99 22 93 11 11 11 11 11 11 11 11 11 |..V.."..........|
000014E0: 20 20 20 20 20 20 20 20 20 20 44 41 54 45 49 20 | DATEI |
000014F0: 44 55 52 43 48 53 55 43 48 54 20 21 21 22 00 18 |DURCHSUCHT !!"..|
00001500: 1D 60 04 81 55 B2 31 A4 31 33 30 30 3A 82 55 3A |.`..U.1.1300:.U:|
00001510: 55 B2 30 3A 89 32 33 30 00 3B 1D 2A 05 8F 20 2A |U.0:.230.;.*.. *|
00001520: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001530: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 5E 1D 2C 05 |***********.^.,.|
00001540: 8F 20 2A 20 44 41 54 45 4E 20 4C 41 44 45 4E 20 |. * DATEN LADEN |
00001550: 56 4F 4E 20 44 49 53 4B 45 54 54 45 20 2A 00 81 |VON DISKETTE *..|
00001560: 1D 2E 05 8F 20 2A 20 20 20 20 20 20 4F 44 45 52 |.... * ODER|
00001570: 20 43 41 53 53 45 54 54 45 20 20 20 20 20 20 20 | CASSETTE |
00001580: 2A 00 A4 1D 30 05 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*...0.. ********|
00001590: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000015A0: 2A 2A 2A 2A 00 CC 1D 32 05 99 22 93 11 11 20 20 |****...2.."... |
000015B0: 20 20 56 4F 4E 20 54 41 50 45 3D 31 1D 20 4F 44 | VON TAPE=1. OD|
000015C0: 45 52 20 44 49 53 4B 3D 32 20 3F 22 00 E0 1D 46 |ER DISK=2 ?"...F|
000015D0: 05 A1 4C 24 3A 8B 4C 24 B2 22 22 A7 31 33 35 30 |..L$:.L$."".1350|
000015E0: 00 F1 1D 50 05 8B 4C 24 B2 22 31 22 A7 31 33 39 |...P..L$."1".139|
000015F0: 30 00 02 1E 5A 05 8B 4C 24 B2 22 32 22 A7 31 38 |0...Z..L$."2".18|
00001600: 39 30 00 11 1E 64 05 98 33 2C 41 24 28 49 2C 35 |90...d..3,A$(I,5|
00001610: 29 00 52 1E 6E 05 99 22 11 11 11 20 43 41 53 53 |).R.n.."... CASS|
00001620: 45 54 54 45 20 45 49 4E 4C 45 47 45 4E 20 55 4E |ETTE EINLEGEN UN|
00001630: 44 20 41 4E 20 44 49 45 20 52 49 43 48 54 49 47 |D AN DIE RICHTIG|
00001640: 45 20 20 20 53 54 45 4C 4C 45 20 53 50 55 4C 45 |E STELLE SPULE|
00001650: 4E 22 00 77 1E 78 05 99 22 11 11 11 20 20 20 57 |N".w.x.."... W|
00001660: 45 4E 4E 20 4F 2E 4B 2E 20 20 27 2A 27 20 44 52 |ENN O.K. '*' DR|
00001670: 55 45 43 4B 45 4E 22 00 8D 1E 82 05 A1 41 24 3A |UECKEN"......A$:|
00001680: 8B 41 24 B3 B1 22 2A 22 A7 31 34 31 30 00 A7 1E |.A$.."*".1410...|
00001690: 8C 05 99 22 93 11 11 11 11 11 11 11 11 11 11 22 |..."..........."|
000016A0: 3A 9F 31 2C 31 2C 30 00 C6 1E 96 05 81 51 B2 31 |:.1,1,0......Q.1|
000016B0: A4 35 30 30 3A 81 52 B2 31 A4 35 3A 84 31 2C 41 |.500:.R.1.5:.1,A|
000016C0: 24 28 51 2C 52 29 00 E8 1E B4 05 8B 41 24 28 51 |$(Q,R)......A$(Q|
000016D0: 2C 52 29 B2 22 40 22 A7 41 24 28 51 2C 52 29 B2 |,R)."@".A$(Q,R).|
000016E0: 22 22 3A 89 31 35 31 30 00 04 1F BE 05 8B 41 24 |"":.1510......A$|
000016F0: 28 51 2C 52 29 B2 22 B1 22 A7 41 24 28 51 2C 52 |(Q,R).".".A$(Q,R|
00001700: 29 B2 22 22 00 0E 1F C8 05 82 52 3A 82 51 00 15 |).""......R:.Q..|
00001710: 1F E6 05 A0 31 00 3F 1F F0 05 99 22 93 11 11 11 |....1.?...."....|
00001720: 11 11 11 11 11 20 20 20 20 20 20 20 20 20 44 41 |..... DA|
00001730: 54 45 4E 20 47 45 4C 41 44 45 4E 20 21 21 22 00 |TEN GELADEN !!".|
00001740: 5A 1F 04 06 48 53 B2 51 3A 81 51 B2 31 A4 31 30 |Z...HS.Q:.Q.1.10|
00001750: 30 30 3A 82 51 3A 89 32 33 30 00 7A 1F 06 06 8F |00:.Q:.230.z....|
00001760: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00001770: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 9A 1F 08 06 52 |**********.....R|
00001780: 45 4E 20 AC 20 44 41 54 45 4E 20 B6 50 45 49 43 |EN . DATEN .PEIC|
00001790: 48 45 52 4E 20 41 55 46 20 AC 00 BA 1F 0A 06 8F |HERN AUF .......|
000017A0: 20 2A 20 44 49 53 4B 45 54 54 45 20 4F 44 45 52 | * DISKETTE ODER|
000017B0: 20 43 41 53 53 45 54 54 45 2A 00 DA 1F 0C 06 8F | CASSETTE*......|
000017C0: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
000017D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 00 20 0E 06 99 |**********.. ...|
000017E0: 22 93 11 11 11 20 20 20 20 41 55 46 20 54 41 50 |".... AUF TAP|
000017F0: 45 3D 31 20 4F 44 45 52 20 44 49 53 4B 3D 32 22 |E=1 ODER DISK=2"|
00001800: 00 16 20 22 06 A1 53 50 24 3A 8B 53 50 24 B2 22 |.. "..SP$:.SP$."|
00001810: 22 A7 31 35 37 30 00 28 20 2C 06 8B 53 50 24 B2 |".1570.( ,..SP$.|
00001820: 22 31 22 A7 31 36 30 30 00 3A 20 36 06 8B 53 50 |"1".1600.: 6..SP|
00001830: 24 B2 22 32 22 A7 31 37 36 30 00 7C 20 40 06 99 |$."2".1760.| @..|
00001840: 22 11 11 11 20 20 43 41 53 53 45 54 54 45 20 45 |"... CASSETTE E|
00001850: 49 4E 4C 45 47 45 4E 20 55 4E 44 20 41 4E 20 44 |INLEGEN UND AN D|
00001860: 49 45 20 52 49 43 48 54 49 47 45 20 20 20 53 54 |IE RICHTIGE ST|
00001870: 45 4C 4C 45 20 53 50 55 4C 45 4E 22 00 A3 20 4A |ELLE SPULEN".. J|
00001880: 06 99 22 11 11 20 20 20 20 57 45 4E 4E 20 4F 2E |..".. WENN O.|
00001890: 4B 2E 20 20 27 2A 27 20 44 52 55 45 43 4B 45 4E |K. '*' DRUECKEN|
000018A0: 20 21 22 00 B9 20 54 06 A1 41 24 3A 8B 41 24 B3 | !".. T..A$:.A$.|
000018B0: B1 22 2A 22 A7 31 36 32 30 00 D3 20 5E 06 99 22 |."*".1620.. ^.."|
000018C0: 93 11 11 11 11 11 11 11 11 11 11 22 3A 9F 31 2C |...........":.1,|
000018D0: 31 2C 31 00 E6 20 68 06 81 51 B2 31 A4 48 53 3A |1,1.. h..Q.1.HS:|
000018E0: 81 52 B2 31 A4 35 00 02 21 7C 06 8B 41 24 28 51 |.R.1.5..!|..A$(Q|
000018F0: 2C 52 29 B2 22 22 A7 41 24 28 51 2C 52 29 B2 22 |,R)."".A$(Q,R)."|
00001900: B1 22 00 11 21 86 06 98 31 2C 41 24 28 51 2C 52 |."..!...1,A$(Q,R|
00001910: 29 00 1B 21 90 06 82 52 3A 82 51 00 26 21 A4 06 |)..!...R:.Q.&!..|
00001920: 98 31 2C 22 40 22 00 2D 21 AE 06 A0 31 00 6C 21 |.1,"@".-!...1.l!|
00001930: B8 06 99 22 93 11 11 11 11 11 11 11 11 20 20 20 |..."......... |
00001940: 20 20 20 44 41 54 45 4E 20 41 42 47 45 53 50 45 | DATEN ABGESPE|
00001950: 49 43 48 45 52 54 20 21 21 22 3A 81 51 B2 31 A4 |ICHERT !!":.Q.1.|
00001960: 31 30 30 30 3A 82 51 3A 89 32 33 30 00 A2 21 CC |1000:.Q:.230..!.|
00001970: 06 99 22 93 11 11 11 11 11 11 11 11 20 20 20 4E |.."......... N|
00001980: 55 52 20 35 30 30 20 41 44 52 45 53 53 45 4E 22 |UR 500 ADRESSEN"|
00001990: 3A 81 54 B2 31 A4 32 30 30 30 3A 82 54 3A 89 32 |:.T.1.2000:.T:.2|
000019A0: 33 30 00 D1 21 E0 06 99 22 11 11 11 11 11 20 20 |30..!..."..... |
000019B0: 20 20 44 41 54 45 4E 20 41 55 46 20 44 49 53 4B | DATEN AUF DISK|
000019C0: 45 54 54 45 20 41 42 53 50 45 49 43 48 45 52 4E |ETTE ABSPEICHERN|
000019D0: 22 00 F3 21 EA 06 99 22 11 11 20 20 20 20 44 49 |"..!...".. DI|
000019E0: 53 4B 45 54 54 45 20 45 49 4E 4C 45 47 45 4E 2E |SKETTE EINLEGEN.|
000019F0: 11 11 22 00 0D 22 F4 06 85 22 20 20 20 20 46 49 |..".."..." FI|
00001A00: 4C 45 4E 41 4D 45 20 3A 22 3B 44 4E 24 00 32 22 |LENAME :";DN$.2"|
00001A10: FE 06 99 22 93 11 11 11 11 11 11 11 11 11 11 22 |..."..........."|
00001A20: 3A 9F 31 2C 38 2C 31 2C 44 4E 24 AA 22 2C 53 2C |:.1,8,1,DN$.",S,|
00001A30: 57 22 00 45 22 08 07 81 51 B2 31 A4 48 53 3A 81 |W".E"...Q.1.HS:.|
00001A40: 52 B2 31 A4 35 00 61 22 1C 07 8B 41 24 28 51 2C |R.1.5.a"...A$(Q,|
00001A50: 52 29 B2 22 22 A7 41 24 28 51 2C 52 29 B2 22 B1 |R)."".A$(Q,R).".|
00001A60: 22 00 70 22 26 07 98 31 2C 41 24 28 51 2C 52 29 |".p"&..1,A$(Q,R)|
00001A70: 00 7A 22 30 07 82 52 3A 82 51 00 85 22 44 07 98 |.z"0..R:.Q.."D..|
00001A80: 31 2C 22 40 22 00 8C 22 4E 07 A0 31 00 CE 22 58 |1,"@".."N..1.."X|
00001A90: 07 99 22 93 11 11 11 11 11 11 11 11 11 11 20 20 |.."........... |
00001AA0: 20 20 20 20 20 44 41 54 45 4E 20 41 42 47 45 53 | DATEN ABGES|
00001AB0: 50 45 49 43 48 45 52 54 20 21 21 22 3A 81 54 B2 |PEICHERT !!":.T.|
00001AC0: 31 A4 31 30 30 30 3A 82 54 3A 89 32 33 30 00 0D |1.1000:.T:.230..|
00001AD0: 23 62 07 99 22 11 11 20 44 41 54 45 4E 20 56 4F |#b..".. DATEN VO|
00001AE0: 4E 20 44 49 53 4B 45 54 54 45 2E 20 44 49 53 4B |N DISKETTE. DISK|
00001AF0: 45 54 54 45 20 4D 49 54 20 44 41 54 45 4E 11 20 |ETTE MIT DATEN. |
00001B00: 20 45 49 4E 4C 45 47 45 4E 2E 11 11 22 00 24 23 | EINLEGEN...".$#|
00001B10: 76 07 85 22 20 46 49 4C 45 4E 41 4D 45 20 3A 22 |v.." FILENAME :"|
00001B20: 3B 44 4E 24 00 49 23 80 07 99 22 93 11 11 11 11 |;DN$.I#...".....|
00001B30: 11 11 11 11 11 11 22 3A 9F 31 2C 38 2C 30 2C 44 |......":.1,8,0,D|
00001B40: 4E 24 AA 22 2C 53 2C 52 22 00 5D 23 8A 07 81 51 |N$.",S,R".]#...Q|
00001B50: B2 31 A4 35 30 30 3A 81 52 B2 31 A4 35 00 6C 23 |.1.500:.R.1.5.l#|
00001B60: 9E 07 84 31 2C 41 24 28 51 2C 52 29 00 8E 23 A8 |...1,A$(Q,R)..#.|
00001B70: 07 8B 41 24 28 51 2C 52 29 B2 22 40 22 A7 41 24 |..A$(Q,R)."@".A$|
00001B80: 28 51 2C 52 29 B2 22 22 3A 89 32 30 31 30 00 AA |(Q,R)."":.2010..|
00001B90: 23 B2 07 8B 41 24 28 51 2C 52 29 B2 22 B1 22 A7 |#...A$(Q,R).".".|
00001BA0: 41 24 28 51 2C 52 29 B2 22 22 00 B4 23 BC 07 82 |A$(Q,R).""..#...|
00001BB0: 52 3A 82 51 00 BB 23 DA 07 A0 31 00 E7 23 E4 07 |R:.Q..#...1..#..|
00001BC0: 99 22 93 11 11 11 11 11 11 11 11 11 11 20 20 20 |."........... |
00001BD0: 20 20 20 20 20 20 44 41 54 45 4E 20 47 45 4C 41 | DATEN GELA|
00001BE0: 44 45 4E 20 21 21 22 00 02 24 EE 07 48 53 B2 51 |DEN !!"..$..HS.Q|
00001BF0: 3A 81 54 B2 31 A4 31 30 30 30 3A 82 54 3A 89 32 |:.T.1.1000:.T:.2|
00001C00: 33 30 00 24 24 F0 07 8F 20 2A 2A 2A 2A 2A 2A 2A |30.$$... *******|
00001C10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001C20: 2A 2A 2A 2A 00 46 24 F2 07 8F 20 2A 20 4C 4F 45 |****.F$... * LOE|
00001C30: 53 43 48 45 4E 20 41 4C 4C 45 52 20 41 44 52 45 |SCHEN ALLER ADRE|
00001C40: 53 53 45 4E 20 2A 00 68 24 F4 07 8F 20 2A 2A 2A |SSEN *.h$... ***|
00001C50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001C60: 2A 2A 2A 2A 2A 2A 2A 2A 00 AF 24 F8 07 99 22 93 |********..$...".|
00001C70: 11 11 11 11 11 20 53 4F 4C 4C 45 4E 20 44 49 45 |..... SOLLEN DIE|
00001C80: 20 47 41 4E 5A 45 4E 20 41 44 52 45 53 53 45 4E | GANZEN ADRESSEN|
00001C90: 20 47 45 4C 4F 45 53 43 48 54 20 20 20 20 11 57 | GELOESCHT .W|
00001CA0: 45 52 44 45 4E 20 20 20 28 4A 2F 4E 29 20 22 00 |ERDEN (J/N) ".|
00001CB0: C3 24 02 08 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 |.$...A$:.A$."".2|
00001CC0: 30 35 30 00 D3 24 0C 08 8B 41 24 B2 22 4A 22 A7 |050..$...A$."J".|
00001CD0: 32 30 30 00 E3 24 16 08 8B 41 24 B2 22 4E 22 A7 |200..$...A$."N".|
00001CE0: 32 33 30 00 ED 24 20 08 89 32 30 34 30 00 0B 25 |230..$ ..2040..%|
00001CF0: 22 08 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |".. ************|
00001D00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 29 25 24 08 |***********.)%$.|
00001D10: 8F 20 2A 20 41 44 52 45 53 53 45 4E 20 4E 52 2E |. * ADRESSEN NR.|
00001D20: 20 53 55 43 48 45 4E 20 2A 00 47 25 26 08 8F 20 | SUCHEN *.G%&.. |
00001D30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001D40: 2A 2A 2A 2A 2A 2A 2A 00 6D 25 2A 08 85 22 93 11 |*******.m%*.."..|
00001D50: 11 11 11 11 20 20 57 45 4C 43 48 45 20 41 44 52 |.... WELCHE ADR|
00001D60: 45 53 53 45 4E 20 4E 52 2E 20 22 3B 49 00 87 25 |ESSEN NR. ";I..%|
00001D70: 34 08 8B 49 B1 35 30 30 B0 49 B3 31 A7 99 22 91 |4..I.500.I.1..".|
00001D80: 22 3A 89 32 30 39 30 00 AB 25 3E 08 99 22 93 12 |":.2090..%>.."..|
00001D90: 20 41 44 52 45 53 53 45 20 4E 52 2E 92 22 49 3A | ADRESSE NR.."I:|
00001DA0: 47 24 B2 22 42 22 3A 8D 36 30 30 00 C6 25 48 08 |G$."B":.600..%H.|
00001DB0: 99 22 11 11 11 20 20 20 20 12 30 20 44 52 55 45 |."... .0 DRUE|
00001DC0: 43 4B 45 4E 92 22 00 DA 25 52 08 A1 41 24 3A 8B |CKEN."..%R..A$:.|
00001DD0: 41 24 B2 22 22 A7 32 31 33 30 00 E3 25 5C 08 89 |A$."".2130..%\..|
00001DE0: 32 33 30 00 01 26 66 08 8F 20 2A 2A 2A 2A 2A 2A |230..&f.. ******|
00001DF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001E00: 2A 00 1F 26 70 08 8F 20 2A 2A 20 41 55 53 47 41 |*..&p.. ** AUSGA|
00001E10: 42 45 20 44 45 52 20 44 41 54 45 4E 20 2A 2A 00 |BE DER DATEN **.|
00001E20: 3D 26 7A 08 8F 20 2A 2A 20 20 41 55 46 20 44 45 |=&z.. ** AUF DE|
00001E30: 4E 20 44 52 55 43 4B 45 52 20 20 2A 2A 00 5B 26 |N DRUCKER **.[&|
00001E40: 84 08 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00001E50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 6F 26 98 08 |***********.o&..|
00001E60: 99 22 93 22 3A 8D 32 35 30 30 3A 9F 33 2C 34 00 |.".":.2500:.3,4.|
00001E70: 82 26 A2 08 81 51 B2 31 A4 48 53 3A 81 52 B2 31 |.&...Q.1.HS:.R.1|
00001E80: A4 35 00 91 26 B6 08 98 33 2C 41 24 28 51 2C 52 |.5..&...3,A$(Q,R|
00001E90: 29 00 A1 26 C0 08 82 52 3A 98 33 3A 82 51 3A A0 |)..&...R:.3:.Q:.|
00001EA0: 33 00 DF 26 D9 08 99 22 93 11 11 11 11 11 11 11 |3..&..."........|
00001EB0: 11 11 11 20 20 20 20 20 44 41 54 45 4E 20 53 49 |... DATEN SI|
00001EC0: 4E 44 20 41 55 53 47 45 44 52 55 43 4B 54 20 21 |ND AUSGEDRUCKT !|
00001ED0: 21 22 3A 81 49 B2 31 A4 32 30 30 30 3A 82 49 00 |!":.I.1.2000:.I.|
00001EE0: E8 26 DE 08 89 32 33 30 00 0A 27 FC 08 8F 20 2A |.&...230..'... *|
00001EF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001F00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2C 27 06 09 8F |**********.,'...|
00001F10: 20 2A 20 41 44 52 45 53 53 45 4E 20 45 49 4E 5A | * ADRESSEN EINZ|
00001F20: 45 4C 41 55 53 44 52 55 43 4B 20 2A 00 4E 27 10 |ELAUSDRUCK *.N'.|
00001F30: 09 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00001F40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 5C |**************.\|
00001F50: 27 1A 09 99 22 93 22 3A 9F 33 2C 34 00 6B 27 24 |'...".":.3,4.k'$|
00001F60: 09 98 33 2C 41 24 28 49 2C 31 29 00 7A 27 2E 09 |..3,A$(I,1).z'..|
00001F70: 98 33 2C 41 24 28 49 2C 32 29 00 89 27 38 09 98 |.3,A$(I,2)..'8..|
00001F80: 33 2C 41 24 28 49 2C 33 29 00 98 27 42 09 98 33 |3,A$(I,3)..'B..3|
00001F90: 2C 41 24 28 49 2C 34 29 00 A7 27 56 09 98 33 3A |,A$(I,4)..'V..3:|
00001FA0: A0 33 3A 89 32 33 30 00 C7 27 C4 09 8F 20 2A 2A |.3:.230..'... **|
00001FB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001FC0: 2A 2A 2A 2A 2A 2A 2A 00 E7 27 CE 09 8F 20 2A 2A |*******..'... **|
00001FD0: 20 55 42 45 52 50 52 55 45 46 55 4E 47 20 4F 42 | UBERPRUEFUNG OB|
00001FE0: 20 44 45 52 20 2A 2A 00 07 28 D8 09 8F 20 2A 2A | DER **..(... **|
00001FF0: 20 20 20 20 20 20 44 52 55 43 4B 45 52 20 20 20 | DRUCKER |
00002000: 20 20 20 20 20 2A 2A 00 27 28 E2 09 8F 20 2A 2A | **.'(... **|
00002010: 20 20 45 49 4E 47 45 53 43 48 41 4C 54 45 54 20 | EINGESCHALTET |
00002020: 49 53 54 20 20 2A 2A 00 47 28 E7 09 8F 20 2A 2A |IST **.G(... **|
00002030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002040: 2A 2A 2A 2A 2A 2A 2A 00 5D 28 EC 09 99 22 93 22 |*******.](..."."|
00002050: 3A 9F 33 2C 34 3A 97 37 36 38 2C 36 31 00 67 28 |:.3,4:.768,61.g(|
00002060: F1 09 98 33 3A A0 33 00 74 28 F6 09 97 37 36 38 |...3:.3.t(...768|
00002070: 2C 31 33 39 00 90 28 FB 09 8B 53 54 B3 B1 AB 31 |,139..(...ST...1|
00002080: 32 38 AF 53 54 B3 B1 AB 31 32 35 A7 32 35 39 30 |28.ST...125.2590|
00002090: 00 C3 28 00 0A 99 22 11 11 11 11 11 11 11 11 20 |..(..."........ |
000020A0: 20 20 20 20 44 52 55 43 4B 45 52 20 4E 49 43 48 | DRUCKER NICH|
000020B0: 54 20 45 49 4E 47 45 53 43 48 41 4C 54 45 54 20 |T EINGESCHALTET |
000020C0: 21 21 22 00 EA 28 05 0A 99 22 11 20 20 20 20 20 |!!"..(...". |
000020D0: 20 20 20 20 20 42 49 54 54 45 20 45 49 4E 53 43 | BITTE EINSC|
000020E0: 48 41 4C 54 45 4E 20 21 21 22 00 FA 28 0A 0A 81 |HALTEN !!"..(...|
000020F0: 49 B2 31 A4 32 30 30 3A 82 49 00 09 29 14 0A 99 |I.1.200:.I..)...|
00002100: 43 4C 24 3A 89 32 35 30 30 00 0F 29 1E 0A 8E 00 |CL$:.2500..)....|
00002110: 00 00 |.. |
....... **********************.;.... * A
DRESSENVERWALTUNG *.X.... * FUER DEN C-6
4 PLUS *.U.... * DATASETTE ODER *...
... * DISKETTENSTADION *...... *
PLUS *.L.... * COMMODORE PRINTE
R *...... **********************.......
..... ************************.-.... * A
UTOR UND EINLEITUNG *.L.... ************
************.B....53280,0:.53281,0......
"..... O..................P"....
.." .ADRESSENVERWALTUNG.".V...."
L..................."......"...
. WERNER HERZOG".!....".
BUCKHAUSSTR. 7 ".G....".
8800 ANSBACH ".I....".
TEL 09802/8760......"..... EINWEI
SUNG INS PROGRAMM (J/N) ?"......A$:.A$."
".29......A$."N".190.L....A$.."J".29...#
..". MENUEERKLAERUNG"...(..".E
INTRAGEN = EINGABE DER DATEN (VORNAME,".
Q.*..". NACHNAME,STRASSE,ORT,T
ELEFON).".{.,..".BLAETTERN = KARTEI DURC
HBLAETTERN......." (VORWAERTS
ODER RUECKWAERTS)"...0..".LOESCHEN = E
INZELLOESCHUNG VON ADRESSEN"...2..".
NACH EINGABE DER ADRESSEN NR".;.
4..".AENDERN = AENDERN DER ADRESSE. NA
CH".G.6.." EINGABE DER ADRESS
EN NR."...8..".SUCHEN = DURCHSUCHEN D
ER KARTEI. EIN-".F.:..". GABE
WAHLWEISE (NACHNAME,"...<.."
VORNAME,ORT,STRASSE,TELEFON)". .>.."
. LEERTASRE DRUECKEN .".2.@..A$
:.A$."".64.B.B..A$.." ".64.S.D..".DATEI
LOESCHEN = LOESCHEN ALLER DATEN"...F.
."BESTIMMTE ADRESSE = EINGABE ADRESSEN N
R.".S.G..". = AUSGABE D
ER ADRESSE"...H..".DATEN ABSPEICHERN = S
PEICHERN DER DATEN".1.N.."
WAHLWEISE AUF CAS.".[.P.."
ODER DISKETTE."...R..".PROGR
AMM BEENDEN = LOESCHT DAS GESAMTE"...T.
." IM SPEICHER BEFIND
-"...V.." LICHE PROGR
AMM"...X..".DATEN AUSDRUCKEN = AUSDRUCK
EINER LISTE".D.Z..".
MIT ALLEN ADRESSEN".Q.\..".DATEN LADEN
= LADEN DER DATEN "...^.."
WAHLWEISE AUF CAS.".H.`.."
ODER DISKETTE"...B..".
. F1 = MENUEERKLAERUNG . "...D
..". . F3 = PROGRAMMSTART .".
2.F..A$:.A$."".102.D.H..A$.G(133).35.X.J
..A$..G(134).102.Q.... *****************
*...... * PROGRAMM START *...B.. * AUSW
AHLMENUE *...D.. ******************.F.H
..:T.1...R..53281,1:.53280,1......A$(500
,5):AD.500.(...Z.0:."..*****************
MENUE ****************".W....".. 1--EIN
TRAGEN 6--DATEI LOESCHEN"......".
2--BLAETTERN 7--BESTIMMTE ADRESSE"
......" 3--LOESCHEN 8--DATEN ABSP
EICHERN"......" 4--AENDERN E--PR
OGRAMM BEENDEN"..."..". 5--SUCHEN
D--DATEN AUSDRUCKEN".E.,..".
L--DATEN LADEN...".W.6.."****
************************************..".
..@.." BITTE WAEHLEN SIE "...J.
." .....................".S.T..D$
:.D$."".340...^.A.E(D$):.A.18.340...C..D
$."E"..".":....D..D$."L".1330...E..D$."D
".2200.H.H..A.370,550,710,810,910,2040,2
090,1550.D.J.. *********************...L
.. * ADRESSEN EINGEBEN *...N.. *********
************...R.T.0...|.T.T.1......T.50
0.1740......A$(T,1).A$(T,2).A$(T,3).A$(T
,4).A$(T,4)..""..380......".............
......... 0=MENUE".N...."....
........... ADRESSE NR.."T.O...."...
. VORNAME :. ";A$(T,1)...B..A$(T,1)."0"
.A$(T,1)."":.230...L..".. NACHNAME :. ";
A$(T,2).N.V..".. STRASSE :. ";A$(T,3)..
....".. ORT :. ";A$(T,4)......".. T
ELEFON :. ";A$(T,5).I...."... . EIN
GABEN O.K. . .(J/N). J...";A$:.T.HS.HS.
T.U....H(A$,1).."J"..G.1.5:A$(T,G)."":.G
:.410......G$."B".G$."":.......380......
***********************.N. .. * BLAETTE
RN IN KARTEI *...".. *******************
****...&.I.1.$.0..".
. ADRESSE NR.."I".Z.:..".............
..... . 0 . = MENUE":..|.D..
" .LEERTASTE . = VOR":.. .N.."
.CURSOR-DOWN. = ZURUECK".L.P..".
. F1 . = EINZELAUSDRUCK"...X..".....
";A$(I,1)...]..". "A$(I,2)...B..". "
A$(I,3)...L..". "A$(I,4).+.V..". "A$(I
,5).?....G$."B".G$."":..R....A$:.A$."".6
60.B....A$."0".230.}....A$.".".I.1.I.I.1
:.560......A$." ".I.AD.I.I.1:.560......A
$.G(133).2300......660.Z.... ***********
******************...... * ADRESSEN EINZ
ELN LOESCHEN *.".B.. *******************
**********.N.F.A.0:.".AUF WELCHER SEITE
STEHT DIE ZU .LOESCHENDE ADRESS
E :..".U.K..A......A.500.A.1.710......".
. ADRESSE NR.."A.J
...I.A:G$."B":.600......".... LOESCHEN (
J/N) J...";A$......A$.."J"..230......Y.
1.5:A$(A,Y)."":.Y:Y.0.R. ..". . ADRESSE
GELOESCHT .":.Y.1.1000:.Y:Y.0:.230.M."..
********************...$.. * ADRESSEN A
ENDERN *...&.. ********************...*.
.".AUF WELCHER SEITE STEHT DIE ZU
.AENDERNDE ADRESSE .."...H..Y:I.Y:.Y.
500.Y.1..810.D.R.G$."B":.".
. ADRESSE NR.."I:.600:I.0.G.\
..".... AENDERN (J/N) J...";A$.Y.F..A$.
."J"..230...P..T.1.5:A$(Y,T)."":.:T.Y:G$
."B":.".":.420...Z.."...........
ADRESSE GEAENDERT !!":.T.1.1000:.T:.23
0...|.. ***********************.%.~.. *
SUCHEN VON ADRESSEN *.C.... ************
***********......"... SIE KOENNEN EIN BE
LIEBIGES SUCHWORT EINGEBEN..."......
" ";S$:Z.C(S$):.T.1.HS.P.J.."..........
DATEI WIRD DURCHSUCHT !!"...T..U.
1.5:.Y.1.C(A$(T,U))......J(A$(T,U),Y,Z).
S$..1050......Y:.U......T.#....1110.W...
G$."B":.". . ADRESSE NR.."T;:.".":I.T:.
600:I.0.X.$.."... .F1=WEITER / 0=MENUE."
......A$:.A$."".1070...8..A$."0".U.0:T.0
:Y.0:.230...B..A$..G(133).1070.O.L..T..H
S..1030...V..".......... DATEI
DURCHSUCHT !!"...`..U.1.1300:.U:U.0:.230
.;.*.. ****************************.^.,.
. * DATEN LADEN VON DISKETTE *...... *
ODER CASSETTE *...0.. ********
********************.L.2.."... VON TA
PE=1. ODER DISK=2 ?"...F..L$:.L$."".1350
...P..L$."1".1390...Z..L$."2".1890...D..
3,A$(I,5).R.N.."... CASSETTE EINLEGEN UN
D AN DIE RICHTIGE STELLE SPULEN".W.X..
"... WENN O.K. '*' DRUECKEN"......A$:
.A$.."*".1410......"...........":.1,1,0.
F....Q.1.500:.R.1.5:.1,A$(Q,R)......A$(Q
,R)."@".A$(Q,R)."":.1510......A$(Q,R).".
".A$(Q,R).""...H..R:.Q..... 1.?...."....
..... DATEN GELADEN !!".Z...HS.Q
:.Q.1.1000:.Q:.230.Z.... ***************
**********.....REN . DATEN .PEICHERN AUF
....... * DISKETTE ODER CASSETTE*.Z....
*************************.. ..."....
AUF TAPE=1 ODER DISK=2".. "..SP$:.SP$."
".1570.( ,..SP$."1".1600.: 6..SP$."2".17
60.| @.."... CASSETTE EINLEGEN UND AN D
IE RICHTIGE STELLE SPULEN".. J.."..
WENN O.K. '*' DRUECKEN !".. T..A$:.A$.
."*".1620.S ^.."...........":.1,1,1.. H.
.Q.1.HS:.R.1.5..!|..A$(Q,R)."".A$(Q,R)."
."..!...1,A$(Q,R)..!...R:.Q.&!...1,"@".-
!.. 1.L!..."......... DATEN ABGESPE
ICHERT !!":.Q.1.1000:.Q:.230..!L..".....
.... NUR 500 ADRESSEN":.T.1.2000:.T:.2
30.Q!..."..... DATEN AUF DISKETTE ABS
PEICHERN"..!...".. DISKETTE EINLEGEN.
..".."..." FILENAME :";DN$.2"..."....
.......":.1,8,1,DN$.",S,W".E"...Q.1.HS:.
R.1.5.A"...A$(Q,R)."".A$(Q,R).".".P"&..1
,A$(Q,R).Z"0..R:.Q.."D..1,"@".."N. 1.N"X
.."........... DATEN ABGESPEICHERT
!!":.T.1.1000:.T:.230..#B..".. DATEN VO
N DISKETTE. DISKETTE MIT DATEN. EINLEGE
N...".$#V.." FILENAME :";DN$.I#...".....
......":.1,8,0,DN$.",S,R".]#...Q.1.500:.
R.1.5.L#...1,A$(Q,R)..#...A$(Q,R)."@".A$
(Q,R)."":.2010..#...A$(Q,R).".".A$(Q,R).
""..#...R:.Q..#Z. 1..#..."...........
DATEN GELADEN !!"..$..HS.Q:.T.1.10
00:.T:.230.$$... ***********************
****.F$... * LOESCHEN ALLER ADRESSEN *.H
$... ***************************..$...".
..... SOLLEN DIE GANZEN ADRESSEN GELOESC
HT .WERDEN (J/N) ".C$...A$:.A$."".2
050.S$...A$."J".200..$...A$."N".230..$ .
.2040..%".. ***********************.)%$.
. * ADRESSEN NR. SUCHEN *.G%&.. ********
***************.M%*.."...... WELCHE ADR
ESSEN NR. ";I..%4..I.500.I.1..".":.2090.
.%>..".. ADRESSE NR.."I:G$."B":.600.F%H.
."... .0 DRUECKEN.".Z%R..A$:.A$."".21
30..%\..230..&F.. **********************
*..&P.. ** AUSGABE DER DATEN **.=&Z.. **
AUF DEN DRUCKER **.[&... ************
***********.O&...".":.2500:.3,4..&...Q.1
.HS:.R.1.5..&...3,A$(Q,R)..&...R:.3:.Q:
3..&Y.."........... DATEN SIND AUSGE
DRUCKT !!":.I.1.2000:.I..&...230..'... *
**************************.,'... * ADRES
SEN EINZELAUSDRUCK *.N'... *************
**************.\'...".":.3,4.K'$..3,A$(I
,1).Z'...3,A$(I,2)..'8..3,A$(I,3)..'B..3
,A$(I,4)..'V..3: 3:.230.G'D.. **********
***************..'N.. ** UBERPRUEFUNG OB
DER **..(X.. ** DRUCKER **.
'(... ** EINGESCHALTET IST **.G(... **
***********************.](...".":.3,4:.7
68,61.G(...3: 3.T(...768,139..(...ST...1
28.ST...125.2590.C(..."........ DRUC
KER NICHT EINGESCHALTET !!"..(...".
BITTE EINSCHALTEN !!"..(...I.1.200:
.I..)...CL$:.2500..)......
> CLICK IMAGE PREVIEW FOR FULL MODAL