PRG.-VERZEICHNIS
FILE INFORMATION
FILENAME(S): PRG.-VERZEICHNIS
FILE TYPE(S): PRG
FILE SIZE: 6.8K
FIRST SEEN: 2025-12-02 23:47:46
APPEARS ON: 2 disk(s)
FILE HASH
6280464e901d764660203ccd40706b1fa5b294df07891c08bdccdb0a2d58a10d
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| A C A IN 1986 | PRG.-VERZEICHNIS | PRG | swasti, flohmarkt | 30 | 5 | DOWNLOAD FILE |
| VERS | PRG.-VERZEICHNIS | PRG | swasti, flohmarkt | 5 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 0A 00 8F 20 2A 2A 20 44 49 52 45 43 |....... ** DIREC|
00000010: 54 4F 52 59 20 2A 2A 00 29 08 0B 00 99 C7 28 31 |TORY **.).....(1|
00000020: 34 32 29 3A 99 C7 28 38 29 00 65 08 0F 00 58 B2 |42):..(8).e...X.|
00000030: 35 30 31 3A 86 20 4E 24 28 58 29 2C 41 24 28 58 |501:. N$(X),A$(X|
00000040: 29 2C 42 24 28 58 29 2C 43 24 28 58 29 2C 45 24 |),B$(X),C$(X),E$|
00000050: 28 58 29 2C 46 24 28 58 29 2C 47 24 28 58 29 2C |(X),F$(X),G$(X),|
00000060: 48 24 28 58 29 00 81 08 10 00 86 20 53 24 28 58 |H$(X)...... S$(X|
00000070: 29 2C 5A 24 28 58 29 2C 50 24 28 58 29 3A 4E B2 |),Z$(X),P$(X):N.|
00000080: 30 00 99 08 14 00 97 20 35 33 32 38 30 2C 36 3A |0...... 53280,6:|
00000090: 97 20 35 33 32 38 31 2C 36 00 CC 08 1E 00 99 22 |. 53281,6......"|
000000A0: 9F 93 12 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 22 00 03 09 28 | "...(|
000000D0: 00 99 22 91 12 20 20 20 20 20 20 20 20 20 20 20 |..".. |
000000E0: 20 20 20 20 44 49 52 45 43 54 4F 52 59 20 20 20 | DIRECTORY |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000100: 20 20 22 00 35 09 32 00 99 22 91 12 20 20 20 20 | ".5.2..".. |
00000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000130: 20 20 20 20 22 00 3F 09 3C 00 99 3A 99 3A 99 00 | ".?.<..:.:..|
00000140: 53 09 46 00 99 22 12 46 31 92 20 45 49 4E 47 41 |S.F..".F1. EINGA|
00000150: 42 45 22 00 67 09 50 00 99 22 12 46 33 92 20 41 |BE".g.P..".F3. A|
00000160: 42 46 52 41 47 45 22 00 7E 09 5A 00 99 22 12 46 |BFRAGE".~.Z..".F|
00000170: 35 92 20 41 55 53 44 52 55 43 4B 45 4E 22 00 93 |5. AUSDRUCKEN"..|
00000180: 09 64 00 99 22 12 46 37 92 20 4C 4F 45 53 43 48 |.d..".F7. LOESCH|
00000190: 45 4E 22 00 A7 09 6E 00 99 3A 99 22 12 46 32 92 |EN"...n..:.".F2.|
000001A0: 20 4C 41 44 45 4E 22 00 BB 09 78 00 99 22 12 46 | LADEN"...x..".F|
000001B0: 34 92 20 53 49 43 48 45 52 4E 22 00 CF 09 82 00 |4. SICHERN".....|
000001C0: 99 22 12 46 36 92 20 41 45 4E 44 45 52 4E 22 00 |.".F6. AENDERN".|
000001D0: E4 09 87 00 99 3A 99 20 22 12 45 92 20 3D 20 45 |.....:. ".E. = E|
000001E0: 4E 44 45 22 00 FA 09 8C 00 A1 20 43 24 3A 8B 20 |NDE"...... C$:. |
000001F0: 43 24 B2 22 22 A7 20 31 34 30 00 11 0A 96 00 8B |C$."". 140......|
00000200: 20 43 24 B2 22 85 22 20 A7 20 8D 20 31 30 30 30 | C$."." . . 1000|
00000210: 30 00 28 0A A0 00 8B 20 43 24 B2 22 86 22 20 A7 |0.(.... C$."." .|
00000220: 20 8D 20 31 31 30 30 30 00 3F 0A AA 00 8B 20 43 | . 11000.?.... C|
00000230: 24 B2 22 87 22 20 A7 20 8D 20 31 32 30 30 30 00 |$."." . . 12000.|
00000240: 56 0A B4 00 8B 20 43 24 B2 22 88 22 20 A7 20 8D |V.... C$."." . .|
00000250: 20 31 33 30 30 30 00 6D 0A BE 00 8B 20 43 24 B2 | 13000.m.... C$.|
00000260: 22 89 22 20 A7 20 8D 20 31 34 30 30 30 00 84 0A |"." . . 14000...|
00000270: C8 00 8B 20 43 24 B2 22 8A 22 20 A7 20 8D 20 31 |... C$."." . . 1|
00000280: 35 30 30 30 00 9B 0A D2 00 8B 20 43 24 B2 22 8B |5000...... C$.".|
00000290: 22 20 A7 20 8D 20 31 36 30 30 30 00 B2 0A D7 00 |" . . 16000.....|
000002A0: 8B 20 43 24 B2 22 45 22 20 A7 20 9E 20 36 34 37 |. C$."E" . . 647|
000002B0: 33 38 00 BB 0A DC 00 89 20 33 30 00 CD 0A 10 27 |38...... 30....'|
000002C0: 8F 20 2A 2A 20 45 4E 54 45 52 20 2A 2A 00 DE 0A |. ** ENTER **...|
000002D0: 12 27 8B 20 4E B1 B2 58 AB 31 20 A7 20 8E 00 F2 |.'. N..X.1 . ...|
000002E0: 0A 14 27 99 22 93 12 46 31 92 20 57 45 49 54 45 |..'."..F1. WEITE|
000002F0: 52 22 00 09 0B 15 27 99 22 12 46 38 92 20 48 41 |R"....'.".F8. HA|
00000300: 55 50 54 4D 45 4E 55 45 22 00 23 0B 16 27 A1 20 |UPTMENUE".#..'. |
00000310: 43 24 3A 20 8B 20 43 24 B2 22 22 20 A7 20 31 30 |C$: . C$."" . 10|
00000320: 30 30 36 00 38 0B 17 27 8B 20 43 24 B2 22 85 22 |006.8..'. C$."."|
00000330: 20 A7 20 31 30 30 31 30 00 49 0B 18 27 8B 20 43 | . 10010.I..'. C|
00000340: 24 B2 22 8C 22 20 A7 20 8E 00 55 0B 19 27 89 20 |$."." . ..U..'. |
00000350: 31 30 30 30 30 00 5F 0B 1A 27 4E B2 4E AA 31 00 |10000._..'N.N.1.|
00000360: 7A 0B 24 27 99 22 93 12 20 44 41 54 45 4E 20 45 |z.$'.".. DATEN E|
00000370: 49 4E 47 45 42 45 4E 20 92 22 00 A4 0B 2E 27 99 |INGEBEN ."....'.|
00000380: 3A 99 22 44 49 52 45 43 54 4F 52 59 2D 45 49 4E |:."DIRECTORY-EIN|
00000390: 54 52 41 47 20 20 23 22 3B 4E 3B 22 56 4F 4E 22 |TRAG #";N;"VON"|
000003A0: 3B 58 AB 31 00 D4 0B 33 27 99 22 AF AF AF AF AF |;X.1...3'.".....|
000003B0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
000003C0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
000003D0: AF AF AF 22 00 EE 0B 38 27 85 20 22 54 49 54 45 |..."...8'. "TITE|
000003E0: 4C 3A 20 20 20 20 20 22 3B 4E 24 28 4E 29 00 0A |L: ";N$(N)..|
000003F0: 0C 42 27 99 3A 85 20 22 44 49 53 4B 2D 4E 52 2E |.B'.:. "DISK-NR.|
00000400: 3A 20 20 22 3B 41 24 28 4E 29 00 26 0C 47 27 99 |: ";A$(N).&.G'.|
00000410: 3A 85 20 22 41 52 54 3A 20 20 20 20 20 20 20 22 |:. "ART: "|
00000420: 3B 42 24 28 4E 29 00 42 0C 4C 27 99 3A 85 20 22 |;B$(N).B.L'.:. "|
00000430: 42 45 4D 45 52 4B 55 4E 47 3A 20 22 3B 43 24 28 |BEMERKUNG: ";C$(|
00000440: 4E 29 00 64 0C 74 27 99 3A 99 22 12 57 45 49 54 |N).d.t'.:.".WEIT|
00000450: 45 52 45 20 45 49 4E 54 52 41 47 55 4E 47 20 28 |ERE EINTRAGUNG (|
00000460: 4A 2F 4E 29 00 7D 0C 7E 27 A1 20 43 24 3A 8B 20 |J/N).}.~'. C$:. |
00000470: 43 24 B2 22 22 20 A7 20 31 30 31 31 30 00 8E 0C |C$."" . 10110...|
00000480: 83 27 8B 20 4E B1 B2 58 AB 31 20 A7 20 8E 00 A5 |.'. N..X.1 . ...|
00000490: 0C 88 27 8B 20 43 24 B2 22 4A 22 20 A7 20 89 20 |..'. C$."J" . . |
000004A0: 31 30 30 31 30 00 B6 0C 92 27 8B 20 43 24 B2 22 |10010....'. C$."|
000004B0: 4E 22 20 A7 20 8E 00 C2 0C 9C 27 89 20 31 30 31 |N" . .....'. 101|
000004C0: 31 30 00 D3 0C F8 2A 8F 20 2A 2A 20 52 45 41 44 |10....*. ** READ|
000004D0: 20 2A 2A 00 E1 0C FD 2A 8B 20 4E B2 30 20 A7 20 | **....*. N.0 . |
000004E0: 8E 00 FD 0C 02 2B 99 22 93 12 20 4C 45 53 45 4E |.....+.".. LESEN|
000004F0: 20 56 4F 4E 20 44 41 54 45 4E 20 92 22 00 07 0D | VON DATEN ."...|
00000500: 0C 2B 99 3A 99 3A 99 00 32 0D 16 2B 99 20 22 20 |.+.:.:..2..+. " |
00000510: 20 20 20 20 20 20 20 20 20 20 20 12 46 31 92 20 | .F1. |
00000520: 47 45 53 41 4D 54 45 20 44 49 52 45 43 54 4F 52 |GESAMTE DIRECTOR|
00000530: 59 22 00 38 0D 1B 2B 99 00 53 0D 20 2B 99 22 53 |Y".8..+..S. +."S|
00000540: 55 43 48 45 4E 20 56 4F 4E 3A 20 12 54 92 49 54 |UCHEN VON: .T.IT|
00000550: 45 4C 22 00 71 0D 21 2B 99 22 20 20 20 20 20 20 |EL".q.!+." |
00000560: 20 20 20 20 20 20 12 44 92 49 53 4B 2D 4E 52 2E | .D.ISK-NR.|
00000570: 22 00 8A 0D 22 2B 99 22 20 20 20 20 20 20 20 20 |"..."+." |
00000580: 20 20 20 20 12 41 92 52 54 22 00 A9 0D 23 2B 99 | .A.RT"...#+.|
00000590: 22 20 20 20 20 20 20 20 20 20 20 20 20 12 42 92 |" .B.|
000005A0: 45 4D 45 52 4B 55 4E 47 22 00 C2 0D 2A 2B A1 20 |EMERKUNG"...*+. |
000005B0: 43 24 3A 8B 20 43 24 B2 22 22 20 A7 20 31 31 30 |C$:. C$."" . 110|
000005C0: 35 30 00 D7 0D 34 2B 8B 20 43 24 B2 22 85 22 20 |50...4+. C$."." |
000005D0: A7 20 31 31 30 39 30 00 EB 0D 3E 2B 8B 20 43 24 |. 11090...>+. C$|
000005E0: B2 22 54 22 A7 20 31 31 32 32 30 00 FF 0D 3F 2B |."T". 11220...?+|
000005F0: 8B 20 43 24 B2 22 44 22 A7 20 31 37 30 30 30 00 |. C$."D". 17000.|
00000600: 13 0E 40 2B 8B 20 43 24 B2 22 41 22 A7 20 31 38 |..@+. C$."A". 18|
00000610: 30 30 30 00 27 0E 41 2B 8B 20 43 24 B2 22 42 22 |000.'.A+. C$."B"|
00000620: A7 20 31 39 30 30 30 00 33 0E 48 2B 89 20 31 31 |. 19000.3.H+. 11|
00000630: 30 30 30 00 41 0E 52 2B 81 20 49 B2 31 20 A4 20 |000.A.R+. I.1 . |
00000640: 4E 00 68 0E 5C 2B 99 22 93 44 49 52 45 43 54 4F |N.h.\+.".DIRECTO|
00000650: 52 59 2D 45 49 4E 54 52 41 47 20 20 23 22 3B 49 |RY-EINTRAG #";I|
00000660: 3B 22 56 4F 4E 22 3B 4E 00 76 0E 5D 2B 99 3A 99 |;"VON";N.v.]+.:.|
00000670: 3A 99 3A 99 3A 99 00 A6 0E 61 2B 99 22 AF AF AF |:.:.:....a+."...|
00000680: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00000690: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
000006A0: AF AF AF AF AF 22 00 C0 0E 66 2B 99 20 22 54 49 |....."...f+. "TI|
000006B0: 54 45 4C 3A 20 20 20 20 20 22 3B 4E 24 28 49 29 |TEL: ";N$(I)|
000006C0: 00 F0 0E 6B 2B 99 22 AF AF AF AF AF AF AF AF AF |...k+.".........|
000006D0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
000006E0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF 22 |..............."|
000006F0: 00 0A 0F 70 2B 99 20 22 44 49 53 4B 2D 4E 52 2E |...p+. "DISK-NR.|
00000700: 3A 20 20 22 3B 41 24 28 49 29 00 26 0F 75 2B 99 |: ";A$(I).&.u+.|
00000710: 3A 99 20 22 41 52 54 3A 20 20 20 20 20 20 20 22 |:. "ART: "|
00000720: 3B 42 24 28 49 29 00 42 0F 7A 2B 99 3A 99 20 22 |;B$(I).B.z+.:. "|
00000730: 42 45 4D 45 52 4B 55 4E 47 3A 20 22 3B 43 24 28 |BEMERKUNG: ";C$(|
00000740: 49 29 00 5B 0F AC 2B A1 20 43 24 3A 8B 20 43 24 |I).[..+. C$:. C$|
00000750: B2 22 22 20 A7 20 31 31 31 38 30 00 63 0F C0 2B |."" . 11180.c..+|
00000760: 82 20 49 00 69 0F CA 2B 8E 00 99 0F D4 2B 99 22 |. I.i..+.....+."|
00000770: 93 12 20 57 45 4C 43 48 45 52 20 54 49 54 45 4C |.. WELCHER TITEL|
00000780: 20 53 4F 4C 4C 20 47 45 53 55 43 48 54 20 57 45 | SOLL GESUCHT WE|
00000790: 52 44 45 4E 20 92 22 3A 99 00 A2 0F D9 2B 85 20 |RDEN .":.....+. |
000007A0: 54 24 00 B0 0F DE 2B 81 20 49 B2 31 20 A4 20 4E |T$....+. I.1 . N|
000007B0: 00 D1 0F E8 2B 8B 20 C8 28 4E 24 28 49 29 2C C3 |....+. .(N$(I),.|
000007C0: 28 54 24 29 29 B3 B1 54 24 20 A7 20 31 31 33 35 |(T$))..T$ . 1135|
000007D0: 32 00 F8 0F 1A 2C 99 22 93 44 49 52 45 43 54 4F |2....,.".DIRECTO|
000007E0: 52 59 2D 45 49 4E 54 52 41 47 20 20 23 22 3B 49 |RY-EINTRAG #";I|
000007F0: 3B 22 56 4F 4E 22 3B 4E 00 06 10 1B 2C 99 3A 99 |;"VON";N....,.:.|
00000800: 3A 99 3A 99 3A 99 00 36 10 1F 2C 99 22 AF AF AF |:.:.:..6..,."...|
00000810: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00000820: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00000830: AF AF AF AF AF 22 00 50 10 24 2C 99 20 22 54 49 |.....".P.$,. "TI|
00000840: 54 45 4C 3A 20 20 20 20 20 22 3B 4E 24 28 49 29 |TEL: ";N$(I)|
00000850: 00 80 10 29 2C 99 22 AF AF AF AF AF AF AF AF AF |...),.".........|
00000860: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00000870: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF 22 |..............."|
00000880: 00 9A 10 2E 2C 99 20 22 44 49 53 4B 2D 4E 52 2E |....,. "DISK-NR.|
00000890: 3A 20 20 22 3B 41 24 28 49 29 00 B6 10 33 2C 99 |: ";A$(I)...3,.|
000008A0: 3A 99 20 22 41 52 54 3A 20 20 20 20 20 20 20 22 |:. "ART: "|
000008B0: 3B 42 24 28 49 29 00 D2 10 38 2C 99 3A 99 20 22 |;B$(I)...8,.:. "|
000008C0: 42 45 4D 45 52 4B 55 4E 47 3A 20 22 3B 43 24 28 |BEMERKUNG: ";C$(|
000008D0: 49 29 00 DE 10 57 2C 8D 20 31 31 33 37 30 00 E6 |I)...W,. 11370..|
000008E0: 10 58 2C 82 20 49 00 EC 10 59 2C 8E 00 06 11 6A |.X,. I...Y,....j|
000008F0: 2C A1 20 43 24 3A 20 8B 20 43 24 B2 22 22 20 A7 |,. C$: . C$."" .|
00000900: 20 31 31 33 37 30 00 0C 11 74 2C 8E 00 1E 11 E0 | 11370...t,.....|
00000910: 2E 8F 20 2A 2A 20 50 52 49 4E 54 20 2A 2A 00 32 |.. ** PRINT **.2|
00000920: 11 E4 2E 99 22 93 12 46 31 92 20 57 45 49 54 45 |...."..F1. WEITE|
00000930: 52 22 00 49 11 E5 2E 99 22 12 46 38 92 20 48 41 |R".I....".F8. HA|
00000940: 55 50 54 4D 45 4E 55 45 22 00 62 11 E6 2E A1 20 |UPTMENUE".b.... |
00000950: 43 24 3A 8B 20 43 24 B2 22 22 20 A7 20 31 32 30 |C$:. C$."" . 120|
00000960: 30 36 00 76 11 E7 2E 8B 20 43 24 B2 22 85 22 A7 |06.v.... C$.".".|
00000970: 20 31 32 30 31 30 00 86 11 E8 2E 8B 20 43 24 B2 | 12010...... C$.|
00000980: 22 8C 22 A7 20 8E 00 92 11 E9 2E 89 20 31 32 30 |".". ....... 120|
00000990: 30 30 00 A5 11 EA 2E 99 22 93 12 20 41 55 53 44 |00......".. AUSD|
000009A0: 52 55 43 4B 22 00 AF 11 F4 2E 9F 20 31 2C 34 00 |RUCK"...... 1,4.|
000009B0: BD 11 FE 2E 81 20 49 B2 31 20 A4 20 4E 00 CA 11 |..... I.1 . N...|
000009C0: 08 2F 98 31 2C 4E 24 28 49 29 00 D7 11 12 2F 98 |./.1,N$(I)..../.|
000009D0: 31 2C 41 24 28 49 29 00 E4 11 17 2F 98 31 2C 42 |1,A$(I)..../.1,B|
000009E0: 24 28 49 29 00 F1 11 1C 2F 98 31 2C 43 24 28 49 |$(I)..../.1,C$(I|
000009F0: 29 00 FE 11 44 2F 98 31 2C C7 28 31 33 29 00 06 |)...D/.1,.(13)..|
00000A00: 12 4E 2F 82 20 49 00 0E 12 58 2F A0 20 31 00 14 |.N/. I...X/. 1..|
00000A10: 12 62 2F 8E 00 26 12 C8 32 8F 20 2A 2A 20 45 52 |.b/..&..2. ** ER|
00000A20: 41 53 45 20 2A 2A 00 34 12 CA 32 8B 20 4E B2 30 |ASE **.4..2. N.0|
00000A30: 20 A7 20 8E 00 48 12 CC 32 99 22 93 12 46 31 92 | . ..H..2."..F1.|
00000A40: 20 57 45 49 54 45 52 22 00 5F 12 CD 32 99 22 12 | WEITER"._..2.".|
00000A50: 46 38 92 20 48 41 55 50 54 4D 45 4E 55 45 22 00 |F8. HAUPTMENUE".|
00000A60: 79 12 CE 32 A1 20 43 24 3A 20 8B 20 43 24 B2 22 |y..2. C$: . C$."|
00000A70: 22 20 A7 20 31 33 30 30 36 00 8D 12 CF 32 8B 20 |" . 13006....2. |
00000A80: 43 24 B2 22 85 22 A7 20 31 33 30 31 30 00 9D 12 |C$.".". 13010...|
00000A90: D0 32 8B 20 43 24 B2 22 8C 22 A7 20 8E 00 A9 12 |.2. C$.".". ....|
00000AA0: D1 32 89 20 31 33 30 30 30 00 C7 12 D2 32 99 22 |.2. 13000....2."|
00000AB0: 93 12 20 4C 4F 45 53 43 48 45 4E 20 56 4F 4E 20 |.. LOESCHEN VON |
00000AC0: 44 41 54 45 4E 20 22 00 E4 12 E6 32 99 3A 99 22 |DATEN "....2.:."|
00000AD0: 12 46 31 92 20 44 55 52 43 48 42 4C 41 45 54 54 |.F1. DURCHBLAETT|
00000AE0: 45 52 4E 22 00 07 13 F0 32 99 22 12 46 33 92 20 |ERN"....2.".F3. |
00000AF0: 45 49 4E 45 4E 20 42 45 53 54 49 4D 4D 54 45 4E |EINEN BESTIMMTEN|
00000B00: 20 54 49 54 45 4C 22 00 20 13 FA 32 A1 20 43 24 | TITEL". ..2. C$|
00000B10: 3A 8B 20 43 24 B2 22 22 20 A7 20 31 33 30 35 30 |:. C$."" . 13050|
00000B20: 00 34 13 04 33 8B 20 43 24 B2 22 85 22 A7 20 31 |.4..3. C$.".". 1|
00000B30: 33 30 39 30 00 48 13 0E 33 8B 20 43 24 B2 22 86 |3090.H..3. C$.".|
00000B40: 22 A7 20 31 33 32 33 30 00 54 13 18 33 89 20 31 |". 13230.T..3. 1|
00000B50: 33 30 30 30 00 62 13 22 33 81 20 49 B2 31 20 A4 |3000.b."3. I.1 .|
00000B60: 20 4E 00 8C 13 2C 33 99 22 93 44 49 52 45 43 54 | N...,3.".DIRECT|
00000B70: 4F 52 59 20 45 49 4E 54 52 41 47 55 4E 47 20 20 |ORY EINTRAGUNG |
00000B80: 23 22 3B 49 3B 22 56 4F 4E 22 3B 4E 00 94 13 2F |#";I;"VON";N.../|
00000B90: 33 99 3A 99 00 C4 13 31 33 99 22 AF AF AF AF AF |3.:....13.".....|
00000BA0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00000BB0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00000BC0: AF AF AF 22 00 DE 13 36 33 99 20 22 54 49 54 45 |..."...63. "TITE|
00000BD0: 4C 3A 20 20 20 20 20 22 3B 4E 24 28 49 29 00 0E |L: ";N$(I)..|
00000BE0: 14 3B 33 99 22 AF AF AF AF AF AF AF AF AF AF AF |.;3."...........|
00000BF0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00000C00: AF AF AF AF AF AF AF AF AF AF AF AF AF 22 00 28 |.............".(|
00000C10: 14 40 33 99 20 22 44 49 53 4B 2D 4E 52 2E 3A 20 |.@3. "DISK-NR.: |
00000C20: 20 22 3B 41 24 28 49 29 00 44 14 45 33 99 3A 99 | ";A$(I).D.E3.:.|
00000C30: 20 22 41 52 54 3A 20 20 20 20 20 20 20 22 3B 42 | "ART: ";B|
00000C40: 24 28 49 29 00 60 14 4A 33 99 3A 99 20 22 42 45 |$(I).`.J3.:. "BE|
00000C50: 4D 45 52 4B 55 4E 47 3A 20 22 3B 43 24 28 49 29 |MERKUNG: ";C$(I)|
00000C60: 00 68 14 68 33 99 3A 99 00 7D 14 72 33 99 3A 99 |.h.h3.:..}.r3.:.|
00000C70: 22 12 46 31 92 20 57 45 49 54 45 52 22 00 94 14 |".F1. WEITER"...|
00000C80: 7C 33 99 3A 99 22 12 46 38 92 20 4C 4F 45 53 43 ||3.:.".F8. LOESC|
00000C90: 48 45 4E 22 00 AC 14 86 33 A1 20 43 24 3A 8B 20 |HEN"....3. C$:. |
00000CA0: 43 24 B2 22 22 A7 20 31 33 31 39 30 00 C2 14 90 |C$."". 13190....|
00000CB0: 33 8B 20 43 24 B2 22 85 22 A7 20 89 20 31 33 32 |3. C$.".". . 132|
00000CC0: 32 35 00 E0 14 9A 33 8B 20 43 24 B2 22 8C 22 A7 |25....3. C$.".".|
00000CD0: 20 8D 20 31 33 38 30 30 3A 89 20 31 33 32 32 34 | . 13800:. 13224|
00000CE0: 00 EC 14 A4 33 89 20 31 33 31 39 30 00 FC 14 A8 |....3. 13190....|
00000CF0: 33 4E B2 4E AB 31 3A 49 B2 49 AB 31 00 04 15 A9 |3N.N.1:I.I.1....|
00000D00: 33 82 20 49 00 0A 15 AA 33 8E 00 3A 15 AE 33 99 |3. I....3..:..3.|
00000D10: 22 93 12 20 57 45 4C 43 48 45 52 20 54 49 54 45 |".. WELCHER TITE|
00000D20: 4C 20 53 4F 4C 4C 20 47 45 4C 4F 45 53 43 48 54 |L SOLL GELOESCHT|
00000D30: 20 57 45 52 44 45 4E 20 92 22 00 45 15 B3 33 99 | WERDEN .".E..3.|
00000D40: 3A 85 20 54 24 00 53 15 B8 33 81 20 49 B2 31 20 |:. T$.S..3. I.1 |
00000D50: A4 20 4E 00 78 15 C2 33 8B 20 4E 24 28 49 29 B2 |. N.x..3. N$(I).|
00000D60: 54 24 20 A7 20 8D 20 31 33 38 30 30 3A 4E B2 4E |T$ . . 13800:N.N|
00000D70: AB 31 3A 49 B2 49 AB 31 00 80 15 CC 33 82 20 49 |.1:I.I.1....3. I|
00000D80: 00 AF 15 D6 33 99 3A 99 22 12 20 54 49 54 45 4C |....3.:.". TITEL|
00000D90: 20 4E 49 43 48 54 20 49 4E 20 44 45 52 20 44 41 | NICHT IN DER DA|
00000DA0: 54 45 49 20 56 4F 52 48 41 4E 44 45 4E 20 22 00 |TEI VORHANDEN ".|
00000DB0: C7 15 EA 33 A1 20 43 24 3A 8B 20 43 24 B2 22 22 |...3. C$:. C$.""|
00000DC0: A7 20 31 33 32 39 30 00 CD 15 EF 33 8E 00 ED 15 |. 13290....3....|
00000DD0: E8 35 99 3A 99 20 4E 24 28 49 29 22 20 57 55 52 |.5.:. N$(I)" WUR|
00000DE0: 44 45 20 47 45 4C 4F 45 53 43 48 54 22 00 0B 16 |DE GELOESCHT"...|
00000DF0: EA 35 81 20 48 45 4C 4D 55 54 B2 31 20 A4 20 35 |.5. HELMUT.1 . 5|
00000E00: 30 30 3A 82 20 48 45 4C 4D 55 54 00 19 16 ED 35 |00:. HELMUT....5|
00000E10: 81 20 4B B2 49 20 A4 20 4E 00 2B 16 F2 35 4E 24 |. K.I . N.+..5N$|
00000E20: 28 4B 29 B2 4E 24 28 4B AA 31 29 00 3D 16 FC 35 |(K).N$(K.1).=..5|
00000E30: 41 24 28 4B 29 B2 41 24 28 4B AA 31 29 00 4F 16 |A$(K).A$(K.1).O.|
00000E40: 01 36 42 24 28 4B 29 B2 42 24 28 4B AA 31 29 00 |.6B$(K).B$(K.1).|
00000E50: 61 16 06 36 43 24 28 4B 29 B2 43 24 28 4B AA 31 |a..6C$(K).C$(K.1|
00000E60: 29 00 69 16 2E 36 82 20 4B 00 6F 16 38 36 8E 00 |).i..6. K.o.86..|
00000E70: 80 16 B0 36 8F 20 2A 2A 20 4C 4F 41 44 20 2A 2A |...6. ** LOAD **|
00000E80: 00 94 16 B4 36 99 22 93 12 46 31 92 20 57 45 49 |....6."..F1. WEI|
00000E90: 54 45 52 22 00 AB 16 B5 36 99 22 12 46 38 92 20 |TER"....6.".F8. |
00000EA0: 48 41 55 50 54 4D 45 4E 55 45 22 00 C4 16 B6 36 |HAUPTMENUE"....6|
00000EB0: A1 20 43 24 3A 8B 20 43 24 B2 22 22 20 A7 20 31 |. C$:. C$."" . 1|
00000EC0: 34 30 30 36 00 D9 16 B7 36 8B 20 43 24 B2 22 85 |4006....6. C$.".|
00000ED0: 22 20 A7 20 31 34 30 31 30 00 EA 16 B8 36 8B 20 |" . 14010....6. |
00000EE0: 43 24 B2 22 8C 22 20 A7 20 8E 00 F6 16 B9 36 89 |C$."." . .....6.|
00000EF0: 20 31 34 30 30 30 00 11 17 BA 36 99 22 93 12 20 | 14000....6.".. |
00000F00: 4C 41 44 45 4E 20 44 45 52 20 44 41 54 45 4E 20 |LADEN DER DATEN |
00000F10: 22 00 32 17 C4 36 99 3A 99 22 12 46 31 92 20 4C |".2..6.:.".F1. L|
00000F20: 41 44 45 4E 20 56 4F 4E 20 44 49 53 4B 45 54 54 |ADEN VON DISKETT|
00000F30: 45 22 00 52 17 CE 36 99 22 12 46 34 92 20 4C 41 |E".R..6.".F4. LA|
00000F40: 44 45 4E 20 56 4F 4E 20 44 41 54 41 53 45 54 54 |DEN VON DATASETT|
00000F50: 45 22 00 6B 17 D8 36 A1 20 43 24 3A 8B 20 43 24 |E".k..6. C$:. C$|
00000F60: B2 22 22 20 A7 20 31 34 30 34 30 00 80 17 E2 36 |."" . 14040....6|
00000F70: 8B 20 43 24 B2 22 85 22 20 A7 20 31 34 31 30 30 |. C$."." . 14100|
00000F80: 00 95 17 EC 36 8B 20 43 24 B2 22 8A 22 20 A7 20 |....6. C$."." . |
00000F90: 31 34 32 35 30 00 A1 17 F6 36 89 20 31 34 30 34 |14250....6. 1404|
00000FA0: 30 00 BD 17 14 37 9F 20 31 2C 38 2C 33 2C 22 30 |0....7. 1,8,3,"0|
00000FB0: 3A 44 41 54 2D 44 49 52 2C 53 45 51 22 00 C6 17 |:DAT-DIR,SEQ"...|
00000FC0: 3C 37 84 31 2C 4E 00 D4 17 46 37 81 20 49 B2 31 |<7.1,N...F7. I.1|
00000FD0: 20 A4 20 4E 00 E1 17 50 37 84 31 2C 4E 24 28 49 | . N...P7.1,N$(I|
00000FE0: 29 00 EE 17 5A 37 84 31 2C 41 24 28 49 29 00 FB |)...Z7.1,A$(I)..|
00000FF0: 17 5F 37 84 31 2C 42 24 28 49 29 00 08 18 64 37 |._7.1,B$(I)...d7|
00001000: 84 31 2C 43 24 28 49 29 00 10 18 8C 37 82 20 49 |.1,C$(I)....7. I|
00001010: 00 18 18 96 37 A0 20 31 00 1E 18 A0 37 8E 00 34 |....7. 1....7..4|
00001020: 18 AA 37 9F 20 31 2C 31 2C 31 2C 22 44 41 54 2D |..7. 1,1,1,"DAT-|
00001030: 44 49 52 22 00 40 18 B4 37 89 20 31 34 31 34 30 |DIR".@..7. 14140|
00001040: 00 51 18 98 3A 8F 20 2A 2A 20 53 41 56 45 20 2A |.Q..:. ** SAVE *|
00001050: 2A 00 5F 18 9A 3A 8B 20 4E B2 30 20 A7 20 8E 00 |*._..:. N.0 . ..|
00001060: 73 18 9C 3A 99 22 93 12 46 31 92 20 57 45 49 54 |s..:."..F1. WEIT|
00001070: 45 52 22 00 8A 18 9D 3A 99 22 12 46 38 92 20 48 |ER"....:.".F8. H|
00001080: 41 55 50 54 4D 45 4E 55 45 22 00 A3 18 9E 3A A1 |AUPTMENUE"....:.|
00001090: 20 43 24 3A 8B 20 43 24 B2 22 22 20 A7 20 31 35 | C$:. C$."" . 15|
000010A0: 30 30 36 00 B8 18 9F 3A 8B 20 43 24 B2 22 85 22 |006....:. C$."."|
000010B0: 20 A7 20 31 35 30 31 30 00 C9 18 A0 3A 8B 20 43 | . 15010....:. C|
000010C0: 24 B2 22 8C 22 20 A7 20 8E 00 D5 18 A1 3A 89 20 |$."." . .....:. |
000010D0: 31 35 30 30 30 00 F4 18 A2 3A 99 22 93 12 20 53 |15000....:.".. S|
000010E0: 50 45 49 43 48 45 52 4E 20 44 45 52 20 44 41 54 |PEICHERN DER DAT|
000010F0: 45 4E 20 22 00 19 19 AC 3A 99 3A 99 22 12 46 31 |EN "....:.:.".F1|
00001100: 92 20 53 50 45 49 43 48 45 52 4E 20 41 55 46 20 |. SPEICHERN AUF |
00001110: 44 49 53 4B 45 54 54 45 22 00 3D 19 B6 3A 99 22 |DISKETTE".=..:."|
00001120: 12 46 34 92 20 53 50 45 49 43 48 45 52 4E 20 41 |.F4. SPEICHERN A|
00001130: 55 46 20 44 41 54 41 53 45 54 54 45 22 00 56 19 |UF DATASETTE".V.|
00001140: C0 3A A1 20 43 24 3A 8B 20 43 24 B2 22 22 20 A7 |.:. C$:. C$."" .|
00001150: 20 31 35 30 34 30 00 6B 19 CA 3A 8B 20 43 24 B2 | 15040.k..:. C$.|
00001160: 22 85 22 20 A7 20 31 35 31 30 30 00 80 19 D4 3A |"." . 15100....:|
00001170: 8B 20 43 24 B2 22 8A 22 20 A7 20 31 35 32 35 30 |. C$."." . 15250|
00001180: 00 8C 19 DE 3A 89 20 31 35 30 34 30 00 99 19 FC |....:. 15040....|
00001190: 3A 9F 20 31 2C 38 2C 31 35 00 AD 19 06 3B 98 31 |:. 1,8,15....;.1|
000011A0: 2C 22 53 30 3A 44 41 54 2D 44 49 52 22 00 B5 19 |,"S0:DAT-DIR"...|
000011B0: 10 3B A0 20 31 00 D7 19 1A 3B 9F 20 31 2C 38 2C |.;. 1....;. 1,8,|
000011C0: 33 2C 22 30 3A 44 41 54 2D 44 49 52 2C 53 45 51 |3,"0:DAT-DIR,SEQ|
000011D0: 2C 57 52 49 54 45 22 00 E0 19 24 3B 98 31 2C 4E |,WRITE"...$;.1,N|
000011E0: 00 EE 19 2E 3B 81 20 49 B2 31 20 A4 20 4E 00 FB |....;. I.1 . N..|
000011F0: 19 38 3B 98 31 2C 4E 24 28 49 29 00 08 1A 42 3B |.8;.1,N$(I)...B;|
00001200: 98 31 2C 41 24 28 49 29 00 15 1A 47 3B 98 31 2C |.1,A$(I)...G;.1,|
00001210: 42 24 28 49 29 00 22 1A 4C 3B 98 31 2C 43 24 28 |B$(I).".L;.1,C$(|
00001220: 49 29 00 2A 1A 74 3B 82 20 49 00 32 1A 7E 3B A0 |I).*.t;. I.2.~;.|
00001230: 20 31 00 38 1A 88 3B 8E 00 4E 1A 92 3B 9F 20 31 | 1.8..;..N..;. 1|
00001240: 2C 31 2C 31 2C 22 44 41 54 2D 44 49 52 22 00 5A |,1,1,"DAT-DIR".Z|
00001250: 1A 9C 3B 89 20 31 35 31 34 30 00 6D 1A 80 3E 8F |..;. 15140.m..>.|
00001260: 20 2A 2A 20 43 48 41 4E 47 45 20 2A 2A 00 7B 1A | ** CHANGE **.{.|
00001270: 82 3E 8B 20 4E B2 30 20 A7 20 8E 00 8F 1A 84 3E |.>. N.0 . .....>|
00001280: 99 22 93 12 46 31 92 20 57 45 49 54 45 52 22 00 |."..F1. WEITER".|
00001290: A6 1A 85 3E 99 22 12 46 38 92 20 48 41 55 50 54 |...>.".F8. HAUPT|
000012A0: 4D 45 4E 55 45 22 00 BF 1A 86 3E A1 20 43 24 3A |MENUE"....>. C$:|
000012B0: 8B 20 43 24 B2 22 22 20 A7 20 31 36 30 30 36 00 |. C$."" . 16006.|
000012C0: D4 1A 87 3E 8B 20 43 24 B2 22 85 22 20 A7 20 31 |...>. C$."." . 1|
000012D0: 36 30 31 30 00 E5 1A 88 3E 8B 20 43 24 B2 22 8C |6010....>. C$.".|
000012E0: 22 20 A7 20 8E 00 F1 1A 89 3E 89 20 31 36 30 30 |" . .....>. 1600|
000012F0: 30 00 0E 1B 8A 3E 99 22 93 12 20 41 45 4E 44 45 |0....>.".. AENDE|
00001300: 52 4E 20 44 45 52 20 44 41 54 45 4E 20 22 00 2B |RN DER DATEN ".+|
00001310: 1B 94 3E 99 3A 99 22 12 46 31 92 20 44 55 52 43 |..>.:.".F1. DURC|
00001320: 48 42 4C 41 45 54 54 45 52 4E 22 00 4E 1B 9E 3E |HBLAETTERN".N..>|
00001330: 99 22 12 46 33 92 20 45 49 4E 45 4E 20 42 45 53 |.".F3. EINEN BES|
00001340: 54 49 4D 4D 54 45 4E 20 54 49 54 45 4C 22 00 67 |TIMMTEN TITEL".g|
00001350: 1B A8 3E A1 20 43 24 3A 8B 20 43 24 B2 22 22 20 |..>. C$:. C$."" |
00001360: A7 20 31 36 30 34 30 00 7C 1B B2 3E 8B 20 43 24 |. 16040.|..>. C$|
00001370: B2 22 85 22 20 A7 20 31 36 31 30 30 00 91 1B BC |."." . 16100....|
00001380: 3E 8B 20 43 24 B2 22 86 22 20 A7 20 31 36 33 30 |>. C$."." . 1630|
00001390: 30 00 9D 1B C6 3E 89 20 31 36 30 34 30 00 AB 1B |0....>. 16040...|
000013A0: E4 3E 81 20 49 B2 31 20 A4 20 4E 00 BA 1B EE 3E |.>. I.1 . N....>|
000013B0: 99 22 93 22 3B 4E 24 28 49 29 00 C6 1B F8 3E 99 |.".";N$(I)....>.|
000013C0: 20 41 24 28 49 29 00 D2 1B FD 3E 99 20 42 24 28 | A$(I)....>. B$(|
000013D0: 49 29 00 DE 1B 02 3F 99 20 43 24 28 49 29 00 F3 |I)....?. C$(I)..|
000013E0: 1B 2A 3F 99 3A 99 22 12 46 31 92 20 57 45 49 54 |.*?.:.".F1. WEIT|
000013F0: 45 52 22 00 07 1C 34 3F 99 22 12 46 33 92 20 41 |ER"...4?.".F3. A|
00001400: 45 4E 44 45 52 4E 22 00 20 1C 3E 3F A1 20 43 24 |ENDERN". .>?. C$|
00001410: 3A 8B 20 43 24 B2 22 22 20 A7 20 31 36 31 39 30 |:. C$."" . 16190|
00001420: 00 37 1C 48 3F 8B 20 43 24 B2 22 85 22 20 A7 20 |.7.H?. C$."." . |
00001430: 89 20 31 36 32 33 30 00 56 1C 52 3F 8B 20 43 24 |. 16230.V.R?. C$|
00001440: B2 22 86 22 20 A7 20 8D 20 31 36 38 30 30 3A 89 |."." . . 16800:.|
00001450: 20 31 36 32 33 30 00 62 1C 5C 3F 89 20 31 36 31 | 16230.b.\?. 161|
00001460: 39 30 00 6A 1C 66 3F 82 20 49 00 70 1C 70 3F 8E |90.j.f?. I.p.p?.|
00001470: 00 8B 1C AC 3F 99 22 93 12 20 54 49 54 45 4C 20 |....?.".. TITEL |
00001480: 45 49 4E 47 45 42 45 4E 20 92 22 00 96 1C B6 3F |EINGEBEN ."....?|
00001490: 99 3A 85 20 4D 24 00 A4 1C C0 3F 81 20 49 B2 31 |.:. M$....?. I.1|
000014A0: 20 A4 20 4E 00 BF 1C CA 3F 8B 20 4E 24 28 49 29 | . N....?. N$(I)|
000014B0: B2 4D 24 20 A7 20 8D 20 31 36 35 30 30 3A 8E 00 |.M$ . . 16500:..|
000014C0: C7 1C D4 3F 82 20 49 00 F6 1C DE 3F 99 3A 99 22 |...?. I....?.:."|
000014D0: 12 20 54 49 54 45 4C 20 4E 49 43 48 54 20 49 4E |. TITEL NICHT IN|
000014E0: 20 44 45 52 20 44 41 54 45 49 20 56 4F 52 48 41 | DER DATEI VORHA|
000014F0: 4E 44 45 4E 20 22 00 0E 1D F2 3F A1 20 43 24 3A |NDEN "....?. C$:|
00001500: 8B 20 43 24 B2 22 22 A7 20 31 36 33 37 30 00 14 |. C$."". 16370..|
00001510: 1D FC 3F 8E 00 23 1D 74 40 99 22 93 22 3B 4E 24 |..?..#.t@.".";N$|
00001520: 28 49 29 00 2F 1D 7E 40 99 20 41 24 28 49 29 00 |(I)./.~@. A$(I).|
00001530: 3B 1D 83 40 99 20 42 24 28 49 29 00 47 1D 88 40 |;..@. B$(I).G..@|
00001540: 99 20 43 24 28 49 29 00 5A 1D A0 41 99 3A 99 22 |. C$(I).Z..A.:."|
00001550: 20 31 2D 2D 54 49 54 45 4C 22 00 6E 1D AA 41 99 | 1--TITEL".n..A.|
00001560: 22 20 32 2D 2D 44 49 53 4B 2D 4E 52 2E 22 00 7D |" 2--DISK-NR.".}|
00001570: 1D B4 41 99 22 20 33 2D 2D 41 52 54 22 00 92 1D |..A." 3--ART"...|
00001580: BE 41 99 22 20 34 2D 2D 42 45 4D 45 52 4B 55 4E |.A." 4--BEMERKUN|
00001590: 47 22 00 BE 1D DC 41 99 3A 99 3A 85 20 22 12 20 |G"....A.:.:. ". |
000015A0: 57 41 53 20 53 4F 4C 4C 20 47 45 41 45 4E 44 45 |WAS SOLL GEAENDE|
000015B0: 52 54 20 57 45 52 44 45 4E 20 92 22 3B 43 00 DE |RT WERDEN .";C..|
000015C0: 1D E6 41 91 20 43 8D 31 36 39 31 30 2C 31 36 39 |..A. C.16910,169|
000015D0: 32 30 2C 31 36 39 32 35 2C 31 36 39 33 30 00 E4 |20,16925,16930..|
000015E0: 1D F0 41 8E 00 0B 1E 0E 42 99 3A 85 22 41 45 4E |..A.....B.:."AEN|
000015F0: 44 45 52 55 4E 47 22 3B 44 24 3A 4E 24 28 49 29 |DERUNG";D$:N$(I)|
00001600: B2 44 24 3A 49 B2 49 AB 31 3A 8E 00 32 1E 18 42 |.D$:I.I.1:..2..B|
00001610: 99 3A 85 22 41 45 4E 44 45 52 55 4E 47 22 3B 44 |.:."AENDERUNG";D|
00001620: 24 3A 41 24 28 49 29 B2 44 24 3A 49 B2 49 AB 31 |$:A$(I).D$:I.I.1|
00001630: 3A 8E 00 59 1E 1D 42 99 3A 85 22 41 45 4E 44 45 |:..Y..B.:."AENDE|
00001640: 52 55 4E 47 22 3B 44 24 3A 42 24 28 49 29 B2 44 |RUNG";D$:B$(I).D|
00001650: 24 3A 49 B2 49 AB 31 3A 8E 00 80 1E 22 42 99 3A |$:I.I.1:...."B.:|
00001660: 85 22 41 45 4E 44 45 52 55 4E 47 22 3B 44 24 3A |."AENDERUNG";D$:|
00001670: 43 24 28 49 29 B2 44 24 3A 49 B2 49 AB 31 3A 8E |C$(I).D$:I.I.1:.|
00001680: 00 B2 1E 68 42 99 22 93 12 20 57 45 4C 43 48 45 |...hB.".. WELCHE|
00001690: 20 44 49 53 4B 2D 4E 52 2E 20 53 4F 4C 4C 20 47 | DISK-NR. SOLL G|
000016A0: 45 53 55 43 48 54 20 57 45 52 44 45 4E 20 92 22 |ESUCHT WERDEN ."|
000016B0: 3A 99 00 BB 1E 49 43 85 20 54 24 00 C9 1E 4E 43 |:....IC. T$...NC|
000016C0: 81 20 49 B2 31 20 A4 20 4E 00 E1 1E 58 43 8B 20 |. I.1 . N...XC. |
000016D0: 41 24 28 49 29 B3 B1 54 24 20 A7 20 31 37 33 35 |A$(I)..T$ . 1735|
000016E0: 32 00 08 1F 8A 43 99 22 93 44 49 52 45 43 54 4F |2....C.".DIRECTO|
000016F0: 52 59 2D 45 49 4E 54 52 41 47 20 20 23 22 3B 49 |RY-EINTRAG #";I|
00001700: 3B 22 56 4F 4E 22 3B 4E 00 16 1F 8B 43 99 3A 99 |;"VON";N....C.:.|
00001710: 3A 99 3A 99 3A 99 00 46 1F 8F 43 99 22 AF AF AF |:.:.:..F..C."...|
00001720: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00001730: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00001740: AF AF AF AF AF 22 00 60 1F 94 43 99 20 22 54 49 |.....".`..C. "TI|
00001750: 54 45 4C 3A 20 20 20 20 20 22 3B 4E 24 28 49 29 |TEL: ";N$(I)|
00001760: 00 90 1F 99 43 99 22 AF AF AF AF AF AF AF AF AF |....C.".........|
00001770: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00001780: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF 22 |..............."|
00001790: 00 AA 1F 9E 43 99 20 22 44 49 53 4B 2D 4E 52 2E |....C. "DISK-NR.|
000017A0: 3A 20 20 22 3B 41 24 28 49 29 00 C6 1F A3 43 99 |: ";A$(I)....C.|
000017B0: 3A 99 20 22 41 52 54 3A 20 20 20 20 20 20 20 22 |:. "ART: "|
000017C0: 3B 42 24 28 49 29 00 E2 1F A8 43 99 3A 99 20 22 |;B$(I)....C.:. "|
000017D0: 42 45 4D 45 52 4B 55 4E 47 3A 20 22 3B 43 24 28 |BEMERKUNG: ";C$(|
000017E0: 49 29 00 EE 1F C7 43 8D 20 31 37 33 37 30 00 F6 |I)....C. 17370..|
000017F0: 1F C8 43 82 20 49 00 FC 1F C9 43 8E 00 16 20 DA |..C. I....C... .|
00001800: 43 A1 20 43 24 3A 20 8B 20 43 24 B2 22 22 20 A7 |C. C$: . C$."" .|
00001810: 20 31 37 33 37 30 00 1C 20 E4 43 8E 00 49 20 50 | 17370.. .C..I P|
00001820: 46 99 22 93 12 20 57 45 4C 43 48 45 20 41 52 54 |F.".. WELCHE ART|
00001830: 20 53 4F 4C 4C 20 47 45 53 55 43 48 54 20 57 45 | SOLL GESUCHT WE|
00001840: 52 44 45 4E 20 92 22 3A 99 00 52 20 31 47 85 20 |RDEN .":..R 1G. |
00001850: 54 24 00 60 20 36 47 81 20 49 B2 31 20 A4 20 4E |T$.` 6G. I.1 . N|
00001860: 00 81 20 40 47 8B 20 C8 28 42 24 28 49 29 2C C3 |.. @G. .(B$(I),.|
00001870: 28 54 24 29 29 B3 B1 54 24 20 A7 20 31 38 33 35 |(T$))..T$ . 1835|
00001880: 32 00 A8 20 72 47 99 22 93 44 49 52 45 43 54 4F |2.. rG.".DIRECTO|
00001890: 52 59 2D 45 49 4E 54 52 41 47 20 20 23 22 3B 49 |RY-EINTRAG #";I|
000018A0: 3B 22 56 4F 4E 22 3B 4E 00 B6 20 73 47 99 3A 99 |;"VON";N.. sG.:.|
000018B0: 3A 99 3A 99 3A 99 00 E6 20 77 47 99 22 AF AF AF |:.:.:... wG."...|
000018C0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
000018D0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
000018E0: AF AF AF AF AF 22 00 00 21 7C 47 99 20 22 54 49 |....."..!|G. "TI|
000018F0: 54 45 4C 3A 20 20 20 20 20 22 3B 4E 24 28 49 29 |TEL: ";N$(I)|
00001900: 00 30 21 81 47 99 22 AF AF AF AF AF AF AF AF AF |.0!.G.".........|
00001910: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00001920: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF 22 |..............."|
00001930: 00 4A 21 86 47 99 20 22 44 49 53 4B 2D 4E 52 2E |.J!.G. "DISK-NR.|
00001940: 3A 20 20 22 3B 41 24 28 49 29 00 66 21 8B 47 99 |: ";A$(I).f!.G.|
00001950: 3A 99 20 22 41 52 54 3A 20 20 20 20 20 20 20 22 |:. "ART: "|
00001960: 3B 42 24 28 49 29 00 82 21 90 47 99 3A 99 20 22 |;B$(I)..!.G.:. "|
00001970: 42 45 4D 45 52 4B 55 4E 47 3A 20 22 3B 43 24 28 |BEMERKUNG: ";C$(|
00001980: 49 29 00 8E 21 AF 47 8D 20 31 38 33 37 30 00 96 |I)..!.G. 18370..|
00001990: 21 B0 47 82 20 49 00 9C 21 B1 47 8E 00 B6 21 C2 |!.G. I..!.G...!.|
000019A0: 47 A1 20 43 24 3A 20 8B 20 43 24 B2 22 22 20 A7 |G. C$: . C$."" .|
000019B0: 20 31 38 33 37 30 00 BC 21 CC 47 8E 00 EF 21 38 | 18370..!.G...!8|
000019C0: 4A 99 22 93 12 20 57 45 4C 43 48 45 20 42 45 4D |J.".. WELCHE BEM|
000019D0: 45 52 4B 55 4E 47 20 53 4F 4C 4C 20 47 45 53 55 |ERKUNG SOLL GESU|
000019E0: 43 48 54 20 57 45 52 44 45 4E 20 92 22 3A 99 00 |CHT WERDEN .":..|
000019F0: F8 21 19 4B 85 20 54 24 00 06 22 1E 4B 81 20 49 |.!.K. T$..".K. I|
00001A00: B2 31 20 A4 20 4E 00 27 22 28 4B 8B 20 C8 28 43 |.1 . N.'"(K. .(C|
00001A10: 24 28 49 29 2C C3 28 54 24 29 29 B3 B1 54 24 20 |$(I),.(T$))..T$ |
00001A20: A7 20 31 39 33 35 32 00 4E 22 5A 4B 99 22 93 44 |. 19352.N"ZK.".D|
00001A30: 49 52 45 43 54 4F 52 59 2D 45 49 4E 54 52 41 47 |IRECTORY-EINTRAG|
00001A40: 20 20 23 22 3B 49 3B 22 56 4F 4E 22 3B 4E 00 5C | #";I;"VON";N.\|
00001A50: 22 5B 4B 99 3A 99 3A 99 3A 99 3A 99 00 8C 22 5F |"[K.:.:.:.:..."_|
00001A60: 4B 99 22 AF AF AF AF AF AF AF AF AF AF AF AF AF |K.".............|
00001A70: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00001A80: AF AF AF AF AF AF AF AF AF AF AF 22 00 A6 22 64 |...........".."d|
00001A90: 4B 99 20 22 54 49 54 45 4C 3A 20 20 20 20 20 22 |K. "TITEL: "|
00001AA0: 3B 4E 24 28 49 29 00 D6 22 69 4B 99 22 AF AF AF |;N$(I).."iK."...|
00001AB0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00001AC0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00001AD0: AF AF AF AF AF 22 00 F0 22 6E 4B 99 20 22 44 49 |.....".."nK. "DI|
00001AE0: 53 4B 2D 4E 52 2E 3A 20 20 22 3B 41 24 28 49 29 |SK-NR.: ";A$(I)|
00001AF0: 00 0C 23 73 4B 99 3A 99 20 22 41 52 54 3A 20 20 |..#sK.:. "ART: |
00001B00: 20 20 20 20 20 22 3B 42 24 28 49 29 00 28 23 78 | ";B$(I).(#x|
00001B10: 4B 99 3A 99 20 22 42 45 4D 45 52 4B 55 4E 47 3A |K.:. "BEMERKUNG:|
00001B20: 20 22 3B 43 24 28 49 29 00 34 23 97 4B 8D 20 31 | ";C$(I).4#.K. 1|
00001B30: 39 33 37 30 00 3C 23 98 4B 82 20 49 00 42 23 99 |9370.<#.K. I.B#.|
00001B40: 4B 8E 00 5C 23 AA 4B A1 20 43 24 3A 20 8B 20 43 |K..\#.K. C$: . C|
00001B50: 24 B2 22 22 20 A7 20 31 39 33 37 30 00 62 23 B4 |$."" . 19370.b#.|
00001B60: 4B 8E 00 00 00 |K.... |
....... ** DIRECTORY **.)....G(142):.G(8
).E...X.501:. N$(X),A$(X),B$(X),C$(X),E$
(X),F$(X),G$(X),H$(X)...... S$(X),Z$(X),
P$(X):N.0...... 53280,6:. 53281,6.L...."
...
"...(..".. DIRECTORY
".5.2.."..
".?.<..:.:..
S.F..".F1. EINGABE".G.P..".F3. ABFRAGE".
~.Z..".F5. AUSDRUCKEN"...D..".F7. LOESCH
EN"...N..:.".F2. LADEN"...X..".F4. SICHE
RN".O....".F6. AENDERN"......:. ".E. = E
NDE"...... C$:. C$."". 140...... C$."."
. . 10000.(. .. C$."." . . 11000.?.... C
$."." . . 12000.V.... C$."." . . 13000.M
.... C$."." . . 14000...H.. C$."." . . 1
5000...R.. C$."." . . 16000...W.. C$."E"
. . 64738...... 30.M..'. ** ENTER **...
.'. N..X.1 . .....'."..F1. WEITER"....'.
".F8. HAUPTMENUE".#..'. C$: . C$."" . 10
006.8..'. C$."." . 10010.I..'. C$."." .
..U..'. 10000._..'N.N.1.Z.$'.".. DATEN E
INGEBEN ."....'.:."DIRECTORY-EINTRAG #"
;N;"VON";X.1.T.3'.".....................
..................."...8'. "TITEL: "
;N$(N)...B'.:. "DISK-NR.: ";A$(N).&.G'.
:. "ART: ";B$(N).B.L'.:. "BEMERKUN
G: ";C$(N).D.T'.:.".WEITERE EINTRAGUNG (
J/N).}.~'. C$:. C$."" . 10110....'. N..X
.1 . .....'. C$."J" . . 10010....'. C$."
N" . ..B..'. 10110.S..*. ** READ **....*
. N.0 . .....+.".. LESEN VON DATEN ."...
.+.:.:..2..+. " .F1. GESAMTE
DIRECTORY".8..+..S. +."SUCHEN VON: .T.IT
EL".Q.!+." .D.ISK-NR."..."+."
.A.RT"...#+." .B.
EMERKUNG".B.*+. C$:. C$."" . 11050.W.4+.
C$."." . 11090...>+. C$."T". 11220...?+
. C$."D". 17000...@+. C$."A". 18000.'.A+
. C$."B". 19000.3.H+. 11000.A.R+. I.1 .
N.H.\+.".DIRECTORY-EINTRAG #";I;"VON";N
.V.]+.:.:.:.:....A+."...................
....................."...F+. "TITEL:
";N$(I)...K+.".........................
..............."...P+. "DISK-NR.: ";A$(
I).&.U+.:. "ART: ";B$(I).B.Z+.:. "
BEMERKUNG: ";C$(I).[..+. C$:. C$."" . 11
180.C..+. I.I.J+....T+.".. WELCHER TITEL
SOLL GESUCHT WERDEN .":....Y+. T$....+.
I.1 . N.Q..+. H(N$(I),C(T$))..T$ . 1135
2....,.".DIRECTORY-EINTRAG #";I;"VON";N
....,.:.:.:.:..6..,."...................
.....................".P.$,. "TITEL:
";N$(I)...),.".........................
..............."....,. "DISK-NR.: ";A$(
I)...3,.:. "ART: ";B$(I).R.8,.:. "
BEMERKUNG: ";C$(I)...W,. 11370...X,. I..
.Y,....J,. C$: . C$."" . 11370...T,.....
.. ** PRINT **.2...."..F1. WEITER".I....
".F8. HAUPTMENUE".B.... C$:. C$."" . 120
06.V.... C$.".". 12010...... C$.".". ...
.... 12000......".. AUSDRUCK"...... 1,4.
..... I.1 . N.J../.1,N$(I).W../.1,A$(I).
.../.1,B$(I)..../.1,C$(I)...D/.1,G(13)..
.N/. I...X/ 1...B/..&.H2. ** ERASE **.4
.J2. N.0 . ..H.L2."..F1. WEITER"._.M2.".
F8. HAUPTMENUE".Y.N2. C$: . C$."" . 1300
6...O2. C$.".". 13010...P2. C$.".". ....
Q2. 13000.G.R2.".. LOESCHEN VON DATEN ".
...2.:.".F1. DURCHBLAETTERN"....2.".F3.
EINEN BESTIMMTEN TITEL". ..2. C$:. C$.""
. 13050.4..3. C$.".". 13090.H..3. C$.".
". 13230.T..3. 13000.B."3. I.1 . N...,3.
".DIRECTORY EINTRAGUNG #";I;"VON";N.../
3.:..D.13.".............................
..........."...63. "TITEL: ";N$(I)..
.;3."...................................
.....".(.@3. "DISK-NR.: ";A$(I).D.E3.:.
"ART: ";B$(I).`.J3.:. "BEMERKUNG:
";C$(I).H.H3.:..}.R3.:.".F1. WEITER"...
|3.:.".F8. LOESCHEN"....3. C$:. C$."". 1
3190.B..3. C$.".". . 13225....3. C$.".".
. 13800:. 13224....3. 13190....3N.N.1:I
.I.1....3. I....3..:..3.".. WELCHER TITE
L SOLL GELOESCHT WERDEN .".E..3.:. T$.S.
.3. I.1 . N.X.B3. N$(I).T$ . . 13800:N.N
.1:I.I.1...L3. I...V3.:.". TITEL NICHT I
N DER DATEI VORHANDEN ".G..3. C$:. C$.""
. 13290.M..3.....5.:. N$(I)" WURDE GELOE
SCHT"....5. HELMUT.1 . 500:. HELMUT....5
. K.I . N.+..5N$(K).N$(K.1).=..5A$(K).A$
(K.1).O..6B$(K).B$(K.1).A..6C$(K).C$(K.1
).I..6. K.O.86.....6. ** LOAD **....6.".
.F1. WEITER"....6.".F8. HAUPTMENUE".D..6
. C$:. C$."" . 14006.Y..6. C$."." . 1401
0....6. C$."." . .....6. 14000....6."..
LADEN DER DATEN ".2.D6.:.".F1. LADEN VON
DISKETTE".R.N6.".F4. LADEN VON DATASETT
E".K.X6. C$:. C$."" . 14040....6. C$."."
. 14100....6. C$."." . 14250....6. 1404
0....7. 1,8,3,"0:DAT-DIR,SEQ".F.<7.1,N.T
.F7. I.1 . N...P7.1,N$(I)...Z7.1,A$(I)..
._7.1,B$(I)...D7.1,C$(I)....7. I....7 1
... 7..4..7. 1,1,1,"DAT-DIR".@..7. 14140
.Q..:. ** SAVE **._..:. N.0 . ..S..:."..
F1. WEITER"....:.".F8. HAUPTMENUE"....:.
C$:. C$."" . 15006....:. C$."." . 15010
.I. :. C$."." . ..U..:. 15000....:.".. S
PEICHERN DER DATEN "....:.:.".F1. SPEICH
ERN AUF DISKETTE".=..:.".F4. SPEICHERN A
UF DATASETTE".V..:. C$:. C$."" . 15040.K
.J:. C$."." . 15100...T:. C$."." . 15250
....:. 15040....:. 1,8,15....;.1,"S0:DAT
-DIR"....; 1.W..;. 1,8,3,"0:DAT-DIR,SEQ
,WRITE"...$;.1,N....;. I.1 . N...8;.1,N$
(I)...B;.1,A$(I)...G;.1,B$(I).".L;.1,C$(
I).*.T;. I.2.~; 1.8..;..N..;. 1,1,1,"DA
T-DIR".Z..;. 15140.M..>. ** CHANGE **.{.
.>. N.0 . .....>."..F1. WEITER"....>.".F
8. HAUPTMENUE"....>. C$:. C$."" . 16006.
T..>. C$."." . 16010....>. C$."." . ....
.>. 16000....>.".. AENDERN DER DATEN ".+
..>.:.".F1. DURCHBLAETTERN".N..>.".F3. E
INEN BESTIMMTEN TITEL".G..>. C$:. C$.""
. 16040.|..>. C$."." . 16100....>. C$.".
" . 16300...F>. 16040....>. I.1 . N....>
.".";N$(I).F..>. A$(I).R..>. B$(I)....?.
C$(I)...*?.:.".F1. WEITER"...4?.".F3. A
ENDERN". .>?. C$:. C$."" . 16190.7.H?. C
$."." . . 16230.V.R?. C$."." . . 16800:.
16230.B.\?. 16190.J.F?. I.P.P?.....?.".
. TITEL EINGEBEN ."....?.:. M$....?. I.1
. N...J?. N$(I).M$ . . 16500:..G.T?. I.
...?.:.". TITEL NICHT IN DER DATEI VORHA
NDEN "....?. C$:. C$."". 16370....?..#.T
@.".";N$(I)./.~@. A$(I).;..@. B$(I).G..@
. C$(I).Z. A.:." 1--TITEL".N..A." 2--DIS
K-NR.".}..A." 3--ART"....A." 4--BEMERKUN
G"....A.:.:. ". WAS SOLL GEAENDERT WERDE
N .";C....A. C.16910,16920,16925,16930..
..A.....B.:."AENDERUNG";D$:N$(I).D$:I.I.
1:..2..B.:."AENDERUNG";D$:A$(I).D$:I.I.1
:..Y..B.:."AENDERUNG";D$:B$(I).D$:I.I.1:
...."B.:."AENDERUNG";D$:C$(I).D$:I.I.1:.
...HB.".. WELCHE DISK-NR. SOLL GESUCHT W
ERDEN .":....IC. T$.I.NC. I.1 . N...XC.
A$(I)..T$ . 17352....C.".DIRECTORY-EINTR
AG #";I;"VON";N....C.:.:.:.:..F..C."...
.....................................".`
..C. "TITEL: ";N$(I)....C.".........
..............................."....C. "
DISK-NR.: ";A$(I).F..C.:. "ART: "
;B$(I)....C.:. "BEMERKUNG: ";C$(I)...GC.
17370...HC. I...IC... ZC. C$: . C$."" .
17370.. .C..I PF.".. WELCHE ART SOLL GE
SUCHT WERDEN .":..R 1G. T$.` 6G. I.1 . N
.. @G. H(B$(I),C(T$))..T$ . 18352.. RG."
.DIRECTORY-EINTRAG #";I;"VON";N.. SG.:.
:.:.:... WG."...........................
............."..!|G. "TITEL: ";N$(I)
.0!.G.".................................
.......".J!.G. "DISK-NR.: ";A$(I).F!.G.
:. "ART: ";B$(I)..!.G.:. "BEMERKUN
G: ";C$(I)..!.G. 18370..!.G. I..!.G...!B
G. C$: . C$."" . 18370..!LG...!8J.".. WE
LCHE BEMERKUNG SOLL GESUCHT WERDEN .":..
.!.K. T$..".K. I.1 . N.'"(K. H(C$(I),C(T
$))..T$ . 19352.N"ZK.".DIRECTORY-EINTRAG
#";I;"VON";N.\"[K.:.:.:.:..."_K.".....
...................................".."D
K. "TITEL: ";N$(I).V"IK."...........
.............................".."NK. "DI
SK-NR.: ";A$(I)..#SK.:. "ART: ";B
$(I).(#XK.:. "BEMERKUNG: ";C$(I).4#.K. 1
9370.<#.K. I.B#.K..\#.K. C$: . C$."" . 1
9370.B#.K....
> CLICK IMAGE PREVIEW FOR FULL MODAL