UOKJYH
FILE INFORMATION
FILENAME(S): UOKJYH
FILE TYPE(S): PRG
FILE SIZE: 8.3K
FIRST SEEN: 2025-12-01 13:51:05
APPEARS ON: 1 disk(s)
FILE HASH
5730e21ee760a7820f98431ceebe32cac0b74c091f64e24800cf1c344edfb375
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FR BR BOXING | UOKJYH | PRG | hedning, Knutsson | 3 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 01 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |....... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3B |**************.;|
00000020: 08 02 00 8F 20 2A 20 41 44 52 45 53 53 45 4E 56 |.... * ADRESSENV|
00000030: 45 52 57 41 4C 54 55 4E 47 20 2A 00 58 08 03 00 |ERWALTUNG *.X...|
00000040: 8F 20 2A 20 46 55 45 52 20 44 45 4E 20 43 2D 36 |. * FUER DEN C-6|
00000050: 34 20 50 4C 55 53 20 2A 00 75 08 04 00 8F 20 2A |4 PLUS *.u.... *|
00000060: 20 20 20 44 41 54 41 53 45 54 54 45 20 4F 44 45 | DATASETTE ODE|
00000070: 52 20 20 20 2A 00 92 08 05 00 8F 20 2A 20 20 44 |R *...... * D|
00000080: 49 53 4B 45 54 54 45 4E 53 54 41 44 49 4F 4E 20 |ISKETTENSTADION |
00000090: 20 2A 00 AF 08 06 00 8F 20 2A 20 20 20 20 20 20 | *...... * |
000000A0: 20 50 4C 55 53 20 20 20 20 20 20 20 20 20 2A 00 | PLUS *.|
000000B0: CC 08 07 00 8F 20 2A 20 43 4F 4D 4D 4F 44 4F 52 |..... * COMMODOR|
000000C0: 45 20 50 52 49 4E 54 45 52 20 20 2A 00 E9 08 08 |E PRINTER *....|
000000D0: 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 EF 08 09 00 8F 00 |*********.......|
000000F0: 0E 09 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..... **********|
00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2D |**************.-|
00000110: 09 0B 00 8F 20 2A 20 41 55 54 4F 52 20 55 4E 44 |.... * AUTOR UND|
00000120: 20 45 49 4E 4C 45 49 54 55 4E 47 20 2A 00 4C 09 | EINLEITUNG *.L.|
00000130: 0C 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00000140: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 62 09 14 |************.b..|
00000150: 00 97 35 33 32 38 30 2C 30 3A 97 35 33 32 38 31 |..53280,0:.53281|
00000160: 2C 30 00 8C 09 15 00 99 22 9E 93 11 11 11 20 20 |,0......"..... |
00000170: 20 20 20 20 20 20 20 CF B7 B7 B7 B7 B7 B7 B7 B7 | .........|
00000180: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 D0 22 00 B1 09 16 |..........."....|
00000190: 00 99 22 20 20 20 20 20 20 20 20 20 B4 41 44 52 |.." .ADR|
000001A0: 45 53 53 45 4E 56 45 52 57 41 4C 54 55 4E 47 AA |ESSENVERWALTUNG.|
000001B0: 22 00 D6 09 17 00 99 22 20 20 20 20 20 20 20 20 |"......" |
000001C0: 20 CC AF AF AF AF AF AF AF AF AF AF AF AF AF AF | ...............|
000001D0: AF AF AF AF BA 22 00 FE 09 18 00 99 22 11 11 11 |....."......"...|
000001E0: 9A 20 20 20 20 20 20 20 20 20 20 20 48 45 49 4E |. HEIN|
000001F0: 5A 20 50 52 41 4E 47 45 4E 42 45 52 47 22 00 22 |Z PRANGENBERG"."|
00000200: 0A 19 00 99 22 11 20 20 20 20 20 20 20 20 20 20 |....". |
00000210: 20 35 33 34 20 42 41 44 20 48 4F 4E 4E 45 46 20 | 534 BAD HONNEF |
00000220: 36 22 00 47 0A 1A 00 99 22 11 20 20 20 20 20 20 |6".G....". |
00000230: 20 20 20 20 20 4C 4F 48 52 42 45 52 47 53 54 52 | LOHRBERGSTR|
00000240: 41 53 53 45 20 32 22 00 66 0A 1B 00 99 22 11 20 |ASSE 2".f....". |
00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 43 | (C|
00000260: 29 20 31 39 38 35 00 96 0A 1C 00 99 22 11 11 11 |) 1985......"...|
00000270: 11 20 20 20 20 20 45 49 4E 57 45 49 53 55 4E 47 |. EINWEISUNG|
00000280: 20 49 4E 53 20 50 52 4F 47 52 41 4D 4D 20 28 4A | INS PROGRAMM (J|
00000290: 2F 4E 29 20 3F 22 00 A8 0A 1D 00 A1 41 24 3A 8B |/N) ?"......A$:.|
000002A0: 41 24 B2 22 22 A7 32 39 00 B8 0A 1E 00 8B 41 24 |A$."".29......A$|
000002B0: B2 22 4E 22 A7 31 39 30 00 C8 0A 1F 00 8B 41 24 |."N".190......A$|
000002C0: B3 B1 22 4A 22 A7 32 39 00 EB 0A 23 00 99 22 93 |.."J".29...#..".|
000002D0: 20 20 20 20 20 20 20 20 20 20 20 4D 45 4E 55 45 | MENUE|
000002E0: 45 52 4B 4C 41 45 52 55 4E 47 22 00 20 0B 28 00 |ERKLAERUNG". .(.|
000002F0: 99 22 11 45 49 4E 54 52 41 47 45 4E 20 3D 20 45 |.".EINTRAGEN = E|
00000300: 49 4E 47 41 42 45 20 44 45 52 20 44 41 54 45 4E |INGABE DER DATEN|
00000310: 20 28 47 52 41 4D 4D 4F 50 48 4F 4E 45 47 45 2E | (GRAMMOPHONEGE.|
00000320: 00 58 0B 2A 00 99 22 91 20 20 20 20 20 20 20 20 |.X.*..". |
00000330: 20 20 20 20 4E 55 4D 4D 45 52 2C 4B 4F 4D 50 4F | NUMMER,KOMPO|
00000340: 4E 49 53 54 2C 44 49 52 49 47 45 4E 54 2C 53 41 |NIST,DIRIGENT,SA|
00000350: 45 4E 47 45 52 29 2E 22 00 82 0B 2C 00 99 22 11 |ENGER)."...,..".|
00000360: 42 4C 41 45 54 54 45 52 4E 20 3D 20 4B 41 52 54 |BLAETTERN = KART|
00000370: 45 49 20 44 55 52 43 48 42 4C 41 45 54 54 45 52 |EI DURCHBLAETTER|
00000380: 4E 2E 00 B2 0B 2E 00 99 22 20 20 20 20 20 20 20 |N......." |
00000390: 20 20 20 20 20 28 56 4F 52 57 41 45 52 54 53 20 | (VORWAERTS |
000003A0: 4F 44 45 52 20 52 55 45 43 4B 57 41 45 52 54 53 |ODER RUECKWAERTS|
000003B0: 29 22 00 E0 0B 30 00 99 22 11 4C 4F 45 53 43 48 |)"...0..".LOESCH|
000003C0: 45 4E 20 20 3D 20 45 49 4E 5A 45 4C 4C 4F 45 53 |EN = EINZELLOES|
000003D0: 43 48 55 4E 47 20 56 4F 4E 20 44 41 54 45 4E 22 |CHUNG VON DATEN"|
000003E0: 00 0E 0C 32 00 99 22 91 20 20 20 20 20 20 20 20 |...2..". |
000003F0: 20 20 20 20 4E 41 43 48 20 45 49 4E 47 41 42 45 | NACH EINGABE|
00000400: 20 44 45 52 20 44 41 54 45 4E 20 4E 52 22 00 3C | DER DATEN NR".<|
00000410: 0C 34 00 99 22 11 41 45 4E 44 45 52 4E 20 20 20 |.4..".AENDERN |
00000420: 3D 20 41 45 4E 44 45 52 4E 20 44 45 52 20 44 41 |= AENDERN DER DA|
00000430: 54 45 4E 20 20 20 20 4E 41 43 48 22 00 65 0C 36 |TEN NACH".e.6|
00000440: 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 45 |.." E|
00000450: 49 4E 47 41 42 45 20 44 45 52 20 44 41 54 45 4E |INGABE DER DATEN|
00000460: 20 4E 52 2E 22 00 94 0C 38 00 99 22 11 53 55 43 | NR."...8..".SUC|
00000470: 48 45 4E 20 20 20 20 3D 20 44 55 52 43 48 53 55 |HEN = DURCHSU|
00000480: 43 48 45 4E 20 44 45 52 20 44 41 54 45 4E 20 45 |CHEN DER DATEN E|
00000490: 49 4E 2D 22 00 C7 0C 3A 00 99 22 91 20 20 20 20 |IN-"...:..". |
000004A0: 20 20 20 20 20 20 20 20 47 41 42 45 20 57 41 48 | GABE WAH|
000004B0: 4C 57 45 49 53 45 20 28 47 52 41 4D 4D 4F 50 48 |LWEISE (GRAMMOPH|
000004C0: 4F 4E 47 45 2E 2C 22 00 FD 0C 3C 00 99 22 20 20 |ONGE.,"...<.." |
000004D0: 20 20 20 20 20 20 20 20 20 20 4E 55 4D 4D 45 52 | NUMMER|
000004E0: 2C 4B 4F 4D 50 4F 4E 49 53 54 2C 44 49 52 49 47 |,KOMPONIST,DIRIG|
000004F0: 45 4E 54 2C 53 41 45 4E 47 45 52 29 22 00 27 0D |ENT,SAENGER)".'.|
00000500: 3E 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |>.." |
00000510: 12 20 4C 45 45 52 54 41 53 52 45 20 44 52 55 45 |. LEERTASRE DRUE|
00000520: 43 4B 45 4E 20 92 22 00 39 0D 40 00 A1 41 24 3A |CKEN .".9.@..A$:|
00000530: 8B 41 24 B2 22 22 A7 36 34 00 49 0D 42 00 8B 41 |.A$."".64.I.B..A|
00000540: 24 B3 B1 22 20 22 A7 36 34 00 7A 0D 44 00 99 22 |$.." ".64.z.D.."|
00000550: 93 44 41 54 45 49 20 4C 4F 45 53 43 48 45 4E 20 |.DATEI LOESCHEN |
00000560: 20 20 20 3D 20 4C 4F 45 53 43 48 45 4E 20 41 4C | = LOESCHEN AL|
00000570: 4C 45 52 20 44 41 54 45 4E 22 00 A7 0D 46 00 99 |LER DATEN"...F..|
00000580: 22 42 45 53 54 49 4D 4D 54 45 20 44 41 54 45 4E |"BESTIMMTE DATEN|
00000590: 20 20 20 3D 20 45 49 4E 47 41 42 45 20 44 41 54 | = EINGABE DAT|
000005A0: 45 4E 20 4E 52 2E 22 00 D5 0D 47 00 99 22 91 20 |EN NR."...G..". |
000005B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005C0: 20 3D 20 41 55 53 47 41 42 45 20 44 45 52 20 44 | = AUSGABE DER D|
000005D0: 41 54 45 4E 22 00 05 0E 48 00 99 22 11 44 41 54 |ATEN"...H..".DAT|
000005E0: 45 4E 20 41 42 53 50 45 49 43 48 45 52 4E 20 3D |EN ABSPEICHERN =|
000005F0: 20 53 50 45 49 43 48 45 52 4E 20 44 45 52 20 44 | SPEICHERN DER D|
00000600: 41 54 45 4E 22 00 33 0E 4E 00 99 22 20 20 20 20 |ATEN".3.N.." |
00000610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000620: 57 41 48 4C 57 45 49 53 45 20 41 55 46 20 43 41 |WAHLWEISE AUF CA|
00000630: 53 2E 22 00 5D 0E 50 00 99 22 20 20 20 20 20 20 |S.".].P.." |
00000640: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4F 44 | OD|
00000650: 45 52 20 44 49 53 4B 45 54 54 45 2E 22 00 8D 0E |ER DISKETTE."...|
00000660: 52 00 99 22 11 50 52 4F 47 52 41 4D 4D 20 42 45 |R..".PROGRAMM BE|
00000670: 45 4E 44 45 4E 20 20 3D 20 4C 4F 45 53 43 48 54 |ENDEN = LOESCHT|
00000680: 20 44 41 53 20 47 45 53 41 4D 54 45 22 00 BC 0E | DAS GESAMTE"...|
00000690: 54 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |T.." |
000006A0: 20 20 20 20 20 20 20 20 49 4D 20 53 50 45 49 43 | IM SPEIC|
000006B0: 48 45 52 20 42 45 46 49 4E 44 2D 22 00 E6 0E 56 |HER BEFIND-"...V|
000006C0: 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |.." |
000006D0: 20 20 20 20 20 20 20 4C 49 43 48 45 20 50 52 4F | LICHE PRO|
000006E0: 47 52 41 4D 4D 22 00 17 0F 58 00 99 22 11 44 41 |GRAMM"...X..".DA|
000006F0: 54 45 4E 20 41 55 53 44 52 55 43 4B 45 4E 20 20 |TEN AUSDRUCKEN |
00000700: 3D 20 41 55 53 44 52 55 43 4B 20 45 49 4E 45 52 |= AUSDRUCK EINER|
00000710: 20 4C 49 53 54 45 22 00 44 0F 5A 00 99 22 91 20 | LISTE".D.Z..". |
00000720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000730: 20 20 20 4D 49 54 20 41 4C 4C 45 4E 20 44 41 54 | MIT ALLEN DAT|
00000740: 45 4E 20 22 00 71 0F 5C 00 99 22 11 44 41 54 45 |EN ".q.\..".DATE|
00000750: 4E 20 4C 41 44 45 4E 20 20 20 20 20 20 20 3D 20 |N LADEN = |
00000760: 4C 41 44 45 4E 20 44 45 52 20 44 41 54 45 4E 20 |LADEN DER DATEN |
00000770: 22 00 9F 0F 5E 00 99 22 20 20 20 20 20 20 20 20 |"...^.." |
00000780: 20 20 20 20 20 20 20 20 20 20 20 20 57 41 48 4C | WAHL|
00000790: 57 45 49 53 45 20 41 55 46 20 43 41 53 2E 22 00 |WEISE AUF CAS.".|
000007A0: C8 0F 60 00 99 22 20 20 20 20 20 20 20 20 20 20 |..`.." |
000007B0: 20 20 20 20 20 20 20 20 20 20 4F 44 45 52 20 44 | ODER D|
000007C0: 49 53 4B 45 54 54 45 22 00 F4 0F 62 00 99 22 11 |ISKETTE"...b..".|
000007D0: 20 20 20 20 20 20 20 20 20 20 12 20 46 31 20 3D | . F1 =|
000007E0: 20 4D 45 4E 55 45 45 52 4B 4C 41 45 52 55 4E 47 | MENUEERKLAERUNG|
000007F0: 20 92 20 22 00 1F 10 64 00 99 22 11 20 20 20 20 | . "...d..". |
00000800: 20 20 20 20 20 20 12 20 46 33 20 3D 20 50 52 4F | . F3 = PRO|
00000810: 47 52 41 4D 4D 53 54 41 52 54 20 20 20 92 22 00 |GRAMMSTART .".|
00000820: 32 10 66 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 |2.f..A$:.A$."".1|
00000830: 30 32 00 44 10 68 00 8B 41 24 B2 C7 28 31 33 33 |02.D.h..A$..(133|
00000840: 29 A7 33 35 00 58 10 6A 00 8B 41 24 B3 B1 C7 28 |).35.X.j..A$...(|
00000850: 31 33 34 29 A7 31 30 32 00 71 10 BE 00 8F 20 2A |134).102.q.... *|
00000860: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000870: 2A 00 8A 10 C0 00 8F 20 2A 20 50 52 4F 47 52 41 |*...... * PROGRA|
00000880: 4D 4D 20 53 54 41 52 54 20 2A 00 A3 10 C2 00 8F |MM START *......|
00000890: 20 2A 20 20 41 55 53 57 41 48 4C 4D 45 4E 55 45 | * AUSWAHLMENUE|
000008A0: 20 20 2A 00 BC 10 C4 00 8F 20 2A 2A 2A 2A 2A 2A | *...... ******|
000008B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C6 10 C8 |************....|
000008C0: 00 9C 3A 54 B2 31 00 DC 10 D2 00 97 35 33 32 38 |..:T.1......5328|
000008D0: 31 2C 31 3A 97 35 33 32 38 30 2C 31 00 F2 10 DC |1,1:.53280,1....|
000008E0: 00 86 41 24 28 35 30 30 2C 35 29 3A 41 44 B2 35 |..A$(500,5):AD.5|
000008F0: 30 30 00 28 11 E6 00 5A B2 30 3A 99 22 90 93 2A |00.(...Z.0:."..*|
00000900: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000910: 20 4D 45 4E 55 45 20 2A 2A 2A 2A 2A 2A 2A 2A 2A | MENUE *********|
00000920: 2A 2A 2A 2A 2A 2A 2A 22 00 57 11 FA 00 99 22 11 |*******".W....".|
00000930: 11 20 31 2D 2D 45 49 4E 54 52 41 47 45 4E 20 20 |. 1--EINTRAGEN |
00000940: 20 20 20 20 20 36 2D 2D 44 41 54 45 49 20 4C 4F | 6--DATEI LO|
00000950: 45 53 43 48 45 4E 22 00 88 11 04 01 99 22 11 20 |ESCHEN"......". |
00000960: 32 2D 2D 42 4C 41 45 54 54 45 52 4E 20 20 20 20 |2--BLAETTERN |
00000970: 20 20 20 37 2D 2D 42 45 53 54 49 4D 4D 54 45 20 | 7--BESTIMMTE |
00000980: 41 44 52 45 53 53 45 22 00 B8 11 0E 01 99 22 20 |ADRESSE"......" |
00000990: 33 2D 2D 4C 4F 45 53 43 48 45 4E 20 20 20 20 20 |3--LOESCHEN |
000009A0: 20 20 20 38 2D 2D 44 41 54 45 4E 20 41 42 53 50 | 8--DATEN ABSP|
000009B0: 45 49 43 48 45 52 4E 22 00 E7 11 18 01 99 22 20 |EICHERN"......" |
000009C0: 34 2D 2D 41 45 4E 44 45 52 4E 20 20 20 20 20 20 |4--AENDERN |
000009D0: 20 20 20 45 2D 2D 50 52 4F 47 52 41 4D 4D 20 42 | E--PROGRAMM B|
000009E0: 45 45 4E 44 45 4E 22 00 17 12 22 01 99 22 11 20 |EENDEN"..."..". |
000009F0: 35 2D 2D 53 55 43 48 45 4E 20 20 20 20 20 20 20 |5--SUCHEN |
00000A00: 20 20 20 44 2D 2D 44 41 54 45 4E 20 41 55 53 44 | D--DATEN AUSD|
00000A10: 52 55 43 4B 45 4E 22 00 45 12 2C 01 99 22 11 20 |RUCKEN".E.,..". |
00000A20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A30: 20 20 20 4C 2D 2D 44 41 54 45 4E 20 4C 41 44 45 | L--DATEN LADE|
00000A40: 4E 11 11 11 22 00 77 12 36 01 99 22 2A 2A 2A 2A |N...".w.6.."****|
00000A50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A70: 2A 2A 2A 2A 11 11 22 00 9B 12 40 01 99 22 20 20 |****.."...@.." |
00000A80: 20 20 20 20 20 20 20 20 42 49 54 54 45 20 57 41 | BITTE WA|
00000A90: 45 48 4C 45 4E 20 53 49 45 20 22 00 C0 12 4A 01 |EHLEN SIE "...J.|
00000AA0: 99 22 20 20 20 20 20 20 20 20 B8 B8 B8 B8 B8 B8 |." ......|
00000AB0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 22 |..............."|
00000AC0: 00 D3 12 54 01 A1 44 24 3A 8B 44 24 B2 22 22 A7 |...T..D$:.D$."".|
00000AD0: 33 34 30 00 E9 12 5E 01 41 B2 C5 28 44 24 29 3A |340...^.A..(D$):|
00000AE0: 8B 41 B1 31 38 A7 33 34 30 00 FC 12 63 01 8B 44 |.A.18.340...c..D|
00000AF0: 24 B2 22 45 22 A7 99 22 93 22 3A A2 00 0D 13 64 |$."E"..".":....d|
00000B00: 01 8B 44 24 B2 22 4C 22 A7 31 33 33 30 00 1E 13 |..D$."L".1330...|
00000B10: 65 01 8B 44 24 B2 22 44 22 A7 32 32 30 30 00 48 |e..D$."D".2200.H|
00000B20: 13 68 01 91 41 89 33 37 30 2C 35 35 30 2C 37 31 |.h..A.370,550,71|
00000B30: 30 2C 38 31 30 2C 39 31 30 2C 32 30 34 30 2C 32 |0,810,910,2040,2|
00000B40: 30 39 30 2C 31 35 35 30 00 64 13 6A 01 8F 20 2A |090,1550.d.j.. *|
00000B50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B60: 2A 2A 2A 2A 00 80 13 6C 01 8F 20 2A 20 41 44 52 |****...l.. * ADR|
00000B70: 45 53 53 45 4E 20 45 49 4E 47 45 42 45 4E 20 2A |ESSEN EINGEBEN *|
00000B80: 00 9C 13 6E 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...n.. *********|
00000B90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A4 13 72 |************...r|
00000BA0: 01 54 B2 30 00 AE 13 7C 01 54 B2 54 AA 31 00 BE |.T.0...|.T.T.1..|
00000BB0: 13 86 01 8B 54 B1 35 30 30 A7 31 37 34 30 00 F4 |....T.500.1740..|
00000BC0: 13 90 01 8B 41 24 28 54 2C 31 29 AA 41 24 28 54 |....A$(T,1).A$(T|
00000BD0: 2C 32 29 AA 41 24 28 54 2C 33 29 AA 41 24 28 54 |,2).A$(T,3).A$(T|
00000BE0: 2C 34 29 AA 41 24 28 54 2C 34 29 B3 B1 22 22 A7 |,4).A$(T,4).."".|
00000BF0: 89 33 38 30 00 1F 14 9A 01 99 22 93 11 11 11 11 |.380......".....|
00000C00: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000C10: 11 20 20 20 20 20 20 30 3D 4D 45 4E 55 45 22 00 |. 0=MENUE".|
00000C20: 4E 14 A4 01 99 22 13 1D 1D 1D 20 20 20 20 20 20 |N....".... |
00000C30: 20 20 20 20 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 | ........... |
00000C40: 41 44 52 45 53 53 45 20 4E 52 2E 92 22 54 00 72 |ADRESSE NR.."T.r|
00000C50: 14 B8 01 85 22 11 11 11 12 20 47 52 41 4D 4D 4F |....".... GRAMMO|
00000C60: 50 48 4F 4E 47 45 3A 92 20 22 3B 41 24 28 54 2C |PHONGE:. ";A$(T,|
00000C70: 31 29 00 93 14 C2 01 8B 41 24 28 54 2C 31 29 B2 |1)......A$(T,1).|
00000C80: 22 30 22 A7 41 24 28 54 2C 31 29 B2 22 22 3A 89 |"0".A$(T,1)."":.|
00000C90: 32 33 30 00 B2 14 CC 01 85 22 11 12 20 4E 55 4D |230......".. NUM|
00000CA0: 4D 45 52 20 20 20 3A 92 20 22 3B 41 24 28 54 2C |MER :. ";A$(T,|
00000CB0: 32 29 00 D1 14 D6 01 85 22 11 12 20 4B 4F 4D 50 |2)......".. KOMP|
00000CC0: 4F 4E 49 53 54 3A 92 20 22 3B 41 24 28 54 2C 33 |ONIST:. ";A$(T,3|
00000CD0: 29 00 F0 14 E0 01 85 22 11 12 20 44 49 52 49 47 |)......".. DIRIG|
00000CE0: 45 4E 54 20 3A 92 20 22 3B 41 24 28 54 2C 34 29 |ENT :. ";A$(T,4)|
00000CF0: 00 0F 15 EA 01 85 22 11 12 20 53 41 45 4E 47 45 |......".. SAENGE|
00000D00: 52 20 20 3A 92 20 22 3B 41 24 28 54 2C 35 29 00 |R :. ";A$(T,5).|
00000D10: 4C 15 FE 01 85 22 11 11 11 20 20 20 20 20 12 20 |L...."... . |
00000D20: 45 49 4E 47 41 42 45 4E 20 4F 2E 4B 2E 20 92 20 |EINGABEN O.K. . |
00000D30: 12 28 4A 2F 4E 29 92 20 20 4A 9D 9D 9D 22 3B 41 |.(J/N). J...";A|
00000D40: 24 3A 8B 54 B1 48 53 A7 48 53 B2 54 00 78 15 08 |$:.T.HS.HS.T.x..|
00000D50: 02 8B C8 28 41 24 2C 31 29 B3 B1 22 4A 22 A7 81 |...(A$,1).."J"..|
00000D60: 47 B2 31 A4 35 3A 41 24 28 54 2C 47 29 B2 22 22 |G.1.5:A$(T,G).""|
00000D70: 3A 82 47 3A 89 34 31 30 00 8C 15 12 02 8B 47 24 |:.G:.410......G$|
00000D80: B2 22 42 22 A7 47 24 B2 22 22 3A 8E 00 95 15 1C |."B".G$."":.....|
00000D90: 02 89 33 38 30 00 B3 15 1E 02 8F 20 2A 2A 2A 2A |..380...... ****|
00000DA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000DB0: 2A 2A 2A 00 D1 15 20 02 8F 20 2A 20 42 4C 41 45 |***... .. * BLAE|
00000DC0: 54 54 45 52 4E 20 49 4E 20 4B 41 52 54 45 49 20 |TTERN IN KARTEI |
00000DD0: 2A 00 EF 15 22 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*...".. ********|
00000DE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000DF0: F7 15 26 02 49 B2 31 00 27 16 30 02 99 22 93 20 |..&.I.1.'.0..". |
00000E00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E10: 20 20 20 20 20 20 12 20 41 44 52 45 53 53 45 20 | . ADRESSE |
00000E20: 4E 52 2E 92 22 49 22 00 5D 16 3A 02 99 22 13 11 |NR.."I".].:.."..|
00000E30: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000E40: 20 20 20 20 20 20 20 20 20 12 20 30 20 92 20 20 | . 0 . |
00000E50: 20 20 20 3D 20 4D 45 4E 55 45 22 3A 99 00 7F 16 | = MENUE":....|
00000E60: 44 02 99 22 20 20 20 20 20 12 4C 45 45 52 54 41 |D.." .LEERTA|
00000E70: 53 54 45 20 92 20 20 3D 20 56 4F 52 22 3A 99 00 |STE . = VOR":..|
00000E80: A3 16 4E 02 99 22 20 20 20 20 20 12 43 55 52 53 |..N.." .CURS|
00000E90: 4F 52 2D 44 4F 57 4E 92 20 3D 20 5A 55 52 55 45 |OR-DOWN. = ZURUE|
00000EA0: 43 4B 22 00 CF 16 50 02 99 22 11 20 20 20 20 20 |CK"...P..". |
00000EB0: 20 20 20 12 20 46 31 20 92 20 20 20 20 20 3D 20 | . F1 . = |
00000EC0: 45 49 4E 5A 45 4C 41 55 53 44 52 55 43 4B 22 00 |EINZELAUSDRUCK".|
00000ED0: E6 16 58 02 99 22 13 11 11 11 11 20 20 22 3B 41 |..X.."..... ";A|
00000EE0: 24 28 49 2C 31 29 00 F8 16 5D 02 99 22 11 20 20 |$(I,1)...]..". |
00000EF0: 22 41 24 28 49 2C 32 29 00 0A 17 62 02 99 22 11 |"A$(I,2)...b..".|
00000F00: 20 20 22 41 24 28 49 2C 33 29 00 1C 17 6C 02 99 | "A$(I,3)...l..|
00000F10: 22 11 20 20 22 41 24 28 49 2C 34 29 00 2E 17 76 |". "A$(I,4)...v|
00000F20: 02 99 22 11 20 20 22 41 24 28 49 2C 35 29 00 42 |..". "A$(I,5).B|
00000F30: 17 8A 02 8B 47 24 B2 22 42 22 A7 47 24 B2 22 22 |....G$."B".G$.""|
00000F40: 3A 8E 00 55 17 94 02 A1 41 24 3A 8B 41 24 B2 22 |:..U....A$:.A$."|
00000F50: 22 A7 36 36 30 00 65 17 9E 02 8B 41 24 B2 22 30 |".660.e....A$."0|
00000F60: 22 A7 32 33 30 00 80 17 A8 02 8B 41 24 B2 22 11 |".230......A$.".|
00000F70: 22 AF 49 B1 31 A7 49 B2 49 AB 31 3A 89 35 36 30 |".I.1.I.I.1:.560|
00000F80: 00 9C 17 B2 02 8B 41 24 B2 22 20 22 AF 49 B3 41 |......A$." ".I.A|
00000F90: 44 A7 49 B2 49 AA 31 3A 89 35 36 30 00 B0 17 B4 |D.I.I.1:.560....|
00000FA0: 02 8B 41 24 B2 C7 28 31 33 33 29 A7 32 33 30 30 |..A$..(133).2300|
00000FB0: 00 B9 17 BC 02 89 36 36 30 00 DD 17 BE 02 8F 20 |......660...... |
00000FC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000FD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 01 18 |*************...|
00000FE0: C0 02 8F 20 2A 20 44 41 54 45 4E 20 20 20 20 45 |... * DATEN E|
00000FF0: 49 4E 5A 45 4C 4E 20 4C 4F 45 53 43 48 45 4E 20 |INZELN LOESCHEN |
00001000: 2A 00 25 18 C2 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*.%.... ********|
00001010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001020: 2A 2A 2A 2A 2A 00 71 18 C6 02 41 B2 30 3A 99 22 |*****.q...A.0:."|
00001030: 93 41 55 46 20 57 45 4C 43 48 45 52 20 53 45 49 |.AUF WELCHER SEI|
00001040: 54 45 20 53 54 45 48 54 20 44 49 45 20 5A 55 20 |TE STEHT DIE ZU |
00001050: 20 20 20 20 20 20 20 20 20 11 4C 4F 45 53 43 48 | .LOESCH|
00001060: 45 4E 44 45 20 41 44 52 45 53 53 45 20 3A 11 11 |ENDE ADRESSE :..|
00001070: 22 00 78 18 CB 02 85 41 00 8B 18 E4 02 8B 41 B1 |".x....A......A.|
00001080: 35 30 30 B0 41 B3 31 A7 37 31 30 00 B9 18 EE 02 |500.A.1.710.....|
00001090: 99 22 93 20 20 20 20 20 20 20 20 20 20 20 20 20 |.". |
000010A0: 20 20 20 20 20 20 20 20 20 12 20 41 44 52 45 53 | . ADRES|
000010B0: 53 45 20 4E 52 2E 92 22 41 00 CD 18 F8 02 49 B2 |SE NR.."A.....I.|
000010C0: 41 3A 47 24 B2 22 42 22 3A 8D 36 30 30 00 F1 18 |A:G$."B":.600...|
000010D0: 02 03 85 22 11 11 11 11 20 4C 4F 45 53 43 48 45 |...".... LOESCHE|
000010E0: 4E 20 28 4A 2F 4E 29 20 20 4A 9D 9D 9D 22 3B 41 |N (J/N) J...";A|
000010F0: 24 00 03 19 0C 03 8B 41 24 B3 B1 22 4A 22 A7 89 |$......A$.."J"..|
00001100: 32 33 30 00 20 19 16 03 81 59 B2 31 A4 35 3A 41 |230. ....Y.1.5:A|
00001110: 24 28 41 2C 59 29 B2 22 22 3A 82 59 3A 59 B2 30 |$(A,Y)."":.Y:Y.0|
00001120: 00 55 19 20 03 99 22 11 20 12 20 41 44 52 45 53 |.U. ..". . ADRES|
00001130: 53 45 20 47 45 4C 4F 45 53 43 48 54 20 92 22 3A |SE GELOESCHT .":|
00001140: 81 59 B2 31 A4 31 30 30 30 3A 82 59 3A 59 B2 30 |.Y.1.1000:.Y:Y.0|
00001150: 3A 89 32 33 30 00 70 19 22 03 8F 20 2A 2A 2A 2A |:.230.p.".. ****|
00001160: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001170: 00 8B 19 24 03 8F 20 2A 20 44 41 54 45 4E 20 20 |...$.. * DATEN |
00001180: 20 20 41 45 4E 44 45 52 4E 20 2A 00 A6 19 26 03 | AENDERN *...&.|
00001190: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
000011A0: 2A 2A 2A 2A 2A 2A 00 EC 19 2A 03 99 22 93 41 55 |******...*..".AU|
000011B0: 46 20 57 45 4C 43 48 45 52 20 53 45 49 54 45 20 |F WELCHER SEITE |
000011C0: 53 54 45 48 54 20 44 49 45 20 5A 55 20 20 20 20 |STEHT DIE ZU |
000011D0: 20 20 20 20 20 20 11 41 45 4E 44 45 52 4E 44 45 | .AENDERNDE|
000011E0: 20 41 44 52 45 53 53 45 20 11 11 22 00 07 1A 48 | ADRESSE .."...H|
000011F0: 03 85 59 3A 49 B2 59 3A 8B 59 B1 35 30 30 B0 59 |..Y:I.Y:.Y.500.Y|
00001200: B3 31 A7 89 38 31 30 00 47 1A 52 03 47 24 B2 22 |.1..810.G.R.G$."|
00001210: 42 22 3A 99 22 93 20 20 20 20 20 20 20 20 20 20 |B":.". |
00001220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 20 | . |
00001230: 41 44 52 45 53 53 45 20 4E 52 2E 92 22 49 3A 8D |ADRESSE NR.."I:.|
00001240: 36 30 30 3A 49 B2 30 00 6A 1A 5C 03 85 22 11 11 |600:I.0.j.\.."..|
00001250: 11 11 20 41 45 4E 44 45 52 4E 20 28 4A 2F 4E 29 |.. AENDERN (J/N)|
00001260: 20 20 4A 9D 9D 9D 22 3B 41 24 00 7C 1A 66 03 8B | J...";A$.|.f..|
00001270: 41 24 B3 B1 22 4A 22 A7 89 32 33 30 00 A9 1A 70 |A$.."J"..230...p|
00001280: 03 81 54 B2 31 A4 35 3A 41 24 28 59 2C 54 29 B2 |..T.1.5:A$(Y,T).|
00001290: 22 22 3A 82 3A 54 B2 59 3A 47 24 B2 22 42 22 3A |"":.:T.Y:G$."B":|
000012A0: 99 22 93 22 3A 8D 34 32 30 00 EC 1A 7A 03 99 22 |.".":.420...z.."|
000012B0: 93 11 11 11 11 11 11 11 11 11 11 20 20 20 20 20 |........... |
000012C0: 20 20 20 20 20 41 44 52 45 53 53 45 20 47 45 41 | ADRESSE GEA|
000012D0: 45 4E 44 45 52 54 20 21 21 22 3A 81 54 B2 31 A4 |ENDERT !!":.T.1.|
000012E0: 31 30 30 30 3A 82 54 3A 89 32 33 30 00 0A 1B 7C |1000:.T:.230...||
000012F0: 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00001300: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 28 1B 7E 03 8F |**********.(.~..|
00001310: 20 2A 20 53 55 43 48 45 4E 20 56 4F 4E 20 44 41 | * SUCHEN VON DA|
00001320: 54 45 4E 20 20 20 20 2A 00 46 1B 80 03 8F 20 2A |TEN *.F.... *|
00001330: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001340: 2A 2A 2A 2A 2A 2A 00 85 1B 8E 03 99 22 93 11 11 |******......"...|
00001350: 20 53 49 45 20 4B 4F 45 4E 4E 45 4E 20 45 49 4E | SIE KOENNEN EIN|
00001360: 20 42 45 4C 49 45 42 49 47 45 53 20 53 55 43 48 | BELIEBIGES SUCH|
00001370: 57 4F 52 54 20 20 20 20 20 45 49 4E 47 45 42 45 |WORT EINGEBE|
00001380: 4E 2E 11 11 22 00 A1 1B AC 03 85 22 20 22 3B 53 |N..."......" ";S|
00001390: 24 3A 5A B2 C3 28 53 24 29 3A 81 54 B2 31 A4 48 |$:Z..(S$):.T.1.H|
000013A0: 53 00 D3 1B CA 03 99 22 93 11 11 11 11 11 11 11 |S......"........|
000013B0: 11 11 20 20 20 20 20 20 20 20 44 41 54 45 49 20 |.. DATEI |
000013C0: 57 49 52 44 20 44 55 52 43 48 53 55 43 48 54 20 |WIRD DURCHSUCHT |
000013D0: 21 21 22 00 EE 1B D4 03 81 55 B2 31 A4 35 3A 81 |!!"......U.1.5:.|
000013E0: 59 B2 31 A4 C3 28 41 24 28 54 2C 55 29 29 00 0B |Y.1..(A$(T,U))..|
000013F0: 1C E8 03 8B CA 28 41 24 28 54 2C 55 29 2C 59 2C |.....(A$(T,U),Y,|
00001400: 5A 29 B2 53 24 A7 89 31 30 35 30 00 15 1C F2 03 |Z).S$..1050.....|
00001410: 82 59 3A 82 55 00 1C 1C 06 04 82 54 00 26 1C 10 |.Y:.U......T.&..|
00001420: 04 89 31 31 31 30 00 5A 1C 1A 04 47 24 B2 22 42 |..1110.Z...G$."B|
00001430: 22 3A 99 22 93 20 20 12 20 41 44 52 45 53 53 45 |":.". . ADRESSE|
00001440: 20 4E 52 2E 92 22 54 3B 3A 99 22 92 22 3A 49 B2 | NR.."T;:.".":I.|
00001450: 54 3A 8D 36 30 30 3A 49 B2 30 00 7B 1C 24 04 99 |T:.600:I.0.{.$..|
00001460: 22 11 11 11 20 12 46 31 3D 57 45 49 54 45 52 20 |"... .F1=WEITER |
00001470: 2F 20 30 3D 4D 45 4E 55 45 92 22 00 8F 1C 2E 04 |/ 0=MENUE.".....|
00001480: A1 41 24 3A 8B 41 24 B2 22 22 A7 31 30 37 30 00 |.A$:.A$."".1070.|
00001490: AC 1C 38 04 8B 41 24 B2 22 30 22 A7 55 B2 30 3A |..8..A$."0".U.0:|
000014A0: 54 B2 30 3A 59 B2 30 3A 89 32 33 30 00 C1 1C 42 |T.0:Y.0:.230...B|
000014B0: 04 8B 41 24 B3 B1 C7 28 31 33 33 29 A7 31 30 37 |..A$...(133).107|
000014C0: 30 00 D2 1C 4C 04 8B 54 B3 B2 48 53 A7 89 31 30 |0...L..T..HS..10|
000014D0: 33 30 00 01 1D 56 04 99 22 93 11 11 11 11 11 11 |30...V..".......|
000014E0: 11 11 11 20 20 20 20 20 20 20 20 20 20 44 41 54 |... DAT|
000014F0: 45 49 20 44 55 52 43 48 53 55 43 48 54 20 21 21 |EI DURCHSUCHT !!|
00001500: 22 00 1B 1D 60 04 81 55 B2 31 A4 31 33 30 30 3A |"...`..U.1.1300:|
00001510: 82 55 3A 55 B2 30 3A 89 32 33 30 00 3E 1D 2A 05 |.U:U.0:.230.>.*.|
00001520: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00001530: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 61 |**************.a|
00001540: 1D 2C 05 8F 20 2A 20 44 41 54 45 4E 20 4C 41 44 |.,.. * DATEN LAD|
00001550: 45 4E 20 56 4F 4E 20 44 49 53 4B 45 54 54 45 20 |EN VON DISKETTE |
00001560: 2A 00 84 1D 2E 05 8F 20 2A 20 20 20 20 20 20 4F |*...... * O|
00001570: 44 45 52 20 43 41 53 53 45 54 54 45 20 20 20 20 |DER CASSETTE |
00001580: 20 20 20 2A 00 A7 1D 30 05 8F 20 2A 2A 2A 2A 2A | *...0.. *****|
00001590: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000015A0: 2A 2A 2A 2A 2A 2A 2A 00 CF 1D 32 05 99 22 93 11 |*******...2.."..|
000015B0: 11 20 20 20 20 56 4F 4E 20 54 41 50 45 3D 31 1D |. VON TAPE=1.|
000015C0: 20 4F 44 45 52 20 44 49 53 4B 3D 32 20 3F 22 00 | ODER DISK=2 ?".|
000015D0: E3 1D 46 05 A1 4C 24 3A 8B 4C 24 B2 22 22 A7 31 |..F..L$:.L$."".1|
000015E0: 33 35 30 00 F4 1D 50 05 8B 4C 24 B2 22 31 22 A7 |350...P..L$."1".|
000015F0: 31 33 39 30 00 05 1E 5A 05 8B 4C 24 B2 22 32 22 |1390...Z..L$."2"|
00001600: A7 31 38 39 30 00 14 1E 64 05 98 33 2C 41 24 28 |.1890...d..3,A$(|
00001610: 49 2C 35 29 00 55 1E 6E 05 99 22 11 11 11 20 43 |I,5).U.n.."... C|
00001620: 41 53 53 45 54 54 45 20 45 49 4E 4C 45 47 45 4E |ASSETTE EINLEGEN|
00001630: 20 55 4E 44 20 41 4E 20 44 49 45 20 52 49 43 48 | UND AN DIE RICH|
00001640: 54 49 47 45 20 20 20 53 54 45 4C 4C 45 20 53 50 |TIGE STELLE SP|
00001650: 55 4C 45 4E 22 00 7A 1E 78 05 99 22 11 11 11 20 |ULEN".z.x.."... |
00001660: 20 20 57 45 4E 4E 20 4F 2E 4B 2E 20 20 27 2A 27 | WENN O.K. '*'|
00001670: 20 44 52 55 45 43 4B 45 4E 22 00 90 1E 82 05 A1 | DRUECKEN"......|
00001680: 41 24 3A 8B 41 24 B3 B1 22 2A 22 A7 31 34 31 30 |A$:.A$.."*".1410|
00001690: 00 AA 1E 8C 05 99 22 93 11 11 11 11 11 11 11 11 |......".........|
000016A0: 11 11 22 3A 9F 31 2C 31 2C 30 00 C9 1E 96 05 81 |..":.1,1,0......|
000016B0: 51 B2 31 A4 35 30 30 3A 81 52 B2 31 A4 35 3A 84 |Q.1.500:.R.1.5:.|
000016C0: 31 2C 41 24 28 51 2C 52 29 00 EB 1E B4 05 8B 41 |1,A$(Q,R)......A|
000016D0: 24 28 51 2C 52 29 B2 22 40 22 A7 41 24 28 51 2C |$(Q,R)."@".A$(Q,|
000016E0: 52 29 B2 22 22 3A 89 31 35 31 30 00 07 1F BE 05 |R)."":.1510.....|
000016F0: 8B 41 24 28 51 2C 52 29 B2 22 B1 22 A7 41 24 28 |.A$(Q,R).".".A$(|
00001700: 51 2C 52 29 B2 22 22 00 11 1F C8 05 82 52 3A 82 |Q,R).""......R:.|
00001710: 51 00 18 1F E6 05 A0 31 00 42 1F F0 05 99 22 93 |Q......1.B....".|
00001720: 11 11 11 11 11 11 11 11 20 20 20 20 20 20 20 20 |........ |
00001730: 20 44 41 54 45 4E 20 47 45 4C 41 44 45 4E 20 21 | DATEN GELADEN !|
00001740: 21 22 00 5D 1F 04 06 48 53 B2 51 3A 81 51 B2 31 |!".]...HS.Q:.Q.1|
00001750: A4 31 30 30 30 3A 82 51 3A 89 32 33 30 00 7D 1F |.1000:.Q:.230.}.|
00001760: 06 06 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00001770: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 9D 1F |*************...|
00001780: 08 06 52 45 4E 20 AC 20 44 41 54 45 4E 20 B6 50 |..REN . DATEN .P|
00001790: 45 49 43 48 45 52 4E 20 41 55 46 20 AC 00 BD 1F |EICHERN AUF ....|
000017A0: 0A 06 8F 20 2A 20 44 49 53 4B 45 54 54 45 20 4F |... * DISKETTE O|
000017B0: 44 45 52 20 43 41 53 53 45 54 54 45 2A 00 DD 1F |DER CASSETTE*...|
000017C0: 0C 06 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
000017D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 03 20 |*************.. |
000017E0: 0E 06 99 22 93 11 11 11 20 20 20 20 41 55 46 20 |...".... AUF |
000017F0: 54 41 50 45 3D 31 20 4F 44 45 52 20 44 49 53 4B |TAPE=1 ODER DISK|
00001800: 3D 32 22 00 19 20 22 06 A1 53 50 24 3A 8B 53 50 |=2".. "..SP$:.SP|
00001810: 24 B2 22 22 A7 31 35 37 30 00 2B 20 2C 06 8B 53 |$."".1570.+ ,..S|
00001820: 50 24 B2 22 31 22 A7 31 36 30 30 00 3D 20 36 06 |P$."1".1600.= 6.|
00001830: 8B 53 50 24 B2 22 32 22 A7 31 37 36 30 00 7F 20 |.SP$."2".1760.. |
00001840: 40 06 99 22 11 11 11 20 20 43 41 53 53 45 54 54 |@.."... CASSETT|
00001850: 45 20 45 49 4E 4C 45 47 45 4E 20 55 4E 44 20 41 |E EINLEGEN UND A|
00001860: 4E 20 44 49 45 20 52 49 43 48 54 49 47 45 20 20 |N DIE RICHTIGE |
00001870: 20 53 54 45 4C 4C 45 20 53 50 55 4C 45 4E 22 00 | STELLE SPULEN".|
00001880: A6 20 4A 06 99 22 11 11 20 20 20 20 57 45 4E 4E |. J..".. WENN|
00001890: 20 4F 2E 4B 2E 20 20 27 2A 27 20 44 52 55 45 43 | O.K. '*' DRUEC|
000018A0: 4B 45 4E 20 21 22 00 BC 20 54 06 A1 41 24 3A 8B |KEN !".. T..A$:.|
000018B0: 41 24 B3 B1 22 2A 22 A7 31 36 32 30 00 D6 20 5E |A$.."*".1620.. ^|
000018C0: 06 99 22 93 11 11 11 11 11 11 11 11 11 11 22 3A |.."...........":|
000018D0: 9F 31 2C 31 2C 31 00 E9 20 68 06 81 51 B2 31 A4 |.1,1,1.. h..Q.1.|
000018E0: 48 53 3A 81 52 B2 31 A4 35 00 05 21 7C 06 8B 41 |HS:.R.1.5..!|..A|
000018F0: 24 28 51 2C 52 29 B2 22 22 A7 41 24 28 51 2C 52 |$(Q,R)."".A$(Q,R|
00001900: 29 B2 22 B1 22 00 14 21 86 06 98 31 2C 41 24 28 |)."."..!...1,A$(|
00001910: 51 2C 52 29 00 1E 21 90 06 82 52 3A 82 51 00 29 |Q,R)..!...R:.Q.)|
00001920: 21 A4 06 98 31 2C 22 40 22 00 30 21 AE 06 A0 31 |!...1,"@".0!...1|
00001930: 00 6F 21 B8 06 99 22 93 11 11 11 11 11 11 11 11 |.o!...".........|
00001940: 20 20 20 20 20 20 44 41 54 45 4E 20 41 42 47 45 | DATEN ABGE|
00001950: 53 50 45 49 43 48 45 52 54 20 21 21 22 3A 81 51 |SPEICHERT !!":.Q|
00001960: B2 31 A4 31 30 30 30 3A 82 51 3A 89 32 33 30 00 |.1.1000:.Q:.230.|
00001970: A5 21 CC 06 99 22 93 11 11 11 11 11 11 11 11 20 |.!..."......... |
00001980: 20 20 4E 55 52 20 35 30 30 20 41 44 52 45 53 53 | NUR 500 ADRESS|
00001990: 45 4E 22 3A 81 54 B2 31 A4 32 30 30 30 3A 82 54 |EN":.T.1.2000:.T|
000019A0: 3A 89 32 33 30 00 D4 21 E0 06 99 22 11 11 11 11 |:.230..!..."....|
000019B0: 11 20 20 20 20 44 41 54 45 4E 20 41 55 46 20 44 |. DATEN AUF D|
000019C0: 49 53 4B 45 54 54 45 20 41 42 53 50 45 49 43 48 |ISKETTE ABSPEICH|
000019D0: 45 52 4E 22 00 F6 21 EA 06 99 22 11 11 20 20 20 |ERN"..!...".. |
000019E0: 20 44 49 53 4B 45 54 54 45 20 45 49 4E 4C 45 47 | DISKETTE EINLEG|
000019F0: 45 4E 2E 11 11 22 00 10 22 F4 06 85 22 20 20 20 |EN...".."..." |
00001A00: 20 46 49 4C 45 4E 41 4D 45 20 3A 22 3B 44 4E 24 | FILENAME :";DN$|
00001A10: 00 35 22 FE 06 99 22 93 11 11 11 11 11 11 11 11 |.5"...".........|
00001A20: 11 11 22 3A 9F 31 2C 38 2C 31 2C 44 4E 24 AA 22 |..":.1,8,1,DN$."|
00001A30: 2C 53 2C 57 22 00 48 22 08 07 81 51 B2 31 A4 48 |,S,W".H"...Q.1.H|
00001A40: 53 3A 81 52 B2 31 A4 35 00 64 22 1C 07 8B 41 24 |S:.R.1.5.d"...A$|
00001A50: 28 51 2C 52 29 B2 22 22 A7 41 24 28 51 2C 52 29 |(Q,R)."".A$(Q,R)|
00001A60: B2 22 B1 22 00 73 22 26 07 98 31 2C 41 24 28 51 |.".".s"&..1,A$(Q|
00001A70: 2C 52 29 00 7D 22 30 07 82 52 3A 82 51 00 88 22 |,R).}"0..R:.Q.."|
00001A80: 44 07 98 31 2C 22 40 22 00 8F 22 4E 07 A0 31 00 |D..1,"@".."N..1.|
00001A90: D1 22 58 07 99 22 93 11 11 11 11 11 11 11 11 11 |."X.."..........|
00001AA0: 11 20 20 20 20 20 20 20 44 41 54 45 4E 20 41 42 |. DATEN AB|
00001AB0: 47 45 53 50 45 49 43 48 45 52 54 20 21 21 22 3A |GESPEICHERT !!":|
00001AC0: 81 54 B2 31 A4 31 30 30 30 3A 82 54 3A 89 32 33 |.T.1.1000:.T:.23|
00001AD0: 30 00 10 23 62 07 99 22 11 11 20 44 41 54 45 4E |0..#b..".. DATEN|
00001AE0: 20 56 4F 4E 20 44 49 53 4B 45 54 54 45 2E 20 44 | VON DISKETTE. D|
00001AF0: 49 53 4B 45 54 54 45 20 4D 49 54 20 44 41 54 45 |ISKETTE MIT DATE|
00001B00: 4E 11 20 20 45 49 4E 4C 45 47 45 4E 2E 11 11 22 |N. EINLEGEN..."|
00001B10: 00 27 23 76 07 85 22 20 46 49 4C 45 4E 41 4D 45 |.'#v.." FILENAME|
00001B20: 20 3A 22 3B 44 4E 24 00 4C 23 80 07 99 22 93 11 | :";DN$.L#..."..|
00001B30: 11 11 11 11 11 11 11 11 11 22 3A 9F 31 2C 38 2C |.........":.1,8,|
00001B40: 30 2C 44 4E 24 AA 22 2C 53 2C 52 22 00 60 23 8A |0,DN$.",S,R".`#.|
00001B50: 07 81 51 B2 31 A4 35 30 30 3A 81 52 B2 31 A4 35 |..Q.1.500:.R.1.5|
00001B60: 00 6F 23 9E 07 84 31 2C 41 24 28 51 2C 52 29 00 |.o#...1,A$(Q,R).|
00001B70: 91 23 A8 07 8B 41 24 28 51 2C 52 29 B2 22 40 22 |.#...A$(Q,R)."@"|
00001B80: A7 41 24 28 51 2C 52 29 B2 22 22 3A 89 32 30 31 |.A$(Q,R)."":.201|
00001B90: 30 00 AD 23 B2 07 8B 41 24 28 51 2C 52 29 B2 22 |0..#...A$(Q,R)."|
00001BA0: B1 22 A7 41 24 28 51 2C 52 29 B2 22 22 00 B7 23 |.".A$(Q,R).""..#|
00001BB0: BC 07 82 52 3A 82 51 00 BE 23 DA 07 A0 31 00 EA |...R:.Q..#...1..|
00001BC0: 23 E4 07 99 22 93 11 11 11 11 11 11 11 11 11 11 |#..."...........|
00001BD0: 20 20 20 20 20 20 20 20 20 44 41 54 45 4E 20 47 | DATEN G|
00001BE0: 45 4C 41 44 45 4E 20 21 21 22 00 05 24 EE 07 48 |ELADEN !!"..$..H|
00001BF0: 53 B2 51 3A 81 54 B2 31 A4 31 30 30 30 3A 82 54 |S.Q:.T.1.1000:.T|
00001C00: 3A 89 32 33 30 00 27 24 F0 07 8F 20 2A 2A 2A 2A |:.230.'$... ****|
00001C10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001C20: 2A 2A 2A 2A 2A 2A 2A 00 49 24 F2 07 8F 20 2A 20 |*******.I$... * |
00001C30: 4C 4F 45 53 43 48 45 4E 20 41 4C 4C 45 52 20 44 |LOESCHEN ALLER D|
00001C40: 41 54 45 4E 20 20 20 20 2A 00 6B 24 F4 07 8F 20 |ATEN *.k$... |
00001C50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001C60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B2 24 F8 07 |***********..$..|
00001C70: 99 22 93 11 11 11 11 11 20 53 4F 4C 4C 45 4E 20 |."...... SOLLEN |
00001C80: 44 49 45 20 47 41 4E 5A 45 4E 20 41 44 52 45 53 |DIE GANZEN ADRES|
00001C90: 53 45 4E 20 47 45 4C 4F 45 53 43 48 54 20 20 20 |SEN GELOESCHT |
00001CA0: 20 11 57 45 52 44 45 4E 20 20 20 28 4A 2F 4E 29 | .WERDEN (J/N)|
00001CB0: 20 22 00 C6 24 02 08 A1 41 24 3A 8B 41 24 B2 22 | "..$...A$:.A$."|
00001CC0: 22 A7 32 30 35 30 00 D6 24 0C 08 8B 41 24 B2 22 |".2050..$...A$."|
00001CD0: 4A 22 A7 32 30 30 00 E6 24 16 08 8B 41 24 B2 22 |J".200..$...A$."|
00001CE0: 4E 22 A7 32 33 30 00 F0 24 20 08 89 32 30 34 30 |N".230..$ ..2040|
00001CF0: 00 0E 25 22 08 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |..%".. *********|
00001D00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2C |**************.,|
00001D10: 25 24 08 8F 20 2A 20 44 41 54 45 4E 20 20 20 20 |%$.. * DATEN |
00001D20: 4E 52 2E 20 53 55 43 48 45 4E 20 2A 00 4A 25 26 |NR. SUCHEN *.J%&|
00001D30: 08 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00001D40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 70 25 2A 08 85 |**********.p%*..|
00001D50: 22 93 11 11 11 11 11 20 20 57 45 4C 43 48 45 20 |"...... WELCHE |
00001D60: 41 44 52 45 53 53 45 4E 20 4E 52 2E 20 22 3B 49 |ADRESSEN NR. ";I|
00001D70: 00 8A 25 34 08 8B 49 B1 35 30 30 B0 49 B3 31 A7 |..%4..I.500.I.1.|
00001D80: 99 22 91 22 3A 89 32 30 39 30 00 AE 25 3E 08 99 |.".":.2090..%>..|
00001D90: 22 93 12 20 44 41 54 45 4E 20 20 20 4E 52 2E 92 |".. DATEN NR..|
00001DA0: 22 49 3A 47 24 B2 22 42 22 3A 8D 36 30 30 00 C9 |"I:G$."B":.600..|
00001DB0: 25 48 08 99 22 11 11 11 20 20 20 20 12 30 20 44 |%H.."... .0 D|
00001DC0: 52 55 45 43 4B 45 4E 92 22 00 DD 25 52 08 A1 41 |RUECKEN."..%R..A|
00001DD0: 24 3A 8B 41 24 B2 22 22 A7 32 31 33 30 00 E6 25 |$:.A$."".2130..%|
00001DE0: 5C 08 89 32 33 30 00 04 26 66 08 8F 20 2A 2A 2A |\..230..&f.. ***|
00001DF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001E00: 2A 2A 2A 2A 00 22 26 70 08 8F 20 2A 2A 20 41 55 |****."&p.. ** AU|
00001E10: 53 47 41 42 45 20 44 45 52 20 44 41 54 45 4E 20 |SGABE DER DATEN |
00001E20: 2A 2A 00 40 26 7A 08 8F 20 2A 2A 20 20 41 55 46 |**.@&z.. ** AUF|
00001E30: 20 44 45 4E 20 44 52 55 43 4B 45 52 20 20 2A 2A | DEN DRUCKER **|
00001E40: 00 5E 26 84 08 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |.^&... *********|
00001E50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 72 |**************.r|
00001E60: 26 98 08 99 22 93 22 3A 8D 32 35 30 30 3A 9F 33 |&...".":.2500:.3|
00001E70: 2C 34 00 85 26 A2 08 81 51 B2 31 A4 48 53 3A 81 |,4..&...Q.1.HS:.|
00001E80: 52 B2 31 A4 35 00 94 26 B6 08 98 33 2C 41 24 28 |R.1.5..&...3,A$(|
00001E90: 51 2C 52 29 00 A4 26 C0 08 82 52 3A 98 33 3A 82 |Q,R)..&...R:.3:.|
00001EA0: 51 3A A0 33 00 E2 26 D9 08 99 22 93 11 11 11 11 |Q:.3..&...".....|
00001EB0: 11 11 11 11 11 11 20 20 20 20 20 44 41 54 45 4E |...... DATEN|
00001EC0: 20 53 49 4E 44 20 41 55 53 47 45 44 52 55 43 4B | SIND AUSGEDRUCK|
00001ED0: 54 20 21 21 22 3A 81 49 B2 31 A4 32 30 30 30 3A |T !!":.I.1.2000:|
00001EE0: 82 49 00 EB 26 DE 08 89 32 33 30 00 0D 27 FC 08 |.I..&...230..'..|
00001EF0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00001F00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2F 27 |*************./'|
00001F10: 06 09 8F 20 2A 20 44 41 54 45 4E 20 20 20 20 45 |... * DATEN E|
00001F20: 49 4E 5A 45 4C 41 55 53 44 52 55 43 4B 20 2A 00 |INZELAUSDRUCK *.|
00001F30: 51 27 10 09 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |Q'... **********|
00001F40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001F50: 2A 00 5F 27 1A 09 99 22 93 22 3A 9F 33 2C 34 00 |*._'...".":.3,4.|
00001F60: 6E 27 24 09 98 33 2C 41 24 28 49 2C 31 29 00 7D |n'$..3,A$(I,1).}|
00001F70: 27 2E 09 98 33 2C 41 24 28 49 2C 32 29 00 8C 27 |'...3,A$(I,2)..'|
00001F80: 38 09 98 33 2C 41 24 28 49 2C 33 29 00 9B 27 42 |8..3,A$(I,3)..'B|
00001F90: 09 98 33 2C 41 24 28 49 2C 34 29 00 AA 27 56 09 |..3,A$(I,4)..'V.|
00001FA0: 98 33 3A A0 33 3A 89 32 33 30 00 CA 27 C4 09 8F |.3:.3:.230..'...|
00001FB0: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00001FC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 EA 27 CE 09 8F |**********..'...|
00001FD0: 20 2A 2A 20 55 42 45 52 50 52 55 45 46 55 4E 47 | ** UBERPRUEFUNG|
00001FE0: 20 4F 42 20 44 45 52 20 2A 2A 00 0A 28 D8 09 8F | OB DER **..(...|
00001FF0: 20 2A 2A 20 20 20 20 20 20 44 52 55 43 4B 45 52 | ** DRUCKER|
00002000: 20 20 20 20 20 20 20 20 2A 2A 00 2A 28 E2 09 8F | **.*(...|
00002010: 20 2A 2A 20 20 45 49 4E 47 45 53 43 48 41 4C 54 | ** EINGESCHALT|
00002020: 45 54 20 49 53 54 20 20 2A 2A 00 4A 28 E7 09 8F |ET IST **.J(...|
00002030: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00002040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 60 28 EC 09 99 |**********.`(...|
00002050: 22 93 22 3A 9F 33 2C 34 3A 97 37 36 38 2C 36 31 |".":.3,4:.768,61|
00002060: 00 6A 28 F1 09 98 33 3A A0 33 00 77 28 F6 09 97 |.j(...3:.3.w(...|
00002070: 37 36 38 2C 31 33 39 00 93 28 FB 09 8B 53 54 B3 |768,139..(...ST.|
00002080: B1 AB 31 32 38 AF 53 54 B3 B1 AB 31 32 35 A7 32 |..128.ST...125.2|
00002090: 35 39 30 00 C6 28 00 0A 99 22 11 11 11 11 11 11 |590..(..."......|
000020A0: 11 11 20 20 20 20 20 44 52 55 43 4B 45 52 20 4E |.. DRUCKER N|
000020B0: 49 43 48 54 20 45 49 4E 47 45 53 43 48 41 4C 54 |ICHT EINGESCHALT|
000020C0: 45 54 20 21 21 22 00 ED 28 05 0A 99 22 11 20 20 |ET !!"..(...". |
000020D0: 20 20 20 20 20 20 20 20 42 49 54 54 45 20 45 49 | BITTE EI|
000020E0: 4E 53 43 48 41 4C 54 45 4E 20 21 21 22 00 FD 28 |NSCHALTEN !!"..(|
000020F0: 0A 0A 81 49 B2 31 A4 32 30 30 3A 82 49 00 0C 29 |...I.1.200:.I..)|
00002100: 14 0A 99 43 4C 24 3A 89 32 35 30 30 00 12 29 1E |...CL$:.2500..).|
00002110: 0A 8E 00 00 00 45 |.....E |
....... **********************.;.... * A
DRESSENVERWALTUNG *.X.... * FUER DEN C-6
4 PLUS *.U.... * DATASETTE ODER *...
... * DISKETTENSTADION *...... *
PLUS *.L.... * COMMODORE PRINTE
R *...... **********************.......
..... ************************.-.... * A
UTOR UND EINLEITUNG *.L.... ************
************.B....53280,0:.53281,0......
"..... O..................P"....
.." .ADRESSENVERWALTUNG.".V...."
L..................."......"...
. HEINZ PRANGENBERG"."....".
534 BAD HONNEF 6".G....".
LOHRBERGSTRASSE 2".F....".
(C) 1985......".... EINWEISUNG
INS PROGRAMM (J/N) ?"......A$:.A$."".29
......A$."N".190.H....A$.."J".29...#..".
MENUEERKLAERUNG". .(..".EINTR
AGEN = EINGABE DER DATEN (GRAMMOPHONEGE.
.X.*..". NUMMER,KOMPONIST,DIR
IGENT,SAENGER)."...,..".BLAETTERN = KART
EI DURCHBLAETTERN......." (VO
RWAERTS ODER RUECKWAERTS)"...0..".LOESCH
EN = EINZELLOESCHUNG VON DATEN"...2..".
NACH EINGABE DER DATEN NR".<
.4..".AENDERN = AENDERN DER DATEN N
ACH".E.6.." EINGABE DER DATEN
NR."...8..".SUCHEN = DURCHSUCHEN DER
DATEN EIN-".G.:..". GABE WAH
LWEISE (GRAMMOPHONGE.,"...<.."
NUMMER,KOMPONIST,DIRIGENT,SAENGER)".'.
>.." . LEERTASRE DRUECKEN .".
9.@..A$:.A$."".64.I.B..A$.." ".64.Z.D.."
.DATEI LOESCHEN = LOESCHEN ALLER DATE
N"...F.."BESTIMMTE DATEN = EINGABE DAT
EN NR.".U.G..". = AUSGA
BE DER DATEN"...H..".DATEN ABSPEICHERN =
SPEICHERN DER DATEN".3.N.."
WAHLWEISE AUF CAS.".].P.."
ODER DISKETTE."...R..".PRO
GRAMM BEENDEN = LOESCHT DAS GESAMTE"...
T.." IM SPEICHER BEFI
ND-"...V.." LICHE PRO
GRAMM"...X..".DATEN AUSDRUCKEN = AUSDRU
CK EINER LISTE".D.Z..".
MIT ALLEN DATEN ".Q.\..".DATEN LADEN
= LADEN DER DATEN "...^.."
WAHLWEISE AUF CAS.".H.`.."
ODER DISKETTE"...B..".
. F1 = MENUEERKLAERUNG . "...D
..". . F3 = PROGRAMMSTART .".
2.F..A$:.A$."".102.D.H..A$.G(133).35.X.J
..A$..G(134).102.Q.... *****************
*...... * PROGRAMM START *...B.. * AUSW
AHLMENUE *...D.. ******************.F.H
..:T.1...R..53281,1:.53280,1......A$(500
,5):AD.500.(...Z.0:."..*****************
MENUE ****************".W....".. 1--EIN
TRAGEN 6--DATEI LOESCHEN"......".
2--BLAETTERN 7--BESTIMMTE ADRESSE"
......" 3--LOESCHEN 8--DATEN ABSP
EICHERN"......" 4--AENDERN E--PR
OGRAMM BEENDEN"..."..". 5--SUCHEN
D--DATEN AUSDRUCKEN".E.,..".
L--DATEN LADEN...".W.6.."****
************************************..".
..@.." BITTE WAEHLEN SIE "...J.
." .....................".S.T..D$
:.D$."".340...^.A.E(D$):.A.18.340...C..D
$."E"..".":....D..D$."L".1330...E..D$."D
".2200.H.H..A.370,550,710,810,910,2040,2
090,1550.D.J.. *********************...L
.. * ADRESSEN EINGEBEN *...N.. *********
************...R.T.0...|.T.T.1......T.50
0.1740......A$(T,1).A$(T,2).A$(T,3).A$(T
,4).A$(T,4)..""..380......".............
......... 0=MENUE".N...."....
........... ADRESSE NR.."T.R...."...
. GRAMMOPHONGE:. ";A$(T,1)...B..A$(T,1).
"0".A$(T,1)."":.230...L..".. NUMMER :.
";A$(T,2).Q.V..".. KOMPONIST:. ";A$(T,3
)......".. DIRIGENT :. ";A$(T,4)......".
. SAENGER :. ";A$(T,5).L...."... .
EINGABEN O.K. . .(J/N). J...";A$:.T.HS.
HS.T.X....H(A$,1).."J"..G.1.5:A$(T,G).""
:.G:.410......G$."B".G$."":.......380...
... ***********************.Q. .. * BLAE
TTERN IN KARTEI *...".. ****************
*******...&.I.1.'.0..".
. ADRESSE NR.."I".].:.."..........
........ . 0 . = MENUE":...
D.." .LEERTASTE . = VOR":....N.."
.CURSOR-DOWN. = ZURUECK".O.P..".
. F1 . = EINZELAUSDRUCK"...X.."..
... ";A$(I,1)...]..". "A$(I,2)...B..".
"A$(I,3)...L..". "A$(I,4)...V..". "A
$(I,5).B....G$."B".G$."":..U....A$:.A$."
".660.E....A$."0".230......A$.".".I.1.I.
I.1:.560......A$." ".I.AD.I.I.1:.560....
..A$.G(133).2300......660...... ********
*********************...... * DATEN E
INZELN LOESCHEN *.%.B.. ****************
*************.Q.F.A.0:.".AUF WELCHER SEI
TE STEHT DIE ZU .LOESCHENDE ADR
ESSE :..".X.K..A......A.500.A.1.710.....
.". . ADRESSE NR.."
A.M...I.A:G$."B":.600......".... LOESCHE
N (J/N) J...";A$......A$.."J"..230. ...
.Y.1.5:A$(A,Y)."":.Y:Y.0.U. ..". . ADRES
SE GELOESCHT .":.Y.1.1000:.Y:Y.0:.230.P.
".. ********************...$.. * DATEN
AENDERN *...&.. ********************..
.*..".AUF WELCHER SEITE STEHT DIE ZU
.AENDERNDE ADRESSE .."...H..Y:I.Y:
.Y.500.Y.1..810.G.R.G$."B":.".
. ADRESSE NR.."I:.600:I.0.
J.\..".... AENDERN (J/N) J...";A$.|.F..
A$.."J"..230...P..T.1.5:A$(Y,T)."":.:T.Y
:G$."B":.".":.420...Z.."...........
ADRESSE GEAENDERT !!":.T.1.1000:.T:
.230...|.. ***********************.(.~..
* SUCHEN VON DATEN *.F.... *********
**************......"... SIE KOENNEN EIN
BELIEBIGES SUCHWORT EINGEBEN..."...
..." ";S$:Z.C(S$):.T.1.HS.S.J.."........
.. DATEI WIRD DURCHSUCHT !!"...T.
.U.1.5:.Y.1.C(A$(T,U))......J(A$(T,U),Y,
Z).S$..1050......Y:.U......T.&....1110.Z
...G$."B":.". . ADRESSE NR.."T;:.".":I.
T:.600:I.0.{.$.."... .F1=WEITER / 0=MENU
E."......A$:.A$."".1070...8..A$."0".U.0:
T.0:Y.0:.230.A.B..A$..G(133).1070.R.L..T
..HS..1030...V..".......... DAT
EI DURCHSUCHT !!"...`..U.1.1300:.U:U.0:.
230.>.*.. ****************************.A
.,.. * DATEN LADEN VON DISKETTE *......
* ODER CASSETTE *...0.. *****
***********************.O.2.."... VON
TAPE=1. ODER DISK=2 ?"...F..L$:.L$."".1
350...P..L$."1".1390...Z..L$."2".1890...
D..3,A$(I,5).U.N.."... CASSETTE EINLEGEN
UND AN DIE RICHTIGE STELLE SPULEN".Z.
X.."... WENN O.K. '*' DRUECKEN"......
A$:.A$.."*".1410......"...........":.1,1
,0.I....Q.1.500:.R.1.5:.1,A$(Q,R)......A
$(Q,R)."@".A$(Q,R)."":.1510......A$(Q,R)
.".".A$(Q,R).""...H..R:.Q..... 1.B....".
........ DATEN GELADEN !!".]...H
S.Q:.Q.1.1000:.Q:.230.}.... ************
*************.....REN . DATEN .PEICHERN
AUF ....... * DISKETTE ODER CASSETTE*...
... *************************.. ..."....
AUF TAPE=1 ODER DISK=2".. "..SP$:.SP
$."".1570.+ ,..SP$."1".1600.= 6..SP$."2"
.1760. @.."... CASSETTE EINLEGEN UND A
N DIE RICHTIGE STELLE SPULEN".. J.."..
WENN O.K. '*' DRUECKEN !".. T..A$:.
A$.."*".1620.V ^.."...........":.1,1,1..
H..Q.1.HS:.R.1.5..!|..A$(Q,R)."".A$(Q,R
)."."..!...1,A$(Q,R)..!...R:.Q.)!...1,"@
".0!.. 1.O!..."......... DATEN ABGE
SPEICHERT !!":.Q.1.1000:.Q:.230..!L.."..
....... NUR 500 ADRESSEN":.T.1.2000:.T
:.230.T!..."..... DATEN AUF DISKETTE
ABSPEICHERN"..!...".. DISKETTE EINLEG
EN...".."..." FILENAME :";DN$.5"...".
..........":.1,8,1,DN$.",S,W".H"...Q.1.H
S:.R.1.5.D"...A$(Q,R)."".A$(Q,R).".".S"&
..1,A$(Q,R).}"0..R:.Q.."D..1,"@".."N. 1.
Q"X.."........... DATEN ABGESPEICH
ERT !!":.T.1.1000:.T:.230..#B..".. DATEN
VON DISKETTE. DISKETTE MIT DATEN. EINL
EGEN...".'#V.." FILENAME :";DN$.L#..."..
.........":.1,8,0,DN$.",S,R".`#...Q.1.50
0:.R.1.5.O#...1,A$(Q,R)..#...A$(Q,R)."@"
.A$(Q,R)."":.2010..#...A$(Q,R).".".A$(Q,
R).""..#...R:.Q..#Z. 1..#..."...........
DATEN GELADEN !!"..$..HS.Q:.T.1
.1000:.T:.230.'$... ********************
*******.I$... * LOESCHEN ALLER DATEN
*.K$... ***************************..$..
."...... SOLLEN DIE GANZEN ADRESSEN GELO
ESCHT .WERDEN (J/N) ".F$...A$:.A$."
".2050.V$...A$."J".200..$...A$."N".230..
$ ..2040..%".. ***********************.,
%$.. * DATEN NR. SUCHEN *.J%&.. *****
******************.P%*.."...... WELCHE
ADRESSEN NR. ";I..%4..I.500.I.1..".":.20
90..%>..".. DATEN NR.."I:G$."B":.600.I
%H.."... .0 DRUECKEN."..%R..A$:.A$.""
.2130..%\..230..&F.. *******************
****."&P.. ** AUSGABE DER DATEN **.@&Z..
** AUF DEN DRUCKER **.^&... *********
**************.R&...".":.2500:.3,4..&...
Q.1.HS:.R.1.5..&...3,A$(Q,R)..&...R:.3:.
Q: 3..&Y.."........... DATEN SIND AU
SGEDRUCKT !!":.I.1.2000:.I..&...230..'..
. ***************************./'... * DA
TEN EINZELAUSDRUCK *.Q'... **********
*****************._'...".":.3,4.N'$..3,A
$(I,1).}'...3,A$(I,2)..'8..3,A$(I,3)..'B
..3,A$(I,4)..'V..3: 3:.230.J'D.. *******
******************..'N.. ** UBERPRUEFUNG
OB DER **..(X.. ** DRUCKER
**.*(... ** EINGESCHALTET IST **.J(...
*************************.`(...".":.3,4
:.768,61.J(...3: 3.W(...768,139..(...ST.
..128.ST...125.2590.F(..."........ D
RUCKER NICHT EINGESCHALTET !!"..(...".
BITTE EINSCHALTEN !!"..(...I.1.2
00:.I..)...CL$:.2500..)......E
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL