KONTENVERWALT.
FILE INFORMATION
FILENAME(S): KONTENVERWALT.
FILE TYPE(S): PRG
FILE SIZE: 8.1K
FIRST SEEN: 2025-10-20 14:31:35
APPEARS ON: 1 disk(s)
FILE HASH
5aca8a4eb3980f3d919b2826d959ff216d872b69f7ad4cd59726723b85227476
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| WOLF S SOFT C004 | KONTENVERWALT. | PRG | Treasure Chest - Klaus Der Suhler | 30 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 2A 1C 01 00 8F 20 2B 2B 2B 2B 2B 2B 2B 2B |..*.... ++++++++|
00000010: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B |++++++++++++++++|
00000020: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 00 53 1C 02 00 8F |++++++++++.S....|
00000030: 20 2B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | + |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000050: 20 20 2B 00 7C 1C 03 00 8F 20 2B 20 20 20 20 20 | +.|.... + |
00000060: 50 55 42 4C 49 43 2D 44 4F 4D 41 49 4E 20 53 4F |PUBLIC-DOMAIN SO|
00000070: 46 54 57 41 52 45 20 20 20 20 20 2B 00 A5 1C 04 |FTWARE +....|
00000080: 00 8F 20 2B 20 20 20 20 20 20 20 20 20 20 20 20 |.. + |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000A0: 20 20 20 20 2B 00 CE 1C 05 00 8F 20 2B 2B 2B 2B | +...... ++++|
000000B0: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B |++++++++++++++++|
000000C0: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 00 D4 |++++++++++++++..|
000000D0: 1C 06 00 3A 00 DA 1C 07 00 3A 00 E0 1C 08 00 3A |...:.....:.....:|
000000E0: 00 E6 1C 09 00 3A 00 0E 1D 0A 00 8F 20 5C 5C 5C |.....:...... \\\|
000000F0: 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C |\\\\\\\\\\\\\\\\|
00000100: 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 00 36 |\\\\\\\\\\\\\\.6|
00000110: 1D 0B 00 8F 20 5C 20 20 20 20 20 20 20 20 20 20 |.... \ |
00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000130: 20 20 20 20 20 5C 00 5E 1D 0C 00 8F 20 5C 20 20 | \.^.... \ |
00000140: 20 20 20 20 20 20 50 52 4F 47 52 41 4D 20 4D 41 | PROGRAM MA|
00000150: 44 45 20 42 59 20 20 20 20 20 20 20 20 5C 00 86 |DE BY \..|
00000160: 1D 0D 00 8F 20 5C 20 20 20 20 20 20 20 20 20 20 |.... \ |
00000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000180: 20 20 20 20 20 5C 00 AE 1D 0E 00 8F 20 5C 20 20 | \...... \ |
00000190: 20 20 20 20 20 20 3E 20 50 45 54 45 52 20 4B 4C | > PETER KL|
000001A0: 45 49 4E 20 3C 20 20 20 20 20 20 20 20 5C 00 D6 |EIN < \..|
000001B0: 1D 0F 00 8F 20 5C 20 20 20 20 20 20 20 20 20 20 |.... \ |
000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001D0: 20 20 20 20 20 5C 00 FE 1D 10 00 8F 20 5C 2D 2D | \...... \--|
000001E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000001F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 5C 00 26 |-------------\.&|
00000200: 1E 11 00 8F 20 5C 20 20 20 20 20 20 20 20 20 20 |.... \ |
00000210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000220: 20 20 20 20 20 5C 00 4E 1E 12 00 8F 20 5C 20 20 | \.N.... \ |
00000230: 20 2A 20 42 41 53 49 43 20 37 2E 30 20 20 20 20 | * BASIC 7.0 |
00000240: 20 20 20 20 20 20 20 20 20 20 20 20 20 5C 00 76 | \.v|
00000250: 1E 13 00 8F 20 5C 20 20 20 2A 20 34 30 20 5A 45 |.... \ * 40 ZE|
00000260: 49 43 48 45 4E 2F 41 53 43 49 49 20 43 4F 44 45 |ICHEN/ASCII CODE|
00000270: 20 20 20 20 20 5C 00 9E 1E 14 00 8F 20 5C 20 20 | \...... \ |
00000280: 20 2A 20 43 31 32 38 20 2B 20 31 35 34 31 2F 31 | * C128 + 1541/1|
00000290: 35 37 30 2F 31 35 37 31 20 20 20 20 20 5C 00 C6 |570/1571 \..|
000002A0: 1E 15 00 8F 20 5C 20 20 20 20 20 20 20 20 20 20 |.... \ |
000002B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002C0: 20 20 20 20 20 5C 00 EE 1E 16 00 8F 20 5C 5C 5C | \...... \\\|
000002D0: 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C |\\\\\\\\\\\\\\\\|
000002E0: 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 5C 00 F4 |\\\\\\\\\\\\\\..|
000002F0: 1E 17 00 3A 00 FA 1E 18 00 3A 00 77 1F 19 00 86 |...:.....:.w....|
00000300: 20 4E 24 28 31 30 30 29 2C 42 4C 28 31 30 30 29 | N$(100),BL(100)|
00000310: 2C 4B 54 28 31 30 30 29 2C 41 31 24 28 31 30 30 |,KT(100),A1$(100|
00000320: 29 2C 41 32 24 28 31 30 30 29 2C 41 33 24 28 31 |),A2$(100),A3$(1|
00000330: 30 30 29 2C 47 45 28 31 30 30 29 2C 54 31 24 28 |00),GE(100),T1$(|
00000340: 31 30 30 29 2C 54 32 24 28 31 30 30 29 2C 54 33 |100),T2$(100),T3|
00000350: 24 28 31 30 30 29 2C 54 34 24 28 31 30 30 29 2C |$(100),T4$(100),|
00000360: 54 35 28 31 30 30 29 2C 54 36 28 31 30 30 29 2C |T5(100),T6(100),|
00000370: 54 37 28 31 30 30 29 00 87 1F 1A 00 E7 20 30 2C |T7(100)...... 0,|
00000380: 31 3A E7 20 34 2C 31 00 11 20 1B 00 E8 3A 99 22 |1:. 4,1.. ...:."|
00000390: 05 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |.###############|
000003A0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################|
000003B0: 23 23 23 23 23 23 23 23 23 22 3A 99 22 20 20 20 |#########":." |
000003C0: 20 4B 4F 4E 54 45 4E 56 45 52 57 41 4C 54 55 4E | KONTENVERWALTUN|
000003D0: 47 2D 56 45 52 54 45 49 4C 45 52 4D 45 4E 55 45 |G-VERTEILERMENUE|
000003E0: 22 3A 99 22 23 23 23 23 23 23 23 23 23 23 23 23 |":."############|
000003F0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################|
00000400: 23 23 23 23 23 23 23 23 23 23 23 23 22 3A 99 3A |############":.:|
00000410: 99 00 3A 20 1E 00 99 22 81 20 5B 31 5D 20 4E 45 |..: ...". [1] NE|
00000420: 55 45 20 44 41 54 45 49 20 49 4E 49 54 49 41 4C |UE DATEI INITIAL|
00000430: 49 53 49 45 52 45 4E 22 3A 99 00 6B 20 28 00 99 |ISIEREN":..k (..|
00000440: 22 95 20 5B 32 5D 20 45 49 4E 4C 45 53 45 4E 20 |". [2] EINLESEN |
00000450: 44 45 52 20 44 41 54 45 4E 28 50 52 4F 47 52 41 |DER DATEN(PROGRA|
00000460: 4D 4D 42 45 47 49 4E 29 22 3A 99 00 8C 20 32 00 |MMBEGIN)":... 2.|
00000470: 99 22 96 20 5B 33 5D 20 41 55 53 47 41 42 45 20 |.". [3] AUSGABE |
00000480: 44 45 52 20 44 41 54 45 4E 22 3A 99 00 AD 20 3C |DER DATEN":... <|
00000490: 00 99 22 97 20 5B 34 5D 20 41 45 4E 44 45 52 4E |..". [4] AENDERN|
000004A0: 20 56 4F 4E 20 44 41 54 45 4E 22 3A 99 00 CA 20 | VON DATEN":... |
000004B0: 46 00 99 22 98 20 5B 35 5D 20 50 52 4F 47 52 41 |F..". [5] PROGRA|
000004C0: 4D 4D 20 45 4E 44 45 22 3A 99 00 ED 20 50 00 99 |MM ENDE":... P..|
000004D0: 22 9E 20 5B 36 5D 20 47 45 53 41 4D 54 57 45 52 |". [6] GESAMTWER|
000004E0: 54 20 44 45 52 20 4B 4F 4E 54 45 4E 22 00 FB 20 |T DER KONTEN".. |
000004F0: 5A 00 99 3A 99 3A 99 3A 99 3A 99 00 1D 21 64 00 |Z..:.:.:.:...!d.|
00000500: 99 22 9A 20 49 43 48 20 45 52 57 41 52 54 45 20 |.". ICH ERWARTE |
00000510: 49 48 52 45 20 45 49 4E 47 41 42 45 22 00 29 21 |IHRE EINGABE".)!|
00000520: 6E 00 A1 F9 20 45 49 4E 24 00 39 21 78 00 45 49 |n... EIN$.9!x.EI|
00000530: 4E B2 C5 28 45 49 4E 24 29 00 75 21 8C 00 8B 20 |N..(EIN$).u!... |
00000540: 45 49 4E B1 30 20 AF 20 45 49 4E B3 37 20 A7 20 |EIN.0 . EIN.7 . |
00000550: 91 20 45 49 4E 20 89 20 31 30 30 30 2C 32 30 30 |. EIN . 1000,200|
00000560: 30 2C 33 30 30 30 2C 34 30 30 30 2C 35 30 30 30 |0,3000,4000,5000|
00000570: 2C 36 30 30 30 00 7F 21 96 00 89 20 31 31 30 00 |,6000..!... 110.|
00000580: 9C 21 E8 03 8F 20 2A 2A 2A 20 49 4E 49 54 49 41 |.!... *** INITIA|
00000590: 4C 49 53 49 45 52 45 4E 20 2A 2A 2A 00 22 22 F2 |LISIEREN ***."".|
000005A0: 03 E8 3A 99 22 81 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |..:.".==========|
000005B0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000005C0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 3A |==============":|
000005D0: 99 22 20 20 20 20 20 20 4E 45 55 45 20 44 41 54 |." NEUE DAT|
000005E0: 45 49 20 49 4E 49 54 49 41 4C 49 53 49 45 52 45 |EI INITIALISIERE|
000005F0: 4E 22 3A 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |N":."===========|
00000600: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000610: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 3A 99 |=============":.|
00000620: 3A 99 00 55 22 FC 03 99 22 05 2D 2D 2D 2D 2D 2D |:..U"...".------|
00000630: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000640: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000650: 2D 2D 22 3A 99 00 D0 22 06 04 99 22 20 41 43 48 |--":..."..." ACH|
00000660: 54 55 4E 47 3A 20 44 49 45 53 45 20 46 55 4E 4B |TUNG: DIESE FUNK|
00000670: 54 49 4F 4E 20 46 55 45 48 52 54 20 5A 55 20 56 |TION FUEHRT ZU V|
00000680: 4F 4C 4C 2D 22 3A 99 22 20 53 54 41 45 4E 44 49 |OLL-":." STAENDI|
00000690: 47 45 4D 20 44 41 54 45 4E 56 45 52 4C 55 53 54 |GEM DATENVERLUST|
000006A0: 2E 57 4F 4C 4C 45 4E 20 53 49 45 22 3A 99 22 20 |.WOLLEN SIE":." |
000006B0: 57 45 49 54 45 52 4D 41 43 48 45 4E 20 3F 20 28 |WEITERMACHEN ? (|
000006C0: 12 4A 92 41 20 2F 12 4E 92 45 49 4E 29 22 3A 99 |.J.A /.N.EIN)":.|
000006D0: 00 02 23 10 04 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D |..#..."---------|
000006E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |---------------"|
00000700: 3A 99 00 0E 23 13 04 A1 F9 20 45 49 4E 24 00 25 |:...#.... EIN$.%|
00000710: 23 17 04 8B 20 45 49 4E 24 B3 B1 22 4A 22 20 A7 |#... EIN$.."J" .|
00000720: 20 89 20 31 30 00 4D 23 1A 04 99 22 20 44 49 45 | . 10.M#..." DIE|
00000730: 20 44 41 54 45 49 20 57 49 52 44 20 4E 45 55 20 | DATEI WIRD NEU |
00000740: 47 45 4F 52 44 4E 45 54 20 21 22 3A 99 00 7F 23 |GEORDNET !":...#|
00000750: 24 04 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |$.."------------|
00000760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 99 00 |------------":..|
00000780: 8F 23 2E 04 81 20 49 B2 31 20 A4 20 31 30 30 00 |.#... I.1 . 100.|
00000790: C9 23 38 04 4E 24 28 49 29 B2 22 22 3A 41 31 24 |.#8.N$(I)."":A1$|
000007A0: 28 49 29 B2 22 22 3A 41 32 24 28 49 29 B2 22 22 |(I)."":A2$(I).""|
000007B0: 3A 41 33 24 28 49 29 B2 22 22 3A 42 4C B2 30 3A |:A3$(I)."":BL.0:|
000007C0: 47 45 B2 30 3A 4B 54 B2 30 00 D1 23 42 04 82 20 |GE.0:KT.0..#B.. |
000007D0: 49 00 DB 23 47 04 47 45 53 B2 30 00 0B 24 4C 04 |I..#G.GES.0..$L.|
000007E0: 99 22 20 44 49 45 20 44 41 54 45 49 20 57 49 52 |." DIE DATEI WIR|
000007F0: 44 20 4A 45 54 5A 54 20 49 4E 49 54 49 41 4C 49 |D JETZT INITIALI|
00000800: 53 49 45 52 54 20 21 21 22 3A 99 00 3D 24 56 04 |SIERT !!":..=$V.|
00000810: 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |."--------------|
00000820: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000830: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 99 00 50 24 |----------":..P$|
00000840: 60 04 F2 22 4B 4F 4E 54 4F 2D 56 45 52 57 2E 22 |`.."KONTO-VERW."|
00000850: 00 69 24 6A 04 FE 0D 23 31 2C 22 4B 4F 4E 54 4F |.i$j...#1,"KONTO|
00000860: 2D 56 45 52 57 2E 22 2C 57 00 79 24 74 04 81 20 |-VERW.",W.y$t.. |
00000870: 49 B2 31 20 A4 20 31 30 30 00 D7 24 7E 04 98 31 |I.1 . 100..$~..1|
00000880: 2C 4E 24 28 49 29 3B C7 28 31 33 29 3B 41 31 24 |,N$(I);.(13);A1$|
00000890: 28 49 29 3B C7 28 31 33 29 3B 41 32 24 28 49 29 |(I);.(13);A2$(I)|
000008A0: 3B C7 28 31 33 29 3B 41 33 24 28 49 29 3B C7 28 |;.(13);A3$(I);.(|
000008B0: 31 33 29 3B 42 4C 28 49 29 3B C7 28 31 33 29 3B |13);BL(I);.(13);|
000008C0: 4B 54 28 49 29 3B C7 28 31 33 29 3B 47 45 28 49 |KT(I);.(13);GE(I|
000008D0: 29 3B C7 28 31 33 29 00 DF 24 88 04 82 20 49 00 |);.(13)..$... I.|
000008E0: E8 24 92 04 FE 0F 23 31 00 FC 24 9C 04 F2 22 4B |.$....#1..$..."K|
000008F0: 4F 4E 54 4F 2D 47 45 53 41 4D 54 22 00 16 25 A6 |ONTO-GESAMT"..%.|
00000900: 04 FE 0D 23 31 2C 22 4B 4F 4E 54 4F 2D 47 45 53 |...#1,"KONTO-GES|
00000910: 41 4D 54 22 2C 57 00 21 25 B0 04 98 31 2C 47 45 |AMT",W.!%...1,GE|
00000920: 53 00 2A 25 BA 04 FE 0F 23 31 00 5A 25 C4 04 99 |S.*%....#1.Z%...|
00000930: 22 20 44 49 45 20 44 41 54 45 49 20 57 55 52 44 |" DIE DATEI WURD|
00000940: 45 20 45 52 46 4F 4C 47 52 45 49 43 48 20 45 52 |E ERFOLGREICH ER|
00000950: 4F 45 46 46 4E 45 54 22 3A 99 00 8A 25 CE 04 99 |OEFFNET":...%...|
00000960: 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |"---------------|
00000970: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000980: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 93 25 D8 04 FE |---------"..%...|
00000990: 0B 20 33 00 9C 25 E2 04 89 20 32 36 00 A2 25 EC |. 3..%... 26..%.|
000009A0: 04 80 00 BF 25 D0 07 8F 20 2A 2A 2A 20 50 52 4F |....%... *** PRO|
000009B0: 47 52 41 4D 4D 42 45 47 49 4E 4E 20 2A 2A 2A 00 |GRAMMBEGINN ***.|
000009C0: 41 26 DA 07 E8 3A 99 22 95 3D 3D 3D 3D 3D 3D 3D |A&...:.".=======|
000009D0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000009E0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000009F0: 3D 22 3A 99 22 20 20 20 20 20 20 20 20 20 45 49 |=":." EI|
00000A00: 4E 4C 45 53 45 4E 20 44 45 52 20 44 41 54 45 4E |NLESEN DER DATEN|
00000A10: 22 3A 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |":."============|
00000A20: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000A30: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 3A 99 3A |============":.:|
00000A40: 99 00 74 26 E4 07 99 22 05 2D 2D 2D 2D 2D 2D 2D |..t&...".-------|
00000A50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000A60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000A70: 2D 22 3A 99 00 F1 26 EE 07 99 22 20 41 43 48 54 |-":...&..." ACHT|
00000A80: 55 4E 47 3A 44 49 45 20 44 41 54 45 4E 20 49 4D |UNG:DIE DATEN IM|
00000A90: 20 43 4F 4D 50 55 54 45 52 53 50 45 49 43 48 45 | COMPUTERSPEICHE|
00000AA0: 52 22 3A 99 22 20 57 45 52 44 45 4E 20 4E 55 4E |R":." WERDEN NUN|
00000AB0: 20 55 45 42 45 52 53 43 48 52 49 45 42 45 4E 20 | UEBERSCHRIEBEN |
00000AC0: 21 21 21 2E 57 4F 4C 4C 45 4E 22 3A 99 22 20 53 |!!!.WOLLEN":." S|
00000AD0: 49 45 20 57 45 49 54 45 52 4D 41 43 48 45 4E 20 |IE WEITERMACHEN |
00000AE0: 3F 28 12 4A 92 41 2F 12 4E 92 45 49 4E 29 22 3A |?(.J.A/.N.EIN)":|
00000AF0: 99 00 23 27 F8 07 99 22 2D 2D 2D 2D 2D 2D 2D 2D |..#'..."--------|
00000B00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000B10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000B20: 22 3A 99 00 2F 27 02 08 A1 F9 20 45 49 4E 24 00 |":../'.... EIN$.|
00000B30: 46 27 0C 08 8B 20 45 49 4E 24 B3 B1 22 4A 22 20 |F'... EIN$.."J" |
00000B40: A7 20 89 20 31 30 00 9D 27 16 08 99 22 20 44 49 |. . 10..'..." DI|
00000B50: 45 20 44 41 54 45 49 20 57 49 52 44 20 4E 55 4E |E DATEI WIRD NUN|
00000B60: 20 47 45 4C 45 53 45 4E 20 21 21 21 22 3A 99 3A | GELESEN !!!":.:|
00000B70: 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |."--------------|
00000B80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000B90: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 99 00 B4 27 |----------":...'|
00000BA0: 20 08 FE 0D 23 31 2C 22 4B 4F 4E 54 4F 2D 56 45 | ...#1,"KONTO-VE|
00000BB0: 52 57 2E 22 00 C4 27 2A 08 81 20 49 B2 31 20 A4 |RW."..'*.. I.1 .|
00000BC0: 20 31 30 30 00 F8 27 34 08 84 31 2C 4E 24 28 49 | 100..'4..1,N$(I|
00000BD0: 29 2C 41 31 24 28 49 29 2C 41 32 24 28 49 29 2C |),A1$(I),A2$(I),|
00000BE0: 41 33 24 28 49 29 2C 42 4C 28 49 29 2C 4B 54 28 |A3$(I),BL(I),KT(|
00000BF0: 49 29 2C 47 45 28 49 29 00 00 28 3E 08 82 20 49 |I),GE(I)..(>.. I|
00000C00: 00 09 28 48 08 FE 0F 23 31 00 5F 28 52 08 99 22 |..(H...#1._(R.."|
00000C10: 20 44 49 45 20 44 41 54 45 4E 20 57 55 52 44 45 | DIE DATEN WURDE|
00000C20: 4E 20 45 49 4E 47 45 4C 45 53 45 4E 20 21 21 21 |N EINGELESEN !!!|
00000C30: 22 3A 99 3A 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |":.:."----------|
00000C40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000C50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
00000C60: 68 28 5C 08 FE 0B 20 33 00 71 28 66 08 89 20 32 |h(\... 3.q(f.. 2|
00000C70: 36 00 91 28 B8 0B 8F 20 2A 2A 2A 20 41 55 53 47 |6..(... *** AUSG|
00000C80: 41 42 45 20 44 45 52 20 44 41 54 45 4E 20 2A 2A |ABE DER DATEN **|
00000C90: 2A 00 A1 28 C2 0B 81 20 49 B2 31 20 A4 20 31 30 |*..(... I.1 . 10|
00000CA0: 30 00 A8 28 CC 0B E8 30 00 2A 29 D6 0B 99 22 96 |0..(...0.*)...".|
00000CB0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000CC0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000CD0: 3D 3D 3D 3D 3D 3D 3D 3D 22 3A 99 22 20 20 20 20 |========":." |
00000CE0: 20 20 20 20 44 41 54 45 4E 20 46 55 45 52 20 4B | DATEN FUER K|
00000CF0: 4F 4E 54 45 4E 22 3A 99 22 3D 3D 3D 3D 3D 3D 3D |ONTEN":."=======|
00000D00: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000D10: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000D20: 3D 22 3A 99 3A 99 3A 99 3A 99 00 4E 29 DB 0B 99 |=":.:.:.:..N)...|
00000D30: 22 20 3E 20 44 41 54 45 4E 53 41 54 5A 20 4E 52 |" > DATENSATZ NR|
00000D40: 2E 22 3B 49 3B 22 3C 22 3A 99 3A 99 3A 99 00 75 |.";I;"<":.:.:..u|
00000D50: 29 E0 0B 99 22 05 20 4E 41 4D 45 20 44 45 52 20 |)...". NAME DER |
00000D60: 42 41 4E 4B 20 20 20 20 3A 22 3B A3 32 32 29 3B |BANK :";.22);|
00000D70: 4E 24 28 49 29 00 9C 29 EA 0B 99 22 20 53 54 52 |N$(I)..)..." STR|
00000D80: 41 53 53 45 20 20 20 20 20 20 20 20 20 20 3A 22 |ASSE :"|
00000D90: 3B A3 32 32 29 3B 41 31 24 28 49 29 00 C3 29 F4 |;.22);A1$(I)..).|
00000DA0: 0B 99 22 20 50 4F 53 54 4C 45 49 54 5A 41 48 4C |.." POSTLEITZAHL|
00000DB0: 20 20 20 20 20 3A 22 3B A3 32 32 29 3B 41 32 24 | :";.22);A2$|
00000DC0: 28 49 29 00 EA 29 FE 0B 99 22 20 4F 52 54 20 20 |(I)..)..." ORT |
00000DD0: 20 20 20 20 20 20 20 20 20 20 20 20 3A 22 3B A3 | :";.|
00000DE0: 32 32 29 3B 41 33 24 28 49 29 00 10 2A 00 0C 99 |22);A3$(I)..*...|
00000DF0: 22 20 42 41 4E 4B 4C 45 49 54 5A 41 48 4C 20 20 |" BANKLEITZAHL |
00000E00: 20 20 20 3A 22 3B A3 32 31 29 3B 42 4C 28 49 29 | :";.21);BL(I)|
00000E10: 00 36 2A 02 0C 99 22 20 4B 4F 4E 54 4F 4E 55 4D |.6*..." KONTONUM|
00000E20: 4D 45 52 20 20 20 20 20 20 3A 22 3B A3 32 31 29 |MER :";.21)|
00000E30: 3B 4B 54 28 49 29 00 5C 2A 04 0C 99 22 20 47 45 |;KT(I).\*..." GE|
00000E40: 4C 44 42 45 54 52 41 47 20 20 20 20 20 20 20 3A |LDBETRAG :|
00000E50: 22 3B A3 32 31 29 3B 47 45 28 49 29 00 66 2A 08 |";.21);GE(I).f*.|
00000E60: 0C 99 3A 99 3A 99 00 91 2A 12 0C 99 22 9E 20 3E |..:.:...*...". >|
00000E70: 3E 3E 20 42 49 54 54 45 20 45 49 4E 45 20 54 41 |>> BITTE EINE TA|
00000E80: 53 54 45 20 44 52 55 45 43 4B 45 4E 20 3C 3C 3C |STE DRUECKEN <<<|
00000E90: 22 00 9D 2A 1C 0C A1 F9 20 45 49 4E 24 00 C1 2A |"..*.... EIN$..*|
00000EA0: 26 0C 8B 20 4E 24 28 49 AA 31 29 B2 22 22 20 B0 |&.. N$(I.1)."" .|
00000EB0: 20 4B 54 28 49 29 B2 30 20 A7 20 89 20 33 31 33 | KT(I).0 . . 313|
00000EC0: 30 00 C9 2A 30 0C 82 20 49 00 E9 2A 3A 0C E8 3A |0..*0.. I..*:..:|
00000ED0: E0 31 2C 31 32 2C 31 32 2C 22 45 4E 44 45 20 44 |.1,12,12,"ENDE D|
00000EE0: 45 52 20 44 41 54 45 4E 22 00 F2 2A 44 0C FE 0B |ER DATEN"..*D...|
00000EF0: 20 33 00 FB 2A 4E 0C 89 20 32 36 00 11 2B A0 0F | 3..*N.. 26..+..|
00000F00: 8F 20 2A 2A 2A 20 41 45 4E 44 45 52 4E 20 2A 2A |. *** AENDERN **|
00000F10: 2A 00 97 2B AA 0F E8 3A 99 22 97 3D 3D 3D 3D 3D |*..+...:.".=====|
00000F20: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000F30: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000F40: 3D 3D 3D 22 3A 99 22 20 20 20 20 20 20 20 20 20 |===":." |
00000F50: 44 41 54 45 4E 53 41 54 5A 56 45 52 57 41 4C 54 |DATENSATZVERWALT|
00000F60: 55 4E 47 22 3A 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D |UNG":."=========|
00000F70: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000F80: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 |==============="|
00000F90: 3A 99 3A 99 22 05 22 00 A8 2B B4 0F 99 22 12 45 |:.:."."..+...".E|
00000FA0: 92 49 4E 47 41 42 45 22 00 B9 2B BE 0F 99 22 12 |.INGABE"..+...".|
00000FB0: 41 92 45 4E 44 45 52 4E 22 00 CB 2B C8 0F 99 22 |A.ENDERN"..+..."|
00000FC0: 12 4C 92 4F 45 53 43 48 45 4E 22 00 E6 2B D2 0F |.L.OESCHEN"..+..|
00000FD0: 99 3A 99 22 3E 3E 3E 20 49 48 52 45 20 57 41 48 |.:.">>> IHRE WAH|
00000FE0: 4C 20 3C 3C 3C 22 00 16 2C DC 0F 99 22 2D 2D 2D |L <<<"..,..."---|
00000FF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001000: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001010: 2D 2D 2D 2D 2D 22 00 22 2C E6 0F A1 F9 20 45 49 |-----".",.... EI|
00001020: 4E 24 00 3A 2C F0 0F 8B 20 45 49 4E 24 B2 22 45 |N$.:,... EIN$."E|
00001030: 22 20 A7 20 89 20 34 32 30 30 00 52 2C FA 0F 8B |" . . 4200.R,...|
00001040: 20 45 49 4E 24 B2 22 41 22 20 A7 20 89 20 34 34 | EIN$."A" . . 44|
00001050: 30 30 00 6A 2C 04 10 8B 20 45 49 4E 24 B2 22 4C |00.j,... EIN$."L|
00001060: 22 20 A7 20 89 20 34 36 30 30 00 75 2C 0E 10 89 |" . . 4600.u,...|
00001070: 20 34 30 37 30 00 83 2C 68 10 8F 20 45 49 4E 47 | 4070..,h.. EING|
00001080: 41 42 45 00 E2 2C 6D 10 99 3A 99 22 20 3E 3E 3E |ABE..,m..:." >>>|
00001090: 20 49 43 48 20 53 55 43 48 45 20 45 49 4E 20 46 | ICH SUCHE EIN F|
000010A0: 52 45 49 45 53 20 44 41 54 45 4E 46 45 4C 44 20 |REIES DATENFELD |
000010B0: 3C 3C 3C 22 3A 99 3A 99 22 2D 2D 2D 2D 2D 2D 2D |<<<":.:."-------|
000010C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000010D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000010E0: 2D 22 00 F2 2C 72 10 81 20 49 B2 31 20 A4 20 31 |-"..,r.. I.1 . 1|
000010F0: 30 30 00 0A 2D 77 10 8B 20 4E 24 28 49 29 B2 22 |00..-w.. N$(I)."|
00001100: 22 20 A7 20 89 20 34 32 32 35 00 12 2D 7C 10 82 |" . . 4225..-|..|
00001110: 20 49 00 26 2D 81 10 99 3A 99 22 20 45 49 4E 47 | I.&-...:." EING|
00001120: 41 42 45 20 3A 22 00 47 2D 86 10 85 22 20 4E 41 |ABE :".G-..." NA|
00001130: 4D 45 20 44 45 52 20 42 41 4E 4B 20 20 20 20 3A |ME DER BANK :|
00001140: 22 3B 4E 24 28 49 29 00 69 2D 8B 10 85 22 20 53 |";N$(I).i-..." S|
00001150: 54 52 41 53 53 45 20 20 20 20 20 20 20 20 20 20 |TRASSE |
00001160: 3A 22 3B 41 31 24 28 49 29 00 8B 2D 90 10 85 22 |:";A1$(I)..-..."|
00001170: 20 50 4F 53 54 4C 45 49 54 5A 41 48 4C 20 20 20 | POSTLEITZAHL |
00001180: 20 20 3A 22 3B 41 32 24 28 49 29 00 AD 2D 95 10 | :";A2$(I)..-..|
00001190: 85 22 20 4F 52 54 20 20 20 20 20 20 20 20 20 20 |." ORT |
000011A0: 20 20 20 20 3A 22 3B 41 33 24 28 49 29 00 CE 2D | :";A3$(I)..-|
000011B0: 9A 10 85 22 20 42 41 4E 4B 4C 45 49 54 5A 41 48 |..." BANKLEITZAH|
000011C0: 4C 20 20 20 20 20 3A 22 3B 42 4C 28 49 29 00 EF |L :";BL(I)..|
000011D0: 2D 9F 10 85 22 20 4B 4F 4E 54 4F 4E 55 4D 4D 45 |-..." KONTONUMME|
000011E0: 52 20 20 20 20 20 20 3A 22 3B 4B 54 28 49 29 00 |R :";KT(I).|
000011F0: 10 2E A4 10 85 22 20 47 45 4C 44 42 45 54 52 41 |....." GELDBETRA|
00001200: 47 20 20 20 20 20 20 20 3A 22 3B 47 45 28 49 29 |G :";GE(I)|
00001210: 00 3D 2E A9 10 99 3A 99 22 3E 3E 3E 20 41 4C 4C |.=....:.">>> ALL|
00001220: 45 53 20 52 49 43 48 54 49 47 20 28 12 4A 92 41 |ES RICHTIG (.J.A|
00001230: 2F 12 4E 92 45 49 4E 29 20 3C 3C 3C 22 00 6F 2E |/.N.EIN) <<<".o.|
00001240: AE 10 99 3A 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |...:."----------|
00001250: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001260: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
00001270: 7B 2E B3 10 A1 F9 20 45 49 4E 24 00 91 2E B8 10 |{..... EIN$.....|
00001280: 8B 20 45 49 4E 24 B2 22 4A 22 20 A7 20 89 20 32 |. EIN$."J" . . 2|
00001290: 36 00 A9 2E BD 10 8B 20 45 49 4E 24 B2 22 4E 22 |6...... EIN$."N"|
000012A0: 20 A7 20 89 20 34 32 32 35 00 B7 2E 30 11 8F 20 | . . 4225...0.. |
000012B0: 41 45 4E 44 45 52 4E 00 F1 2E 35 11 99 3A 99 22 |AENDERN...5..:."|
000012C0: 20 57 45 4C 43 48 45 52 20 44 41 54 45 4E 53 41 | WELCHER DATENSA|
000012D0: 54 5A 20 53 4F 4C 4C 20 47 45 41 45 4E 44 45 52 |TZ SOLL GEAENDER|
000012E0: 54 22 3A 85 22 20 57 45 52 44 45 4E 20 22 3B 44 |T":." WERDEN ";D|
000012F0: 41 00 25 2F 3A 11 99 3A 99 22 2D 2D 2D 2D 2D 2D |A.%/:..:."------|
00001300: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001310: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001320: 2D 2D 22 3A 99 00 4C 2F 3F 11 99 22 20 4E 41 4D |--":..L/?.." NAM|
00001330: 45 20 44 45 52 20 42 41 4E 4B 20 20 20 20 3A 22 |E DER BANK :"|
00001340: 3B A3 32 32 29 3B 4E 24 28 44 41 29 00 74 2F 44 |;.22);N$(DA).t/D|
00001350: 11 99 22 20 53 54 52 41 53 53 45 20 20 20 20 20 |.." STRASSE |
00001360: 20 20 20 20 20 3A 22 3B A3 32 32 29 3B 41 31 24 | :";.22);A1$|
00001370: 28 44 41 29 00 9C 2F 49 11 99 22 20 50 4F 53 54 |(DA)../I.." POST|
00001380: 4C 45 49 54 5A 41 48 4C 20 20 20 20 20 3A 22 3B |LEITZAHL :";|
00001390: A3 32 32 29 3B 41 32 24 28 44 41 29 00 C4 2F 4E |.22);A2$(DA)../N|
000013A0: 11 99 22 20 4F 52 54 20 20 20 20 20 20 20 20 20 |.." ORT |
000013B0: 20 20 20 20 20 3A 22 3B A3 32 32 29 3B 41 33 24 | :";.22);A3$|
000013C0: 28 44 41 29 00 EB 2F 53 11 99 22 20 42 41 4E 4B |(DA)../S.." BANK|
000013D0: 4C 45 49 54 5A 41 48 4C 20 20 20 20 20 3A 22 3B |LEITZAHL :";|
000013E0: A3 32 31 29 3B 42 4C 28 44 41 29 00 12 30 58 11 |.21);BL(DA)..0X.|
000013F0: 99 22 20 4B 4F 4E 54 4F 4E 55 4D 4D 45 52 20 20 |." KONTONUMMER |
00001400: 20 20 20 20 3A 22 3B A3 32 31 29 3B 4B 54 28 44 | :";.21);KT(D|
00001410: 41 29 00 39 30 5D 11 99 22 20 47 45 4C 44 42 45 |A).90].." GELDBE|
00001420: 54 52 41 47 20 20 20 20 20 20 20 3A 22 3B A3 32 |TRAG :";.2|
00001430: 31 29 3B 47 45 28 44 41 29 00 69 30 62 11 99 3A |1);GE(DA).i0b..:|
00001440: 99 22 20 3E 3E 3E 20 44 41 54 45 4E 53 41 54 5A |." >>> DATENSATZ|
00001450: 20 41 45 4E 44 45 52 4E 20 3F 20 28 12 4A 92 41 | AENDERN ? (.J.A|
00001460: 2F 12 4E 92 45 49 4E 29 22 00 9D 30 67 11 99 3A |/.N.EIN)"..0g..:|
00001470: 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |."--------------|
00001480: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001490: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 99 00 A9 30 |----------":...0|
000014A0: 6C 11 A1 F9 20 45 49 4E 24 00 BF 30 71 11 8B 20 |l... EIN$..0q.. |
000014B0: 45 49 4E 24 B2 22 4E 22 20 A7 20 89 20 32 36 00 |EIN$."N" . . 26.|
000014C0: D7 30 76 11 8B 20 45 49 4E 24 B2 22 4A 22 20 A7 |.0v.. EIN$."J" .|
000014D0: 20 89 20 34 34 38 30 00 E2 30 7B 11 89 20 34 34 | . 4480..0{.. 44|
000014E0: 36 30 00 06 31 80 11 99 22 20 57 41 53 20 53 4F |60..1..." WAS SO|
000014F0: 4C 4C 20 47 45 41 45 4E 44 45 52 54 20 57 45 52 |LL GEAENDERT WER|
00001500: 44 45 4E 20 3F 22 00 18 31 85 11 99 22 20 20 2A |DEN ?"..1..." *|
00001510: 20 12 4E 92 41 4D 45 22 00 2D 31 8A 11 99 22 20 | .N.AME".-1..." |
00001520: 20 2A 20 12 53 92 54 52 41 53 53 45 22 00 47 31 | * .S.TRASSE".G1|
00001530: 8F 11 99 22 20 20 2A 20 12 50 92 4F 53 54 4C 45 |..." * .P.OSTLE|
00001540: 49 54 5A 41 48 4C 22 00 58 31 94 11 99 22 20 20 |ITZAHL".X1..." |
00001550: 2A 20 12 4F 92 52 54 22 00 72 31 99 11 99 22 20 |* .O.RT".r1..." |
00001560: 20 2A 20 12 42 92 41 4E 4B 4C 45 49 54 5A 41 48 | * .B.ANKLEITZAH|
00001570: 4C 22 00 8B 31 9E 11 99 22 20 20 2A 20 12 4B 92 |L"..1..." * .K.|
00001580: 4F 4E 54 4F 4E 55 4D 4D 45 52 22 00 A3 31 A3 11 |ONTONUMMER"..1..|
00001590: 99 22 20 20 2A 20 12 47 92 45 4C 44 42 45 54 52 |." * .G.ELDBETR|
000015A0: 41 47 22 00 C8 31 A5 11 99 22 20 20 2A 20 12 44 |AG"..1..." * .D|
000015B0: 92 41 54 45 4E 53 41 54 5A 20 4E 49 43 48 54 20 |.ATENSATZ NICHT |
000015C0: 41 45 4E 44 45 52 4E 22 00 E7 31 A8 11 99 3A 99 |AENDERN"..1...:.|
000015D0: 22 20 3E 3E 3E 20 49 48 52 45 20 57 41 48 4C 20 |" >>> IHRE WAHL |
000015E0: 3F 20 3C 3C 3C 3C 22 00 1B 32 AD 11 99 3A 99 22 |? <<<<"..2...:."|
000015F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001600: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001610: 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 99 00 27 32 B2 11 |--------":..'2..|
00001620: A1 F9 20 45 49 4E 24 00 5A 32 B7 11 8B 20 45 49 |.. EIN$.Z2... EI|
00001630: 4E 24 B2 22 4E 22 20 A7 20 85 22 20 4E 41 4D 45 |N$."N" . ." NAME|
00001640: 20 44 45 52 20 42 41 4E 4B 20 3A 22 3B 4E 24 28 | DER BANK :";N$(|
00001650: 44 41 29 3A 89 20 34 34 31 30 00 88 32 BC 11 8B |DA):. 4410..2...|
00001660: 20 45 49 4E 24 B2 22 53 22 20 A7 20 85 22 20 53 | EIN$."S" . ." S|
00001670: 54 52 41 53 53 45 20 3A 22 3B 41 31 24 28 44 41 |TRASSE :";A1$(DA|
00001680: 29 3A 89 20 34 34 31 30 00 BB 32 C1 11 8B 20 45 |):. 4410..2... E|
00001690: 49 4E 24 B2 22 50 22 20 A7 20 85 22 20 50 4F 53 |IN$."P" . ." POS|
000016A0: 54 4C 45 49 54 5A 41 48 4C 20 3A 22 3B 41 32 24 |TLEITZAHL :";A2$|
000016B0: 28 44 41 29 3A 89 20 34 34 31 30 00 E5 32 C6 11 |(DA):. 4410..2..|
000016C0: 8B 20 45 49 4E 24 B2 22 4F 22 20 A7 20 85 22 20 |. EIN$."O" . ." |
000016D0: 4F 52 54 20 3A 22 3B 41 33 24 28 44 41 29 3A 89 |ORT :";A3$(DA):.|
000016E0: 20 34 34 31 30 00 17 33 CB 11 8B 20 45 49 4E 24 | 4410..3... EIN$|
000016F0: B2 22 42 22 20 A7 20 85 22 20 42 41 4E 4B 4C 45 |."B" . ." BANKLE|
00001700: 49 54 5A 41 48 4C 20 3A 22 3B 42 4C 28 44 41 29 |ITZAHL :";BL(DA)|
00001710: 3A 89 20 34 34 31 30 00 48 33 D0 11 8B 20 45 49 |:. 4410.H3... EI|
00001720: 4E 24 B2 22 4B 22 20 A7 20 85 22 20 4B 4F 4E 54 |N$."K" . ." KONT|
00001730: 4F 4E 55 4D 4D 45 52 20 3A 22 3B 4B 54 28 44 41 |ONUMMER :";KT(DA|
00001740: 29 3A 89 20 34 34 31 30 00 78 33 D5 11 8B 20 45 |):. 4410.x3... E|
00001750: 49 4E 24 B2 22 47 22 20 A7 20 85 22 20 47 45 4C |IN$."G" . ." GEL|
00001760: 44 42 45 54 52 41 47 20 3A 22 3B 47 45 28 44 41 |DBETRAG :";GE(DA|
00001770: 29 3A 89 20 34 34 31 30 00 8E 33 DA 11 8B 20 45 |):. 4410..3... E|
00001780: 49 4E 24 B2 22 44 22 20 A7 20 89 20 32 30 00 99 |IN$."D" . . 20..|
00001790: 33 DF 11 89 20 34 35 33 30 00 A8 33 F8 11 8F 20 |3... 4530..3... |
000017A0: 4C 4F 45 53 43 48 45 4E 00 E2 33 FD 11 99 3A 99 |LOESCHEN..3...:.|
000017B0: 22 20 57 45 4C 43 48 45 52 20 44 41 54 45 4E 5A |" WELCHER DATENZ|
000017C0: 41 54 5A 20 53 4F 4C 4C 20 47 45 4C 4F 45 53 43 |ATZ SOLL GELOESC|
000017D0: 48 54 22 3A 85 22 20 57 45 52 44 45 4E 20 22 3B |HT":." WERDEN ";|
000017E0: 44 41 00 16 34 02 12 99 3A 99 22 2D 2D 2D 2D 2D |DA..4...:."-----|
000017F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001800: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001810: 2D 2D 2D 22 3A 99 00 3C 34 07 12 99 22 20 4E 41 |---":..<4..." NA|
00001820: 4D 45 20 44 45 52 20 42 41 4E 4B 20 20 20 3A 22 |ME DER BANK :"|
00001830: 3B A3 32 32 29 3B 4E 24 28 44 41 29 00 63 34 0C |;.22);N$(DA).c4.|
00001840: 12 99 22 20 53 54 52 41 53 53 45 20 20 20 20 20 |.." STRASSE |
00001850: 20 20 20 20 3A 22 3B A3 32 32 29 3B 41 31 24 28 | :";.22);A1$(|
00001860: 44 41 29 00 8A 34 11 12 99 22 20 50 4F 53 54 4C |DA)..4..." POSTL|
00001870: 45 49 54 5A 41 48 4C 20 20 20 20 3A 22 3B A3 32 |EITZAHL :";.2|
00001880: 32 29 3B 41 32 24 28 44 41 29 00 B1 34 16 12 99 |2);A2$(DA)..4...|
00001890: 22 20 4F 52 54 20 20 20 20 20 20 20 20 20 20 20 |" ORT |
000018A0: 20 20 3A 22 3B A3 32 32 29 3B 41 33 24 28 44 41 | :";.22);A3$(DA|
000018B0: 29 00 D7 34 1B 12 99 22 20 42 41 4E 4B 4C 45 49 |)..4..." BANKLEI|
000018C0: 54 5A 41 48 4C 20 20 20 20 3A 22 3B A3 32 31 29 |TZAHL :";.21)|
000018D0: 3B 42 4C 28 44 41 29 00 FD 34 20 12 99 22 20 4B |;BL(DA)..4 .." K|
000018E0: 4F 4E 54 4F 4E 55 4D 4D 45 52 20 20 20 20 20 3A |ONTONUMMER :|
000018F0: 22 3B A3 32 31 29 3B 4B 54 28 44 41 29 00 23 35 |";.21);KT(DA).#5|
00001900: 25 12 99 22 A0 47 45 4C 44 42 45 54 52 41 47 20 |%..".GELDBETRAG |
00001910: 20 20 20 20 20 3A 22 3B A3 32 31 29 3B 47 45 28 | :";.21);GE(|
00001920: 44 41 29 00 53 35 2A 12 99 3A 99 22 20 3E 3E 3E |DA).S5*..:." >>>|
00001930: 20 44 41 54 45 4E 53 41 54 5A 20 41 45 4E 44 45 | DATENSATZ AENDE|
00001940: 52 4E 20 3F 20 28 12 4A 92 41 2F 12 4E 92 45 49 |RN ? (.J.A/.N.EI|
00001950: 4E 29 22 00 85 35 2F 12 99 3A 99 22 2D 2D 2D 2D |N)"..5/..:."----|
00001960: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001970: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001980: 2D 2D 2D 2D 22 00 91 35 34 12 A1 F9 20 45 49 4E |----"..54... EIN|
00001990: 24 00 A7 35 39 12 8B 20 45 49 4E 24 B2 22 4E 22 |$..59.. EIN$."N"|
000019A0: 20 A7 20 89 20 32 30 00 03 36 3E 12 8B 20 45 49 | . . 20..6>.. EI|
000019B0: 4E 24 B2 22 4A 22 20 A7 20 4E 24 28 44 41 29 B2 |N$."J" . N$(DA).|
000019C0: 22 22 3A 41 31 24 28 44 41 29 B2 22 22 3A 41 32 |"":A1$(DA)."":A2|
000019D0: 24 28 44 41 29 B2 22 22 3A 41 33 24 28 44 41 29 |$(DA)."":A3$(DA)|
000019E0: B2 22 22 3A 42 4C 28 44 41 29 B2 30 3A 4B 54 28 |."":BL(DA).0:KT(|
000019F0: 44 41 29 B2 30 3A 47 45 28 44 41 29 B2 30 3A 89 |DA).0:GE(DA).0:.|
00001A00: 20 32 36 00 0E 36 43 12 89 20 34 36 36 30 00 21 | 26..6C.. 4660.!|
00001A10: 36 88 13 8F 20 50 52 4F 47 52 41 4D 4D 45 4E 44 |6... PROGRAMMEND|
00001A20: 45 00 A2 36 92 13 E8 3A 99 22 98 3D 3D 3D 3D 3D |E..6...:.".=====|
00001A30: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001A40: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001A50: 3D 3D 3D 22 3A 99 22 20 20 20 20 20 20 20 20 20 |===":." |
00001A60: 50 52 4F 47 52 41 4D 4D 20 2D 20 45 4E 44 45 22 |PROGRAMM - ENDE"|
00001A70: 3A 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |:."=============|
00001A80: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001A90: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 3A 99 3A 99 |===========":.:.|
00001AA0: 3A 99 00 27 37 9C 13 99 22 2D 2D 2D 2D 2D 2D 2D |:..'7..."-------|
00001AB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001AC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001AD0: 2D 22 3A 99 3A 99 22 20 20 20 20 44 49 45 20 44 |-":.:." DIE D|
00001AE0: 41 54 45 49 20 57 49 52 44 20 4E 45 55 20 53 4F |ATEI WIRD NEU SO|
00001AF0: 52 54 49 45 52 54 22 3A 99 3A 99 22 2D 2D 2D 2D |RTIERT":.:."----|
00001B00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001B10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001B20: 2D 2D 2D 2D 22 3A 99 00 35 37 A6 13 5A 31 B2 31 |----":..57..Z1.1|
00001B30: 3A 5A 32 B2 31 00 4B 37 B0 13 8B 20 5A 31 B1 31 |:Z2.1.K7... Z1.1|
00001B40: 30 30 20 A7 20 89 20 35 31 34 30 00 6C 37 B5 13 |00 . . 5140.l7..|
00001B50: 8B 20 4E 24 28 5A 31 29 B2 22 22 20 A7 20 5A 31 |. N$(Z1)."" . Z1|
00001B60: B2 5A 31 AA 31 3A 89 20 35 30 34 30 00 7F 37 BA |.Z1.1:. 5040..7.|
00001B70: 13 54 31 24 28 5A 32 29 B2 4E 24 28 5A 31 29 00 |.T1$(Z2).N$(Z1).|
00001B80: 93 37 C4 13 54 32 24 28 5A 32 29 B2 41 31 24 28 |.7..T2$(Z2).A1$(|
00001B90: 5A 31 29 00 A7 37 CE 13 54 33 24 28 5A 32 29 B2 |Z1)..7..T3$(Z2).|
00001BA0: 41 32 24 28 5A 31 29 00 BB 37 D8 13 54 34 24 28 |A2$(Z1)..7..T4$(|
00001BB0: 5A 32 29 B2 41 33 24 28 5A 31 29 00 CD 37 E2 13 |Z2).A3$(Z1)..7..|
00001BC0: 54 35 28 5A 32 29 B2 42 4C 28 5A 31 29 00 DF 37 |T5(Z2).BL(Z1)..7|
00001BD0: EC 13 54 36 28 5A 32 29 B2 4B 54 28 5A 31 29 00 |..T6(Z2).KT(Z1).|
00001BE0: F1 37 F6 13 54 37 28 5A 32 29 B2 47 45 28 5A 31 |.7..T7(Z2).GE(Z1|
00001BF0: 29 00 05 38 00 14 5A 31 B2 5A 31 AA 31 3A 5A 32 |)..8..Z1.Z1.1:Z2|
00001C00: B2 5A 32 AA 31 00 10 38 0A 14 89 20 35 30 34 30 |.Z2.1..8... 5040|
00001C10: 00 6E 38 14 14 99 22 20 44 49 45 20 44 41 54 45 |.n8..." DIE DATE|
00001C20: 4E 20 57 55 52 44 45 4E 20 4E 55 4E 20 4E 45 55 |N WURDEN NUN NEU|
00001C30: 20 53 4F 52 54 49 45 52 54 20 21 21 21 22 3A 99 | SORTIERT !!!":.|
00001C40: 3A 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |:."-------------|
00001C50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001C60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 99 00 D1 |-----------":...|
00001C70: 38 1E 14 99 22 20 4E 55 4E 20 57 49 52 44 20 44 |8..." NUN WIRD D|
00001C80: 45 52 20 47 45 53 41 4D 54 57 45 52 54 20 42 45 |ER GESAMTWERT BE|
00001C90: 54 45 43 48 4E 45 54 20 21 21 21 22 3A 99 3A 99 |TECHNET !!!":.:.|
00001CA0: 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |"---------------|
00001CB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001CC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 99 3A 47 57 B2 |---------":.:GW.|
00001CD0: 30 00 E1 38 28 14 81 20 49 B2 31 20 A4 20 31 30 |0..8(.. I.1 . 10|
00001CE0: 30 00 F1 38 32 14 47 57 B2 47 57 AA 54 37 28 49 |0..82.GW.GW.T7(I|
00001CF0: 29 00 F9 38 3C 14 82 20 49 00 53 39 46 14 99 22 |)..8<.. I.S9F.."|
00001D00: 20 44 45 52 20 47 45 53 41 4D 54 57 45 52 54 20 | DER GESAMTWERT |
00001D10: 42 45 54 52 41 45 47 54 20 3A 22 3B 47 57 3B 22 |BETRAEGT :";GW;"|
00001D20: 44 4D 22 3A 99 3A 99 22 2D 2D 2D 2D 2D 2D 2D 2D |DM":.:."--------|
00001D30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001D40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001D50: 22 3A 99 00 B0 39 50 14 99 22 20 44 49 45 20 44 |":...9P.." DIE D|
00001D60: 41 54 45 4E 20 57 45 52 44 45 4E 20 4E 55 4E 20 |ATEN WERDEN NUN |
00001D70: 47 45 53 49 43 48 45 52 54 20 2E 2E 2E 2E 2E 22 |GESICHERT ....."|
00001D80: 3A 99 3A 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |:.:."-----------|
00001D90: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001DA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 99 |-------------":.|
00001DB0: 00 C3 39 5A 14 F2 22 4B 4F 4E 54 4F 2D 56 45 52 |..9Z.."KONTO-VER|
00001DC0: 57 2E 22 00 D7 39 64 14 F2 22 4B 4F 4E 54 4F 2D |W."..9d.."KONTO-|
00001DD0: 47 45 53 41 4D 54 22 00 F0 39 6E 14 FE 0D 23 31 |GESAMT"..9n...#1|
00001DE0: 2C 22 4B 4F 4E 54 4F 2D 56 45 52 57 2E 22 2C 57 |,"KONTO-VERW.",W|
00001DF0: 00 00 3A 78 14 81 20 49 B2 31 20 A4 20 31 30 30 |..:x.. I.1 . 100|
00001E00: 00 5F 3A 82 14 98 31 2C 54 31 24 28 49 29 3B C7 |._:...1,T1$(I);.|
00001E10: 28 31 33 29 3B 54 32 24 28 49 29 3B C7 28 31 33 |(13);T2$(I);.(13|
00001E20: 29 3B 54 33 24 28 49 29 3B C7 28 31 33 29 3B 54 |);T3$(I);.(13);T|
00001E30: 34 24 28 49 29 3B C7 28 31 33 29 3B 54 35 28 49 |4$(I);.(13);T5(I|
00001E40: 29 3B C7 28 31 33 29 3B 54 36 28 49 29 3B C7 28 |);.(13);T6(I);.(|
00001E50: 31 33 29 3B 54 37 28 49 29 3B C7 28 31 33 29 00 |13);T7(I);.(13).|
00001E60: 67 3A 8C 14 82 20 49 00 70 3A 96 14 FE 0F 23 31 |g:... I.p:....#1|
00001E70: 00 8A 3A A0 14 FE 0D 23 31 2C 22 4B 4F 4E 54 4F |..:....#1,"KONTO|
00001E80: 2D 47 45 53 41 4D 54 22 2C 57 00 9A 3A AA 14 98 |-GESAMT",W..:...|
00001E90: 31 2C 47 57 3B C7 28 31 33 29 00 A3 3A B4 14 FE |1,GW;.(13)..:...|
00001EA0: 0F 23 31 00 04 3B BE 14 99 22 20 44 49 45 20 44 |.#1..;..." DIE D|
00001EB0: 41 54 45 4E 20 57 55 52 44 45 4E 20 47 45 53 49 |ATEN WURDEN GESI|
00001EC0: 43 48 45 52 54 20 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |CHERT ..........|
00001ED0: 22 3A 99 3A 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |":.:."----------|
00001EE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001EF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A |--------------":|
00001F00: FE 0B 20 34 00 0D 3B C8 14 89 20 32 36 00 29 3B |.. 4..;... 26.);|
00001F10: 70 17 8F 20 47 45 53 41 4D 54 57 45 52 54 20 44 |p.. GESAMTWERT D|
00001F20: 45 52 20 4B 4F 4E 54 45 4E 00 64 3B 7A 17 E8 3A |ER KONTEN.d;z..:|
00001F30: 99 3A 99 3A 99 22 05 3D 3D 3D 3D 3D 3D 3D 3D 3D |.:.:.".=========|
00001F40: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001F50: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 |==============="|
00001F60: 3A 99 3A 99 00 97 3B 84 17 99 22 81 20 44 45 52 |:.:...;...". DER|
00001F70: 20 47 45 53 41 4D 54 57 45 52 54 20 41 4C 4C 45 | GESAMTWERT ALLE|
00001F80: 52 20 56 45 52 57 41 4C 54 45 54 45 4E 20 4B 4F |R VERWALTETEN KO|
00001F90: 4E 54 45 4E 22 3A 99 00 AC 3B 8E 17 99 22 20 42 |NTEN":...;..." B|
00001FA0: 45 54 52 41 45 47 54 20 3A 20 22 3B 00 C4 3B 98 |ETRAEGT : ";..;.|
00001FB0: 17 FE 0D 23 31 2C 22 4B 4F 4E 54 4F 2D 47 45 53 |...#1,"KONTO-GES|
00001FC0: 41 4D 54 22 00 D0 3B A2 17 84 31 2C 57 45 52 54 |AMT"..;...1,WERT|
00001FD0: 00 D9 3B AC 17 FE 0F 23 31 00 F9 3B B6 17 99 22 |..;....#1..;..."|
00001FE0: 96 22 3B 57 45 52 54 3B 22 81 20 44 45 55 54 53 |.";WERT;". DEUTS|
00001FF0: 43 48 45 20 4D 41 52 4B 22 00 38 3C C0 17 99 3A |CHE MARK".8<...:|
00002000: 99 3A 99 22 05 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.:.".===========|
00002010: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00002020: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 3A 99 |=============":.|
00002030: 3A 99 3A 99 3A 99 3A 99 00 67 3C CA 17 99 22 9E |:.:.:.:..g<...".|
00002040: 3E 3E 3E 3E 3E 20 20 42 49 54 54 45 20 45 49 4E |>>>>> BITTE EIN|
00002050: 45 20 54 41 53 54 45 20 44 52 55 45 43 4B 45 4E |E TASTE DRUECKEN|
00002060: 20 3C 3C 3C 3C 3C 22 00 73 3C D4 17 A1 F9 20 45 | <<<<<".s<.... E|
00002070: 49 4E 24 00 7C 3C DE 17 89 20 32 36 00 00 00 |IN$.|<... 26... |
..*.... ++++++++++++++++++++++++++++++++
++.S.... +
+.|.... + PUBLIC-DOMAIN SOFTWARE
+...... +
+.N.... ++++++++++++++++++++++++++++
++++++.T...:.Z...:.....:.....:...... \\\
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\.6.... \
\.^.... \
PROGRAM MADE BY \...... \
\...... \
> PETER KLEIN < \.V.... \
\...... \--
-----------------------------\.&.... \
\.N.... \
* BASIC 7.0 \.V.... \
* 40 ZEICHEN/ASCII CODE \...... \
* C128 + 1541/1570/1571 \.F.... \
\...... \\\
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\.....:....
.:.W.... N$(100),BL(100),KT(100),A1$(100
),A2$(100),A3$(100),GE(100),T1$(100),T2$
(100),T3$(100),T4$(100),T5(100),T6(100),
T7(100)...... 0,1:. 4,1.. ...:.".#######
#################################":."
KONTENVERWALTUNG-VERTEILERMENUE":."####
####################################":.:
..: ...". [1] NEUE DATEI INITIALISIEREN"
:..K (..". [2] EINLESEN DER DATEN(PROGRA
MMBEGIN)":... 2..". [3] AUSGABE DER DATE
N":... <..". [4] AENDERN VON DATEN":..J
F..". [5] PROGRAMM ENDE":... P..". [6] G
ESAMTWERT DER KONTEN".. Z..:.:.:.:...!D.
.". ICH ERWARTE IHRE EINGABE".)!N... EIN
$.9!X.EIN.E(EIN$).U!... EIN.0 . EIN.7 .
. EIN . 1000,2000,3000,4000,5000,6000.!
... 110..!... *** INITIALISIEREN ***."".
..:.".==================================
======":." NEUE DATEI INITIALISIERE
N":."===================================
=====":.:..U"...".----------------------
------------------":..P"..." ACHTUNG: DI
ESE FUNKTION FUEHRT ZU VOLL-":." STAENDI
GEM DATENVERLUST.WOLLEN SIE":." WEITERMA
CHEN ? (.J.A /.N.EIN)":...#..."---------
-------------------------------":...#...
. EIN$.%#... EIN$.."J" . . 10.M#..." DIE
DATEI WIRD NEU GEORDNET !":..#$.."----
------------------------------------":..
.#... I.1 . 100.I#8.N$(I)."":A1$(I)."":A
2$(I)."":A3$(I)."":BL.0:GE.0:KT.0.Q#B..
I..#G.GES.0..$L.." DIE DATEI WIRD JETZT
INITIALISIERT !!":..=$V.."--------------
--------------------------":..P$`.."KONT
O-VERW.".I$J...#1,"KONTO-VERW.",W.Y$T..
I.1 . 100.W$~..1,N$(I);G(13);A1$(I);G(13
);A2$(I);G(13);A3$(I);G(13);BL(I);G(13);
KT(I);G(13);GE(I);G(13)..$... I..$....#1
..$..."KONTO-GESAMT"..%....#1,"KONTO-GES
AMT",W.!%...1,GES.*%....#1.Z%D.." DIE DA
TEI WURDE ERFOLGREICH EROEFFNET":...%N..
"---------------------------------------
-"..%X... 3..%... 26..%.....%P.. *** PRO
GRAMMBEGINN ***.A&Z..:.".===============
=========================":." EI
NLESEN DER DATEN":."====================
====================":.:..T&...".-------
---------------------------------":...&.
.." ACHTUNG:DIE DATEN IM COMPUTERSPEICHE
R":." WERDEN NUN UEBERSCHRIEBEN !!!.WOLL
EN":." SIE WEITERMACHEN ?(.J.A/.N.EIN)":
..#'..."--------------------------------
--------":../'.... EIN$.F'... EIN$.."J"
. . 10..'..." DIE DATEI WIRD NUN GELESEN
!!!":.:."------------------------------
----------":...' ...#1,"KONTO-VERW.".D'*
.. I.1 . 100..'4..1,N$(I),A1$(I),A2$(I),
A3$(I),BL(I),KT(I),GE(I)..(>.. I..(H...#
1._(R.." DIE DATEN WURDEN EINGELESEN !!!
":.:."----------------------------------
------".H(\... 3.Q(F.. 26..(... *** AUSG
ABE DER DATEN ***..(B.. I.1 . 100..(L..0
.*)V..".================================
========":." DATEN FUER KONTEN":.
"=======================================
=":.:.:.:..N)..." > DATENSATZ NR.";I;"<"
:.:.:..U)...". NAME DER BANK :";.22);
N$(I)..)..." STRASSE :";.22);A1
$(I).C)..." POSTLEITZAHL :";.22);A2$
(I)..)..." ORT :";.22);A3$(
I)..*..." BANKLEITZAHL :";.21);BL(I)
.6*..." KONTONUMMER :";.21);KT(I).\
*..." GELDBETRAG :";.21);GE(I).F*.
..:.:...*...". >>> BITTE EINE TASTE DRUE
CKEN <<<"..*.... EIN$.A*&.. N$(I.1)."" .
KT(I).0 . . 3130.I*0.. I..*:..:.1,12,12
,"ENDE DER DATEN"..*D... 3..*N.. 26..+ .
. *** AENDERN ***..+...:.".=============
===========================":."
DATENSATZVERWALTUNG":."=================
=======================":.:."."..+...".E
.INGABE"..+...".A.ENDERN".K+H..".L.OESCH
EN"..+R..:.">>> IHRE WAHL <<<"..,..."---
-------------------------------------"."
,.... EIN$.:,... EIN$."E" . . 4200.R,...
EIN$."A" . . 4400.J,... EIN$."L" . . 46
00.U,... 4070..,H.. EINGABE..,M..:." >>>
ICH SUCHE EIN FREIES DATENFELD <<<":.:.
"---------------------------------------
-"..,R.. I.1 . 100..-W.. N$(I)."" . . 42
25..-|.. I.&-...:." EINGABE :".G-..." NA
ME DER BANK :";N$(I).I-..." STRASSE
:";A1$(I)..-..." POSTLEITZAHL
:";A2$(I)..-..." ORT :";A
3$(I).N-..." BANKLEITZAHL :";BL(I)..
-..." KONTONUMMER :";KT(I)......" G
ELDBETRAG :";GE(I).=....:.">>> ALL
ES RICHTIG (.J.A/.N.EIN) <<<".O....:."--
--------------------------------------".
{..... EIN$...... EIN$."J" . . 26......
EIN$."N" . . 4225...0.. AENDERN...5..:."
WELCHER DATENSATZ SOLL GEAENDERT":." WE
RDEN ";DA.%/:..:."----------------------
------------------":..L/?.." NAME DER BA
NK :";.22);N$(DA).T/D.." STRASSE
:";.22);A1$(DA)../I.." POSTLEITZAHL
:";.22);A2$(DA).D/N.." ORT
:";.22);A3$(DA)../S.." BANKLEITZAHL
:";.21);BL(DA)..0X.." KONTONUMMER
:";.21);KT(DA).90].." GELDBETRAG
:";.21);GE(DA).I0B..:." >>> DATENSATZ
AENDERN ? (.J.A/.N.EIN)"..0G..:."------
----------------------------------":...0
L... EIN$..0Q.. EIN$."N" . . 26.W0V.. EI
N$."J" . . 4480..0{.. 4460..1..." WAS SO
LL GEAENDERT WERDEN ?"..1..." * .N.AME"
.-1..." * .S.TRASSE".G1..." * .P.OSTLE
ITZAHL".X1..." * .O.RT".R1..." * .B.AN
KLEITZAHL"..1..." * .K.ONTONUMMER"..1..
." * .G.ELDBETRAG".H1..." * .D.ATENSAT
Z NICHT AENDERN"..1...:." >>> IHRE WAHL
? <<<<"..2...:."------------------------
----------------":..'2.... EIN$.Z2... EI
N$."N" . ." NAME DER BANK :";N$(DA):. 44
10..2... EIN$."S" . ." STRASSE :";A1$(DA
):. 4410..2A.. EIN$."P" . ." POSTLEITZAH
L :";A2$(DA):. 4410..2F.. EIN$."O" . ."
ORT :";A3$(DA):. 4410..3K.. EIN$."B" . .
" BANKLEITZAHL :";BL(DA):. 4410.H3P.. EI
N$."K" . ." KONTONUMMER :";KT(DA):. 4410
.X3U.. EIN$."G" . ." GELDBETRAG :";GE(DA
):. 4410..3Z.. EIN$."D" . . 20..3... 453
0..3... LOESCHEN..3...:." WELCHER DATENZ
ATZ SOLL GELOESCHT":." WERDEN ";DA..4...
:."-------------------------------------
---":..<4..." NAME DER BANK :";.22);N$
(DA).C4..." STRASSE :";.22);A1$(
DA)..4..." POSTLEITZAHL :";.22);A2$(D
A)..4..." ORT :";.22);A3$(DA
).W4..." BANKLEITZAHL :";.21);BL(DA).
.4 .." KONTONUMMER :";.21);KT(DA).#5
%.." GELDBETRAG :";.21);GE(DA).S5*.
.:." >>> DATENSATZ AENDERN ? (.J.A/.N.EI
N)"..5/..:."----------------------------
------------"..54... EIN$..59.. EIN$."N"
. . 20..6>.. EIN$."J" . N$(DA)."":A1$(D
A)."":A2$(DA)."":A3$(DA)."":BL(DA).0:KT(
DA).0:GE(DA).0:. 26..6C.. 4660.!6... PRO
GRAMMENDE..6...:.".=====================
===================":." PROGRAMM
- ENDE":."=============================
===========":.:.:..'7..."---------------
-------------------------":.:." DIE D
ATEI WIRD NEU SORTIERT":.:."------------
----------------------------":..57..Z1.1
:Z2.1.K7... Z1.100 . . 5140.L7... N$(Z1)
."" . Z1.Z1.1:. 5040.7..T1$(Z2).N$(Z1).
.7D.T2$(Z2).A1$(Z1)..7N.T3$(Z2).A2$(Z1).
.7X.T4$(Z2).A3$(Z1).M7..T5(Z2).BL(Z1)..7
..T6(Z2).KT(Z1)..7..T7(Z2).GE(Z1)..8..Z1
.Z1.1:Z2.Z2.1..8... 5040.N8..." DIE DATE
N WURDEN NUN NEU SORTIERT !!!":.:."-----
-----------------------------------":..Q
8..." NUN WIRD DER GESAMTWERT BETECHNET
!!!":.:."-------------------------------
---------":.:GW.0..8(.. I.1 . 100..82.GW
.GW.T7(I)..8<.. I.S9F.." DER GESAMTWERT
BETRAEGT :";GW;"DM":.:."----------------
------------------------":...9P.." DIE D
ATEN WERDEN NUN GESICHERT .....":.:."---
-------------------------------------":.
.C9Z.."KONTO-VERW.".W9D.."KONTO-GESAMT".
.9N...#1,"KONTO-VERW.",W..:X.. I.1 . 100
._:...1,T1$(I);G(13);T2$(I);G(13);T3$(I)
;G(13);T4$(I);G(13);T5(I);G(13);T6(I);G(
13);T7(I);G(13).G:... I.P:....#1..: ...#
1,"KONTO-GESAMT",W..:...1,GW;G(13)..:...
.#1..;..." DIE DATEN WURDEN GESICHERT ..
........":.:."--------------------------
--------------":.. 4..;H.. 26.);P.. GESA
MTWERT DER KONTEN.D;Z..:.:.:.".=========
===============================":.:...;.
..". DER GESAMTWERT ALLER VERWALTETEN KO
NTEN":...;..." BETRAEGT : ";.D;....#1,"K
ONTO-GESAMT".P;...1,WERT.Y;....#1..;..."
.";WERT;". DEUTSCHE MARK".8<...:.:.".===
=====================================":.
:.:.:.:..G<J..".>>>>> BITTE EINE TASTE
DRUECKEN <<<<<".S<T... EIN$.|<... 26...
> CLICK IMAGE PREVIEW FOR FULL MODAL