ASTRO-DATEI
FILE INFORMATION
FILENAME(S): ASTRO-DATEI
FILE TYPE(S): PRG
FILE SIZE: 6.4K
FIRST SEEN: 2025-12-02 22:47:20
APPEARS ON: 1 disk(s)
FILE HASH
952723c4e2ea3b7b878f2ba7e1632d9810e520771de18d0767a7fd1fe193612c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ASTROLOGIE | ASTRO-DATEI | PRG | swasti, charly | 19 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 01 00 97 35 33 32 38 30 2C 35 3A 97 |.......53280,5:.|
00000010: 35 33 32 38 31 2C 30 00 40 08 02 00 99 22 9E 93 |53281,0.@...."..|
00000020: 11 11 11 20 20 20 20 20 20 20 20 20 CF B7 B7 B7 |... ....|
00000030: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 D0 |................|
00000040: 00 64 08 03 00 99 22 20 20 20 20 20 20 20 20 20 |.d...." |
00000050: B4 20 41 53 54 52 4F 4C 4F 47 49 45 2D 44 41 54 |. ASTROLOGIE-DAT|
00000060: 45 49 20 AA 00 88 08 04 00 99 22 20 20 20 20 20 |EI ......." |
00000070: 20 20 20 20 CC AF AF AF AF AF AF AF AF AF AF AF | ............|
00000080: AF AF AF AF AF AF AF BA 00 A2 08 05 00 99 A6 31 |...............1|
00000090: 33 32 29 22 96 53 4F 4E 4A 41 20 20 48 45 52 5A |32)".SONJA HERZ|
000000A0: 4F 47 00 BB 08 06 00 99 A6 35 32 29 22 9B 42 55 |OG.......52)".BU|
000000B0: 43 4B 48 41 55 53 53 54 52 2E 37 00 D3 08 07 00 |CKHAUSSTR.7.....|
000000C0: 99 A6 35 32 29 22 38 38 30 30 20 20 41 4E 53 42 |..52)"8800 ANSB|
000000D0: 41 43 48 00 EC 08 08 00 99 A6 35 32 29 22 98 54 |ACH.......52)".T|
000000E0: 45 4C 30 39 38 30 32 2F 38 37 36 30 00 18 09 09 |EL09802/8760....|
000000F0: 00 99 A6 32 30 35 29 22 99 45 49 4E 57 45 49 53 |...205)".EINWEIS|
00000100: 55 4E 47 20 49 4E 53 20 50 52 4F 47 52 41 4D 4D |UNG INS PROGRAMM|
00000110: 20 28 4A 2F 4E 29 20 3F 00 2A 09 0A 00 A1 41 24 | (J/N) ?.*....A$|
00000120: 3A 8B 41 24 B2 22 22 A7 31 30 00 39 09 0B 00 8B |:.A$."".10.9....|
00000130: 41 24 B2 22 4E 22 A7 34 36 00 49 09 0C 00 8B 41 |A$."N".46.I....A|
00000140: 24 B3 B1 22 4A 22 A7 31 30 00 6D 09 0D 00 99 22 |$.."J".10.m...."|
00000150: 93 11 20 20 20 20 20 20 20 20 20 20 20 4D 45 4E |.. MEN|
00000160: 55 45 45 52 4B 4C 41 45 52 55 4E 47 22 00 9C 09 |UEERKLAERUNG"...|
00000170: 0E 00 99 22 11 45 49 4E 54 52 41 47 45 4E 20 3D |...".EINTRAGEN =|
00000180: 20 45 49 4E 47 41 42 45 20 44 45 52 20 44 41 54 | EINGABE DER DAT|
00000190: 45 4E 20 28 56 4F 52 4E 41 4D 45 2C 00 CA 09 0F |EN (VORNAME,....|
000001A0: 00 99 22 91 20 20 20 20 20 20 20 20 20 20 20 4E |..". N|
000001B0: 41 43 48 4E 41 4D 45 2C 44 41 54 55 4D 2C 55 48 |ACHNAME,DATUM,UH|
000001C0: 52 5A 45 49 54 2C 4F 52 54 2E 00 F4 09 10 00 99 |RZEIT,ORT.......|
000001D0: 22 11 42 4C 41 45 54 54 45 52 4E 20 3D 20 4B 41 |".BLAETTERN = KA|
000001E0: 52 54 45 49 20 44 55 52 43 48 42 4C 41 45 54 54 |RTEI DURCHBLAETT|
000001F0: 45 52 4E 2E 00 23 0A 11 00 99 22 20 20 20 20 20 |ERN..#...." |
00000200: 20 20 20 20 20 20 20 28 56 4F 52 57 41 45 52 54 | (VORWAERT|
00000210: 53 20 4F 44 45 52 20 52 55 45 43 4B 57 41 45 52 |S ODER RUECKWAER|
00000220: 54 53 29 00 53 0A 12 00 99 22 11 4C 4F 45 53 43 |TS).S....".LOESC|
00000230: 48 45 4E 20 20 3D 20 45 49 4E 5A 45 4C 4C 4F 45 |HEN = EINZELLOE|
00000240: 53 43 48 55 4E 47 20 56 4F 4E 20 4B 41 52 54 45 |SCHUNG VON KARTE|
00000250: 49 45 4E 00 83 0A 13 00 99 22 91 20 20 20 20 20 |IEN......". |
00000260: 20 20 20 20 20 20 20 4E 41 43 48 20 45 49 4E 47 | NACH EING|
00000270: 41 42 45 20 44 45 52 20 4B 41 52 54 45 49 20 2D |ABE DER KARTEI -|
00000280: 20 4E 52 00 AF 0A 14 00 99 22 11 41 45 4E 44 45 | NR......".AENDE|
00000290: 52 4E 20 20 20 3D 20 41 45 4E 44 45 52 4E 20 44 |RN = AENDERN D|
000002A0: 45 52 20 4B 41 52 54 45 49 2E 20 4E 41 43 48 00 |ER KARTEI. NACH.|
000002B0: DA 0A 15 00 99 22 20 20 20 20 20 20 20 20 20 20 |....." |
000002C0: 20 20 45 49 4E 47 41 42 45 20 44 45 52 20 4B 41 | EINGABE DER KA|
000002D0: 52 54 45 49 20 2D 20 4E 52 2E 00 0B 0B 16 00 99 |RTEI - NR.......|
000002E0: 22 11 11 53 55 43 48 45 4E 20 20 20 20 3D 20 44 |"..SUCHEN = D|
000002F0: 55 52 43 48 53 55 43 48 45 4E 20 44 45 52 20 4B |URCHSUCHEN DER K|
00000300: 41 52 54 45 49 2E 20 45 49 4E 2D 00 38 0B 17 00 |ARTEI. EIN-.8...|
00000310: 99 22 91 20 20 20 20 20 20 20 20 20 20 20 20 47 |.". G|
00000320: 41 42 45 20 57 41 48 4C 57 45 49 53 45 20 28 4E |ABE WAHLWEISE (N|
00000330: 41 43 48 4E 41 4D 45 2C 00 5F 0B 18 00 99 22 20 |ACHNAME,._...." |
00000340: 20 20 20 20 20 20 20 20 20 20 20 56 4F 52 4E 41 | VORNA|
00000350: 4D 45 2C 4F 52 54 2C 55 48 52 5A 45 49 54 29 00 |ME,ORT,UHRZEIT).|
00000360: 89 0B 19 00 99 22 11 20 20 20 20 20 20 20 20 20 |.....". |
00000370: 20 20 20 12 20 4C 45 45 52 54 41 53 52 45 20 44 | . LEERTASRE D|
00000380: 52 55 45 43 4B 45 4E 20 92 00 9D 0B 1A 00 A1 41 |RUECKEN .......A|
00000390: 24 3A 8B 41 24 B3 B1 22 20 22 A7 32 36 00 CD 0B |$:.A$.." ".26...|
000003A0: 1B 00 99 22 93 44 41 54 45 49 20 4C 4F 45 53 43 |...".DATEI LOESC|
000003B0: 48 45 4E 20 20 20 20 3D 20 4C 4F 45 53 43 48 45 |HEN = LOESCHE|
000003C0: 4E 20 41 4C 4C 45 52 20 44 41 54 45 4E 00 FC 0B |N ALLER DATEN...|
000003D0: 1C 00 99 22 42 45 53 54 49 4D 4D 54 45 20 4B 41 |..."BESTIMMTE KA|
000003E0: 52 54 45 49 20 20 3D 20 45 49 4E 47 41 42 45 20 |RTEI = EINGABE |
000003F0: 4B 41 52 54 45 49 20 2D 20 4E 52 2E 00 2A 0C 1D |KARTEI - NR..*..|
00000400: 00 99 22 91 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
00000410: 20 20 20 20 20 20 3D 20 41 55 53 47 41 42 45 20 | = AUSGABE |
00000420: 44 45 52 20 4B 41 52 54 45 49 00 59 0C 1E 00 99 |DER KARTEI.Y....|
00000430: 22 11 44 41 54 45 4E 20 41 42 53 50 45 49 43 48 |".DATEN ABSPEICH|
00000440: 45 52 4E 20 3D 20 53 50 45 49 43 48 45 52 4E 20 |ERN = SPEICHERN |
00000450: 44 45 52 20 44 41 54 45 4E 00 85 0C 1F 00 99 22 |DER DATEN......"|
00000460: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000470: 20 20 20 20 57 41 48 4C 57 45 49 53 45 20 4E 55 | WAHLWEISE NU|
00000480: 52 20 41 55 46 00 A9 0C 20 00 99 22 20 20 20 20 |R AUF... .." |
00000490: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004A0: 44 49 53 4B 45 54 54 45 2E 00 D8 0C 21 00 99 22 |DISKETTE....!.."|
000004B0: 11 50 52 4F 47 52 41 4D 4D 20 42 45 45 4E 44 45 |.PROGRAMM BEENDE|
000004C0: 4E 20 20 3D 20 4C 4F 45 53 43 48 54 20 44 41 53 |N = LOESCHT DAS|
000004D0: 20 47 45 53 41 4D 54 45 00 06 0D 22 00 99 22 20 | GESAMTE...".." |
000004E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004F0: 20 20 20 49 4D 20 53 50 45 49 43 48 45 52 20 42 | IM SPEICHER B|
00000500: 45 46 49 4E 44 2D 00 2F 0D 23 00 99 22 20 20 20 |EFIND-./.#.." |
00000510: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000520: 20 4C 49 43 48 45 20 50 52 4F 47 52 41 4D 4D 00 | LICHE PROGRAMM.|
00000530: 5F 0D 24 00 99 22 11 44 41 54 45 4E 20 41 55 53 |_.$..".DATEN AUS|
00000540: 44 52 55 43 4B 45 4E 20 20 3D 20 41 55 53 44 52 |DRUCKEN = AUSDR|
00000550: 55 43 4B 20 45 49 4E 45 52 20 4C 49 53 54 45 00 |UCK EINER LISTE.|
00000560: 8D 0D 25 00 99 22 91 20 20 20 20 20 20 20 20 20 |..%..". |
00000570: 20 20 20 20 20 20 20 20 20 20 20 4D 49 54 20 41 | MIT A|
00000580: 4C 4C 45 4E 20 4B 41 52 54 45 49 45 4E 00 B8 0D |LLEN KARTEIEN...|
00000590: 26 00 99 22 11 44 41 54 45 4E 20 4C 41 44 45 4E |&..".DATEN LADEN|
000005A0: 20 20 20 20 20 20 20 3D 20 4C 41 44 45 4E 20 44 | = LADEN D|
000005B0: 45 52 20 44 41 54 45 4E 00 E3 0D 27 00 99 22 20 |ER DATEN...'.." |
000005C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005D0: 20 20 20 57 41 48 4C 57 45 49 53 45 20 57 49 45 | WAHLWEISE WIE|
000005E0: 44 45 52 00 0A 0E 28 00 99 22 20 20 20 20 20 20 |DER...(.." |
000005F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4E 55 | NU|
00000600: 52 20 44 49 53 4B 45 54 54 45 00 34 0E 29 00 99 |R DISKETTE.4.)..|
00000610: 22 11 20 20 20 20 20 20 20 20 20 20 12 20 46 31 |". . F1|
00000620: 20 3D 20 4D 45 4E 55 45 45 52 4B 4C 41 45 52 55 | = MENUEERKLAERU|
00000630: 4E 47 20 92 00 5E 0E 2A 00 99 22 11 20 20 20 20 |NG ..^.*..". |
00000640: 20 20 20 20 20 20 12 20 46 33 20 3D 20 50 52 4F | . F3 = PRO|
00000650: 47 52 41 4D 4D 53 54 41 52 54 20 20 20 92 00 70 |GRAMMSTART ..p|
00000660: 0E 2B 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 34 33 |.+..A$:.A$."".43|
00000670: 00 82 0E 2C 00 8B 41 24 B2 C7 28 31 33 33 29 A7 |...,..A$..(133).|
00000680: 31 33 00 95 0E 2D 00 8B 41 24 B3 B1 C7 28 31 33 |13...-..A$...(13|
00000690: 34 29 A7 34 33 00 A8 0E 2E 00 9C 3A 54 B2 31 3A |4).43......:T.1:|
000006A0: 97 35 33 32 38 30 2C 30 00 BE 0E 2F 00 86 41 24 |.53280,0.../..A$|
000006B0: 28 35 30 30 2C 35 29 3A 41 44 B2 35 30 30 00 F3 |(500,5):AD.500..|
000006C0: 0E 30 00 5A B2 30 3A 99 22 93 98 2A 2A 2A 2A 2A |.0.Z.0:."..*****|
000006D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 4D 45 4E |************ MEN|
000006E0: 55 45 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |UE *************|
000006F0: 2A 2A 2A 00 21 0F 31 00 99 22 11 11 20 31 2D 2D |***.!.1..".. 1--|
00000700: 45 49 4E 54 52 41 47 45 4E 20 20 20 20 20 20 20 |EINTRAGEN |
00000710: 36 2D 2D 44 41 54 45 49 20 4C 4F 45 53 43 48 45 |6--DATEI LOESCHE|
00000720: 4E 00 52 0F 32 00 99 22 11 20 32 2D 2D 42 4C 41 |N.R.2..". 2--BLA|
00000730: 45 54 54 45 52 4E 20 20 20 20 20 20 20 37 2D 2D |ETTERN 7--|
00000740: 42 45 53 54 49 4D 4D 54 45 20 4B 41 52 54 45 49 |BESTIMMTE KARTEI|
00000750: 20 22 00 82 0F 33 00 99 22 20 33 2D 2D 4C 4F 45 | "...3.." 3--LOE|
00000760: 53 43 48 45 4E 20 20 20 20 20 20 20 20 38 2D 2D |SCHEN 8--|
00000770: 44 41 54 45 4E 20 41 42 53 50 45 49 43 48 45 52 |DATEN ABSPEICHER|
00000780: 4E 22 00 B1 0F 34 00 99 22 20 34 2D 2D 41 45 4E |N"...4.." 4--AEN|
00000790: 44 45 52 4E 20 20 20 20 20 20 20 20 20 45 2D 2D |DERN E--|
000007A0: 50 52 4F 47 52 41 4D 4D 20 42 45 45 4E 44 45 4E |PROGRAMM BEENDEN|
000007B0: 22 00 E1 0F 35 00 99 22 11 20 35 2D 2D 53 55 43 |"...5..". 5--SUC|
000007C0: 48 45 4E 20 20 20 20 20 20 20 20 20 20 44 2D 2D |HEN D--|
000007D0: 44 41 54 45 4E 20 41 55 53 44 52 55 43 4B 45 4E |DATEN AUSDRUCKEN|
000007E0: 22 00 0E 10 36 00 99 22 11 20 39 2D 2D 53 4F 52 |"...6..". 9--SOR|
000007F0: 54 49 45 52 45 4E 20 20 20 20 20 20 20 4C 2D 2D |TIEREN L--|
00000800: 44 41 54 45 4E 20 4C 41 44 45 4E 11 11 11 00 40 |DATEN LADEN....@|
00000810: 10 37 00 99 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.7.."***********|
00000820: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000830: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 11 11 22 |*************.."|
00000840: 00 62 10 38 00 99 22 20 20 20 20 20 20 20 20 20 |.b.8.." |
00000850: 20 42 49 54 54 45 20 57 41 45 48 4C 45 4E 20 53 | BITTE WAEHLEN S|
00000860: 49 45 00 87 10 39 00 99 22 20 20 20 20 20 20 20 |IE...9.." |
00000870: 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 | ...............|
00000880: B8 B8 B8 B8 B8 B8 22 00 99 10 3A 00 A1 44 24 3A |......"...:..D$:|
00000890: 8B 44 24 B2 22 22 A7 35 38 00 AE 10 3B 00 41 B2 |.D$."".58...;.A.|
000008A0: C5 28 44 24 29 3A 8B 41 B1 31 38 A7 35 38 00 C1 |.(D$):.A.18.58..|
000008B0: 10 3C 00 8B 44 24 B2 22 45 22 A7 99 22 93 22 3A |.<..D$."E"..".":|
000008C0: 80 00 D1 10 3D 00 8B 44 24 B2 22 4C 22 A7 31 34 |....=..D$."L".14|
000008D0: 33 00 E1 10 3E 00 8B 44 24 B2 22 44 22 A7 31 36 |3...>..D$."D".16|
000008E0: 35 00 09 11 3F 00 91 41 89 36 34 2C 38 30 2C 39 |5...?..A.64,80,9|
000008F0: 37 2C 31 30 36 2C 31 31 33 2C 31 35 34 2C 31 35 |7,106,113,154,15|
00000900: 39 2C 31 33 30 2C 33 30 30 00 11 11 40 00 54 B2 |9,130,300...@.T.|
00000910: 30 00 1B 11 41 00 54 B2 54 AA 31 00 2A 11 42 00 |0...A.T.T.1.*.B.|
00000920: 8B 54 B1 35 30 30 A7 31 32 39 00 3F 11 43 00 8B |.T.500.129.?.C..|
00000930: 41 24 28 54 2C 31 29 B3 B1 22 22 A7 89 36 35 00 |A$(T,1)..""..65.|
00000940: 6A 11 44 00 99 22 93 11 11 11 11 11 11 11 11 11 |j.D.."..........|
00000950: 11 11 11 11 11 11 11 11 11 11 11 11 20 20 20 20 |............ |
00000960: 20 20 30 3D 4D 45 4E 55 45 22 00 98 11 45 00 99 | 0=MENUE"...E..|
00000970: 22 13 1D 1D 1D 20 20 20 20 20 20 20 20 20 20 1D |".... .|
00000980: 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 4B 41 52 54 45 |.......... KARTE|
00000990: 49 20 4E 52 2E 92 22 54 00 B9 11 46 00 85 22 11 |I NR.."T...F..".|
000009A0: 11 11 12 20 56 4F 52 4E 41 4D 45 20 20 3A 92 20 |... VORNAME :. |
000009B0: 22 3B 41 24 28 54 2C 31 29 00 D9 11 47 00 8B 41 |";A$(T,1)...G..A|
000009C0: 24 28 54 2C 31 29 B2 22 30 22 A7 41 24 28 54 2C |$(T,1)."0".A$(T,|
000009D0: 31 29 B2 22 22 3A 89 34 38 00 F8 11 48 00 85 22 |1)."":.48...H.."|
000009E0: 11 12 20 4E 41 43 48 4E 41 4D 45 20 3A 92 20 22 |.. NACHNAME :. "|
000009F0: 3B 41 24 28 54 2C 32 29 00 17 12 49 00 85 22 11 |;A$(T,2)...I..".|
00000A00: 12 20 44 41 54 55 4D 20 20 20 20 3A 92 20 22 3B |. DATUM :. ";|
00000A10: 41 24 28 54 2C 33 29 00 36 12 4A 00 85 22 11 12 |A$(T,3).6.J.."..|
00000A20: 20 55 48 52 5A 45 49 54 20 20 3A 92 20 22 3B 41 | UHRZEIT :. ";A|
00000A30: 24 28 54 2C 34 29 00 55 12 4B 00 85 22 11 12 20 |$(T,4).U.K..".. |
00000A40: 4F 52 54 20 4C 2F 42 20 20 3A 92 20 22 3B 41 24 |ORT L/B :. ";A$|
00000A50: 28 54 2C 35 29 00 92 12 4C 00 85 22 11 11 11 20 |(T,5)...L.."... |
00000A60: 20 20 20 20 12 20 45 49 4E 47 41 42 45 4E 20 4F | . EINGABEN O|
00000A70: 2E 4B 2E 20 92 20 12 28 4A 2F 4E 29 92 20 20 4A |.K. . .(J/N). J|
00000A80: 9D 9D 9D 22 3B 41 24 3A 8B 54 B1 48 53 A7 48 53 |...";A$:.T.HS.HS|
00000A90: B2 54 00 AD 12 4D 00 8B C8 28 41 24 2C 31 29 B3 |.T...M...(A$,1).|
00000AA0: B1 22 4A 22 A7 8D 31 39 36 3A 89 36 39 00 C1 12 |."J"..196:.69...|
00000AB0: 4E 00 8B 47 24 B2 22 42 22 A7 47 24 B2 22 22 3A |N..G$."B".G$."":|
00000AC0: 8E 00 C9 12 4F 00 89 36 35 00 D1 12 50 00 49 B2 |....O..65...P.I.|
00000AD0: 31 00 FF 12 51 00 99 22 93 20 20 20 20 20 20 20 |1...Q..". |
00000AE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000AF0: 12 20 4B 41 52 54 45 49 20 4E 52 2E 92 22 49 00 |. KARTEI NR.."I.|
00000B00: 35 13 52 00 99 22 13 11 11 11 11 11 11 11 11 11 |5.R.."..........|
00000B10: 11 11 11 11 11 11 11 11 20 20 20 20 20 20 20 20 |........ |
00000B20: 20 12 20 30 20 92 20 20 20 20 20 3D 20 4D 45 4E | . 0 . = MEN|
00000B30: 55 45 22 3A 99 00 57 13 53 00 99 22 20 20 20 20 |UE":..W.S.." |
00000B40: 20 12 4C 45 45 52 54 41 53 54 45 20 92 20 20 3D | .LEERTASTE . =|
00000B50: 20 56 4F 52 22 3A 99 00 7A 13 54 00 99 22 20 20 | VOR":..z.T.." |
00000B60: 20 20 20 12 43 55 52 53 4F 52 2D 44 4F 57 4E 92 | .CURSOR-DOWN.|
00000B70: 20 3D 20 5A 55 52 55 45 43 4B 00 A5 13 55 00 99 | = ZURUECK...U..|
00000B80: 22 11 20 20 20 20 20 20 20 20 12 20 46 31 20 92 |". . F1 .|
00000B90: 20 20 20 20 20 3D 20 45 49 4E 5A 45 4C 41 55 53 | = EINZELAUS|
00000BA0: 44 52 55 43 4B 00 C6 13 56 00 99 22 13 11 11 11 |DRUCK...V.."....|
00000BB0: 11 20 20 22 41 24 28 49 2C 31 29 3B 22 20 22 41 |. "A$(I,1);" "A|
00000BC0: 24 28 49 2C 32 29 00 D8 13 57 00 99 22 11 20 20 |$(I,2)...W..". |
00000BD0: 22 41 24 28 49 2C 33 29 00 EA 13 58 00 99 22 11 |"A$(I,3)...X..".|
00000BE0: 20 20 22 41 24 28 49 2C 34 29 00 FC 13 59 00 99 | "A$(I,4)...Y..|
00000BF0: 22 11 20 20 22 41 24 28 49 2C 35 29 00 10 14 5A |". "A$(I,5)...Z|
00000C00: 00 8B 47 24 B2 22 42 22 A7 47 24 B2 22 22 3A 8E |..G$."B".G$."":.|
00000C10: 00 22 14 5B 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 |.".[..A$:.A$."".|
00000C20: 39 31 00 31 14 5C 00 8B 41 24 B2 22 30 22 A7 34 |91.1.\..A$."0".4|
00000C30: 38 00 4B 14 5D 00 8B 41 24 B2 22 11 22 AF 49 B1 |8.K.]..A$.".".I.|
00000C40: 31 A7 49 B2 49 AB 31 3A 89 38 31 00 66 14 5E 00 |1.I.I.1:.81.f.^.|
00000C50: 8B 41 24 B2 22 20 22 AF 49 B3 41 44 A7 49 B2 49 |.A$." ".I.AD.I.I|
00000C60: AA 31 3A 89 38 31 00 79 14 5F 00 8B 41 24 B2 C7 |.1:.81.y._..A$..|
00000C70: 28 31 33 33 29 A7 31 37 35 00 81 14 60 00 89 39 |(133).175...`..9|
00000C80: 31 00 CC 14 61 00 41 B2 30 3A 99 22 93 41 55 46 |1...a.A.0:.".AUF|
00000C90: 20 57 45 4C 43 48 45 52 20 53 45 49 54 45 20 53 | WELCHER SEITE S|
00000CA0: 54 45 48 54 20 44 49 45 20 5A 55 20 20 20 20 20 |TEHT DIE ZU |
00000CB0: 20 20 20 20 20 11 4C 4F 45 53 43 48 45 4E 44 45 | .LOESCHENDE|
00000CC0: 20 4B 41 52 54 45 49 20 20 3A 11 11 00 D3 14 62 | KARTEI :.....b|
00000CD0: 00 85 41 00 E5 14 63 00 8B 41 B1 35 30 30 B0 41 |..A...c..A.500.A|
00000CE0: B3 31 A7 39 37 00 12 15 64 00 99 22 93 20 20 20 |.1.97...d..". |
00000CF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D00: 20 20 20 12 20 4B 41 52 54 45 49 20 4E 52 2E 92 | . KARTEI NR..|
00000D10: 22 41 00 25 15 65 00 49 B2 41 3A 47 24 B2 22 42 |"A.%.e.I.A:G$."B|
00000D20: 22 3A 8D 38 36 00 49 15 66 00 85 22 11 11 11 11 |":.86.I.f.."....|
00000D30: 20 4C 4F 45 53 43 48 45 4E 20 28 4A 2F 4E 29 20 | LOESCHEN (J/N) |
00000D40: 20 4A 9D 9D 9D 22 3B 41 24 00 5A 15 67 00 8B 41 | J...";A$.Z.g..A|
00000D50: 24 B3 B1 22 4A 22 A7 89 34 38 00 77 15 68 00 81 |$.."J"..48.w.h..|
00000D60: 59 B2 31 A4 35 3A 41 24 28 41 2C 59 29 B2 22 22 |Y.1.5:A$(A,Y).""|
00000D70: 3A 82 59 3A 59 B2 30 00 AA 15 69 00 99 22 11 20 |:.Y:Y.0...i..". |
00000D80: 12 20 4B 41 52 54 45 49 20 47 45 4C 4F 45 53 43 |. KARTEI GELOESC|
00000D90: 48 54 20 92 22 3A 81 59 B2 31 A4 31 30 30 30 3A |HT .":.Y.1.1000:|
00000DA0: 82 59 3A 59 B2 30 3A 89 34 38 00 EE 15 6A 00 99 |.Y:Y.0:.48...j..|
00000DB0: 22 93 41 55 46 20 57 45 4C 43 48 45 52 20 53 45 |".AUF WELCHER SE|
00000DC0: 49 54 45 20 53 54 45 48 54 20 44 49 45 20 5A 55 |ITE STEHT DIE ZU|
00000DD0: 20 20 20 20 20 20 20 20 20 20 11 41 45 4E 44 45 | .AENDE|
00000DE0: 52 4E 44 45 20 4B 41 52 54 45 49 20 11 11 00 09 |RNDE KARTEI ....|
00000DF0: 16 6B 00 85 59 3A 49 B2 59 3A 8B 59 B1 35 30 30 |.k..Y:I.Y:.Y.500|
00000E00: B0 59 B3 31 A7 89 31 30 36 00 47 16 6C 00 47 24 |.Y.1..106.G.l.G$|
00000E10: B2 22 42 22 3A 99 22 93 20 20 20 20 20 20 20 20 |."B":.". |
00000E20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E30: 12 20 4B 41 52 54 45 49 20 4E 52 2E 92 22 49 3A |. KARTEI NR.."I:|
00000E40: 8D 38 36 3A 49 B2 30 00 6A 16 6D 00 85 22 11 11 |.86:I.0.j.m.."..|
00000E50: 11 11 20 41 45 4E 44 45 52 4E 20 28 4A 2F 4E 29 |.. AENDERN (J/N)|
00000E60: 20 20 4A 9D 9D 9D 22 3B 41 24 00 7B 16 6E 00 8B | J...";A$.{.n..|
00000E70: 41 24 B3 B1 22 4A 22 A7 89 34 38 00 98 16 6F 00 |A$.."J"..48...o.|
00000E80: 54 B2 59 3A 47 24 B2 22 42 22 3A 99 22 93 22 3A |T.Y:G$."B":.".":|
00000E90: 8D 31 39 30 3A 8D 36 39 00 D9 16 70 00 99 22 93 |.190:.69...p..".|
00000EA0: 11 11 11 11 11 11 11 11 11 11 20 20 20 20 20 20 |.......... |
00000EB0: 20 20 20 20 4B 41 52 54 45 49 20 47 45 41 45 4E | KARTEI GEAEN|
00000EC0: 44 45 52 54 20 21 21 22 3A 81 54 B2 31 A4 31 30 |DERT !!":.T.1.10|
00000ED0: 30 30 3A 82 54 3A 89 34 38 00 17 17 71 00 99 22 |00:.T:.48...q.."|
00000EE0: 93 11 11 20 53 49 45 20 4B 4F 45 4E 4E 45 4E 20 |... SIE KOENNEN |
00000EF0: 45 49 4E 20 42 45 4C 49 45 42 49 47 45 53 20 53 |EIN BELIEBIGES S|
00000F00: 55 43 48 57 4F 52 54 20 20 20 20 20 45 49 4E 47 |UCHWORT EING|
00000F10: 45 42 45 4E 2E 11 11 00 33 17 72 00 85 22 20 22 |EBEN....3.r.." "|
00000F20: 3B 53 24 3A 5A B2 C3 28 53 24 29 3A 81 54 B2 31 |;S$:Z..(S$):.T.1|
00000F30: A4 48 53 00 64 17 73 00 99 22 93 11 11 11 11 11 |.HS.d.s.."......|
00000F40: 11 11 11 11 20 20 20 20 20 20 20 20 44 41 54 45 |.... DATE|
00000F50: 49 20 57 49 52 44 20 44 55 52 43 48 53 55 43 48 |I WIRD DURCHSUCH|
00000F60: 54 20 21 21 00 7F 17 74 00 81 55 B2 31 A4 35 3A |T !!...t..U.1.5:|
00000F70: 81 59 B2 31 A4 C3 28 41 24 28 54 2C 55 29 29 00 |.Y.1..(A$(T,U)).|
00000F80: 9B 17 75 00 8B CA 28 41 24 28 54 2C 55 29 2C 59 |..u...(A$(T,U),Y|
00000F90: 2C 5A 29 B2 53 24 A7 89 31 32 31 00 A5 17 76 00 |,Z).S$..121...v.|
00000FA0: 82 59 3A 82 55 00 AC 17 77 00 82 54 00 B5 17 78 |.Y:.U...w..T...x|
00000FB0: 00 89 31 32 37 00 E7 17 79 00 47 24 B2 22 42 22 |..127...y.G$."B"|
00000FC0: 3A 99 22 93 20 20 12 20 4B 41 52 54 45 49 20 4E |:.". . KARTEI N|
00000FD0: 52 2E 92 22 54 3B 3A 99 22 92 22 3A 49 B2 54 3A |R.."T;:.".":I.T:|
00000FE0: 8D 38 36 3A 49 B2 30 00 07 18 7A 00 99 22 11 11 |.86:I.0...z.."..|
00000FF0: 11 20 12 46 31 3D 57 45 49 54 45 52 20 2F 20 30 |. .F1=WEITER / 0|
00001000: 3D 4D 45 4E 55 45 92 00 1A 18 7B 00 A1 41 24 3A |=MENUE....{..A$:|
00001010: 8B 41 24 B2 22 22 A7 31 32 33 00 36 18 7C 00 8B |.A$."".123.6.|..|
00001020: 41 24 B2 22 30 22 A7 55 B2 30 3A 54 B2 30 3A 59 |A$."0".U.0:T.0:Y|
00001030: B2 30 3A 89 34 38 00 4A 18 7D 00 8B 41 24 B3 B1 |.0:.48.J.}..A$..|
00001040: C7 28 31 33 33 29 A7 31 32 33 00 5A 18 7E 00 8B |.(133).123.Z.~..|
00001050: 54 B3 B2 48 53 A7 89 31 31 39 00 88 18 7F 00 99 |T..HS..119......|
00001060: 22 93 11 11 11 11 11 11 11 11 11 20 20 20 20 20 |".......... |
00001070: 20 20 20 20 20 44 41 54 45 49 20 44 55 52 43 48 | DATEI DURCH|
00001080: 53 55 43 48 54 20 21 21 00 A1 18 80 00 81 55 B2 |SUCHT !!......U.|
00001090: 31 A4 31 33 30 30 3A 82 55 3A 55 B2 30 3A 89 34 |1.1300:.U:U.0:.4|
000010A0: 38 00 D6 18 81 00 99 22 93 11 11 11 11 11 11 11 |8......"........|
000010B0: 11 20 20 20 4E 55 52 20 35 30 30 20 4B 41 52 54 |. NUR 500 KART|
000010C0: 45 49 45 4E 22 3A 81 54 B2 31 A4 32 30 30 30 3A |EIEN":.T.1.2000:|
000010D0: 82 54 3A 89 34 38 00 05 19 82 00 99 22 93 11 11 |.T:.48......"...|
000010E0: 11 11 11 20 20 20 20 44 41 54 45 4E 20 41 55 46 |... DATEN AUF|
000010F0: 20 44 49 53 4B 45 54 54 45 20 41 42 53 50 45 49 | DISKETTE ABSPEI|
00001100: 43 48 45 52 4E 00 26 19 83 00 99 22 11 11 20 20 |CHERN.&....".. |
00001110: 20 20 44 49 53 4B 45 54 54 45 20 45 49 4E 4C 45 | DISKETTE EINLE|
00001120: 47 45 4E 2E 11 11 00 50 19 84 00 85 22 20 20 20 |GEN....P...." |
00001130: 20 46 49 4C 45 4E 41 4D 45 20 20 41 2D 44 41 54 | FILENAME A-DAT|
00001140: 45 49 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 44 4E 24 |EI.........";DN$|
00001150: 00 79 19 85 00 9F 31 35 2C 38 2C 31 35 3A 9F 38 |.y....15,8,15:.8|
00001160: 2C 38 2C 38 2C 44 4E 24 AA 22 2C 53 2C 52 22 3A |,8,8,DN$.",S,R":|
00001170: A0 38 3A 84 31 35 2C 46 31 00 94 19 86 00 8B 46 |.8:.15,F1......F|
00001180: 31 B2 30 A7 98 31 35 2C 22 53 3A 22 AA 44 4E 24 |1.0..15,"S:".DN$|
00001190: 3A A0 31 35 00 B9 19 87 00 99 22 93 11 11 11 11 |:.15......".....|
000011A0: 11 11 11 11 11 11 22 3A 9F 31 2C 38 2C 31 2C 44 |......":.1,8,1,D|
000011B0: 4E 24 AA 22 2C 53 2C 57 22 00 CC 19 88 00 81 51 |N$.",S,W"......Q|
000011C0: B2 31 A4 48 53 3A 81 52 B2 31 A4 35 00 E8 19 89 |.1.HS:.R.1.5....|
000011D0: 00 8B 41 24 28 51 2C 52 29 B2 22 22 A7 41 24 28 |..A$(Q,R)."".A$(|
000011E0: 51 2C 52 29 B2 22 B1 22 00 F7 19 8A 00 98 31 2C |Q,R)."."......1,|
000011F0: 41 24 28 51 2C 52 29 00 01 1A 8B 00 82 52 3A 82 |A$(Q,R)......R:.|
00001200: 51 00 0C 1A 8C 00 98 31 2C 22 40 22 00 13 1A 8D |Q......1,"@"....|
00001210: 00 A0 31 00 54 1A 8E 00 99 22 93 11 11 11 11 11 |..1.T...."......|
00001220: 11 11 11 11 11 20 20 20 20 20 20 20 44 41 54 45 |..... DATE|
00001230: 4E 20 41 42 47 45 53 50 45 49 43 48 45 52 54 20 |N ABGESPEICHERT |
00001240: 21 21 22 3A 81 54 B2 31 A4 31 30 30 30 3A 82 54 |!!":.T.1.1000:.T|
00001250: 3A 89 34 38 00 93 1A 8F 00 99 22 93 11 11 20 44 |:.48......"... D|
00001260: 41 54 45 4E 20 56 4F 4E 20 44 49 53 4B 45 54 54 |ATEN VON DISKETT|
00001270: 45 2E 20 44 49 53 4B 45 54 54 45 20 4D 49 54 20 |E. DISKETTE MIT |
00001280: 44 41 54 45 4E 11 20 20 45 49 4E 4C 45 47 45 4E |DATEN. EINLEGEN|
00001290: 2E 11 11 00 BA 1A 90 00 85 22 20 46 49 4C 45 4E |........." FILEN|
000012A0: 41 4D 45 20 20 41 2D 44 41 54 45 49 9D 9D 9D 9D |AME A-DATEI....|
000012B0: 9D 9D 9D 9D 9D 22 3B 44 4E 24 00 DF 1A 91 00 99 |.....";DN$......|
000012C0: 22 93 11 11 11 11 11 11 11 11 11 11 22 3A 9F 31 |"...........":.1|
000012D0: 2C 38 2C 30 2C 44 4E 24 AA 22 2C 53 2C 52 22 00 |,8,0,DN$.",S,R".|
000012E0: F3 1A 92 00 81 51 B2 31 A4 35 30 30 3A 81 52 B2 |.....Q.1.500:.R.|
000012F0: 31 A4 35 00 02 1B 93 00 84 31 2C 41 24 28 51 2C |1.5......1,A$(Q,|
00001300: 52 29 00 23 1B 94 00 8B 41 24 28 51 2C 52 29 B2 |R).#....A$(Q,R).|
00001310: 22 40 22 A7 41 24 28 51 2C 52 29 B2 22 22 3A 89 |"@".A$(Q,R)."":.|
00001320: 31 35 31 00 3F 1B 95 00 8B 41 24 28 51 2C 52 29 |151.?....A$(Q,R)|
00001330: B2 22 B1 22 A7 41 24 28 51 2C 52 29 B2 22 22 00 |.".".A$(Q,R)."".|
00001340: 49 1B 96 00 82 52 3A 82 51 00 50 1B 97 00 A0 31 |I....R:.Q.P....1|
00001350: 00 7B 1B 98 00 99 22 93 11 11 11 11 11 11 11 11 |.{....".........|
00001360: 11 11 20 20 20 20 20 20 20 20 20 44 41 54 45 4E |.. DATEN|
00001370: 20 47 45 4C 41 44 45 4E 20 21 21 00 97 1B 99 00 | GELADEN !!.....|
00001380: 48 53 B2 51 AB 31 3A 81 54 B2 31 A4 31 30 30 30 |HS.Q.1:.T.1.1000|
00001390: 3A 82 54 3A 89 34 38 00 DC 1B 9A 00 99 22 93 11 |:.T:.48......"..|
000013A0: 11 11 11 11 20 53 4F 4C 4C 45 4E 20 44 49 45 20 |.... SOLLEN DIE |
000013B0: 47 41 4E 5A 45 4E 20 4B 41 52 54 45 49 45 4E 20 |GANZEN KARTEIEN |
000013C0: 47 45 4C 4F 45 53 43 48 54 20 20 20 20 11 57 45 |GELOESCHT .WE|
000013D0: 52 44 45 4E 20 20 20 28 4A 2F 4E 29 00 EF 1B 9B |RDEN (J/N)....|
000013E0: 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 35 35 00 |..A$:.A$."".155.|
000013F0: FE 1B 9C 00 8B 41 24 B2 22 4A 22 A7 34 36 00 0D |.....A$."J".46..|
00001400: 1C 9D 00 8B 41 24 B2 22 4E 22 A7 34 38 00 16 1C |....A$."N".48...|
00001410: 9E 00 89 31 35 34 00 3C 1C 9F 00 85 22 93 11 11 |...154.<...."...|
00001420: 11 11 11 20 20 57 45 4C 43 48 45 20 4B 41 52 54 |... WELCHE KART|
00001430: 45 49 20 2D 20 4E 52 2E 20 22 3B 49 00 55 1C A0 |EI - NR. ";I.U..|
00001440: 00 8B 49 B1 35 30 30 B0 49 B3 31 A7 99 22 91 22 |..I.500.I.1.."."|
00001450: 3A 89 31 35 39 00 77 1C A1 00 99 22 93 12 20 4B |:.159.w....".. K|
00001460: 41 52 54 45 49 20 4E 52 2E 92 22 49 3A 47 24 B2 |ARTEI NR.."I:G$.|
00001470: 22 42 22 3A 8D 38 36 00 91 1C A2 00 99 22 11 11 |"B":.86......"..|
00001480: 11 20 20 20 20 12 30 20 44 52 55 45 43 4B 45 4E |. .0 DRUECKEN|
00001490: 92 00 A4 1C A3 00 A1 41 24 3A 8B 41 24 B2 22 22 |.......A$:.A$.""|
000014A0: A7 31 36 33 00 AC 1C A4 00 89 34 38 00 BF 1C A5 |.163......48....|
000014B0: 00 99 22 93 22 3A 8D 31 38 31 3A 9F 33 2C 34 00 |..".":.181:.3,4.|
000014C0: CB 1C A6 00 81 51 B2 31 A4 48 53 00 E7 1C A7 00 |.....Q.1.HS.....|
000014D0: 98 33 2C 22 20 20 20 20 20 20 20 4B 41 52 54 45 |.3," KARTE|
000014E0: 49 2D 4E 52 2E 22 51 00 06 1D A8 00 98 33 2C 22 |I-NR."Q......3,"|
000014F0: 20 20 20 20 22 41 24 28 51 2C 32 29 22 20 22 41 | "A$(Q,2)" "A|
00001500: 24 28 51 2C 31 29 00 1B 1D A9 00 98 33 2C 22 20 |$(Q,1)......3," |
00001510: 20 20 20 22 41 24 28 51 2C 33 29 00 36 1D AA 00 | "A$(Q,3).6...|
00001520: 98 33 2C 22 20 20 20 20 22 41 24 28 51 2C 34 29 |.3," "A$(Q,4)|
00001530: 22 20 55 48 52 22 00 4B 1D AB 00 98 33 2C 22 20 |" UHR".K....3," |
00001540: 20 20 20 22 41 24 28 51 2C 35 29 00 58 1D AC 00 | "A$(Q,5).X...|
00001550: 98 33 3A 82 51 3A A0 33 00 95 1D AD 00 99 22 93 |.3:.Q:.3......".|
00001560: 11 11 11 11 11 11 11 11 11 11 20 20 20 20 20 44 |.......... D|
00001570: 41 54 45 4E 20 53 49 4E 44 20 41 55 53 47 45 44 |ATEN SIND AUSGED|
00001580: 52 55 43 4B 54 20 21 21 22 3A 81 49 B2 31 A4 32 |RUCKT !!":.I.1.2|
00001590: 30 30 30 3A 82 00 9D 1D AE 00 89 34 38 00 AB 1D |000:.......48...|
000015A0: AF 00 99 22 93 22 3A 9F 33 2C 34 00 C5 1D B0 00 |...".":.3,4.....|
000015B0: 98 33 2C 41 24 28 49 2C 31 29 3B 22 20 22 41 24 |.3,A$(I,1);" "A$|
000015C0: 28 49 2C 32 29 00 D4 1D B1 00 98 33 2C 41 24 28 |(I,2)......3,A$(|
000015D0: 49 2C 33 29 00 E3 1D B2 00 98 33 2C 41 24 28 49 |I,3)......3,A$(I|
000015E0: 2C 34 29 00 F2 1D B3 00 98 33 2C 41 24 28 49 2C |,4)......3,A$(I,|
000015F0: 35 29 00 00 1E B4 00 98 33 3A A0 33 3A 89 34 38 |5)......3:.3:.48|
00001600: 00 16 1E B5 00 99 22 93 22 3A 9F 33 2C 34 3A 97 |......".":.3,4:.|
00001610: 37 36 38 2C 36 31 00 20 1E B6 00 98 33 3A A0 33 |768,61. ....3:.3|
00001620: 00 2D 1E B7 00 97 37 36 38 2C 31 33 39 00 48 1E |.-....768,139.H.|
00001630: B8 00 8B 53 54 B3 B1 AB 31 32 38 AF 53 54 B3 B1 |...ST...128.ST..|
00001640: AB 31 32 35 A7 31 38 39 00 7A 1E B9 00 99 22 11 |.125.189.z....".|
00001650: 11 11 11 11 11 11 11 20 20 20 20 20 44 52 55 43 |....... DRUC|
00001660: 4B 45 52 20 4E 49 43 48 54 20 45 49 4E 47 45 53 |KER NICHT EINGES|
00001670: 43 48 41 4C 54 45 54 20 21 21 00 A0 1E BA 00 99 |CHALTET !!......|
00001680: 22 11 20 20 20 20 20 20 20 20 20 20 42 49 54 54 |". BITT|
00001690: 45 20 45 49 4E 53 43 48 41 4C 54 45 4E 20 21 21 |E EINSCHALTEN !!|
000016A0: 00 B0 1E BB 00 81 49 B2 31 A4 32 30 30 3A 82 49 |......I.1.200:.I|
000016B0: 00 BE 1E BC 00 99 43 4C 24 3A 89 31 38 31 00 C4 |......CL$:.181..|
000016C0: 1E BD 00 8E 00 E6 1E BE 00 99 22 13 11 11 11 11 |..........".....|
000016D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 41 | "A|
000016E0: 24 28 59 2C 31 29 00 04 1F BF 00 99 22 11 20 20 |$(Y,1)......". |
000016F0: 20 20 20 20 20 20 20 20 20 20 20 20 22 41 24 28 | "A$(|
00001700: 59 2C 32 29 00 22 1F C0 00 99 22 11 20 20 20 20 |Y,2)."....". |
00001710: 20 20 20 20 20 20 20 20 20 20 22 41 24 28 59 2C | "A$(Y,|
00001720: 33 29 00 40 1F C1 00 99 22 11 20 20 20 20 20 20 |3).@....". |
00001730: 20 20 20 20 20 20 20 20 22 41 24 28 59 2C 34 29 | "A$(Y,4)|
00001740: 00 5E 1F C2 00 99 22 11 20 20 20 20 20 20 20 20 |.^....". |
00001750: 20 20 20 20 20 20 22 41 24 28 59 2C 35 29 00 64 | "A$(Y,5).d|
00001760: 1F C3 00 8E 00 86 1F C4 00 99 22 93 11 11 11 11 |..........".....|
00001770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 41 | "A|
00001780: 24 28 54 2C 31 29 00 A4 1F C5 00 99 22 11 20 20 |$(T,1)......". |
00001790: 20 20 20 20 20 20 20 20 20 20 20 20 22 41 24 28 | "A$(|
000017A0: 54 2C 32 29 00 C2 1F C6 00 99 22 11 20 20 20 20 |T,2)......". |
000017B0: 20 20 20 20 20 20 20 20 20 20 22 41 24 28 54 2C | "A$(T,|
000017C0: 33 29 00 E0 1F C7 00 99 22 11 20 20 20 20 20 20 |3)......". |
000017D0: 20 20 20 20 20 20 20 20 22 41 24 28 54 2C 34 29 | "A$(T,4)|
000017E0: 00 FE 1F C8 00 99 22 11 20 20 20 20 20 20 20 20 |......". |
000017F0: 20 20 20 20 20 20 22 41 24 28 54 2C 35 29 00 04 | "A$(T,5)..|
00001800: 20 C9 00 8E 00 33 20 2C 01 99 22 13 11 11 11 11 | ....3 ,..".....|
00001810: 11 11 11 11 11 11 11 11 11 11 11 11 20 20 20 20 |............ |
00001820: 20 20 20 20 20 20 20 49 43 48 20 53 4F 52 54 49 | ICH SORTI|
00001830: 45 52 45 00 4E 20 31 01 81 58 31 B2 31 A4 48 53 |ERE.N 1..X1.1.HS|
00001840: AB 31 3A 81 58 32 B2 58 31 AA 31 A4 48 53 00 6A |.1:.X2.X1.1.HS.j|
00001850: 20 36 01 8B 41 24 28 58 31 2C 32 29 B3 B2 41 24 | 6..A$(X1,2)..A$|
00001860: 28 58 32 2C 32 29 A7 33 33 30 00 AF 20 3B 01 53 |(X2,2).330.. ;.S|
00001870: 31 24 B2 41 24 28 58 31 2C 31 29 3A 53 32 24 B2 |1$.A$(X1,1):S2$.|
00001880: 41 24 28 58 31 2C 32 29 3A 53 33 24 B2 41 24 28 |A$(X1,2):S3$.A$(|
00001890: 58 31 2C 33 29 3A 53 34 24 B2 41 24 28 58 31 2C |X1,3):S4$.A$(X1,|
000018A0: 34 29 3A 53 35 24 B2 41 24 28 58 31 2C 35 29 00 |4):S5$.A$(X1,5).|
000018B0: C5 20 40 01 41 24 28 58 31 2C 31 29 B2 41 24 28 |. @.A$(X1,1).A$(|
000018C0: 58 32 2C 31 29 00 DB 20 41 01 41 24 28 58 31 2C |X2,1).. A.A$(X1,|
000018D0: 32 29 B2 41 24 28 58 32 2C 32 29 00 F1 20 42 01 |2).A$(X2,2).. B.|
000018E0: 41 24 28 58 31 2C 33 29 B2 41 24 28 58 32 2C 33 |A$(X1,3).A$(X2,3|
000018F0: 29 00 07 21 43 01 41 24 28 58 31 2C 34 29 B2 41 |)..!C.A$(X1,4).A|
00001900: 24 28 58 32 2C 34 29 00 1D 21 44 01 41 24 28 58 |$(X2,4)..!D.A$(X|
00001910: 31 2C 35 29 B2 41 24 28 58 32 2C 35 29 00 2E 21 |1,5).A$(X2,5)..!|
00001920: 45 01 41 24 28 58 32 2C 31 29 B2 53 31 24 00 3F |E.A$(X2,1).S1$.?|
00001930: 21 46 01 41 24 28 58 32 2C 32 29 B2 53 32 24 00 |!F.A$(X2,2).S2$.|
00001940: 50 21 47 01 41 24 28 58 32 2C 33 29 B2 53 33 24 |P!G.A$(X2,3).S3$|
00001950: 00 61 21 48 01 41 24 28 58 32 2C 34 29 B2 53 34 |.a!H.A$(X2,4).S4|
00001960: 24 00 72 21 49 01 41 24 28 58 32 2C 35 29 B2 53 |$.r!I.A$(X2,5).S|
00001970: 35 24 00 7D 21 4A 01 82 58 32 2C 58 31 00 85 21 |5$.}!J..X2,X1..!|
00001980: 5E 01 89 34 38 00 00 00 |^..48... |
.......53280,5:.53281,0.@....".....
O..................P.D...."
. ASTROLOGIE-DATEI ......." L...
.......................132)".SONJA HERZ
OG.......52)".BUCKHAUSSTR.7.S.....52)"88
00 ANSBACH.......52)".TEL09802/8760....
...205)".EINWEISUNG INS PROGRAMM (J/N) ?
.*....A$:.A$."".10.9....A$."N".46.I....A
$.."J".10.M....".. MENUEERKLAE
RUNG"......".EINTRAGEN = EINGABE DER DAT
EN (VORNAME,.J....". NACHNAME,
DATUM,UHRZEIT,ORT.......".BLAETTERN = KA
RTEI DURCHBLAETTERN..#...." (
VORWAERTS ODER RUECKWAERTS).S....".LOESC
HEN = EINZELLOESCHUNG VON KARTEIEN.....
.". NACH EINGABE DER KARTEI -
NR......".AENDERN = AENDERN DER KARTE
I. NACH.Z...." EINGABE DER KA
RTEI - NR......."..SUCHEN = DURCHSUCH
EN DER KARTEI. EIN-.8....". G
ABE WAHLWEISE (NACHNAME,._...."
VORNAME,ORT,UHRZEIT)......".
. LEERTASRE DRUECKEN .......A$:.A$.."
".26.M....".DATEI LOESCHEN = LOESCHE
N ALLER DATEN......"BESTIMMTE KARTEI =
EINGABE KARTEI - NR..*....".
= AUSGABE DER KARTEI.Y....".DATEN
ABSPEICHERN = SPEICHERN DER DATEN......"
WAHLWEISE NUR AUF...
.." DISKETTE..X.!.."
.PROGRAMM BEENDEN = LOESCHT DAS GESAMTE
...".." IM SPEICHER B
EFIND-./.#.." LICHE P
ROGRAMM._.$..".DATEN AUSDRUCKEN = AUSDR
UCK EINER LISTE...%..".
MIT ALLEN KARTEIEN...&..".DATEN LADEN
= LADEN DER DATEN...'.."
WAHLWEISE WIEDER...(.."
NUR DISKETTE.4.)..".
. F1 = MENUEERKLAERUNG ..^.*..".
. F3 = PROGRAMMSTART ..P.+..A$:.
A$."".43...,..A$.G(133).13...-..A$..G(13
4).43......:T.1:.53280,0.../..A$(500,5):
AD.500...0.Z.0:."..***************** MEN
UE ****************.!.1..".. 1--EINTRAGE
N 6--DATEI LOESCHEN.R.2..". 2--BLA
ETTERN 7--BESTIMMTE KARTEI "...3..
" 3--LOESCHEN 8--DATEN ABSPEICHER
N"...4.." 4--AENDERN E--PROGRAMM
BEENDEN"...5..". 5--SUCHEN D--
DATEN AUSDRUCKEN"...6..". 9--SORTIEREN
L--DATEN LADEN....@.7.."***********
*****************************..".B.8.."
BITTE WAEHLEN SIE...9.."
....................."...:..D$:.D$."".5
8...;.A.E(D$):.A.18.58.A.<..D$."E"..".":
..Q.=..D$."L".143...>..D$."D".165...?..A
.64,80,97,106,113,154,159,130,300...@.T.
0...A.T.T.1.*.B..T.500.129.?.C..A$(T,1).
.""..65.J.D.."......................
0=MENUE"...E..".... .........
.. KARTEI NR.."T...F..".... VORNAME :.
";A$(T,1).Y.G..A$(T,1)."0".A$(T,1)."":.4
8...H..".. NACHNAME :. ";A$(T,2)...I..".
. DATUM :. ";A$(T,3).6.J..".. UHRZEIT
:. ";A$(T,4).U.K..".. ORT L/B :. ";A$
(T,5)...L.."... . EINGABEN O.K. . .(
J/N). J...";A$:.T.HS.HS.T...M..H(A$,1).
."J"..196:.69.A.N..G$."B".G$."":..I.O..6
5.Q.P.I.1...Q..".
. KARTEI NR.."I.5.R.."..................
. 0 . = MENUE":..W.S.."
.LEERTASTE . = VOR":..Z.T.." .CURS
OR-DOWN. = ZURUECK...U..". . F1 .
= EINZELAUSDRUCK.F.V.."..... "A$(I
,1);" "A$(I,2).X.W..". "A$(I,3)...X..".
"A$(I,4)...Y..". "A$(I,5)...Z..G$."B"
.G$."":..".[..A$:.A$."".91.1.\..A$."0".4
8.K.]..A$.".".I.1.I.I.1:.81.F.^..A$." ".
I.AD.I.I.1:.81.Y._..A$.G(133).175...`..9
1.L.A.A.0:.".AUF WELCHER SEITE STEHT DIE
ZU .LOESCHENDE KARTEI :...S.B
..A...C..A.500.A.1.97...D..".
. KARTEI NR.."A.%.E.I.A:G$."B
":.86.I.F..".... LOESCHEN (J/N) J...";A
$.Z.G..A$.."J"..48.W.H..Y.1.5:A$(A,Y).""
:.Y:Y.0...I..". . KARTEI GELOESCHT .":.Y
.1.1000:.Y:Y.0:.48...J..".AUF WELCHER SE
ITE STEHT DIE ZU .AENDERNDE KAR
TEI .....K..Y:I.Y:.Y.500.Y.1..106.G.L.G$
."B":.". . KARTEI
NR.."I:.86:I.0.J.M..".... AENDERN (J/N)
J...";A$.{.N..A$.."J"..48...O.T.Y:G$."
B":.".":.190:.69.Y.P.."...........
KARTEI GEAENDERT !!":.T.1.1000:.T:.4
8...Q.."... SIE KOENNEN EIN BELIEBIGES S
UCHWORT EINGEBEN....3.R.." ";S$:Z.C(
S$):.T.1.HS.D.S..".......... DATE
I WIRD DURCHSUCHT !!..T..U.1.5:.Y.1.C(A
$(T,U))...U..J(A$(T,U),Y,Z).S$..121...V.
.Y:.U...W..T...X..127...Y.G$."B":.". .
KARTEI NR.."T;:.".":I.T:.86:I.0...Z.."..
. .F1=WEITER / 0=MENUE....{..A$:.A$."".1
23.6.|..A$."0".U.0:T.0:Y.0:.48.J.}..A$..
G(133).123.Z.~..T..HS..119.....".......
... DATEI DURCHSUCHT !!......U.
1.1300:.U:U.0:.48.V...."......... NUR
500 KARTEIEN":.T.1.2000:.T:.48......"...
... DATEN AUF DISKETTE ABSPEICHERN.&.
...".. DISKETTE EINLEGEN....P...."
FILENAME A-DATEI.........";DN$.Y....15
,8,15:.8,8,8,DN$.",S,R": 8:.15,F1......F
1.0..15,"S:".DN$: 15......"...........":
.1,8,1,DN$.",S,W".L....Q.1.HS:.R.1.5....
..A$(Q,R)."".A$(Q,R)."."......1,A$(Q,R).
.....R:.Q......1,"@"..... 1.T...."......
..... DATEN ABGESPEICHERT !!":.T.1
.1000:.T:.48......"... DATEN VON DISKETT
E. DISKETTE MIT DATEN. EINLEGEN........
." FILENAME A-DATEI.........";DN$......
"...........":.1,8,0,DN$.",S,R"......Q.1
.500:.R.1.5......1,A$(Q,R).#....A$(Q,R).
"@".A$(Q,R)."":.151.?....A$(Q,R).".".A$(
Q,R)."".I....R:.Q.P... 1.{....".........
.. DATEN GELADEN !!.....HS.Q.1:.
T.1.1000:.T:.48......"...... SOLLEN DIE
GANZEN KARTEIEN GELOESCHT .WERDEN (
J/N)......A$:.A$."".155......A$."J".46..
....A$."N".48......154.<...."...... WEL
CHE KARTEI - NR. ";I.U. ..I.500.I.1.."."
:.159.W....".. KARTEI NR.."I:G$."B":.86.
....."... .0 DRUECKEN.......A$:.A$.""
.163......48......".":.181:.3,4.K....Q.1
.HS......3," KARTEI-NR."Q......3,"
"A$(Q,2)" "A$(Q,1)......3," "A$(Q
,3).6....3," "A$(Q,4)" UHR".K....3,"
"A$(Q,5).X....3:.Q: 3......".........
.. DATEN SIND AUSGEDRUCKT !!":.I.1.2
000:.......48......".":.3,4.E....3,A$(I,
1);" "A$(I,2).T....3,A$(I,3)......3,A$(I
,4)......3,A$(I,5)......3: 3:.48......".
":.3,4:.768,61. ....3: 3.-....768,139.H.
...ST...128.ST...125.189.Z...."........
DRUCKER NICHT EINGESCHALTET !!. ....
". BITTE EINSCHALTEN !!......I.
1.200:.I......CL$:.181.D..........".....
"A$(Y,1)......".
"A$(Y,2)."....". "A$(Y,
3).@.A..". "A$(Y,4).^.B..".
"A$(Y,5).D.C.....D..".....
"A$(T,1)...E..".
"A$(T,2).B.F..". "A$(T,
3)...G..". "A$(T,4)...H..".
"A$(T,5).. I...3 ,..".....
............ ICH SORTIERE.N 1.
.X1.1.HS.1:.X2.X1.1.HS.J 6..A$(X1,2)..A$
(X2,2).330.. ;.S1$.A$(X1,1):S2$.A$(X1,2)
:S3$.A$(X1,3):S4$.A$(X1,4):S5$.A$(X1,5).
E @.A$(X1,1).A$(X2,1).. A.A$(X1,2).A$(X2
,2).. B.A$(X1,3).A$(X2,3)..!C.A$(X1,4).A
$(X2,4)..!D.A$(X1,5).A$(X2,5)..!E.A$(X2,
1).S1$.?!F.A$(X2,2).S2$.P!G.A$(X2,3).S3$
.A!H.A$(X2,4).S4$.R!I.A$(X2,5).S5$.}!J..
X2,X1..!^..48...
> CLICK IMAGE PREVIEW FOR FULL MODAL