KUNDENERF.
FILE INFORMATION
FILENAME(S): KUNDENERF.
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-02 16:30:16
APPEARS ON: 3 disk(s)
FILE HASH
1bfade5814b5f0075388e00f5ef848358bf566763dda113247a20b34dc06baad
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SEITE 2 | KUNDENERF. | PRG | Treasure Chest - Onkel Wolfgang | 5 | 18 | DOWNLOAD FILE |
| 128 ER SONDER 64 | KUNDENERF. | PRG | C64er, Treasure Chest - Plattfuss | 5 | 18 | DOWNLOAD FILE |
| 128 ER SONDER 64 | KUNDENERF. | PRG | DuncanTwain | 5 | 18 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 08 1C 04 00 FE 25 00 58 1C 05 00 4B 4B B2 |.......%.X...KK.|
00000010: 33 30 20 3A 20 8F 20 21 21 21 21 21 21 21 21 20 |30 : . !!!!!!!! |
00000020: 20 4B 55 4E 44 45 4E 41 4E 5A 41 48 4C 20 20 21 | KUNDENANZAHL !|
00000030: 21 21 21 21 21 21 21 21 21 21 21 21 21 21 21 21 |!!!!!!!!!!!!!!!!|
00000040: 21 21 21 21 21 21 21 21 21 21 21 21 21 21 21 21 |!!!!!!!!!!!!!!!!|
00000050: 21 21 21 21 21 21 21 21 00 72 1C 08 00 FE 1A 20 |!!!!!!!!.r..... |
00000060: 30 2C 30 2C 37 39 2C 32 34 2C 31 20 3A E7 35 2C |0,0,79,24,1 :.5,|
00000070: 31 31 00 7F 1C 12 00 86 4B 31 24 28 4B 4B 29 00 |11......K1$(KK).|
00000080: 8A 1C 20 00 99 20 22 11 11 22 00 D8 1C 28 00 99 |.. .. ".."...(..|
00000090: 22 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 2A 2A |" *****|
000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000D0: 2A 2A 2A 2A 2A 2A 2A 22 00 26 1D 2A 00 99 22 20 |*******".&.*.." |
000000E0: 20 20 20 20 20 20 20 20 20 2A 2A 20 20 20 20 20 | ** |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000120: 20 20 20 2A 2A 22 00 74 1D 2D 00 99 22 20 20 20 | **".t.-.." |
00000130: 20 20 20 20 20 20 20 2A 2A 20 20 20 20 20 20 20 | ** |
00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000170: 20 2A 2A 22 00 C2 1D 32 00 99 22 20 20 20 20 20 | **"...2.." |
00000180: 20 20 20 20 20 2A 2A 2A 2A 20 20 20 20 20 20 20 | **** |
00000190: 20 20 20 20 20 4B 20 55 20 4E 20 44 20 45 20 4E | K U N D E N|
000001A0: 20 45 20 52 20 46 20 41 20 53 20 53 20 55 20 4E | E R F A S S U N|
000001B0: 20 47 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A | G ***|
000001C0: 2A 22 00 10 1E 34 00 99 22 20 20 20 20 20 20 20 |*"...4.." |
000001D0: 20 20 20 2A 2A 20 20 20 20 20 20 20 20 20 20 20 | ** |
000001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 2A 22 | **"|
00000210: 00 5E 1E 36 00 99 22 20 20 20 20 20 20 20 20 20 |.^.6.." |
00000220: 20 2A 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 | ** |
00000230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000250: 20 20 20 20 20 20 20 20 20 20 20 2A 2A 22 00 AC | **"..|
00000260: 1E 37 00 99 22 20 20 20 20 20 20 20 20 20 20 2A |.7.." *|
00000270: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000280: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000290: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 B5 1E 3C |***********"...<|
000002B0: 00 E7 35 2C 34 00 C0 1E 3E 00 99 22 11 11 11 22 |..5,4...>.."..."|
000002C0: 00 ED 1E 41 00 99 20 22 20 20 20 20 20 20 20 20 |...A.. " |
000002D0: 20 20 50 52 4F 47 52 41 4D 4D 45 52 53 54 45 4C | PROGRAMMERSTEL|
000002E0: 4C 55 4E 47 20 28 37 2F 38 39 29 3A 22 00 F7 1E |LUNG (7/89):"...|
000002F0: 43 00 99 22 11 11 22 00 01 1F 46 00 E7 20 35 2C |C..".."...F.. 5,|
00000300: 38 00 4F 1F 4B 00 99 22 20 20 20 20 20 20 20 20 |8.O.K.." |
00000310: 20 20 2A 20 20 2A 20 20 2A 20 20 2A 20 20 20 20 | * * * * |
00000320: 20 44 20 49 20 45 20 54 20 45 20 52 20 20 20 20 | D I E T E R |
00000330: 4C 20 45 20 49 20 53 20 4D 20 41 20 4E 20 4E 20 |L E I S M A N N |
00000340: 20 20 20 20 2A 20 20 2A 20 20 2A 20 20 2A 22 00 | * * * *".|
00000350: 5A 1F 50 00 99 22 11 11 11 22 00 64 1F 55 00 E7 |Z.P.."...".d.U..|
00000360: 20 35 2C 34 00 B2 1F 57 00 99 22 20 20 20 20 20 | 5,4...W.." |
00000370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000380: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000390: 20 43 4F 50 59 52 49 47 48 54 20 28 43 29 20 31 | COPYRIGHT (C) 1|
000003A0: 39 38 39 20 42 59 20 44 2E 4C 45 49 53 4D 41 4E |989 BY D.LEISMAN|
000003B0: 4E 22 00 01 20 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A |N".. d.. *******|
000003C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 20 |************** |
000003D0: 4B 55 4E 44 45 4E 4C 49 53 54 45 20 45 49 4E 4C |KUNDENLISTE EINL|
000003E0: 45 53 45 4E 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |ESEN **********|
000003F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000400: 2A 00 16 20 6E 00 FE 0D 23 32 2C 22 4B 55 4E 44 |*.. n...#2,"KUND|
00000410: 45 4E 22 2C 4C 36 00 26 20 78 00 81 20 52 4E B2 |EN",L6.& x.. RN.|
00000420: 31 20 A4 20 4B 4B 00 32 20 7A 00 FE 12 23 32 2C |1 . KK.2 z...#2,|
00000430: 52 4E 00 3D 20 7B 00 84 32 2C 52 43 24 00 49 20 |RN.= {..2,RC$.I |
00000440: 7D 00 FE 12 23 32 2C 52 4E 00 63 20 82 00 8B 20 |}...#2,RN.c ... |
00000450: C6 28 52 43 24 29 B2 32 35 35 20 A7 20 52 43 24 |.(RC$).255 . RC$|
00000460: B2 22 22 00 73 20 8C 00 4B 31 24 28 52 4E 29 B2 |."".s ..K1$(RN).|
00000470: 52 43 24 00 7C 20 91 00 82 20 52 4E 00 85 20 96 |RC$.| ... RN.. .|
00000480: 00 FE 0F 23 32 00 8D 20 A0 00 FE 0B 33 00 93 20 |...#2.. ....3.. |
00000490: AA 00 E8 00 A4 20 C8 00 FE 1A 30 2C 30 2C 37 39 |..... ....0,0,79|
000004A0: 2C 33 2C 31 00 FE 20 D2 00 99 20 22 12 20 20 20 |,3,1.. ... ". |
000004B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004F0: 20 20 20 20 20 20 20 20 20 20 20 20 92 22 00 58 | .".X|
00000500: 21 DC 00 99 20 22 12 20 20 20 20 20 20 20 20 20 |!... ". |
00000510: 20 20 20 20 20 20 20 20 20 20 45 20 52 20 46 20 | E R F |
00000520: 41 20 53 20 53 20 55 20 4E 20 47 20 20 20 56 20 |A S S U N G V |
00000530: 4F 20 4E 20 20 20 4B 20 55 20 4E 20 44 20 45 20 |O N K U N D E |
00000540: 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |N |
00000550: 20 20 20 20 20 20 92 22 00 B2 21 E6 00 99 20 22 | ."..!... "|
00000560: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005B0: 92 22 00 CC 21 A4 01 FE 1A 20 30 2C 31 32 2C 33 |."..!.... 0,12,3|
000005C0: 39 2C 32 34 2C 31 20 3A E7 35 2C 38 00 FB 21 A9 |9,24,1 :.5,8..!.|
000005D0: 01 99 22 12 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
000005E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005F0: 20 20 20 20 20 20 20 20 20 92 22 00 2A 22 AE 01 | .".*"..|
00000600: 99 22 12 20 4B 55 4E 44 45 4E 2D 4E 52 2E 20 3D |.". KUNDEN-NR. =|
00000610: 20 20 30 20 20 2D 3E 20 20 41 42 46 52 41 47 45 | 0 -> ABFRAGE|
00000620: 45 4E 44 45 20 20 20 20 92 22 00 59 22 0D 02 99 |ENDE .".Y"...|
00000630: 22 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00000640: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000650: 20 20 20 20 20 20 20 92 22 00 88 22 12 02 99 22 | .".."..."|
00000660: 12 20 4B 55 4E 44 45 4E 2D 4E 52 2E 20 3E 20 32 |. KUNDEN-NR. > 2|
00000670: 37 20 20 2D 3E 20 20 41 55 53 4C 41 4E 44 53 4B |7 -> AUSLANDSK|
00000680: 55 4E 44 45 4E 20 92 22 00 B7 22 17 02 99 22 12 |UNDEN .".."...".|
00000690: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006B0: 20 20 20 20 20 92 22 00 BD 22 26 02 99 00 EC 22 | .".."&...."|
000006C0: 2B 02 99 22 12 20 20 20 20 20 20 20 20 20 20 20 |+..". |
000006D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006E0: 20 20 20 20 20 20 20 20 20 20 92 22 00 1B 23 30 | ."..#0|
000006F0: 02 99 22 12 20 4B 55 4E 44 45 4E 2D 4E 41 4D 45 |..". KUNDEN-NAME|
00000700: 20 20 2D 3E 20 20 4D 41 58 49 4D 41 4C 20 36 20 | -> MAXIMAL 6 |
00000710: 5A 45 49 43 48 45 4E 21 20 92 22 00 4A 23 35 02 |ZEICHEN! .".J#5.|
00000720: 99 22 12 20 20 20 20 20 20 20 20 20 20 20 20 20 |.". |
00000730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000740: 20 20 20 20 20 20 20 20 92 22 00 99 23 58 02 8F | ."..#X..|
00000750: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00000760: 2A 2A 2A 2A 2A 2A 20 20 4B 55 4E 44 45 4E 4C 49 |****** KUNDENLI|
00000770: 53 54 45 20 20 41 55 53 47 45 42 45 4E 20 20 2A |STE AUSGEBEN *|
00000780: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000790: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B3 23 6C 02 FE 1A |*********..#l...|
000007A0: 20 34 30 2C 34 2C 37 39 2C 32 34 2C 31 20 3A E7 | 40,4,79,24,1 :.|
000007B0: 35 2C 32 00 C6 23 76 02 81 20 4A B2 31 20 A4 20 |5,2..#v.. J.1 . |
000007C0: 4B 4B 20 A9 20 32 00 D0 23 7B 02 99 22 12 22 3B |KK . 2..#{..".";|
000007D0: 00 DB 23 80 02 E7 20 35 2C 31 34 00 36 24 8A 02 |..#... 5,14.6$..|
000007E0: 99 20 FB 20 22 23 20 20 23 23 23 20 23 20 23 23 |. . "# ### # ##|
000007F0: 23 23 23 23 20 20 20 20 23 20 20 23 23 23 20 23 |#### # ### #|
00000800: 20 23 23 23 23 23 23 20 20 20 23 22 3B 22 B6 22 | ###### #";"."|
00000810: 2C 4A 2C 22 3D 22 2C 4B 31 24 28 4A 29 2C 22 DD |,J,"=",K1$(J),".|
00000820: 22 2C 4A AA 31 2C 22 3D 22 2C 4B 31 24 28 4A AA |",J.1,"=",K1$(J.|
00000830: 31 29 2C 22 B5 22 00 3C 24 8F 02 82 00 46 24 A3 |1),".".<$....F$.|
00000840: 02 E7 20 35 2C 34 00 95 24 20 03 8F 20 2A 2A 2A |.. 5,4..$ .. ***|
00000850: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000860: 2A 2A 20 20 45 52 46 41 53 53 55 4E 47 20 56 4F |** ERFASSUNG VO|
00000870: 4E 20 4B 55 4E 44 45 4E 20 20 2A 2A 2A 2A 2A 2A |N KUNDEN ******|
00000880: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000890: 2A 2A 2A 2A 2A 00 A5 24 25 03 99 20 C7 28 32 37 |*****..$%.. .(27|
000008A0: 29 3B 22 4D 22 00 BB 24 2A 03 FE 1A 30 2C 34 2C |);"M"..$*...0,4,|
000008B0: 33 39 2C 34 2C 31 3A E7 35 2C 34 00 C4 24 34 03 |39,4,1:.5,4..$4.|
000008C0: 9F 31 2C 30 00 E0 24 52 03 85 22 57 45 4C 43 48 |.1,0..$R.."WELCH|
000008D0: 45 20 4B 55 4E 44 45 4E 2D 4E 52 2E 22 3B 4B 31 |E KUNDEN-NR.";K1|
000008E0: 00 09 25 5C 03 8B 20 4B 31 B3 30 20 B0 20 4B 31 |..%\.. K1.0 . K1|
000008F0: B1 4B 4B 20 B0 20 B5 28 4B 31 29 B1 4B 31 20 A7 |.KK . .(K1).K1 .|
00000900: 20 A0 31 20 3A 89 38 31 30 00 2D 25 66 03 8B 20 | .1 :.810.-%f.. |
00000910: 4B 31 B2 30 20 A7 20 A0 31 20 3A 99 20 C7 28 32 |K1.0 . .1 :. .(2|
00000920: 37 29 3B 22 4C 22 20 3A 89 31 35 30 30 00 53 25 |7);"L" :.1500.S%|
00000930: 70 03 FE 1A 20 30 2C 37 2C 31 38 2C 37 2C 31 3A |p... 0,7,18,7,1:|
00000940: 99 22 4E 41 4D 45 20 44 45 53 20 4B 55 4E 44 45 |."NAME DES KUNDE|
00000950: 4E 3A 22 00 71 25 7A 03 FE 1A 20 31 39 2C 37 2C |N:".q%z... 19,7,|
00000960: 32 34 2C 37 2C 31 3A 84 31 2C 4B 31 24 28 4B 31 |24,7,1:.1,K1$(K1|
00000970: 29 00 81 25 A2 03 99 20 C7 28 32 37 29 3B 22 4C |)..%... .(27);"L|
00000980: 22 00 88 25 AC 03 A0 31 00 91 25 B6 03 89 36 30 |"..%...1..%...60|
00000990: 30 00 DF 25 DC 05 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |0..%... ********|
000009A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 20 4B 55 |************ KU|
000009B0: 4E 44 45 4E 4C 49 53 54 45 20 41 42 53 50 45 49 |NDENLISTE ABSPEI|
000009C0: 43 48 45 52 4E 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |CHERN *********|
000009D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000009E0: F8 25 E6 05 FE 1A 20 30 2C 34 2C 37 39 2C 32 34 |.%.... 0,4,79,24|
000009F0: 2C 31 20 3A E7 35 2C 34 00 3D 26 F0 05 85 22 53 |,1 :.5,4.=&..."S|
00000A00: 4F 4C 4C 20 44 49 45 20 47 45 41 45 4E 44 45 52 |OLL DIE GEAENDER|
00000A10: 54 45 20 4B 55 4E 44 45 4E 4C 49 53 54 45 20 41 |TE KUNDENLISTE A|
00000A20: 42 47 45 53 50 45 49 43 48 45 52 54 20 57 45 52 |BGESPEICHERT WER|
00000A30: 44 45 4E 20 28 4A 2F 4E 29 22 3B 41 24 00 50 26 |DEN (J/N)";A$.P&|
00000A40: FA 05 8B 20 41 24 B2 22 4A 22 20 A7 31 36 30 30 |... A$."J" .1600|
00000A50: 00 63 26 04 06 8B 20 41 24 B2 22 4E 22 20 A7 32 |.c&... A$."N" .2|
00000A60: 30 30 30 00 6D 26 0E 06 89 31 35 32 30 00 7E 26 |000.m&...1520.~&|
00000A70: 40 06 42 4C 24 B2 22 20 20 20 20 20 20 22 00 93 |@.BL$." "..|
00000A80: 26 4A 06 FE 0D 23 32 2C 22 4B 55 4E 44 45 4E 22 |&J...#2,"KUNDEN"|
00000A90: 2C 4C 36 00 A3 26 54 06 81 20 52 4E B2 31 20 A4 |,L6..&T.. RN.1 .|
00000AA0: 20 4B 4B 00 B5 26 59 06 4C 4E B2 C3 28 4B 31 24 | KK..&Y.LN..(K1$|
00000AB0: 28 52 4E 29 29 00 D1 26 5E 06 52 43 24 B2 4B 31 |(RN))..&^.RC$.K1|
00000AC0: 24 28 52 4E 29 AA C8 28 42 4C 24 2C 36 AB 4C 4E |$(RN)..(BL$,6.LN|
00000AD0: 29 00 DD 26 68 06 FE 12 23 32 2C 52 4E 00 E8 26 |)..&h...#2,RN..&|
00000AE0: 72 06 98 32 2C 52 43 24 00 F4 26 7C 06 FE 12 23 |r..2,RC$..&|...#|
00000AF0: 32 2C 52 4E 00 FD 26 86 06 82 20 52 4E 00 06 27 |2,RN..&... RN..'|
00000B00: 9A 06 FE 0F 23 32 00 54 27 D0 07 8F 20 2A 2A 2A |....#2.T'... ***|
00000B10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 20 |************** |
00000B20: 50 52 4F 47 52 41 4D 4D 45 4E 44 45 20 20 2A 2A |PROGRAMMENDE **|
00000B30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B50: 2A 2A 2A 2A 00 6A 27 DA 07 8A 22 50 52 47 2D 55 |****.j'..."PRG-U|
00000B60: 45 42 45 52 42 4C 49 43 4B 22 00 00 00 00 81 |EBERBLICK"..... |
.......%.X...KK.30 : . !!!!!!!! KUNDENA
NZAHL !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!.R..... 0,0,79,24,1 :.5,11.....
K1$(KK)... .. "..".X.(.." *****
****************************************
***************".&.*.." **
**".T.-.." **
**".B.2.." ****
K U N D E N E R F A S S U N G
****"...4.." **
**".^.6.." **
**"...7.." *****************
****************************************
***"...<..5,4...>.."..."...A.. "
PROGRAMMERSTELLUNG (7/89):"...C.."..".
..F.. 5,8.O.K.." * * * *
D I E T E R L E I S M A N N * *
* *".Z.P.."...".D.U.. 5,4...W.."
COPYRIG
HT (C) 1989 BY D.LEISMANN".. D.. *******
************** KUNDENLISTE EINLESEN **
*************************.. N...#2,"KUND
EN",L6.& X.. RN.1 . KK.2 Z...#2,RN.= {..
2,RC$.I }...#2,RN.C ... F(RC$).255 . RC$
."".S ..K1$(RN).RC$.| ... RN.. ....#2..
...3.. ..... H...0,0,79,3,1.. R.. ".
.".X
!... ". E R F A S S U
N G V O N K U N D E N
."..!... ".
.".L!.... 0,12,39,24,1 :
.5,8..!...".
.".*"...". KUNDEN-NR. = 0 ->
ABFRAGEENDE .".Y"...".
.".."...". KUNDEN
-NR. > 27 -> AUSLANDSKUNDEN .".."...".
.".
."&...."+..".
."..#0..". KUNDEN-NAME -> MA
XIMAL 6 ZEICHEN! .".J#5..".
."..#X.. *******
************** KUNDENLISTE AUSGEBEN *
*************************..#L... 40,4,79
,24,1 :.5,2.F#V.. J.1 . KK . 2.P#{..".";
..#... 5,14.6$... . "# ### # ######
# ### # ###### #";".",J,"=",K1$(J),".
",J.1,"=",K1$(J.1),".".<$....F$... 5,4..
$ .. ********************* ERFASSUNG VO
N KUNDEN ***************************..$
%.. G(27);"M"..$*...0,4,39,4,1:.5,4.D$4.
.1,0..$R.."WELCHE KUNDEN-NR.";K1..%\.. K
1.0 . K1.KK . .(K1).K1 . 1 :.810.-%F..
K1.0 . 1 :. G(27);"L" :.1500.S%P... 0,7
,18,7,1:."NAME DES KUNDEN:".Q%Z... 19,7,
24,7,1:.1,K1$(K1)..%... G(27);"L"..%.. 1
..%...600..%... ******************** KU
NDENLISTE ABSPEICHERN *****************
*******..%.... 0,4,79,24,1 :.5,4.=&..."S
OLL DIE GEAENDERTE KUNDENLISTE ABGESPEIC
HERT WERDEN (J/N)";A$.P&... A$."J" .1600
.C&... A$."N" .2000.M&...1520.~&@.BL$."
"..&J...#2,"KUNDEN",L6..&T.. RN.1 .
KK..&Y.LN.C(K1$(RN)).Q&^.RC$.K1$(RN).H(
BL$,6.LN)..&H...#2,RN..&R..2,RC$..&|...#
2,RN..&... RN..'....#2.T'P.. ***********
****** PROGRAMMENDE ******************
********************.J'Z.."PRG-UEBERBLIC
K".....
> CLICK IMAGE PREVIEW FOR FULL MODAL