ADRESSEN00
FILE INFORMATION
FILENAME(S): ADRESSEN00
FILE TYPE(S): PRG
FILE SIZE: 5.5K
FIRST SEEN: 2025-12-02 23:23:07
APPEARS ON: 1 disk(s)
FILE HASH
a901678dbd5d3130a32b74f46d690b772d5a0d07ab48d73857827d71ada5eb41
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| A | ADRESSEN00 | PRG | swasti, dinkel | 32 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 25 08 0A 00 8F 20 2A 2A 41 44 52 45 53 53 |..%.... **ADRESS| 00000010: 56 45 52 57 41 4C 54 55 4E 47 53 50 52 4F 47 52 |VERWALTUNGSPROGR| 00000020: 41 4D 4D 2A 2A 00 58 08 0F 00 58 B2 35 30 30 3A |AMM**.X...X.500:| 00000030: 86 4E 24 28 58 29 2C 41 24 28 58 29 2C 43 24 28 |.N$(X),A$(X),C$(| 00000040: 58 29 2C 53 24 28 58 29 2C 5A 24 28 58 29 2C 50 |X),S$(X),Z$(X),P| 00000050: 24 28 58 29 3A 4E B2 30 00 73 08 14 00 97 35 33 |$(X):N.0.s....53| 00000060: 32 38 30 2C 39 3A 8F 20 52 41 48 4D 45 4E 46 41 |280,9:. RAHMENFA| 00000070: 52 42 45 00 93 08 1E 00 97 35 33 32 38 31 2C 30 |RBE......53281,0| 00000080: 3A 8F 20 48 49 4E 54 45 52 47 52 55 4E 44 46 41 |:. HINTERGRUNDFA| 00000090: 52 42 45 00 9D 08 32 00 99 C7 28 38 29 00 B8 08 |RBE...2...(8)...| 000000A0: 3C 00 99 22 93 05 12 41 44 52 45 53 53 56 45 52 |<.."...ADRESSVER| 000000B0: 57 41 4C 54 55 4E 47 22 00 CE 08 46 00 99 3A 99 |WALTUNG"...F..:.| 000000C0: 22 12 46 31 92 20 20 20 45 4E 54 45 52 22 00 E1 |".F1. ENTER"..| 000000D0: 08 50 00 99 22 12 46 33 92 20 20 20 52 45 41 44 |.P..".F3. READ| 000000E0: 22 00 F5 08 5A 00 99 22 12 46 35 92 20 20 20 50 |"...Z..".F5. P| 000000F0: 52 49 4E 54 22 00 09 09 64 00 99 22 12 46 37 92 |RINT"...d..".F7.| 00000100: 20 20 20 45 52 41 53 45 22 00 1E 09 6E 00 99 3A | ERASE"...n..:| 00000110: 99 22 12 46 32 92 20 20 20 4C 4F 41 44 22 00 31 |.".F2. LOAD".1| 00000120: 09 78 00 99 22 12 46 34 92 20 20 20 53 41 56 45 |.x..".F4. SAVE| 00000130: 22 00 46 09 82 00 99 22 12 46 36 92 20 20 20 43 |".F....".F6. C| 00000140: 48 41 4E 47 45 22 00 59 09 8C 00 A1 43 24 3A 8B |HANGE".Y....C$:.| 00000150: 43 24 B2 22 22 A7 31 34 30 00 6C 09 96 00 8B 43 |C$."".140.l....C| 00000160: 24 B2 22 85 22 A7 8D 31 30 30 30 30 00 7F 09 A0 |$."."..10000....| 00000170: 00 8B 43 24 B2 22 86 22 A7 8D 31 31 30 30 30 00 |..C$."."..11000.| 00000180: 92 09 AA 00 8B 43 24 B2 22 87 22 A7 8D 31 32 30 |.....C$."."..120| 00000190: 30 30 00 A5 09 B4 00 8B 43 24 B2 22 88 22 A7 8D |00......C$."."..| 000001A0: 31 33 30 30 30 00 B8 09 BE 00 8B 43 24 B2 22 89 |13000......C$.".| 000001B0: 22 A7 8D 31 34 30 30 30 00 CB 09 C8 00 8B 43 24 |"..14000......C$| 000001C0: B2 22 8A 22 A7 8D 31 35 30 30 30 00 DE 09 D2 00 |."."..15000.....| 000001D0: 8B 43 24 B2 22 8B 22 A7 8D 31 36 30 30 30 00 E6 |.C$."."..16000..| 000001E0: 09 DC 00 89 36 30 00 FB 09 47 06 8B 43 24 B2 22 |....60...G..C$."| 000001F0: 28 46 31 29 22 A7 31 36 30 31 30 00 12 0A 10 27 |(F1)".16010....'| 00000200: 8F 20 20 20 20 20 20 2A 2A 20 45 4E 54 45 52 20 |. ** ENTER | 00000210: 2A 2A 00 20 0A 12 27 8B 4E B1 B2 58 AB 31 A7 8E |**. ..'.N..X.1..| 00000220: 00 36 0A 14 27 99 22 93 12 46 31 92 20 20 20 57 |.6..'."..F1. W| 00000230: 45 49 54 45 52 22 00 4F 0A 15 27 99 22 12 46 38 |EITER".O..'.".F8| 00000240: 92 20 20 20 48 41 55 50 54 4D 45 4E 55 45 22 00 |. HAUPTMENUE".| 00000250: 64 0A 16 27 A1 43 24 3A 8B 43 24 B2 22 22 A7 31 |d..'.C$:.C$."".1| 00000260: 30 30 30 36 00 76 0A 17 27 8B 43 24 B2 22 85 22 |0006.v..'.C$."."| 00000270: A7 31 30 30 31 30 00 84 0A 18 27 8B 43 24 B2 22 |.10010....'.C$."| 00000280: 8C 22 A7 8E 00 8F 0A 19 27 89 31 30 30 30 30 00 |."......'.10000.| 00000290: 99 0A 1A 27 4E B2 4E AA 31 00 BA 0A 24 27 99 22 |...'N.N.1...$'."| 000002A0: 93 12 4E 41 4D 45 4E 2F 41 44 52 45 53 53 45 4E |..NAMEN/ADRESSEN| 000002B0: 20 45 49 4E 47 45 42 45 4E 22 00 DA 0A 2E 27 99 | EINGEBEN"....'.| 000002C0: 22 41 44 52 45 53 53 2D 4E 52 2E 20 23 22 3B 4E |"ADRESS-NR. #";N| 000002D0: 3B 22 56 4F 4E 22 3B 58 AB 31 00 EC 0A 38 27 85 |;"VON";X.1...8'.| 000002E0: 22 4E 41 4D 45 22 3B 4E 24 28 4E 29 00 01 0B 42 |"NAME";N$(N)...B| 000002F0: 27 85 22 41 44 52 45 53 53 45 22 3B 41 24 28 4E |'."ADRESSE";A$(N| 00000300: 29 00 14 0B 4C 27 85 22 53 54 41 44 54 22 3B 43 |)...L'."STADT";C| 00000310: 24 28 4E 29 00 26 0B 56 27 85 22 4C 41 4E 44 22 |$(N).&.V'."LAND"| 00000320: 3B 53 24 28 4E 29 00 3D 0B 60 27 85 22 41 4E 4D |;S$(N).=.`'."ANM| 00000330: 45 52 4B 55 4E 47 22 3B 5A 24 28 4E 29 00 58 0B |ERKUNG";Z$(N).X.| 00000340: 6A 27 85 22 54 45 4C 45 46 4F 4E 4E 55 4D 4D 45 |j'."TELEFONNUMME| 00000350: 52 22 3B 50 24 28 4E 29 00 79 0B 74 27 99 3A 99 |R";P$(N).y.t'.:.| 00000360: 22 12 57 45 49 54 45 52 45 20 41 44 52 45 53 53 |".WEITERE ADRESS| 00000370: 45 20 20 28 4A 2F 4E 29 22 00 8E 0B 7E 27 A1 43 |E (J/N)"...~'.C| 00000380: 24 3A 8B 43 24 B2 22 22 A7 31 30 31 31 30 00 9C |$:.C$."".10110..| 00000390: 0B 83 27 8B 4E B1 B2 58 AB 31 A7 8E 00 AF 0B 88 |..'.N..X.1......| 000003A0: 27 8B 43 24 B2 22 4A 22 A7 89 31 30 30 31 30 00 |'.C$."J"..10010.| 000003B0: BD 0B 92 27 8B 43 24 B2 22 4E 22 A7 8E 00 C8 0B |...'.C$."N".....| 000003C0: 9C 27 89 31 30 31 31 30 00 DD 0B F8 2A 8F 20 20 |.'.10110....*. | 000003D0: 20 2A 2A 20 20 52 45 41 44 20 20 2A 2A 00 E8 0B | ** READ **...| 000003E0: FD 2A 8B 4E B2 30 A7 8E 00 0A 0C 02 2B 99 22 93 |.*.N.0......+.".| 000003F0: 12 4C 45 53 45 4E 20 56 4F 4E 20 4E 41 4D 45 4E |.LESEN VON NAMEN| 00000400: 2F 41 44 52 45 53 53 45 4E 22 00 10 0C 0C 2B 99 |/ADRESSEN"....+.| 00000410: 00 2F 0C 16 2B 99 22 12 46 31 92 53 45 41 4D 54 |./..+.".F1.SEAMT| 00000420: 4C 49 43 48 45 20 41 44 52 45 53 53 45 4E 22 00 |LICHE ADRESSEN".| 00000430: 4E 0C 20 2B 99 22 12 46 33 92 53 55 43 48 45 4E |N. +.".F3.SUCHEN| 00000440: 20 56 4F 4E 20 41 44 52 45 53 53 45 4E 22 00 63 | VON ADRESSEN".c| 00000450: 0C 2A 2B A1 43 24 3A 8B 43 24 B2 22 22 A7 31 31 |.*+.C$:.C$."".11| 00000460: 30 35 30 00 75 0C 34 2B 8B 43 24 B2 22 85 22 A7 |050.u.4+.C$.".".| 00000470: 31 31 30 39 30 00 87 0C 3E 2B 8B 43 24 B2 22 86 |11090...>+.C$.".| 00000480: 22 A7 31 31 32 32 30 00 92 0C 48 2B 89 31 31 30 |".11220...H+.110| 00000490: 30 30 00 9D 0C 52 2B 81 49 B2 31 A4 4E 00 BB 0C |00...R+.I.1.N...| 000004A0: 5C 2B 99 22 93 41 44 52 45 53 53 2D 4E 52 2E 20 |\+.".ADRESS-NR. | 000004B0: 23 22 3B 49 22 56 4F 4E 22 3B 4E 00 D7 0C 66 2B |#";I"VON";N...f+| 000004C0: 99 22 4E 41 4D 45 3A 20 20 20 20 20 20 20 20 20 |."NAME: | 000004D0: 22 3B 4E 24 28 49 29 00 F3 0C 70 2B 99 22 41 44 |";N$(I)...p+."AD| 000004E0: 52 45 53 53 45 3A 20 20 20 20 20 20 22 3B 41 24 |RESSE: ";A$| 000004F0: 28 49 29 00 0F 0D 7A 2B 99 22 53 54 41 44 54 3A |(I)...z+."STADT:| 00000500: 20 20 20 20 20 20 20 20 22 3B 43 24 28 49 29 00 | ";C$(I).| 00000510: 2B 0D 84 2B 99 22 4C 41 4E 44 3A 20 20 20 20 20 |+..+."LAND: | 00000520: 20 20 20 20 22 3B 53 24 28 49 29 00 47 0D 8E 2B | ";S$(I).G..+| 00000530: 99 22 41 4E 4D 45 52 4B 55 4E 47 3A 20 20 20 20 |."ANMERKUNG: | 00000540: 22 3B 5A 24 28 49 29 00 63 0D 98 2B 99 22 54 45 |";Z$(I).c..+."TE| 00000550: 4C 45 46 4F 4E 4E 55 4D 4D 45 52 20 22 3B 50 24 |LEFONNUMMER ";P$| 00000560: 28 49 29 00 9B 0D A2 2B 99 3A 99 22 12 44 52 55 |(I)....+.:.".DRU| 00000570: 45 43 4B 45 4E 20 53 49 45 20 49 52 47 45 4E 44 |ECKEN SIE IRGEND| 00000580: 45 49 4E 45 20 54 41 53 54 45 20 55 4D 20 46 4F |EINE TASTE UM FO| 00000590: 52 54 5A 55 46 41 48 52 45 4E 22 00 B0 0D AC 2B |RTZUFAHREN"....+| 000005A0: A1 43 24 3A 8B 43 24 B2 22 22 A7 31 31 31 38 30 |.C$:.C$."".11180| 000005B0: 00 B7 0D C0 2B 82 49 00 BD 0D CA 2B 8E 00 F1 0D |....+.I....+....| 000005C0: D4 2B 85 22 93 57 45 4C 43 48 45 52 20 20 20 4E |.+.".WELCHER N| 000005D0: 41 4D 45 20 20 20 20 20 53 4F 4C 4C 20 47 45 53 |AME SOLL GES| 000005E0: 55 43 48 54 20 20 57 45 52 44 45 4E 21 22 3B 54 |UCHT WERDEN!";T| 000005F0: 24 00 FC 0D DE 2B 81 49 B2 31 A4 4E 00 11 0E E8 |$....+.I.1.N....| 00000600: 2B 8B 4E 24 28 49 29 B2 54 24 A7 89 31 31 32 39 |+.N$(I).T$..1129| 00000610: 30 00 18 0E F2 2B 82 49 00 44 0E FC 2B 99 3A 99 |0....+.I.D..+.:.| 00000620: 22 12 4E 41 4D 45 20 4E 49 43 48 54 20 49 4E 20 |".NAME NICHT IN | 00000630: 44 45 52 20 44 41 54 45 49 20 56 4F 52 48 41 4E |DER DATEI VORHAN| 00000640: 44 45 4E 22 00 84 0E 06 2C 99 3A 99 22 49 52 47 |DEN"....,.:."IRG| 00000650: 45 4E 44 20 45 49 4E 45 20 54 41 53 54 45 20 44 |END EINE TASTE D| 00000660: 52 55 45 43 4B 45 4E 2C 55 4D 20 5A 55 4D 20 48 |RUECKEN,UM ZUM H| 00000670: 41 55 50 54 4D 45 4E 55 45 20 5A 55 20 4B 4F 4D |AUPTMENUE ZU KOM| 00000680: 4D 45 4E 22 00 99 0E 10 2C A1 43 24 3A 8B 43 24 |MEN"....,.C$:.C$| 00000690: B2 22 22 A7 31 31 32 38 30 00 9F 0E 15 2C 8E 00 |."".11280....,..| 000006A0: BE 0E 1A 2C 99 22 93 41 44 52 45 53 53 2D 4E 52 |...,.".ADRESS-NR| 000006B0: 2E 20 23 22 3B 49 3B 22 56 4F 4E 22 3B 49 00 DB |. #";I;"VON";I..| 000006C0: 0E 24 2C 99 22 4E 41 4D 45 3A 20 20 20 20 20 20 |.$,."NAME: | 000006D0: 20 20 20 20 22 3B 4E 24 28 49 29 00 F8 0E 2E 2C | ";N$(I)....,| 000006E0: 99 22 41 44 52 45 53 53 45 3A 20 20 20 20 20 20 |."ADRESSE: | 000006F0: 20 22 3B 41 24 28 49 29 00 15 0F 38 2C 99 22 53 | ";A$(I)...8,."S| 00000700: 54 41 44 54 3A 20 20 20 20 20 20 20 20 20 22 3B |TADT: ";| 00000710: 43 24 28 49 29 00 32 0F 42 2C 99 22 4C 41 4E 44 |C$(I).2.B,."LAND| 00000720: 3A 20 20 20 20 20 20 20 20 20 20 22 3B 53 24 28 |: ";S$(| 00000730: 49 29 00 4F 0F 4C 2C 99 22 41 4E 4D 45 52 4B 55 |I).O.L,."ANMERKU| 00000740: 4E 47 3A 20 20 20 20 20 22 3B 5A 24 28 49 29 00 |NG: ";Z$(I).| 00000750: 6C 0F 56 2C 99 22 54 45 4C 45 46 4F 4E 4E 55 4D |l.V,."TELEFONNUM| 00000760: 4D 45 52 3A 20 22 3B 50 24 28 49 29 00 AD 0F 60 |MER: ";P$(I)...`| 00000770: 2C 99 3A 99 22 12 49 52 47 45 4E 44 20 45 49 4E |,.:.".IRGEND EIN| 00000780: 45 20 54 41 53 54 45 20 44 52 55 45 43 4B 45 4E |E TASTE DRUECKEN| 00000790: 2C 55 4D 20 5A 55 4D 20 48 41 55 50 54 4D 45 4E |,UM ZUM HAUPTMEN| 000007A0: 55 45 20 5A 55 20 4B 4F 4D 4D 45 4E 22 00 C2 0F |UE ZU KOMMEN"...| 000007B0: 6A 2C A1 43 24 3A 8B 43 24 B2 22 22 A7 31 31 33 |j,.C$:.C$."".113| 000007C0: 37 30 00 C8 0F 74 2C 8E 00 DF 0F E0 2E 8F 20 20 |70...t,....... | 000007D0: 20 20 2A 2A 20 20 50 52 49 4E 54 20 20 2A 2A 00 | ** PRINT **.| 000007E0: F3 0F E4 2E 99 22 93 12 46 31 92 20 57 45 49 54 |....."..F1. WEIT| 000007F0: 45 52 22 00 0A 10 E5 2E 99 22 12 46 38 92 20 48 |ER"......".F8. H| 00000800: 41 55 50 54 4D 45 4E 55 45 22 00 1F 10 E6 2E A1 |AUPTMENUE"......| 00000810: 43 24 3A 8B 43 24 B2 22 22 A7 31 32 30 30 36 00 |C$:.C$."".12006.| 00000820: 31 10 E7 2E 8B 43 24 B2 22 85 22 A7 31 32 30 31 |1....C$.".".1201| 00000830: 30 00 3F 10 E8 2E 8B 43 24 B2 22 8C 22 A7 8E 00 |0.?....C$."."...| 00000840: 4A 10 E9 2E 89 31 32 30 30 30 00 5C 10 EA 2E 99 |J....12000.\....| 00000850: 22 93 12 41 55 53 44 52 55 43 4B 22 00 67 10 F4 |"..AUSDRUCK".g..| 00000860: 2E 9F 31 2C 34 2C 34 00 72 10 FE 2E 81 49 B2 31 |..1,4,4.r....I.1| 00000870: A4 4E 00 80 10 08 2F 99 23 31 2C 4E 24 28 49 29 |.N..../.#1,N$(I)| 00000880: 00 8E 10 12 2F 99 23 31 2C 41 24 28 49 29 00 9C |..../.#1,A$(I)..| 00000890: 10 1C 2F 99 23 31 2C 43 24 28 49 29 00 AA 10 26 |../.#1,C$(I)...&| 000008A0: 2F 99 22 31 2C 53 24 28 49 29 00 B8 10 30 2F 99 |/."1,S$(I)...0/.| 000008B0: 23 31 2C 5A 24 28 49 29 00 C6 10 3A 2F 99 22 31 |#1,Z$(I)...:/."1| 000008C0: 2C 50 24 28 49 29 00 D7 10 44 2F 99 22 31 2C 43 |,P$(I)...D/."1,C| 000008D0: 48 52 24 28 31 33 29 00 DE 10 4E 2F 82 49 00 E5 |HR$(13)...N/.I..| 000008E0: 10 58 2F A0 31 00 EB 10 62 2F 8E 00 06 11 C8 32 |.X/.1...b/.....2| 000008F0: 8F 20 20 20 20 2A 2A 2A 20 20 20 45 52 41 53 45 |. *** ERASE| 00000900: 20 20 20 2A 2A 2A 00 12 11 CA 32 8B 4E B2 30 A7 | ***....2.N.0.| 00000910: 20 8E 00 26 11 CC 32 99 22 93 12 46 31 92 20 57 | ..&..2."..F1. W| 00000920: 45 49 54 45 52 22 00 3D 11 CD 32 99 22 12 46 38 |EITER".=..2.".F8| 00000930: 92 20 48 41 55 50 54 4D 45 4E 55 45 22 00 52 11 |. HAUPTMENUE".R.| 00000940: CE 32 A1 43 24 3A 8B 43 24 B2 22 22 A7 31 33 30 |.2.C$:.C$."".130| 00000950: 30 36 00 64 11 CF 32 8B 43 24 B2 22 85 22 A7 31 |06.d..2.C$.".".1| 00000960: 33 30 31 30 00 72 11 D0 32 8B 43 24 B2 22 8C 22 |3010.r..2.C$."."| 00000970: A7 8E 00 7D 11 D1 32 89 31 33 30 30 30 00 A2 11 |...}..2.13000...| 00000980: D2 32 99 22 93 12 4C 4F 45 53 43 48 45 4E 20 56 |.2."..LOESCHEN V| 00000990: 4F 4E 20 4E 41 4D 45 4E 2F 41 44 52 45 53 53 45 |ON NAMEN/ADRESSE| 000009A0: 4E 22 00 BC 11 E6 32 99 22 12 46 31 92 20 41 4C |N"....2.".F1. AL| 000009B0: 4C 45 20 41 44 52 45 53 53 45 4E 22 00 DF 11 F0 |LE ADRESSEN"....| 000009C0: 32 99 22 12 46 33 92 20 45 49 4E 45 4E 20 42 45 |2.".F3. EINEN BE| 000009D0: 53 54 49 4D 4D 54 45 4E 20 4E 41 4D 45 4E 22 00 |STIMMTEN NAMEN".| 000009E0: F4 11 FA 32 A1 43 24 3A 8B 43 24 B2 22 22 A7 31 |...2.C$:.C$."".1| 000009F0: 33 30 35 30 00 06 12 04 33 8B 43 24 B2 22 85 22 |3050....3.C$."."| 00000A00: A7 31 33 30 39 30 00 18 12 0E 33 8B 43 24 B2 22 |.13090....3.C$."| 00000A10: 86 22 A7 31 33 32 33 30 00 23 12 18 33 89 31 33 |.".13230.#..3.13| 00000A20: 30 30 30 00 2E 12 22 33 81 49 B2 31 A4 4E 00 4D |000..."3.I.1.N.M| 00000A30: 12 2C 33 99 22 93 41 44 52 45 53 53 2D 4E 52 2E |.,3.".ADRESS-NR.| 00000A40: 20 23 22 3B 49 3B 22 56 4F 4E 22 3B 4E 00 69 12 | #";I;"VON";N.i.| 00000A50: 36 33 99 22 4E 41 4D 45 3A 20 20 20 20 20 20 20 |63."NAME: | 00000A60: 20 20 22 3B 4E 24 28 49 29 00 85 12 40 33 99 22 | ";N$(I)...@3."| 00000A70: 41 44 52 45 53 53 45 3A 20 20 20 20 20 20 22 3B |ADRESSE: ";| 00000A80: 41 24 28 49 29 00 A1 12 4A 33 99 22 53 54 41 44 |A$(I)...J3."STAD| 00000A90: 54 3A 20 20 20 20 20 20 20 20 22 3B 43 24 28 49 |T: ";C$(I| 00000AA0: 29 00 BD 12 54 33 99 22 4C 41 4E 44 3A 20 20 20 |)...T3."LAND: | 00000AB0: 20 20 20 20 20 20 22 3B 53 24 28 49 29 00 D9 12 | ";S$(I)...| 00000AC0: 5E 33 99 22 41 4E 4D 45 52 4B 55 4E 47 3A 20 20 |^3."ANMERKUNG: | 00000AD0: 20 20 22 3B 5A 24 28 49 29 00 F5 12 68 33 99 22 | ";Z$(I)...h3."| 00000AE0: 54 45 4C 45 46 4F 4E 4E 55 4D 4D 45 52 3A 22 3B |TELEFONNUMMER:";| 00000AF0: 50 24 28 49 29 00 0A 13 72 33 99 3A 99 22 12 46 |P$(I)...r3.:.".F| 00000B00: 31 92 20 57 45 49 54 45 52 22 00 21 13 7C 33 99 |1. WEITER".!.|3.| 00000B10: 3A 99 22 12 46 38 92 20 4C 4F 45 53 43 48 45 4E |:.".F8. LOESCHEN| 00000B20: 22 00 36 13 86 33 A1 43 24 3A 8B 43 24 B2 22 22 |".6..3.C$:.C$.""| 00000B30: A7 31 33 31 39 30 00 49 13 90 33 8B 43 24 B2 22 |.13190.I..3.C$."| 00000B40: 85 22 A7 89 31 33 32 32 35 00 63 13 9A 33 8B 43 |."..13225.c..3.C| 00000B50: 24 B2 22 8C 22 A7 8D 31 33 38 30 30 3A 89 31 33 |$."."..13800:.13| 00000B60: 32 32 34 00 6E 13 A4 33 89 31 33 31 39 30 00 7E |224.n..3.13190.~| 00000B70: 13 A8 33 4E B2 4E AB 31 3A 49 B2 49 AB 31 00 85 |..3N.N.1:I.I.1..| 00000B80: 13 A9 33 82 49 00 8B 13 AA 33 8E 00 B8 13 AE 33 |..3.I....3.....3| 00000B90: 85 22 93 20 57 45 4C 43 48 45 52 20 4E 41 4D 45 |.". WELCHER NAME| 00000BA0: 20 53 4F 4C 4C 20 47 45 53 55 43 48 54 20 57 45 | SOLL GESUCHT WE| 00000BB0: 52 44 45 4E 22 3B 54 24 00 C3 13 B8 33 81 49 B2 |RDEN";T$....3.I.| 00000BC0: 31 A4 4E 00 E4 13 C2 33 8B 4E 24 28 49 29 B2 54 |1.N....3.N$(I).T| 00000BD0: 24 A7 8D 31 33 38 30 30 3A 4E B2 4E AB 31 3A 49 |$..13800:N.N.1:I| 00000BE0: B2 49 AB 31 00 EB 13 CC 33 82 49 00 F1 13 D1 33 |.I.1....3.I....3| 00000BF0: 8E 00 1D 14 D6 33 99 3A 99 22 12 4E 41 4D 45 20 |.....3.:.".NAME | 00000C00: 4E 49 43 48 54 20 49 4E 20 44 45 52 20 44 41 54 |NICHT IN DER DAT| 00000C10: 45 49 20 56 4F 52 48 41 4E 44 45 4E 22 00 5D 14 |EI VORHANDEN".].| 00000C20: E0 33 99 3A 99 22 49 52 47 45 4E 44 20 45 49 4E |.3.:."IRGEND EIN| 00000C30: 45 20 54 41 53 54 45 20 44 52 55 45 43 4B 45 4E |E TASTE DRUECKEN| 00000C40: 2C 55 4D 20 5A 55 4D 20 48 41 55 50 54 4D 45 4E |,UM ZUM HAUPTMEN| 00000C50: 55 45 20 5A 55 20 4B 4F 4D 4D 45 4E 22 00 72 14 |UE ZU KOMMEN".r.| 00000C60: EA 33 A1 43 24 3A 8B 43 24 B2 22 22 A7 31 31 32 |.3.C$:.C$."".112| 00000C70: 38 30 00 7D 14 E8 35 81 4B B2 49 A4 4E 00 8F 14 |80.}..5.K.I.N...| 00000C80: F2 35 4E 24 28 4B 29 B2 4E 24 28 4B AA 31 29 00 |.5N$(K).N$(K.1).| 00000C90: A1 14 FC 35 41 24 28 4B 29 B2 41 24 28 4B AA 31 |...5A$(K).A$(K.1| 00000CA0: 29 00 B3 14 06 36 43 24 28 4B 29 B2 43 24 28 4B |)....6C$(K).C$(K| 00000CB0: AA 31 29 00 C5 14 10 36 53 24 28 4B 29 B2 53 24 |.1)....6S$(K).S$| 00000CC0: 28 4B AA 31 29 00 D7 14 1A 36 5A 24 28 4B 29 B2 |(K.1)....6Z$(K).| 00000CD0: 5A 24 28 4B AA 31 29 00 E9 14 24 36 50 24 28 4B |Z$(K.1)...$6P$(K| 00000CE0: 29 B2 50 24 28 4B AA 31 29 00 F0 14 2E 36 82 4B |).P$(K.1)....6.K| 00000CF0: 00 F6 14 38 36 8E 00 0C 15 B0 36 8F 20 20 20 20 |...86.....6. | 00000D00: 20 2A 2A 20 4C 4F 41 44 20 20 2A 2A 00 20 15 B4 | ** LOAD **. ..| 00000D10: 36 99 22 93 12 46 31 92 20 57 45 49 54 45 52 22 |6."..F1. WEITER"| 00000D20: 00 37 15 B5 36 99 22 12 46 38 92 20 48 41 55 50 |.7..6.".F8. HAUP| 00000D30: 54 4D 45 4E 55 45 22 00 4C 15 B6 36 A1 43 24 3A |TMENUE".L..6.C$:| 00000D40: 8B 43 24 B2 22 22 A7 31 34 30 30 36 00 5E 15 B7 |.C$."".14006.^..| 00000D50: 36 8B 43 24 B2 22 85 22 A7 31 34 30 31 30 00 6C |6.C$.".".14010.l| 00000D60: 15 B8 36 8B 43 24 B2 22 8C 22 A7 8E 00 77 15 B9 |..6.C$."."...w..| 00000D70: 36 89 31 34 30 30 30 00 90 15 BA 36 99 22 93 12 |6.14000....6."..| 00000D80: 4C 41 44 45 4E 20 44 45 53 20 46 49 4C 45 53 22 |LADEN DES FILES"| 00000D90: 00 B1 15 C4 36 99 3A 99 22 12 46 31 92 20 4C 41 |....6.:.".F1. LA| 00000DA0: 44 45 4E 20 56 4F 4E 20 44 49 53 4B 45 54 54 45 |DEN VON DISKETTE| 00000DB0: 22 00 D1 15 CE 36 99 22 12 46 34 92 20 4C 41 44 |"....6.".F4. LAD| 00000DC0: 45 4E 20 56 4F 4E 20 44 41 54 41 53 45 54 54 45 |EN VON DATASETTE| 00000DD0: 22 00 E6 15 D8 36 A1 43 24 3A 8B 43 24 B2 22 22 |"....6.C$:.C$.""| 00000DE0: A7 31 34 30 34 30 00 F8 15 E2 36 8B 43 24 B2 22 |.14040....6.C$."| 00000DF0: 85 22 A7 31 34 31 30 30 00 0A 16 EC 36 8B 43 24 |.".14100....6.C$| 00000E00: B2 22 8A 22 A7 31 34 32 35 30 00 15 16 F6 36 89 |.".".14250....6.| 00000E10: 31 34 30 34 30 00 32 16 14 37 9F 31 2C 38 2C 33 |14040.2..7.1,8,3| 00000E20: 2C 22 30 3A 4D 41 49 4C 20 4C 49 53 54 2C 53 45 |,"0:MAIL LIST,SE| 00000E30: 51 22 00 3B 16 3C 37 84 31 2C 4E 00 46 16 46 37 |Q".;.<7.1,N.F.F7| 00000E40: 81 49 B2 31 A4 4E 00 53 16 50 37 84 31 2C 4E 24 |.I.1.N.S.P7.1,N$| 00000E50: 28 49 29 00 60 16 5A 37 84 31 2C 41 24 28 49 29 |(I).`.Z7.1,A$(I)| 00000E60: 00 6D 16 64 37 84 31 2C 43 24 28 49 29 00 7A 16 |.m.d7.1,C$(I).z.| 00000E70: 6E 37 84 31 2C 53 24 28 49 29 00 87 16 78 37 84 |n7.1,S$(I)...x7.| 00000E80: 31 2C 5A 24 28 49 29 00 94 16 82 37 84 31 2C 50 |1,Z$(I)....7.1,P| 00000E90: 24 28 49 29 00 9B 16 8C 37 82 49 00 A2 16 96 37 |$(I)....7.I....7| 00000EA0: A0 31 00 A8 16 A0 37 8E 00 BE 16 AA 37 9F 31 2C |.1....7.....7.1,| 00000EB0: 31 2C 31 22 4D 41 49 4C 20 4C 49 53 54 22 00 C9 |1,1"MAIL LIST"..| 00000EC0: 16 B4 37 89 31 34 31 34 30 00 E2 16 98 3A 8F 20 |..7.14140....:. | 00000ED0: 20 20 20 20 20 20 2A 2A 2A 20 53 41 56 45 20 2A | *** SAVE *| 00000EE0: 2A 2A 00 ED 16 9A 3A 8B 4E B2 30 A7 8E 00 01 17 |**....:.N.0.....| 00000EF0: 9C 3A 99 22 93 12 46 31 92 20 57 45 49 54 45 52 |.:."..F1. WEITER| 00000F00: 22 00 18 17 9D 3A 99 22 12 46 38 92 20 48 41 55 |"....:.".F8. HAU| 00000F10: 50 54 4D 45 4E 55 45 22 00 2D 17 9E 3A A1 43 24 |PTMENUE".-..:.C$| 00000F20: 3A 8B 43 24 B2 22 22 A7 31 35 30 30 36 00 3F 17 |:.C$."".15006.?.| 00000F30: 9F 3A 8B 43 24 B2 22 85 22 A7 31 35 30 31 30 00 |.:.C$.".".15010.| 00000F40: 4D 17 A0 3A 8B 43 24 B2 22 8C 22 A7 8E 00 58 17 |M..:.C$."."...X.| 00000F50: A1 3A 89 31 35 30 30 30 00 76 17 A2 3A 99 22 93 |.:.15000.v..:.".| 00000F60: 12 20 53 50 45 49 43 48 45 52 4E 20 44 45 53 20 |. SPEICHERN DES | 00000F70: 46 49 4C 45 53 22 00 9B 17 AC 3A 99 3A 99 22 12 |FILES"....:.:.".| 00000F80: 46 31 92 20 53 50 45 49 43 48 45 52 4E 20 41 55 |F1. SPEICHERN AU| 00000F90: 46 20 44 49 53 4B 45 54 54 45 22 00 BF 17 B6 3A |F DISKETTE"....:| 00000FA0: 99 22 12 46 34 92 20 53 50 45 49 43 48 45 52 4E |.".F4. SPEICHERN| 00000FB0: 20 41 55 46 20 44 41 54 41 53 45 54 54 45 22 00 | AUF DATASETTE".| 00000FC0: D4 17 C0 3A A1 43 24 3A 8B 43 24 B2 22 22 A7 31 |...:.C$:.C$."".1| 00000FD0: 35 30 34 30 00 E6 17 CA 3A 8B 43 24 B2 22 85 22 |5040....:.C$."."| 00000FE0: A7 31 35 31 30 30 00 F8 17 D4 3A 8B 43 24 B2 22 |.15100....:.C$."| 00000FF0: 8A 22 A7 31 35 32 35 30 00 03 18 DE 3A 89 31 35 |.".15250....:.15| 00001000: 30 34 30 00 0F 18 FC 3A 9F 31 2C 38 2C 31 35 00 |040....:.1,8,15.| 00001010: 25 18 06 3B 98 31 2C 22 53 38 3A 4D 41 49 4C 20 |%..;.1,"S8:MAIL | 00001020: 4C 49 53 54 22 00 2C 18 10 3B A0 31 00 4F 18 1A |LIST".,..;.1.O..| 00001030: 3B 9F 31 2C 38 2C 33 2C 22 30 3A 4D 41 49 4C 20 |;.1,8,3,"0:MAIL | 00001040: 4C 49 53 54 2C 53 45 51 2C 57 52 49 54 45 22 00 |LIST,SEQ,WRITE".| 00001050: 58 18 24 3B 98 31 2C 4E 00 63 18 2E 3B 81 49 B2 |X.$;.1,N.c..;.I.| 00001060: 31 A4 4E 00 70 18 38 3B 98 31 2C 4E 24 28 49 29 |1.N.p.8;.1,N$(I)| 00001070: 00 7D 18 42 3B 98 31 2C 41 24 28 49 29 00 8A 18 |.}.B;.1,A$(I)...| 00001080: 4C 3B 98 31 2C 43 24 28 49 29 00 97 18 56 3B 98 |L;.1,C$(I)...V;.| 00001090: 31 2C 53 24 28 49 29 00 A4 18 60 3B 98 31 2C 5A |1,S$(I)...`;.1,Z| 000010A0: 24 28 49 29 00 B1 18 6A 3B 98 31 2C 50 24 28 49 |$(I)...j;.1,P$(I| 000010B0: 29 00 B8 18 74 3B 82 49 00 BF 18 7E 3B A0 31 00 |)...t;.I...~;.1.| 000010C0: C5 18 88 3B 8E 00 DC 18 92 3B 9F 31 2C 31 2C 31 |...;.....;.1,1,1| 000010D0: 2C 22 4D 41 49 4C 20 4C 49 53 54 22 00 E7 18 9C |,"MAIL LIST"....| 000010E0: 3B 89 31 35 31 34 30 00 00 19 F0 3C 8F 20 20 20 |;.15140....<. | 000010F0: 20 20 20 20 2A 2A 20 43 48 41 4E 47 45 20 2A 2A | ** CHANGE **| 00001100: 00 1B 19 80 3E 8F 20 20 20 2A 2A 2A 20 20 20 43 |....>. *** C| 00001110: 48 41 4E 47 45 20 20 20 2A 2A 2A 00 26 19 82 3E |HANGE ***.&..>| 00001120: 8B 4E B2 30 A7 8E 00 3A 19 84 3E 99 22 93 12 46 |.N.0...:..>."..F| 00001130: 31 92 20 57 45 49 54 45 52 22 00 51 19 85 3E 99 |1. WEITER".Q..>.| 00001140: 22 12 46 38 92 20 48 41 55 50 54 4D 45 4E 55 45 |".F8. HAUPTMENUE| 00001150: 22 00 66 19 86 3E A1 43 24 3A 8B 43 24 B2 22 22 |".f..>.C$:.C$.""| 00001160: A7 31 36 30 30 36 00 78 19 87 3E 8B 43 24 B2 22 |.16006.x..>.C$."| 00001170: 85 22 A7 31 36 30 31 30 00 86 19 88 3E 8B 43 24 |.".16010....>.C$| 00001180: B2 22 8C 22 A7 8E 00 91 19 89 3E 89 31 36 30 30 |."."......>.1600| 00001190: 30 00 B0 19 8A 3E 99 22 93 12 41 45 4E 44 45 52 |0....>."..AENDER| 000011A0: 4E 20 45 49 4E 45 52 20 41 44 52 45 53 53 45 22 |N EINER ADRESSE"| 000011B0: 00 CC 19 94 3E 99 3A 99 22 12 46 31 92 20 41 4C |....>.:.".F1. AL| 000011C0: 4C 45 20 41 44 52 45 53 53 45 4E 22 00 F8 19 9E |LE ADRESSEN"....| 000011D0: 3E 99 22 12 46 33 92 20 41 45 4E 44 45 52 4E 20 |>.".F3. AENDERN | 000011E0: 45 49 4E 45 53 20 42 45 53 54 49 4D 4D 54 45 4E |EINES BESTIMMTEN| 000011F0: 20 4E 41 4D 45 4E 53 22 00 0D 1A A8 3E A1 43 24 | NAMENS"....>.C$| 00001200: 3A 8B 43 24 B2 22 22 A7 31 36 30 34 30 00 1F 1A |:.C$."".16040...| 00001210: B2 3E 8B 43 24 B2 22 85 22 A7 31 36 31 30 30 00 |.>.C$.".".16100.| 00001220: 31 1A BC 3E 8B 43 24 B2 22 86 22 A7 31 36 33 30 |1..>.C$.".".1630| 00001230: 30 00 3C 1A C6 3E 89 31 36 30 34 30 00 47 1A E4 |0.<..>.16040.G..| 00001240: 3E 81 49 B2 31 A4 4E 00 56 1A EE 3E 99 22 93 22 |>.I.1.N.V..>."."| 00001250: 3B 4E 24 28 49 29 00 61 1A F8 3E 99 41 24 28 49 |;N$(I).a..>.A$(I| 00001260: 29 00 6C 1A 02 3F 99 43 24 28 49 29 00 77 1A 0C |).l..?.C$(I).w..| 00001270: 3F 99 53 24 28 49 29 00 82 1A 16 3F 99 5A 24 28 |?.S$(I)....?.Z$(| 00001280: 49 29 00 8D 1A 20 3F 99 50 24 28 49 29 00 A2 1A |I)... ?.P$(I)...| 00001290: 2A 3F 99 3A 99 22 12 46 31 92 20 57 45 49 54 45 |*?.:.".F1. WEITE| 000012A0: 52 22 00 B6 1A 34 3F 99 22 12 46 33 92 20 41 45 |R"...4?.".F3. AE| 000012B0: 4E 44 45 52 4E 22 00 CB 1A 3E 3F A1 43 24 3A 8B |NDERN"...>?.C$:.| 000012C0: 43 24 B2 22 22 A7 31 36 31 39 30 00 DE 1A 48 3F |C$."".16190...H?| 000012D0: 8B 43 24 B2 22 85 22 A7 89 31 36 32 33 30 00 F8 |.C$."."..16230..| 000012E0: 1A 52 3F 8B 43 24 B2 22 86 22 A7 8D 31 36 38 30 |.R?.C$."."..1680| 000012F0: 30 3A 89 31 36 32 33 30 00 03 1B 5C 3F 89 31 36 |0:.16230...\?.16| 00001300: 31 39 30 00 0A 1B 66 3F 82 49 00 10 1B 70 3F 8E |190...f?.I...p?.| 00001310: 00 19 1B AC 3F 99 22 93 22 00 32 1B B6 3F 85 22 |....?.".".2..?."| 00001320: 4E 41 4D 45 4E 20 45 49 4E 47 45 42 45 4E 22 3B |NAMEN EINGEBEN";| 00001330: 4D 24 00 3D 1B C0 3F 81 49 B2 31 A4 4E 00 54 1B |M$.=..?.I.1.N.T.| 00001340: CA 3F 8B 4E 24 28 49 29 B2 4D 24 A7 8D 31 36 35 |.?.N$(I).M$..165| 00001350: 30 30 3A 8E 00 5B 1B D4 3F 82 49 00 85 1B DE 3F |00:..[..?.I....?| 00001360: 99 22 12 4E 41 4D 45 20 4E 49 43 48 54 20 49 4E |.".NAME NICHT IN| 00001370: 20 44 45 52 20 44 41 54 45 49 20 56 4F 52 48 41 | DER DATEI VORHA| 00001380: 4E 44 45 4E 22 00 C3 1B E8 3F 99 22 12 49 52 47 |NDEN"....?.".IRG| 00001390: 45 4E 44 45 49 4E 45 20 54 41 53 54 45 20 44 52 |ENDEINE TASTE DR| 000013A0: 55 45 43 4B 45 4E 2C 55 4D 20 5A 55 4D 20 48 41 |UECKEN,UM ZUM HA| 000013B0: 55 50 54 4D 45 4E 55 45 20 5A 55 20 4B 4F 4D 4D |UPTMENUE ZU KOMM| 000013C0: 45 4E 22 00 D8 1B F2 3F A1 43 24 3A 8B 43 24 B2 |EN"....?.C$:.C$.| 000013D0: 22 22 A7 31 36 33 37 30 00 DE 1B FC 3F 8E 00 ED |"".16370....?...| 000013E0: 1B 74 40 99 22 93 22 3B 4E 24 28 49 29 00 F8 1B |.t@.".";N$(I)...| 000013F0: 7E 40 99 41 24 28 49 29 00 03 1C 88 40 99 43 24 |~@.A$(I)....@.C$| 00001400: 28 49 29 00 0E 1C 92 40 99 53 24 28 49 29 00 19 |(I)....@.S$(I)..| 00001410: 1C 9C 40 99 5A 24 28 49 29 00 24 1C A6 40 99 50 |..@.Z$(I).$..@.P| 00001420: 24 28 49 29 00 33 1C A0 41 99 22 31 2D 2D 4E 41 |$(I).3..A."1--NA| 00001430: 4D 45 22 00 45 1C AA 41 99 22 32 2D 2D 41 44 52 |ME".E..A."2--ADR| 00001440: 45 53 53 45 22 00 55 1C B4 41 99 22 33 2D 2D 53 |ESSE".U..A."3--S| 00001450: 54 41 44 54 22 00 64 1C BE 41 99 22 34 2D 2D 4C |TADT".d..A."4--L| 00001460: 41 4E 44 22 00 78 1C C8 41 99 22 35 2D 2D 41 4E |AND".x..A."5--AN| 00001470: 4D 45 52 4B 55 4E 47 22 00 90 1C D2 41 99 22 36 |MERKUNG"....A."6| 00001480: 2D 2D 54 45 4C 45 46 4F 4E 4E 55 4D 4D 45 52 22 |--TELEFONNUMMER"| 00001490: 00 B6 1C DC 41 99 3A 85 22 57 41 53 20 53 4F 4C |....A.:."WAS SOL| 000014A0: 4C 20 47 45 41 45 4E 44 45 52 54 20 57 45 52 44 |L GEAENDERT WERD| 000014B0: 45 4E 3F 22 3B 43 00 E1 1C E6 41 91 43 8D 31 36 |EN?";C....A.C.16| 000014C0: 39 31 30 2C 31 36 39 32 30 2C 31 36 39 33 30 2C |910,16920,16930,| 000014D0: 31 36 39 34 30 2C 31 36 39 35 30 2C 31 36 39 36 |16940,16950,1696| 000014E0: 30 00 E7 1C F0 41 8E 00 0E 1D 0E 42 99 3A 85 22 |0....A.....B.:."| 000014F0: 41 45 4E 44 45 52 55 4E 47 22 3B 44 24 3A 4E 24 |AENDERUNG";D$:N$| 00001500: 28 49 29 B2 44 24 3A 49 B2 49 AB 31 3A 8E 00 35 |(I).D$:I.I.1:..5| 00001510: 1D 18 42 99 3A 85 22 41 45 4E 44 45 52 55 4E 47 |..B.:."AENDERUNG| 00001520: 22 3B 44 24 3A 41 24 28 49 29 B2 44 24 3A 49 B2 |";D$:A$(I).D$:I.| 00001530: 49 AB 31 3A 8E 00 5C 1D 22 42 99 3A 85 22 41 45 |I.1:..\."B.:."AE| 00001540: 4E 44 45 52 55 4E 47 22 3B 44 24 3A 43 24 28 49 |NDERUNG";D$:C$(I| 00001550: 29 B2 44 24 3A 49 B2 49 AB 31 3A 8E 00 83 1D 2C |).D$:I.I.1:....,| 00001560: 42 99 3A 85 22 41 45 4E 44 45 52 55 4E 47 22 3B |B.:."AENDERUNG";| 00001570: 44 24 3A 53 24 28 49 29 B2 44 24 3A 49 B2 49 AB |D$:S$(I).D$:I.I.| 00001580: 31 3A 8E 00 AA 1D 36 42 99 3A 85 22 41 45 4E 44 |1:....6B.:."AEND| 00001590: 45 52 55 4E 47 22 3B 44 24 3A 5A 24 28 49 29 B2 |ERUNG";D$:Z$(I).| 000015A0: 44 24 3A 49 B2 49 AB 31 3A 8E 00 D1 1D 40 42 99 |D$:I.I.1:....@B.| 000015B0: 3A 85 22 41 45 4E 44 45 52 55 4E 47 22 3B 44 24 |:."AENDERUNG";D$| 000015C0: 3A 50 24 28 49 29 B2 44 24 3A 49 B2 49 AB 31 3A |:P$(I).D$:I.I.1:| 000015D0: 8E 00 00 00 00 |..... |
..%.... **ADRESSVERWALTUNGSPROGRAMM**.X.
..X.500:.N$(X),A$(X),C$(X),S$(X),Z$(X),P
$(X):N.0.S....53280,9:. RAHMENFARBE.....
.53281,0:. HINTERGRUNDFARBE...2..G(8)...
<.."...ADRESSVERWALTUNG".N.F..:.".F1.
ENTER"...P..".F3. READ"...Z..".F5. P
RINT"...D..".F7. ERASE"...N..:.".F2.
LOAD".1.X..".F4. SAVE".F....".F6. C
HANGE".Y....C$:.C$."".140.L....C$."."..1
0000.. ..C$."."..11000......C$."."..120
00......C$."."..13000......C$."."..14000
.K.H..C$."."..15000...R..C$."."..16000..
....60...G..C$."(F1)".16010....'. *
* ENTER **. ..'.N..X.1...6..'."..F1. W
EITER".O..'.".F8. HAUPTMENUE".D..'.C$:
.C$."".10006.V..'.C$.".".10010....'.C$."
."......'.10000....'N.N.1...$'."..NAMEN/
ADRESSEN EINGEBEN".Z..'."ADRESS-NR. #";N
;"VON";X.1...8'."NAME";N$(N)...B'."ADRES
SE";A$(N)...L'."STADT";C$(N).&.V'."LAND"
;S$(N).=.`'."ANMERKUNG";Z$(N).X.J'."TELE
FONNUMMER";P$(N).Y.T'.:.".WEITERE ADRESS
E (J/N)"...~'.C$:.C$."".10110....'.N..X
.1......'.C$."J"..10010....'.C$."N"...H.
.'.10110....*. ** READ **....*.N.0..
....+."..LESEN VON NAMEN/ADRESSEN"....+.
./..+.".F1.SEAMTLICHE ADRESSEN".N. +.".F
3.SUCHEN VON ADRESSEN".C.*+.C$:.C$."".11
050.U.4+.C$.".".11090...>+.C$.".".11220.
..H+.11000...R+.I.1.N...\+.".ADRESS-NR.
#";I"VON";N.W.F+."NAME: ";N$(I).
..P+."ADRESSE: ";A$(I)...Z+."STADT:
";C$(I).+..+."LAND: ";S$
(I).G..+."ANMERKUNG: ";Z$(I).C..+."TE
LEFONNUMMER ";P$(I)....+.:.".DRUECKEN SI
E IRGENDEINE TASTE UM FORTZUFAHREN"....+
.C$:.C$."".11180....+.I...J+....T+.".WEL
CHER NAME SOLL GESUCHT WERDEN!";T
$....+.I.1.N....+.N$(I).T$..11290....+.I
.D..+.:.".NAME NICHT IN DER DATEI VORHAN
DEN"....,.:."IRGEND EINE TASTE DRUECKEN,
UM ZUM HAUPTMENUE ZU KOMMEN"....,.C$:.C$
."".11280....,.....,.".ADRESS-NR. #";I;"
VON";I...$,."NAME: ";N$(I)....,
."ADRESSE: ";A$(I)...8,."STADT:
";C$(I).2.B,."LAND: ";S$(
I).O.L,."ANMERKUNG: ";Z$(I).L.V,."TE
LEFONNUMMER: ";P$(I)...`,.:.".IRGEND EIN
E TASTE DRUECKEN,UM ZUM HAUPTMENUE ZU KO
MMEN".B.J,.C$:.C$."".11370.H.T,.......
** PRINT **......"..F1. WEITER".....
.".F8. HAUPTMENUE"......C$:.C$."".12006.
1....C$.".".12010.?....C$."."...J....120
00.\...."..AUSDRUCK".G....1,4,4.R....I.1
.N..../.#1,N$(I)..../.#1,A$(I)..../.#1,C
$(I)...&/."1,S$(I)...0/.#1,Z$(I).F.:/."1
,P$(I).W.D/."1,CHR$(13)...N/.I...X/ 1...
B/....H2. *** ERASE ***...J2.N.0.
..&.L2."..F1. WEITER".=.M2.".F8. HAUPTM
ENUE".R.N2.C$:.C$."".13006.D.O2.C$.".".1
3010.R.P2.C$."."...}.Q2.13000...R2."..LO
ESCHEN VON NAMEN/ADRESSEN"....2.".F1. AL
LE ADRESSEN"....2.".F3. EINEN BESTIMMTEN
NAMEN"....2.C$:.C$."".13050....3.C$."."
.13090....3.C$.".".13230.#..3.13000..."3
.I.1.N.M.,3.".ADRESS-NR. #";I;"VON";N.I.
63."NAME: ";N$(I)...@3."ADRESSE:
";A$(I)...J3."STADT: ";C$(I
)...T3."LAND: ";S$(I).Y.^3."ANME
RKUNG: ";Z$(I)...H3."TELEFONNUMMER:";
P$(I)...R3.:.".F1. WEITER".!.|3.:.".F8.
LOESCHEN".6..3.C$:.C$."".13190.I..3.C$."
."..13225.C..3.C$."."..13800:.13224.N..3
.13190.~..3N.N.1:I.I.1....3.I....3.....3
.". WELCHER NAME SOLL GESUCHT WERDEN";T$
.C..3.I.1.N...B3.N$(I).T$..13800:N.N.1:I
.I.1...L3.I...Q3....V3.:.".NAME NICHT IN
DER DATEI VORHANDEN".]..3.:."IRGEND EIN
E TASTE DRUECKEN,UM ZUM HAUPTMENUE ZU KO
MMEN".R..3.C$:.C$."".11280.}..5.K.I.N...
.5N$(K).N$(K.1)....5A$(K).A$(K.1)....6C$
(K).C$(K.1).E..6S$(K).S$(K.1).W..6Z$(K).
Z$(K.1)...$6P$(K).P$(K.1)....6.K...86...
..6. ** LOAD **. ..6."..F1. WEITER"
.7..6.".F8. HAUPTMENUE".L..6.C$:.C$."".1
4006.^..6.C$.".".14010.L..6.C$."."...W..
6.14000....6."..LADEN DES FILES"...D6.:.
".F1. LADEN VON DISKETTE".Q.N6.".F4. LAD
EN VON DATASETTE"...X6.C$:.C$."".14040..
..6.C$.".".14100....6.C$.".".14250....6.
14040.2..7.1,8,3,"0:MAIL LIST,SEQ".;.<7.
1,N.F.F7.I.1.N.S.P7.1,N$(I).`.Z7.1,A$(I)
.M.D7.1,C$(I).Z.N7.1,S$(I)...X7.1,Z$(I).
...7.1,P$(I)....7.I....7 1... 7.....7.1,
1,1"MAIL LIST".I..7.14140....:. **
* SAVE ***....:.N.0......:."..F1. WEITER
"....:.".F8. HAUPTMENUE".-..:.C$:.C$."".
15006.?..:.C$.".".15010.M. :.C$."."...X.
.:.15000.V..:.".. SPEICHERN DES FILES"..
..:.:.".F1. SPEICHERN AUF DISKETTE"....:
.".F4. SPEICHERN AUF DATASETTE".T..:.C$:
.C$."".15040...J:.C$.".".15100...T:.C$."
.".15250....:.15040....:.1,8,15.%..;.1,"
S8:MAIL LIST".,..; 1.O..;.1,8,3,"0:MAIL
LIST,SEQ,WRITE".X.$;.1,N.C..;.I.1.N.P.8;
.1,N$(I).}.B;.1,A$(I)...L;.1,C$(I)...V;.
1,S$(I)...`;.1,Z$(I)...J;.1,P$(I)...T;.I
...~; 1.E..;.....;.1,1,1,"MAIL LIST"....
;.15140....<. ** CHANGE **....>.
*** CHANGE ***.&..>.N.0...:..>."..F
1. WEITER".Q..>.".F8. HAUPTMENUE".F..>.C
$:.C$."".16006.X..>.C$.".".16010....>.C$
."."......>.16000....>."..AENDERN EINER
ADRESSE".L..>.:.".F1. ALLE ADRESSEN"....
>.".F3. AENDERN EINES BESTIMMTEN NAMENS"
....>.C$:.C$."".16040....>.C$.".".16100.
1..>.C$.".".16300.<.F>.16040.G..>.I.1.N.
V..>.".";N$(I).A..>.A$(I).L..?.C$(I).W..
?.S$(I)....?.Z$(I)... ?.P$(I)...*?.:.".F
1. WEITER"...4?.".F3. AENDERN".K.>?.C$:.
C$."".16190...H?.C$."."..16230...R?.C$."
."..16800:.16230...\?.16190...F?.I...P?.
....?.".".2..?."NAMEN EINGEBEN";M$.=..?.
I.1.N.T.J?.N$(I).M$..16500:..[.T?.I....?
.".NAME NICHT IN DER DATEI VORHANDEN".C.
.?.".IRGENDEINE TASTE DRUECKEN,UM ZUM HA
UPTMENUE ZU KOMMEN".X..?.C$:.C$."".16370
....?....T@.".";N$(I)...~@.A$(I)....@.C$
(I)....@.S$(I)....@.Z$(I).$..@.P$(I).3.
A."1--NAME".E..A."2--ADRESSE".U..A."3--S
TADT".D..A."4--LAND".X.HA."5--ANMERKUNG"
...RA."6--TELEFONNUMMER"....A.:."WAS SOL
L GEAENDERT WERDEN?";C....A.C.16910,1692
0,16930,16940,16950,16960....A.....B.:."
AENDERUNG";D$:N$(I).D$:I.I.1:..5..B.:."A
ENDERUNG";D$:A$(I).D$:I.I.1:..\."B.:."AE
NDERUNG";D$:C$(I).D$:I.I.1:....,B.:."AEN
DERUNG";D$:S$(I).D$:I.I.1:....6B.:."AEND
ERUNG";D$:Z$(I).D$:I.I.1:..Q.@B.:."AENDE
RUNG";D$:P$(I).D$:I.I.1:.....
> CLICK IMAGE PREVIEW FOR FULL MODAL