Multiple names: DISCSORTER-2, DISKVERWALTUNG
FILE INFORMATION
FILENAME(S):
• DISCSORTER-2<br>• DISKVERWALTUNG
FILE TYPE(S): PRG
FILE SIZE: 13.3K
FIRST SEEN: 2025-11-02 16:57:20
APPEARS ON: 2 disk(s)
FILE HASH
618b1e24d7653f7dae33b2d7719c4fbc30f8cab911a9f54d7146f610cd55189a
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ANWENDER | DISCSORTER-2 | PRG | Treasure Chest - Romfreak | 8 | 7 | DOWNLOAD FILE |
| ANWENDER 59 1 | DISKVERWALTUNG | PRG | HOL2001, Misc | 11 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 10 0F 10 01 00 F9 31 2C C7 28 31 33 33 29 00 |.......1,.(133).|
00000010: 1D 10 02 00 F9 32 2C C7 28 31 33 37 29 00 2B 10 |.....2,.(137).+.|
00000020: 03 00 F9 33 2C C7 28 31 33 34 29 00 39 10 04 00 |...3,.(134).9...|
00000030: F9 34 2C C7 28 31 33 38 29 00 47 10 05 00 F9 35 |.4,.(138).G....5|
00000040: 2C C7 28 31 33 35 29 00 55 10 06 00 F9 36 2C C7 |,.(135).U....6,.|
00000050: 28 31 33 39 29 00 63 10 07 00 F9 37 2C C7 28 31 |(139).c....7,.(1|
00000060: 33 36 29 00 71 10 08 00 F9 38 2C C7 28 31 34 30 |36).q....8,.(140|
00000070: 29 00 88 10 0A 00 E7 30 2C 33 2C 32 3A E7 34 2C |)......0,3,2:.4,|
00000080: 31 3A E7 31 2C 38 2C 37 00 8E 10 0B 00 E8 00 9E |1:.1,8,7........|
00000090: 10 64 00 99 22 11 11 11 11 11 11 11 11 22 00 B3 |.d.."........"..|
000000A0: 10 6E 00 8F 20 44 49 53 4B 53 4F 52 54 45 52 20 |.n.. DISKSORTER |
000000B0: 43 36 34 00 E2 10 F0 00 99 22 D1 D1 20 20 D1 D1 |C64......".. ..|
000000C0: D1 20 D1 D1 D1 20 D1 20 D1 20 D1 D1 D1 20 D1 D1 |. ... . . ... ..|
000000D0: D1 20 D1 D1 D1 20 D1 D1 D1 20 D1 D1 D1 20 D1 D1 |. ... ... ... ..|
000000E0: D1 22 00 11 11 FA 00 99 22 D1 20 D1 20 20 D1 20 |."......". . . |
000000F0: 20 D1 20 20 20 D1 20 D1 20 D1 20 20 20 D1 20 D1 | . . . . . .|
00000100: 20 D1 20 D1 20 20 D1 20 20 D1 20 20 20 D1 20 D1 | . . . . . .|
00000110: 22 00 40 11 04 01 99 22 D1 20 D1 20 20 D1 20 20 |".@....". . . |
00000120: D1 D1 D1 20 D1 D1 20 20 D1 D1 D1 20 D1 20 D1 20 |... .. ... . . |
00000130: D1 D1 20 20 20 D1 20 20 D1 D1 20 20 D1 D1 20 22 |.. . .. .. "|
00000140: 00 6F 11 0E 01 99 22 D1 20 D1 20 20 D1 20 20 20 |.o....". . . |
00000150: 20 D1 20 D1 20 D1 20 20 20 D1 20 D1 20 D1 20 D1 | . . . . . . .|
00000160: 20 D1 20 20 D1 20 20 D1 20 20 20 D1 20 D1 22 00 | . . . . .".|
00000170: 9E 11 18 01 99 22 D1 D1 20 20 D1 D1 D1 20 D1 D1 |.....".. ... ..|
00000180: D1 20 D1 20 D1 20 D1 D1 D1 20 D1 D1 D1 20 D1 20 |. . . ... ... . |
00000190: D1 20 20 D1 20 20 D1 D1 D1 20 D1 20 D1 22 00 C9 |. . ... . ."..|
000001A0: 11 22 01 99 22 11 11 11 11 1D 1D 42 49 54 54 45 |.".."......BITTE|
000001B0: 20 54 41 53 54 45 20 44 52 55 45 43 4B 45 4E 21 | TASTE DRUECKEN!|
000001C0: 22 3A 8D 20 31 31 30 30 30 00 EC 11 2C 01 8F 20 |":. 11000...,.. |
000001D0: 2A 2A 2A 20 56 41 52 49 41 42 4C 45 4E 2D 44 45 |*** VARIABLEN-DE|
000001E0: 46 49 4E 49 54 49 4F 4E 20 2A 2A 2A 00 F2 11 36 |FINITION ***...6|
000001F0: 01 8F 00 02 12 40 01 53 24 B2 22 11 1D 1D 1D 1D |.....@.S$.".....|
00000200: 1D 22 00 34 12 54 01 42 46 24 B2 22 42 4C 4F 43 |.".4.T.BF$."BLOC|
00000210: 4B 53 20 46 52 45 45 22 3A 45 5A 24 B2 22 20 45 |KS FREE":EZ$." E|
00000220: 4C 45 4D 45 4E 54 22 3A 45 58 24 B2 22 20 4E 49 |LEMENT":EX$." NI|
00000230: 43 48 54 22 00 80 12 5E 01 56 24 B2 22 93 11 11 |CHT"...^.V$."...|
00000240: 1D 1D 12 20 22 3A 4D 24 B2 22 11 11 1D 1D 1D 22 |... ":M$."....."|
00000250: 3A 58 24 B2 22 11 11 1D 1D 12 20 22 3A 4E 24 B2 |:X$."..... ":N$.|
00000260: 22 11 1D 12 20 22 3A 5A 4D 24 B2 22 12 20 5F 20 |"... ":ZM$.". _ |
00000270: 92 20 12 20 20 5A 55 4D 20 4D 45 4E 55 45 20 22 |. . ZUM MENUE "|
00000280: 00 97 12 68 01 46 49 24 B2 22 53 54 41 4E 44 41 |...h.FI$."STANDA|
00000290: 52 44 4B 4F 50 46 22 00 9D 12 72 01 8F 00 C1 12 |RDKOPF"...r.....|
000002A0: 7C 01 8F 20 2A 2A 2A 20 53 54 41 4E 44 41 52 44 ||.. *** STANDARD|
000002B0: 4B 4F 50 46 20 45 49 4E 4C 45 53 45 4E 20 2A 2A |KOPF EINLESEN **|
000002C0: 2A 00 C7 12 86 01 8F 00 DE 12 90 01 9F 20 37 2C |*............ 7,|
000002D0: 38 2C 37 2C 46 49 24 AA 22 2C 53 2C 52 22 00 17 |8,7,FI$.",S,R"..|
000002E0: 13 9A 01 84 37 2C 42 4E 24 2C 42 41 24 2C 42 57 |....7,BN$,BA$,BW|
000002F0: 24 2C 42 54 24 3A A0 37 3A 99 20 58 24 3B 22 44 |$,BT$:.7:. X$;"D|
00000300: 41 54 55 4D 20 3F 22 3B 3A 8D 20 31 38 30 30 30 |ATUM ?";:. 18000|
00000310: 3A 44 41 24 B2 4B 24 00 37 13 A4 01 86 20 42 24 |:DA$.K$.7.... B$|
00000320: 28 38 35 30 29 2C 46 46 24 28 32 30 30 29 3A 9F |(850),FF$(200):.|
00000330: 20 33 2C 38 2C 31 35 00 3D 13 AE 01 8F 00 51 13 | 3,8,15.=.....Q.|
00000340: B8 01 8F 20 2A 2A 2A 20 4D 45 4E 55 45 20 2A 2A |... *** MENUE **|
00000350: 2A 00 5F 13 C2 01 4E 24 B2 22 11 1D 12 20 22 00 |*._...N$."... ".|
00000360: 84 13 CC 01 5A 4B 24 B2 22 20 20 20 20 20 20 20 |....ZK$." |
00000370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000380: 20 20 20 22 00 9C 13 D6 01 99 20 4E 24 3B 22 93 | "...... N$;".|
00000390: 1D 20 28 43 29 31 39 38 33 20 92 22 00 C3 13 E0 |. (C)1983 ."....|
000003A0: 01 99 4E 24 3B 22 46 31 20 92 20 44 41 54 45 4E |..N$;"F1 . DATEN|
000003B0: 20 50 45 52 20 44 49 53 4B 20 45 49 4E 4C 45 53 | PER DISK EINLES|
000003C0: 45 4E 22 00 EF 13 EA 01 99 20 4E 24 3B 22 46 33 |EN"...... N$;"F3|
000003D0: 20 92 20 44 41 54 45 4E 20 45 52 57 45 49 54 45 | . DATEN ERWEITE|
000003E0: 52 4E 20 2F 20 4C 4F 45 53 43 48 45 4E 20 22 00 |RN / LOESCHEN ".|
000003F0: 0F 14 F4 01 99 20 4E 24 3B 22 46 35 20 92 20 4C |..... N$;"F5 . L|
00000400: 49 53 54 45 20 45 44 49 54 49 45 52 45 4E 22 00 |ISTE EDITIEREN".|
00000410: 2F 14 FE 01 99 20 4E 24 3B 22 46 37 20 92 20 4C |/.... N$;"F7 . L|
00000420: 49 53 54 45 20 53 4F 52 54 49 45 52 45 4E 22 00 |ISTE SORTIEREN".|
00000430: 51 14 08 02 99 20 4E 24 3B 22 46 32 20 92 20 44 |Q.... N$;"F2 . D|
00000440: 41 54 45 4E 20 41 42 53 50 45 49 43 48 45 52 4E |ATEN ABSPEICHERN|
00000450: 22 00 7F 14 12 02 99 4E 24 3B 22 46 34 20 92 20 |"......N$;"F4 . |
00000460: 44 41 54 45 4E 20 45 49 4E 4C 45 53 45 4E 20 20 |DATEN EINLESEN |
00000470: 20 20 12 20 43 4C 52 20 92 20 51 55 49 54 22 00 | . CLR . QUIT".|
00000480: B2 14 1C 02 99 20 4E 24 3B 22 46 36 20 92 20 4C |..... N$;"F6 . L|
00000490: 49 53 54 45 20 44 52 55 43 4B 45 4E 20 20 20 20 |ISTE DRUCKEN |
000004A0: 20 12 20 25 20 92 20 53 50 45 5A 2E 4C 49 53 54 | . % . SPEZ.LIST|
000004B0: 45 22 00 E5 14 26 02 99 20 4E 24 3B 22 46 38 20 |E"...&.. N$;"F8 |
000004C0: 92 20 4C 49 53 54 45 20 41 55 46 20 53 43 52 45 |. LISTE AUF SCRE|
000004D0: 45 4E 20 20 12 20 26 20 92 20 44 49 53 4B 20 4F |EN . & . DISK O|
000004E0: 50 45 52 2E 22 00 14 15 30 02 99 20 4E 24 3B 22 |PER."...0.. N$;"|
000004F0: 2A 20 20 92 20 22 3B 42 46 24 3B 22 20 20 20 20 |* . ";BF$;" |
00000500: 20 20 20 12 20 24 20 92 20 44 49 52 45 43 54 4F | . $ . DIRECTO|
00000510: 52 59 20 22 00 3C 15 3A 02 99 20 4E 24 3B 22 5C |RY ".<.:.. N$;"\|
00000520: 20 20 92 20 41 4E 44 45 52 45 20 42 49 4C 44 53 | . ANDERE BILDS|
00000530: 43 48 49 52 4D 20 46 41 52 42 45 22 00 68 15 44 |CHIRM FARBE".h.D|
00000540: 02 99 20 4E 24 3B 22 21 20 20 92 20 41 55 53 53 |.. N$;"! . AUSS|
00000550: 4F 52 54 49 45 52 45 4E 20 46 52 45 4D 44 45 52 |ORTIEREN FREMDER|
00000560: 20 4C 49 53 54 45 20 22 00 74 15 4E 02 8D 20 31 | LISTE ".t.N.. 1|
00000570: 31 30 30 30 00 AC 15 58 02 8B 20 41 24 B2 C7 28 |1000...X.. A$..(|
00000580: 31 33 33 29 A7 20 49 B2 30 3A 42 42 B2 42 3A 42 |133). I.0:BB.B:B|
00000590: B2 30 3A 51 B2 30 3A 8D 20 31 30 30 30 3A 8B 20 |.0:Q.0:. 1000:. |
000005A0: 41 24 B2 22 5F 22 A7 20 42 B2 42 42 00 C4 15 62 |A$."_". B.BB...b|
000005B0: 02 8B 20 41 24 B2 C7 28 31 33 38 29 A7 20 8D 20 |.. A$..(138). . |
000005C0: 36 30 30 30 00 DB 15 6C 02 8B 20 41 24 B2 C7 28 |6000...l.. A$..(|
000005D0: 33 37 29 A7 20 8D 20 38 32 30 30 00 FD 15 76 02 |37). . 8200...v.|
000005E0: 8B 20 41 24 B2 C7 28 31 33 35 29 A7 20 9F 20 34 |. A$..(135). . 4|
000005F0: 2C 34 3A 8D 20 37 30 30 30 3A A0 20 34 00 14 16 |,4:. 7000:. 4...|
00000600: 80 02 8B 20 41 24 B2 C7 28 33 38 29 A7 20 8D 20 |... A$..(38). . |
00000610: 36 33 30 30 00 2C 16 8A 02 8B 20 41 24 B2 C7 28 |6300.,.... A$..(|
00000620: 33 33 29 A7 20 8D 20 31 34 30 30 30 00 69 16 94 |33). . 14000.i..|
00000630: 02 8B 20 41 24 B2 C7 28 33 36 29 A7 20 42 B2 42 |.. A$..(36). B.B|
00000640: AA 32 3A 49 B2 42 3A 48 B2 31 3A 47 54 B2 31 3A |.2:I.B:H.1:GT.1:|
00000650: 47 B2 30 3A 8D 20 31 30 35 30 3A 48 B2 30 3A 42 |G.0:. 1050:H.0:B|
00000660: B2 42 AB 32 3A 47 54 B2 30 00 81 16 9E 02 8B 20 |.B.2:GT.0...... |
00000670: 41 24 B2 C7 28 31 33 36 29 A7 20 8D 20 34 30 30 |A$..(136). . 400|
00000680: 30 00 9A 16 A8 02 8B 20 41 24 B2 C7 28 31 34 37 |0...... A$..(147|
00000690: 29 A7 20 9E 20 36 35 32 39 39 00 B2 16 B2 02 8B |). . 65299......|
000006A0: 20 41 24 B2 C7 28 31 33 37 29 A7 20 8D 20 35 30 | A$..(137). . 50|
000006B0: 30 30 00 CA 16 BC 02 8B 20 41 24 B2 C7 28 31 33 |00...... A$..(13|
000006C0: 34 29 A7 20 8D 20 39 30 30 30 00 EB 16 C6 02 8B |4). . 9000......|
000006D0: 20 41 24 B2 C7 28 31 33 39 29 A7 20 9F 34 2C 34 | A$..(139). .4,4|
000006E0: 3A 8D 20 33 30 30 30 3A A0 20 34 00 03 17 D0 02 |:. 3000:. 4.....|
000006F0: 8B 20 41 24 B2 C7 28 31 34 30 29 A7 20 8D 20 38 |. A$..(140). . 8|
00000700: 30 30 30 00 1A 17 DA 02 8B 20 41 24 B2 C7 28 39 |000...... A$..(9|
00000710: 32 29 A7 20 8D 20 32 30 30 30 00 3C 17 E4 02 8B |2). . 2000.<....|
00000720: 20 41 24 B2 C7 28 34 32 29 A7 20 42 42 B2 42 3A | A$..(42). BB.B:|
00000730: 8D 20 31 32 30 30 30 3A 42 B2 42 42 00 46 17 EE |. 12000:B.BB.F..|
00000740: 02 89 20 34 35 30 00 4C 17 F8 02 8F 00 52 17 E8 |.. 450.L.....R..|
00000750: 03 8F 00 6A 17 F2 03 8F 20 2A 2A 2A 20 44 49 53 |...j.... *** DIS|
00000760: 4B 4C 45 53 45 52 20 2A 2A 2A 00 70 17 FC 03 8F |KLESER ***.p....|
00000770: 00 B4 17 06 04 47 B2 30 3A 99 20 56 24 3B 22 44 |.....G.0:. V$;"D|
00000780: 49 53 4B 20 45 49 4E 4C 45 47 45 4E 20 3A 20 44 |ISK EINLEGEN : D|
00000790: 41 54 45 4E 20 4B 4F 4D 50 4C 45 54 54 20 22 3A |ATEN KOMPLETT ":|
000007A0: 99 58 24 3B 22 4F 44 45 52 20 45 49 4E 5A 45 4C |.X$;"ODER EINZEL|
000007B0: 4E 20 22 3B 00 EB 17 0B 04 99 22 45 49 4E 4C 45 |N ";......"EINLE|
000007C0: 53 45 4E 20 3F 20 28 4B 2F 45 29 22 3A 99 20 58 |SEN ? (K/E)":. X|
000007D0: 24 3B 5A 4D 24 3A 8D 20 31 30 30 30 30 3A 8B 20 |$;ZM$:. 10000:. |
000007E0: 41 24 B2 22 45 22 A7 20 47 B2 31 00 FB 17 10 04 |A$."E". G.1.....|
000007F0: 8B 20 41 24 B2 22 5F 22 A7 20 8E 00 1A 18 1A 04 |. A$."_". ......|
00000800: 99 20 56 24 3B 22 49 43 48 20 4C 45 53 45 20 44 |. V$;"ICH LESE D|
00000810: 49 53 4B 20 22 3A 99 58 24 3B 00 30 18 24 04 9F |ISK ":.X$;.0.$..|
00000820: 31 2C 38 2C 30 2C 22 24 30 22 20 3A 47 42 B2 31 |1,8,0,"$0" :GB.1|
00000830: 00 5A 18 2E 04 8D 20 31 36 30 30 30 3A 99 22 20 |.Z.... 16000:." |
00000840: 12 22 4B 24 22 11 11 22 3A 8B 54 B3 B1 30 A7 8D |."K$"..":.T..0..|
00000850: 31 30 30 30 30 3A A0 31 3A 8E 00 68 18 38 04 A1 |10000:.1:..h.8..|
00000860: 23 31 2C 41 24 2C 46 24 00 81 18 42 04 A1 23 31 |#1,A$,F$...B..#1|
00000870: 2C 41 24 2C 46 24 3A 42 24 28 49 AA 31 29 B2 22 |,A$,F$:B$(I.1)."|
00000880: 22 00 8F 18 4C 04 A1 23 31 2C 41 24 2C 46 24 00 |"...L..#1,A$,F$.|
00000890: A0 18 56 04 43 B2 30 3A 4C 24 B2 22 20 20 20 22 |..V.C.0:L$." "|
000008A0: 00 B6 18 60 04 8B 20 41 24 B3 B1 22 22 A7 20 43 |...`.. A$.."". C|
000008B0: B2 C6 28 41 24 29 00 D1 18 6A 04 8B 20 46 24 B3 |..(A$)...j.. F$.|
000008C0: B1 22 22 A7 43 B2 43 AA C6 28 46 24 29 AC 32 35 |."".C.C..(F$).25|
000008D0: 36 00 F0 18 74 04 51 24 B2 CA 28 C4 28 43 29 2C |6...t.Q$..(.(C),|
000008E0: 32 29 3A 4C 24 B2 C8 28 51 24 AA 4C 24 2C 33 29 |2):L$..(Q$.L$,3)|
000008F0: 00 1E 19 7E 04 A1 23 31 2C 46 24 3A 8B 20 46 24 |...~..#1,F$:. F$|
00000900: B2 22 22 A7 20 99 22 11 1D 1D 12 22 3B 4C 24 3B |."". ."....";L$;|
00000910: 22 20 22 3B 42 46 24 3A 89 20 31 32 39 35 00 34 |" ";BF$:. 1295.4|
00000920: 19 88 04 8B 20 46 24 B3 B1 C7 28 33 34 29 A7 20 |.... F$...(34). |
00000930: 31 31 35 30 00 65 19 92 04 A1 23 31 2C 46 24 3A |1150.e....#1,F$:|
00000940: 8B 20 46 24 B3 B1 C7 28 33 34 29 A7 20 42 24 28 |. F$...(34). B$(|
00000950: 49 AA 51 29 B2 42 24 28 49 AA 51 29 AA 46 24 3A |I.Q).B$(I.Q).F$:|
00000960: 89 31 31 37 30 00 7C 19 9C 04 8B 20 51 B2 31 20 |.1170.|.... Q.1 |
00000970: A7 20 42 24 28 49 AA 31 29 B2 22 22 00 98 19 A6 |. B$(I.1).""....|
00000980: 04 A1 23 31 2C 46 24 3A 8B 20 46 24 B2 C7 28 33 |..#1,F$:. F$..(3|
00000990: 32 29 A7 20 31 31 39 30 00 A2 19 B0 04 43 24 B2 |2). 1190.....C$.|
000009A0: 22 22 00 C6 19 BA 04 43 24 B2 43 24 AA 46 24 3A |"".....C$.C$.F$:|
000009B0: A1 23 31 2C 46 24 3A 8B 20 46 24 B3 B1 22 22 20 |.#1,F$:. F$.."" |
000009C0: A7 20 31 32 31 30 00 DF 19 C4 04 8B 20 47 42 B2 |. 1210...... GB.|
000009D0: 31 20 A7 20 47 42 24 B2 43 24 3A 47 42 B2 30 00 |1 . GB$.C$:GB.0.|
000009E0: 12 1A CE 04 42 24 28 49 AA 51 29 B2 C8 28 42 24 |....B$(I.Q)..(B$|
000009F0: 28 49 AA 51 29 AA 5A 4B 24 2C 31 37 29 AA C8 28 |(I.Q).ZK$,17)..(|
00000A00: 47 42 24 2C 33 29 AA C9 28 5A 4B 24 AA 51 24 2C |GB$,3)..(ZK$.Q$,|
00000A10: 33 29 00 49 1A D8 04 99 22 1D 1D 22 3B 42 24 28 |3).I...."..";B$(|
00000A20: 49 AA 51 29 3B 22 1D 1D 1D 22 3B 22 12 20 22 3B |I.Q);"...";". ";|
00000A30: C8 28 43 24 2C 35 29 3B 3A 8B 20 47 B2 30 20 AF |.(C$,5);:. G.0 .|
00000A40: 20 47 54 B2 30 20 A7 20 99 00 6C 1A E2 04 8B 20 | GT.0 . ..l.... |
00000A50: 47 54 B2 31 20 A7 20 47 54 B2 30 3A 42 24 28 49 |GT.1 . GT.0:B$(I|
00000A60: 29 B2 22 22 3A 99 3A 89 31 30 39 30 00 87 1A EC |)."":.:.1090....|
00000A70: 04 8B 20 51 B2 31 20 A7 20 51 B2 30 3A 42 24 28 |.. Q.1 . Q.0:B$(|
00000A80: 49 AA 31 29 B2 22 22 00 B5 1A F6 04 8B 20 47 B2 |I.1).""...... G.|
00000A90: 31 20 AF 20 47 54 B2 30 20 AF 20 49 B1 30 20 A7 |1 . GT.0 . I.0 .|
00000AA0: 20 99 22 92 20 4A 2F 4E 9D 9D 9D 22 3B 3A 8D 20 | .". J/N...";:. |
00000AB0: 31 31 30 30 30 00 D8 1A FB 04 8B 20 41 24 B2 22 |11000...... A$."|
00000AC0: 4E 22 20 A7 99 22 4E 45 49 4E 22 3B 3A 47 54 B2 |N" .."NEIN";:GT.|
00000AD0: 31 3A 89 20 31 32 35 30 00 F7 1A 00 05 49 B2 49 |1:. 1250.....I.I|
00000AE0: AA 31 3A 8B 20 47 B2 31 20 A7 99 22 92 20 4A 41 |.1:. G.1 ..". JA|
00000AF0: 22 3A 5A B2 5A AA 31 00 34 1B 05 05 8B 20 49 AA |":Z.Z.1.4.... I.|
00000B00: 51 AA 31 B2 38 35 30 20 A7 99 58 24 3B 22 53 50 |Q.1.850 ..X$;"SP|
00000B10: 45 49 43 48 45 52 20 49 53 54 20 56 4F 4C 4C 22 |EICHER IST VOLL"|
00000B20: 3A 99 58 24 3B 5A 4D 24 3A A0 31 3A 8D 31 31 30 |:.X$;ZM$:.1:.110|
00000B30: 30 30 3A 8E 00 3F 1B 0A 05 89 20 31 30 39 30 00 |00:..?.... 1090.|
00000B40: 59 1B 0F 05 A0 20 31 3A 8B 20 48 B2 31 20 A7 20 |Y.... 1:. H.1 . |
00000B50: 8D 20 31 30 30 30 30 3A 8E 00 79 1B 14 05 99 20 |. 10000:..y.... |
00000B60: 58 24 3B 22 4E 30 43 48 20 45 49 4E 45 20 44 49 |X$;"N0CH EINE DI|
00000B70: 53 4B 20 28 4A 2F 4E 29 22 00 88 1B 1E 05 51 57 |SK (J/N)".....QW|
00000B80: 24 B2 C4 28 49 AB 31 29 00 BB 1B 28 05 99 58 24 |$..(I.1)...(..X$|
00000B90: 3B 22 42 49 53 48 45 52 20 57 55 52 44 45 4E 20 |;"BISHER WURDEN |
00000BA0: 22 3B 51 57 24 3B 22 20 44 41 54 45 4E 20 47 45 |";QW$;" DATEN GE|
00000BB0: 4C 45 53 45 4E 20 11 11 11 11 22 00 C7 1B 32 05 |LESEN ...."...2.|
00000BC0: 8D 20 31 31 30 30 30 00 E7 1B 3C 05 8B 20 41 24 |. 11000...<.. A$|
00000BD0: B2 22 4A 22 A7 20 47 54 B2 31 3A 99 20 56 24 3B |."J". GT.1:. V$;|
00000BE0: 3A 89 20 31 30 36 30 00 FB 1B 46 05 8B 20 41 24 |:. 1060...F.. A$|
00000BF0: B3 B1 22 4E 22 A7 20 31 33 33 30 00 08 1C 50 05 |.."N". 1330...P.|
00000C00: 42 B2 49 AB 31 3A A0 31 00 16 1C 5A 05 41 24 B2 |B.I.1:.1...Z.A$.|
00000C10: 22 22 3A 54 B2 30 00 1C 1C 64 05 8E 00 22 1C D0 |"":T.0...d..."..|
00000C20: 07 8F 00 3C 1C DA 07 8F 20 2A 2A 2A 20 46 41 52 |...<.... *** FAR|
00000C30: 42 57 45 43 48 53 45 4C 20 2A 2A 2A 00 42 1C E4 |BWECHSEL ***.B..|
00000C40: 07 8F 00 52 1C EE 07 49 B2 30 3A 46 B2 30 3A 4A |...R...I.0:F.0:J|
00000C50: B2 30 00 79 1C F8 07 99 20 56 24 3B 22 46 31 92 |.0.y.... V$;"F1.|
00000C60: 20 12 46 41 52 42 57 45 43 48 53 45 4C 20 42 49 | .FARBWECHSEL BI|
00000C70: 4C 44 53 43 48 49 52 4D 22 00 A1 1C 02 08 99 20 |LDSCHIRM"...... |
00000C80: 58 24 3B 22 46 33 92 20 12 46 41 52 42 57 45 43 |X$;"F3. .FARBWEC|
00000C90: 48 53 45 4C 20 48 49 4E 54 45 52 47 52 55 4E 44 |HSEL HINTERGRUND|
00000CA0: 22 00 C5 1C 0C 08 99 20 58 24 3B 22 46 35 92 20 |"...... X$;"F5. |
00000CB0: 12 46 41 52 42 57 45 43 48 53 45 4C 20 53 43 48 |.FARBWECHSEL SCH|
00000CC0: 52 49 46 54 22 00 D1 1C 16 08 99 58 24 3B 5A 4D |RIFT"......X$;ZM|
00000CD0: 24 00 DD 1C 20 08 8D 20 31 31 30 30 30 00 03 1D |$... .. 11000...|
00000CE0: 2A 08 8B 20 41 24 B2 C7 28 31 33 33 29 A7 20 49 |*.. A$..(133). I|
00000CF0: B2 49 AA 31 3A E7 34 2C 49 3A 8B 49 B1 31 35 A7 |.I.1:.4,I:.I.15.|
00000D00: 49 B2 30 00 29 1D 34 08 8B 20 41 24 B2 C7 28 31 |I.0.).4.. A$..(1|
00000D10: 33 34 29 A7 20 4A B2 4A AA 31 3A E7 30 2C 4A 3A |34). J.J.1:.0,J:|
00000D20: 8B 4A B1 31 35 A7 4A B2 30 00 4F 1D 3E 08 8B 20 |.J.15.J.0.O.>.. |
00000D30: 41 24 B2 C7 28 31 33 35 29 A7 20 46 B2 46 AA 31 |A$..(135). F.F.1|
00000D40: 3A E7 31 2C 46 3A 8B 46 B1 31 35 A7 46 B2 30 00 |:.1,F:.F.15.F.0.|
00000D50: 5F 1D 48 08 8B 20 41 24 B2 22 5F 22 A7 20 8E 00 |_.H.. A$."_". ..|
00000D60: 6A 1D 52 08 89 20 32 30 34 30 00 70 1D B8 0B 8F |j.R.. 2040.p....|
00000D70: 00 8E 1D C2 0B 8F 20 2A 2A 2A 20 44 52 55 43 4B |...... *** DRUCK|
00000D80: 45 52 20 41 55 53 47 41 42 45 20 2A 2A 2A 00 A4 |ER AUSGABE ***..|
00000D90: 1D CC 0B 5A 4B 24 B2 C8 28 5A 4B 24 AA 5A 4B 24 |...ZK$..(ZK$.ZK$|
00000DA0: 2C 33 33 29 00 EC 1D D6 0B 4A 24 B2 22 12 20 4A |,33).....J$.". J|
00000DB0: 41 20 22 3A 4E 24 B2 22 12 4E 45 49 4E 22 3A 46 |A ":N$.".NEIN":F|
00000DC0: 31 24 B2 4E 24 3A 46 33 24 B2 4A 24 3A 46 35 24 |1$.N$:F3$.J$:F5$|
00000DD0: B2 4A 24 3A 46 37 24 B2 4E 24 3A 46 32 24 B2 4E |.J$:F7$.N$:F2$.N|
00000DE0: 24 3A 5A 24 B2 22 1D 1D 1D 1D 1D 22 00 06 1E E0 |$:Z$."....."....|
00000DF0: 0B 59 24 B2 22 11 22 AA 5A 24 3A 46 34 24 B2 4E |.Y$.".".Z$:F4$.N|
00000E00: 24 3A 44 52 B2 31 00 0C 1E EA 0B 8F 00 19 1E F4 |$:DR.1..........|
00000E10: 0B 54 24 B2 22 1D 12 20 22 00 41 1E FE 0B 53 54 |.T$.".. ".A...ST|
00000E20: 24 B2 22 22 3A 41 4E 24 B2 22 42 49 54 54 45 20 |$."":AN$."BITTE |
00000E30: 46 55 4E 4B 54 49 4F 4E 20 57 41 45 48 4C 45 4E |FUNKTION WAEHLEN|
00000E40: 22 00 62 1E 03 0C 99 22 93 1D 1D 1D 1D 1D 12 20 |".b...."....... |
00000E50: 44 52 55 43 4B 45 52 20 41 55 53 47 41 42 45 20 |DRUCKER AUSGABE |
00000E60: 11 22 00 85 1E 08 0C 99 20 46 31 24 3B 54 24 3B |."...... F1$;T$;|
00000E70: 22 46 31 20 92 20 44 52 55 43 4B 2D 42 45 47 49 |"F1 . DRUCK-BEGI|
00000E80: 4E 4E 20 11 22 00 B2 1E 12 0C 99 20 46 33 24 3B |NN ."...... F3$;|
00000E90: 54 24 3B 22 46 33 20 92 20 53 54 41 4E 44 2E 4B |T$;"F3 . STAND.K|
00000EA0: 4F 50 46 20 4D 49 54 20 44 52 55 43 4B 45 4E 20 |OPF MIT DRUCKEN |
00000EB0: 11 22 00 DE 1E 1C 0C 99 46 35 24 3B 54 24 3B 22 |."......F5$;T$;"|
00000EC0: 46 35 20 92 20 50 52 4F 47 52 41 4D 4D 2D 4C 49 |F5 . PROGRAMM-LI|
00000ED0: 53 54 45 20 44 52 55 43 4B 45 4E 20 11 22 00 08 |STE DRUCKEN ."..|
00000EE0: 1F 26 0C 99 20 46 37 24 3B 54 24 3B 22 46 37 20 |.&.. F7$;T$;"F7 |
00000EF0: 92 20 50 52 45 49 53 2D 4C 49 53 54 45 20 44 52 |. PREIS-LISTE DR|
00000F00: 55 43 4B 45 4E 20 11 22 00 33 1F 30 0C 99 20 46 |UCKEN .".3.0.. F|
00000F10: 32 24 3B 54 24 3B 22 46 32 20 92 20 4C 49 53 54 |2$;T$;"F2 . LIST|
00000F20: 45 20 4E 41 43 48 20 4B 52 49 54 45 52 49 55 4D |E NACH KRITERIUM|
00000F30: 20 11 22 00 5D 1F 3A 0C 99 20 46 34 24 3B 54 24 | .".].:.. F4$;T$|
00000F40: 3B 22 46 34 20 92 20 53 54 41 4E 44 41 52 44 4B |;"F4 . STANDARDK|
00000F50: 4F 50 46 20 41 45 4E 44 45 52 4E 20 22 00 6F 1F |OPF AENDERN ".o.|
00000F60: 44 0C 99 20 58 24 3B 22 9D 9D 22 3B 5A 4D 24 00 |D.. X$;"..";ZM$.|
00000F70: 7A 1F 4E 0C 99 20 22 11 11 22 00 A1 1F 8A 0C 99 |z.N.. ".."......|
00000F80: 22 13 22 3B 3A 81 20 4A B2 31 20 A4 20 32 30 3A |".";:. J.1 . 20:|
00000F90: 99 20 22 11 22 3B 3A 82 3A 99 5A 24 3B 3B 53 54 |. ".";:.:.Z$;;ST|
00000FA0: 24 00 AE 1F 94 0C 99 20 59 24 3B 41 4E 24 00 D1 |$...... Y$;AN$..|
00000FB0: 1F 9E 0C 8B 20 43 B2 31 20 A7 20 43 B2 30 3A 8D |.... C.1 . C.0:.|
00000FC0: 33 34 35 30 3A 46 34 24 B2 4E 24 3A 89 33 30 37 |3450:F4$.N$:.307|
00000FD0: 30 00 DD 1F B2 0C 8D 20 31 31 30 30 30 00 05 20 |0...... 11000.. |
00000FE0: BC 0C 8B 20 41 24 B2 C7 28 31 33 33 29 AF 20 46 |... A$..(133). F|
00000FF0: 31 24 B2 4E 24 A7 20 46 31 24 B2 4A 24 3A 20 89 |1$.N$. F1$.J$: .|
00001000: 20 33 30 37 30 00 2D 20 C6 0C 8B 20 41 24 B2 C7 | 3070.- ... A$..|
00001010: 28 31 33 34 29 AF 20 46 33 24 B2 4A 24 A7 20 46 |(134). F3$.J$. F|
00001020: 33 24 B2 4E 24 3A 20 89 20 33 30 37 30 00 55 20 |3$.N$: . 3070.U |
00001030: D0 0C 8B 20 41 24 B2 C7 28 31 33 34 29 AF 20 46 |... A$..(134). F|
00001040: 33 24 B2 4E 24 A7 20 46 33 24 B2 4A 24 3A 20 89 |3$.N$. F3$.J$: .|
00001050: 20 33 30 37 30 00 8A 20 DA 0C 8B 20 41 24 B2 C7 | 3070.. ... A$..|
00001060: 28 31 33 35 29 AF 20 46 35 24 B2 4E 24 A7 20 46 |(135). F5$.N$. F|
00001070: 35 24 B2 4A 24 3A 46 32 24 B2 4E 24 3A 46 37 24 |5$.J$:F2$.N$:F7$|
00001080: B2 4E 24 3A 89 20 33 30 37 30 00 B1 20 E4 0C 8B |.N$:. 3070.. ...|
00001090: 20 41 24 B2 C7 28 31 33 35 29 AF 20 46 35 24 B2 | A$..(135). F5$.|
000010A0: 4A 24 A7 20 46 35 24 B2 4E 24 3A 89 20 33 30 37 |J$. F5$.N$:. 307|
000010B0: 30 00 D8 20 EE 0C 8B 20 41 24 B2 C7 28 31 33 36 |0.. ... A$..(136|
000010C0: 29 AF 20 46 37 24 B2 4A 24 A7 20 46 37 24 B2 4E |). F7$.J$. F7$.N|
000010D0: 24 3A 89 20 33 30 37 30 00 0D 21 F8 0C 8B 20 41 |$:. 3070..!... A|
000010E0: 24 B2 C7 28 31 33 36 29 AF 20 46 37 24 B2 4E 24 |$..(136). F7$.N$|
000010F0: A7 20 46 37 24 B2 4A 24 3A 46 32 24 B2 4E 24 3A |. F7$.J$:F2$.N$:|
00001100: 46 35 24 B2 4E 24 3A 89 20 33 30 37 30 00 42 21 |F5$.N$:. 3070.B!|
00001110: 02 0D 8B 20 41 24 B2 C7 28 31 33 37 29 AF 20 46 |... A$..(137). F|
00001120: 32 24 B2 4E 24 A7 20 46 32 24 B2 4A 24 3A 46 37 |2$.N$. F2$.J$:F7|
00001130: 24 B2 4E 24 3A 46 35 24 B2 4E 24 3A 89 20 33 30 |$.N$:F5$.N$:. 30|
00001140: 37 30 00 6A 21 0C 0D 8B 20 41 24 B2 C7 28 31 33 |70.j!... A$..(13|
00001150: 37 29 AF 20 46 32 24 B2 4A 24 A7 20 46 32 24 B2 |7). F2$.J$. F2$.|
00001160: 4E 24 3A 20 89 20 33 30 37 30 00 82 21 16 0D 8B |N$: . 3070..!...|
00001170: 20 41 24 B2 C7 28 39 35 29 20 A7 20 44 52 B2 30 | A$..(95) . DR.0|
00001180: 3A 8E 00 A5 21 20 0D 8B 20 41 24 B2 C7 28 31 33 |:...! .. A$..(13|
00001190: 38 29 20 A7 20 46 34 24 B2 4A 24 3A 43 B2 31 3A |8) . F4$.J$:C.1:|
000011A0: 89 33 30 37 30 00 C6 21 2A 0D 8B 41 24 B2 C7 28 |.3070..!*..A$..(|
000011B0: 39 35 29 20 B0 20 41 24 B1 C7 28 31 33 37 29 20 |95) . A$..(137) |
000011C0: A7 20 33 32 35 30 00 FD 21 34 0D 99 22 13 22 3A |. 3250..!4..".":|
000011D0: 81 20 4A B2 31 20 A4 31 39 3A 99 22 11 22 3B 3A |. J.1 .19:.".";:|
000011E0: 82 3A 99 5A 24 3B 5A 4B 24 3A 99 22 91 22 3B 5A |.:.Z$;ZK$:.".";Z|
000011F0: 24 3B 22 4F 4B 20 3F 28 4A 2F 4E 29 22 00 1E 22 |$;"OK ?(J/N)".."|
00001200: 39 0D 99 59 24 3B 5A 4B 24 3A 8D 20 31 31 30 30 |9..Y$;ZK$:. 1100|
00001210: 30 3A 8B 20 41 24 B3 B1 22 4A 22 A7 20 8E 00 5E |0:. A$.."J". ..^|
00001220: 22 3E 0D 99 22 13 22 3A 81 20 4A B2 31 20 A4 31 |">..".":. J.1 .1|
00001230: 39 3A 99 22 11 22 3B 3A 82 3A 99 5A 24 3B 22 57 |9:.".";:.:.Z$;"W|
00001240: 49 45 56 49 45 4C 20 5A 45 49 4C 45 4E 20 50 52 |IEVIEL ZEILEN PR|
00001250: 4F 20 53 45 49 54 45 20 3F 3E 3D 31 35 22 00 9E |O SEITE ?>=15"..|
00001260: 22 48 0D 99 20 59 24 3B 5A 4B 24 3A 99 22 91 91 |"H.. Y$;ZK$:."..|
00001270: 22 3B 59 24 3B 3A 8D 20 31 38 30 30 30 3A 44 5A |";Y$;:. 18000:DZ|
00001280: B2 C5 28 4B 24 29 3A 8B 20 44 5A B3 31 35 20 B0 |..(K$):. DZ.15 .|
00001290: 20 44 5A B1 33 30 30 20 A7 20 33 33 39 30 00 BF | DZ.300 . 3390..|
000012A0: 22 4D 0D 8B 20 46 32 24 B2 4E 24 AF 20 46 35 24 |"M.. F2$.N$. F5$|
000012B0: B2 4E 24 AF 20 46 37 24 B2 4E 24 20 A7 20 8E 00 |.N$. F7$.N$ . ..|
000012C0: D2 22 52 0D 8B 20 46 33 24 B2 4A 24 A7 20 33 35 |."R.. F3$.J$. 35|
000012D0: 33 30 00 E5 22 5C 0D 8B 20 46 33 24 B2 4E 24 A7 |30.."\.. F3$.N$.|
000012E0: 20 33 35 39 30 00 F7 22 66 0D 8B 20 46 33 24 B2 | 3590.."f.. F3$.|
000012F0: 22 5F 22 20 A7 20 8E 00 FD 22 70 0D 8E 00 1D 23 |"_" . ..."p....#|
00001300: 7A 0D 53 54 24 B2 22 44 41 54 55 4D 20 3F 22 3A |z.ST$."DATUM ?":|
00001310: 8D 20 33 35 31 30 3A 44 41 24 B2 4B 24 00 3B 23 |. 3510:DA$.K$.;#|
00001320: 84 0D 53 54 24 B2 22 4E 41 4D 45 20 3F 22 3A 8D |..ST$."NAME ?":.|
00001330: 33 35 31 30 3A 42 4E 24 B2 4B 24 00 61 23 8E 0D |3510:BN$.K$.a#..|
00001340: 53 54 24 B2 22 53 54 52 41 53 53 45 2C 4E 52 2E |ST$."STRASSE,NR.|
00001350: 20 3F 22 3A 8D 20 33 35 31 30 3A 42 41 24 B2 4B | ?":. 3510:BA$.K|
00001360: 24 00 83 23 98 0D 53 54 24 B2 22 57 4F 48 4E 4F |$..#..ST$."WOHNO|
00001370: 52 54 20 3F 22 3A 8D 20 33 35 31 30 3A 42 57 24 |RT ?":. 3510:BW$|
00001380: B2 4B 24 00 A5 23 A2 0D 53 54 24 B2 22 54 45 4C |.K$..#..ST$."TEL|
00001390: 45 46 4F 4E 20 3F 22 3A 8D 20 33 35 31 30 3A 42 |EFON ?":. 3510:B|
000013A0: 54 24 B2 4B 24 00 AB 23 AC 0D 8E 00 CE 23 B6 0D |T$.K$..#.....#..|
000013B0: 99 22 13 22 3A 81 20 4A B2 31 20 A4 31 39 3A 99 |.".":. J.1 .19:.|
000013C0: 22 11 22 3B 3A 82 3A 99 5A 24 3B 53 54 24 00 ED |".";:.:.Z$;ST$..|
000013D0: 23 BB 0D 99 20 59 24 3B 5A 4B 24 3A 99 22 11 11 |#... Y$;ZK$:."..|
000013E0: 22 3B 59 24 3B 3A 8D 20 31 38 30 30 30 00 1C 24 |";Y$;:. 18000..$|
000013F0: C0 0D 99 22 13 22 3A 81 20 4A B2 31 20 A4 31 39 |...".":. J.1 .19|
00001400: 3A 99 22 11 22 3B 3A 82 3A 99 20 5A 24 3B 5A 4B |:.".";:.:. Z$;ZK|
00001410: 24 3A 99 20 59 24 3B 5A 4B 24 3A 8E 00 36 24 CA |$:. Y$;ZK$:..6$.|
00001420: 0D 5A 44 B2 30 3A 8B 20 46 33 24 B2 4A 24 20 A7 |.ZD.0:. F3$.J$ .|
00001430: 20 5A 44 B2 31 35 00 57 24 D4 0D 98 34 2C C7 28 | ZD.15.W$...4,.(|
00001440: 31 34 29 22 20 20 22 3B 42 4E 24 3A 98 34 2C 22 |14)" ";BN$:.4,"|
00001450: 20 20 22 3B 42 41 24 00 76 24 DE 0D 98 34 2C 22 | ";BA$.v$...4,"|
00001460: 20 20 22 3B 42 57 24 3A 98 34 2C 22 20 20 22 3B | ";BW$:.4," ";|
00001470: 42 54 24 3A 98 34 00 99 24 E8 0D 98 34 2C 22 20 |BT$:.4..$...4," |
00001480: 20 44 49 53 4B 45 54 54 45 4E 49 4E 48 41 4C 54 | DISKETTENINHALT|
00001490: 20 56 4F 4D 22 3B 44 41 24 00 BA 24 F2 0D 98 34 | VOM";DA$..$...4|
000014A0: 3A 98 34 2C 22 20 20 50 52 4F 47 52 41 4D 4D 45 |:.4," PROGRAMME|
000014B0: 3A 22 3B 42 3B C7 28 31 35 29 00 C1 24 FC 0D 98 |:";B;.(15)..$...|
000014C0: 34 00 D5 24 06 0E 8B 20 46 32 24 B2 4A 24 20 A7 |4..$... F2$.J$ .|
000014D0: 20 33 37 36 30 00 E9 24 0B 0E 8B 20 46 37 24 B2 | 3760..$... F7$.|
000014E0: 4E 24 20 A7 20 33 36 31 30 00 15 25 10 0E 51 53 |N$ . 3610..%..QS|
000014F0: 24 B2 22 50 52 47 2E 4E 41 4D 45 20 20 20 20 20 |$."PRG.NAME |
00001500: 20 20 20 4B 42 2E 20 50 52 45 49 53 20 22 3A 89 | KB. PREIS ":.|
00001510: 20 33 36 32 30 00 3A 25 1A 0E 51 53 24 B2 22 50 | 3620.:%..QS$."P|
00001520: 52 47 2E 4E 41 4D 45 20 20 20 20 20 20 20 20 20 |RG.NAME |
00001530: 49 44 20 42 4C 2E 20 20 20 22 00 4E 25 24 0E 5A |ID BL. ".N%$.Z|
00001540: 44 24 B2 22 20 20 22 3A 89 20 33 36 34 30 00 5E |D$." ":. 3640.^|
00001550: 25 38 0E 44 44 B2 B5 28 42 AD 33 29 AA 31 00 66 |%8.DD..(B.3).1.f|
00001560: 25 42 0E 53 B2 31 00 8B 25 4C 0E 42 24 28 42 AA |%B.S.1..%L.B$(B.|
00001570: 31 29 B2 22 22 3A 42 24 28 42 AA 32 29 B2 22 22 |1)."":B$(B.2).""|
00001580: 3A 42 24 28 42 AA 33 29 B2 22 22 00 AB 25 56 0E |:B$(B.3).""..%V.|
00001590: 98 34 2C C8 28 22 20 20 20 20 22 AA 51 53 24 AA |.4,.(" ".QS$.|
000015A0: 51 53 24 AA 51 53 24 2C 37 38 29 00 D4 25 60 0E |QS$.QS$,78)..%`.|
000015B0: 98 34 2C 22 20 20 20 20 22 3B 3A 81 20 54 B2 31 |.4," ";:. T.1|
000015C0: 20 A4 37 34 3A 98 34 2C C7 28 31 30 31 29 3B 3A | .74:.4,.(101);:|
000015D0: 82 3A 98 34 00 E3 25 6A 0E 81 20 54 B2 31 20 A4 |.:.4..%j.. T.1 .|
000015E0: 20 44 44 00 16 26 74 0E 98 34 2C 22 20 20 20 22 | DD..&t..4," "|
000015F0: 3B 42 24 28 53 29 3B 22 20 20 20 22 3B 42 24 28 |;B$(S);" ";B$(|
00001600: 53 AA 44 44 29 3B 22 20 20 20 22 3B 42 24 28 53 |S.DD);" ";B$(S|
00001610: AA 32 AC 44 44 29 00 22 26 7E 0E 5A 44 B2 5A 44 |.2.DD)."&~.ZD.ZD|
00001620: AA 31 00 42 26 88 0E 53 B2 53 AA 31 3A 8B 20 5A |.1.B&..S.S.1:. Z|
00001630: 44 B2 44 5A 20 A7 20 5A 44 B2 30 3A 8D 20 33 37 |D.DZ . ZD.0:. 37|
00001640: 34 30 00 4A 26 92 0E 82 3A 8E 00 6C 26 9C 0E 99 |40.J&...:..l&...|
00001650: 22 13 22 3A 81 20 4A B2 20 31 20 A4 31 39 3A 99 |".":. J. 1 .19:.|
00001660: 22 11 22 3B 3A 82 3A 99 20 5A 24 3B 00 B0 26 A6 |".";:.:. Z$;..&.|
00001670: 0E 99 22 44 52 55 43 4B 45 52 50 41 50 49 45 52 |.."DRUCKERPAPIER|
00001680: 20 4A 55 53 54 49 45 52 45 4E 20 3F 20 22 3A 99 | JUSTIEREN ? ":.|
00001690: 20 59 24 3B 22 54 41 53 54 45 20 44 52 55 45 43 | Y$;"TASTE DRUEC|
000016A0: 4B 45 4E 20 22 3B 3A 8D 20 31 31 30 30 30 3A 8E |KEN ";:. 11000:.|
000016B0: 00 E7 26 B0 0E 46 B2 32 3A 99 22 13 22 3A 81 20 |..&..F.2:.".":. |
000016C0: 49 B2 31 20 A4 31 39 3A 99 22 11 22 3B 3A 82 3A |I.1 .19:.".";:.:|
000016D0: 99 5A 24 3B 5A 4B 24 3A 99 59 24 3B 5A 4B 24 3A |.Z$;ZK$:.Y$;ZK$:|
000016E0: 99 22 91 91 91 91 22 00 11 27 B5 0E 99 5A 24 3B |."...."..'...Z$;|
000016F0: 22 49 44 2E 43 4F 44 45 20 45 49 4E 47 45 42 45 |"ID.CODE EINGEBE|
00001700: 4E 20 21 22 3A 99 59 24 3B 3A 8D 20 31 38 30 30 |N !":.Y$;:. 1800|
00001710: 30 00 28 27 BA 0E 8B 20 C9 28 4B 24 2C 31 29 B2 |0.('... .(K$,1).|
00001720: 22 2A 22 A7 20 46 B2 31 00 3B 27 C4 0E 4B 24 B2 |"*". F.1.;'..K$.|
00001730: C8 28 4B 24 AA 5A 4B 24 2C 46 29 00 5F 27 CE 0E |.(K$.ZK$,F)._'..|
00001740: 81 20 49 B2 31 20 A4 20 42 3A 8B 20 5A 44 B2 44 |. I.1 . B:. ZD.D|
00001750: 5A 20 A7 20 5A 44 B2 30 3A 8D 20 33 37 34 30 00 |Z . ZD.0:. 3740.|
00001760: 90 27 D8 0E 8B 20 CA 28 42 24 28 49 29 2C 31 38 |.'... .(B$(I),18|
00001770: 2C 46 29 B2 4B 24 20 A7 20 98 34 2C 22 20 20 20 |,F).K$ . .4," |
00001780: 20 22 3B 42 24 28 49 29 3A 5A 44 B2 5A 44 AA 31 | ";B$(I):ZD.ZD.1|
00001790: 00 99 27 E2 0E 82 3A 98 34 00 9F 27 EC 0E 8E 00 |..'...:.4..'....|
000017A0: A5 27 A0 0F 8F 00 C2 27 AA 0F 8F 20 2A 2A 2A 20 |.'.....'... *** |
000017B0: 53 4F 52 54 49 45 52 52 4F 55 54 49 4E 45 20 2A |SORTIERROUTINE *|
000017C0: 2A 2A 00 C8 27 B4 0F 8F 00 02 28 BE 0F 99 20 56 |**..'.....(... V|
000017D0: 24 3B 22 53 4F 52 54 49 45 52 2D 52 4F 55 54 49 |$;"SORTIER-ROUTI|
000017E0: 4E 45 20 4C 41 45 55 46 54 21 22 3A 42 24 28 42 |NE LAEUFT!":B$(B|
000017F0: AA 31 29 B2 22 5A 5A 5A 5A 5A 5A 5A 5A 22 3A 46 |.1)."ZZZZZZZZ":F|
00001800: B2 30 00 2D 28 C3 0F 99 20 58 24 3B 22 41 4C 50 |.0.-(... X$;"ALP|
00001810: 48 41 42 45 54 49 53 43 48 20 4F 44 45 52 20 4E |HABETISCH ODER N|
00001820: 41 43 48 20 49 44 2E 4E 52 2E 20 3F 22 00 5A 28 |ACH ID.NR. ?".Z(|
00001830: C8 0F 99 58 24 3B 22 28 41 2F 49 29 22 3A 99 20 |...X$;"(A/I)":. |
00001840: 58 24 3B 5A 4D 24 3A 8D 20 31 31 30 30 30 3A 8B |X$;ZM$:. 11000:.|
00001850: 20 41 24 B2 22 5F 22 A7 20 8E 00 6D 28 D7 0F 8B | A$."_". ..m(...|
00001860: 20 41 24 B2 22 49 22 20 A7 20 46 B2 31 00 7C 28 | A$."I" . F.1.|(|
00001870: DC 0F 81 20 43 20 B2 31 20 A4 20 42 00 91 28 DD |... C .1 . B..(.|
00001880: 0F 97 36 35 32 38 36 2C 31 31 3A 8D 32 30 30 30 |..65286,11:.2000|
00001890: 30 00 BF 28 E6 0F 4A B2 43 AA 31 3A 99 20 58 24 |0..(..J.C.1:. X$|
000018A0: 3B 22 45 4C 45 4D 45 4E 54 20 20 20 20 20 20 20 |;"ELEMENT |
000018B0: 9D 9D 9D 9D 22 3B 4A AB 31 3B 22 11 11 11 22 00 |....";J.1;"...".|
000018C0: CD 28 F0 0F 81 20 44 B2 4A 20 A4 20 42 00 F5 28 |.(... D.J . B..(|
000018D0: FA 0F 8B 20 46 B2 31 20 AF 20 C9 28 42 24 28 43 |... F.1 . .(B$(C|
000018E0: 29 2C 36 29 B1 C9 28 42 24 28 44 29 2C 36 29 A7 |),6)..(B$(D),6).|
000018F0: 20 34 31 32 30 00 0D 29 04 10 8B 20 42 24 28 43 | 4120..)... B$(C|
00001900: 29 B1 42 24 28 44 29 20 A7 34 31 32 30 00 18 29 |).B$(D) .4120..)|
00001910: 0E 10 89 20 34 31 33 30 00 40 29 18 10 43 24 28 |... 4130.@)..C$(|
00001920: 30 29 B2 42 24 28 43 29 3A 42 24 28 43 29 B2 42 |0).B$(C):B$(C).B|
00001930: 24 28 44 29 3A 42 24 28 44 29 B2 43 24 28 30 29 |$(D):B$(D).C$(0)|
00001940: 00 46 29 22 10 82 00 4C 29 2C 10 82 00 5A 29 2D |.F)"...L),...Z)-|
00001950: 10 97 36 35 32 38 36 2C 32 37 00 88 29 36 10 99 |..65286,27..)6..|
00001960: 20 56 24 3B 22 44 4F 50 50 45 4C 54 45 20 44 41 | V$;"DOPPELTE DA|
00001970: 54 45 4E 20 41 55 53 53 4F 52 54 49 45 52 45 4E |TEN AUSSORTIEREN|
00001980: 20 28 4A 2F 4E 29 20 22 00 94 29 40 10 8D 20 31 | (J/N) "..)@.. 1|
00001990: 31 30 30 30 00 A8 29 4A 10 8B 20 41 24 B2 22 4A |1000..)J.. A$."J|
000019A0: 22 20 A7 20 34 31 39 30 00 AE 29 54 10 8E 00 D2 |" . 4190..)T....|
000019B0: 29 5E 10 99 20 56 24 3B 22 45 53 20 57 49 52 44 |)^.. V$;"ES WIRD|
000019C0: 20 41 55 53 53 4F 52 54 49 45 52 54 20 22 3A 4A | AUSSORTIERT ":J|
000019D0: B2 31 00 0E 2A 68 10 99 20 58 24 3B 22 57 49 45 |.1..*h.. X$;"WIE|
000019E0: 56 49 45 4C 45 20 5A 45 49 43 48 45 4E 20 42 45 |VIELE ZEICHEN BE|
000019F0: 52 55 45 43 4B 53 49 43 48 54 49 47 45 4E 20 3F |RUECKSICHTIGEN ?|
00001A00: 22 3A 99 58 24 3B 3A 8D 20 31 38 30 30 30 00 32 |":.X$;:. 18000.2|
00001A10: 2A 72 10 53 53 B2 C5 28 4B 24 29 3A 8B 20 53 53 |*r.SS..(K$):. SS|
00001A20: B2 30 20 B0 20 53 53 B1 32 35 20 A7 20 53 53 B2 |.0 . SS.25 . SS.|
00001A30: 32 35 00 59 2A 7C 10 8B 20 C8 28 42 24 28 4A 29 |25.Y*|.. .(B$(J)|
00001A40: 2C 53 53 29 B2 C8 28 42 24 28 4A AA 31 29 2C 53 |,SS)..(B$(J.1),S|
00001A50: 53 29 20 A7 20 34 32 37 30 00 63 2A 86 10 4A B2 |S) . 4270.c*..J.|
00001A60: 4A AA 31 00 77 2A 90 10 8B 20 4A B3 B2 42 AB 31 |J.1.w*... J..B.1|
00001A70: 20 A7 20 34 32 32 30 00 95 2A 9A 10 81 20 49 B2 | . 4220..*... I.|
00001A80: 42 AA 31 20 A4 20 42 AA 31 30 3A 42 24 28 49 29 |B.1 . B.10:B$(I)|
00001A90: B2 22 22 3A 82 00 9B 2A A4 10 8E 00 AA 2A AE 10 |."":...*.....*..|
00001AA0: 81 20 49 B2 20 4A 20 A4 20 42 00 BC 2A B8 10 42 |. I. J . B..*..B|
00001AB0: 24 28 49 29 B2 42 24 28 49 AA 31 29 00 C2 2A C2 |$(I).B$(I.1)..*.|
00001AC0: 10 82 00 D9 2A CC 10 4A B2 4A AB 31 3A 42 B2 42 |....*..J.J.1:B.B|
00001AD0: AB 31 3A 89 20 34 32 33 30 00 DF 2A D6 10 8E 00 |.1:. 4230..*....|
00001AE0: E5 2A 88 13 8F 00 08 2B 92 13 8F 20 2A 2A 2A 20 |.*.....+... *** |
00001AF0: 44 41 54 45 4E 20 46 49 4C 45 20 53 50 45 49 43 |DATEN FILE SPEIC|
00001B00: 48 45 52 4E 20 2A 2A 2A 00 0E 2B 9C 13 8F 00 33 |HERN ***..+....3|
00001B10: 2B A6 13 99 20 56 24 3B 22 44 41 54 45 4E 20 57 |+... V$;"DATEN W|
00001B20: 45 52 44 45 4E 20 47 45 53 50 45 49 43 48 45 52 |ERDEN GESPEICHER|
00001B30: 54 20 22 00 6D 2B B0 13 8D 20 31 37 30 30 30 3A |T ".m+... 17000:|
00001B40: 49 B2 30 3A 99 20 58 24 3B 22 53 49 43 48 45 52 |I.0:. X$;"SICHER|
00001B50: 20 3F 20 28 4A 2F 4E 29 22 3A 8D 20 31 31 30 30 | ? (J/N)":. 1100|
00001B60: 30 3A 8B 41 24 B3 B1 22 4A 22 A7 20 8E 00 8A 2B |0:.A$.."J". ...+|
00001B70: BA 13 9F 20 32 2C 38 2C 32 2C 22 40 3A 22 20 AA |... 2,8,2,"@:" .|
00001B80: 46 49 24 AA 22 2C 53 2C 57 22 00 B4 2B C4 13 8D |FI$.",S,W"..+...|
00001B90: 20 31 36 30 30 30 3A 99 58 24 3B 4B 24 3A 8B 20 | 16000:.X$;K$:. |
00001BA0: 54 B3 B1 30 20 A7 20 A0 20 32 3A 8D 20 31 30 30 |T..0 . . 2:. 100|
00001BB0: 30 30 3A 8E 00 BD 2B CE 13 98 32 2C 42 00 E3 2B |00:...+...2,B..+|
00001BC0: D8 13 8B 20 47 B2 31 20 A7 20 81 20 49 B2 31 20 |... G.1 . . I.1 |
00001BD0: A4 20 5A 3A 98 32 2C 42 24 28 49 29 3A 89 20 35 |. Z:.2,B$(I):. 5|
00001BE0: 31 30 30 00 FA 2B E2 13 81 20 49 B2 31 20 A4 20 |100..+... I.1 . |
00001BF0: 42 3A 98 32 2C 42 24 28 49 29 00 00 2C EC 13 82 |B:.2,B$(I)..,...|
00001C00: 00 08 2C F6 13 A0 20 32 00 0E 2C 00 14 8E 00 14 |..,... 2..,.....|
00001C10: 2C 70 17 8F 00 36 2C 7A 17 8F 20 2A 2A 2A 20 44 |,p...6,z.. *** D|
00001C20: 41 54 45 4E 20 46 49 4C 45 20 45 49 4E 4C 45 53 |ATEN FILE EINLES|
00001C30: 45 4E 20 2A 2A 2A 00 3C 2C 84 17 8F 00 66 2C 8E |EN ***.<,....f,.|
00001C40: 17 99 20 56 24 3B 22 44 41 54 45 4E 20 57 45 52 |.. V$;"DATEN WER|
00001C50: 44 45 4E 20 47 45 4C 45 53 45 4E 20 22 3A 99 20 |DEN GELESEN ":. |
00001C60: 58 24 3B 5A 4D 24 00 7F 2C 98 17 8D 20 31 37 30 |X$;ZM$..,... 170|
00001C70: 30 30 3A 8B 20 4B 24 B2 22 5F 22 20 A7 20 8E 00 |00:. K$."_" . ..|
00001C80: AB 2C A2 17 99 20 58 24 3B 22 44 41 54 45 4E 20 |.,... X$;"DATEN |
00001C90: 46 49 4C 45 20 22 3B 46 49 24 22 20 45 49 4E 4C |FILE ";FI$" EINL|
00001CA0: 45 53 45 4E 20 28 4A 2F 4E 29 22 00 B7 2C AC 17 |ESEN (J/N)"..,..|
00001CB0: 8D 20 31 31 30 30 30 00 C8 2C B6 17 8B 20 41 24 |. 11000..,... A$|
00001CC0: B3 B1 22 4A 22 A7 20 8E 00 E9 2C C0 17 9F 20 32 |.."J". ...,... 2|
00001CD0: 2C 38 2C 30 2C 46 49 24 AA 22 2C 53 2C 52 22 3A |,8,0,FI$.",S,R":|
00001CE0: 99 22 11 11 1D 1D 1D 22 3B 00 18 2D CA 17 8D 20 |.".....";..-... |
00001CF0: 31 36 30 30 30 3A 99 22 20 12 22 4B 24 22 11 11 |16000:." ."K$"..|
00001D00: 22 3A 8B 20 54 B3 B1 30 20 A7 20 8D 20 31 30 30 |":. T..0 . . 100|
00001D10: 30 30 3A A0 20 32 3A 8E 00 21 2D D4 17 84 32 2C |00:. 2:..!-...2,|
00001D20: 42 00 35 2D DE 17 81 20 49 B2 46 4A AA 31 20 A4 |B.5-... I.FJ.1 .|
00001D30: 20 42 AA 46 4A 00 51 2D E8 17 84 32 2C 42 24 28 | B.FJ.Q-...2,B$(|
00001D40: 49 29 3A 82 3A A0 20 32 3A 42 B2 42 AA 46 4A 3A |I):.:. 2:B.B.FJ:|
00001D50: 8E 00 70 2D 9C 18 99 20 56 24 3B 22 44 49 53 4B |..p-... V$;"DISK|
00001D60: 20 4F 50 45 52 41 54 49 4F 4E 20 4D 4F 44 45 22 | OPERATION MODE"|
00001D70: 00 9A 2D A6 18 99 58 24 3B 22 44 49 53 4B 45 54 |..-...X$;"DISKET|
00001D80: 54 45 4E 42 45 46 45 48 4C 45 20 53 2C 20 56 2C |TENBEFEHLE S, V,|
00001D90: 20 4E 2C 20 52 2C 20 49 20 22 00 D8 2D B0 18 99 | N, R, I "..-...|
00001DA0: 20 58 24 3B 22 42 45 46 45 48 4C 20 3F 22 3B 3A | X$;"BEFEHL ?";:|
00001DB0: 8D 20 31 38 30 30 30 3A 46 49 24 B2 4B 24 3A 99 |. 18000:FI$.K$:.|
00001DC0: 20 58 24 3B 22 41 55 53 46 55 45 48 52 45 4E 20 | X$;"AUSFUEHREN |
00001DD0: 28 4A 2F 4E 29 20 3F 22 00 E4 2D B5 18 8D 20 31 |(J/N) ?"..-... 1|
00001DE0: 31 30 30 30 00 F5 2D BA 18 8B 20 41 24 B2 22 5F |1000..-... A$."_|
00001DF0: 22 20 A7 20 8E 00 2A 2E C4 18 8B 41 24 B2 22 4A |" . ..*....A$."J|
00001E00: 22 A7 9F 31 35 2C 38 2C 31 35 3A 98 31 35 2C 46 |"..15,8,15:.15,F|
00001E10: 49 24 3A A0 31 35 3A 8D 31 36 30 30 30 3A 8B 54 |I$:.15:.16000:.T|
00001E20: B3 B1 30 A7 99 58 24 3B 4B 24 00 36 2E C9 18 8D |..0..X$;K$.6....|
00001E30: 20 31 30 30 30 30 00 44 2E CA 18 8B 20 54 B2 30 | 10000.D.... T.0|
00001E40: 20 A7 20 8E 00 57 2E CE 18 99 22 13 22 3B 58 24 | . ..W....".";X$|
00001E50: 3A 89 20 36 33 31 30 00 5D 2E 58 1B 8F 00 72 2E |:. 6310.].X...r.|
00001E60: 62 1B 8F 20 2A 2A 2A 20 45 44 49 54 4F 52 20 2A |b.. *** EDITOR *|
00001E70: 2A 2A 00 78 2E 6C 1B 8F 00 86 2E 76 1B 97 20 36 |**.x.l.....v.. 6|
00001E80: 35 30 2C 31 32 38 00 B2 2E 80 1B 99 20 53 24 3B |50,128...... S$;|
00001E90: 22 93 1D 1D 1D 1D 1D 12 20 40 20 92 20 20 3A 20 |"....... @ . : |
00001EA0: 20 45 4C 45 4D 45 4E 54 20 4C 4F 45 53 43 48 45 | ELEMENT LOESCHE|
00001EB0: 4E 22 00 D6 2E 8A 1B 99 20 53 24 3B 22 12 20 5C |N"...... S$;". \|
00001EC0: 20 92 20 20 3A 20 20 45 4C 45 4D 45 4E 54 20 53 | . : ELEMENT S|
00001ED0: 55 43 48 45 4E 22 00 FE 2E 94 1B 99 20 53 24 3B |UCHEN"...... S$;|
00001EE0: 22 12 20 2A 20 92 20 20 3A 20 20 45 4C 45 4D 45 |". * . : ELEME|
00001EF0: 4E 54 20 56 45 52 42 45 53 53 45 52 4E 22 00 1E |NT VERBESSERN"..|
00001F00: 2F 9E 1B 99 20 53 24 3B 22 12 20 5F 20 92 20 20 |/... S$;". _ . |
00001F10: 3A 20 20 22 3B C9 28 5A 4D 24 2C 31 33 29 00 44 |: ";.(ZM$,13).D|
00001F20: 2F A8 1B 99 20 53 24 3B 22 12 20 50 20 92 20 20 |/... S$;". P . |
00001F30: 3A 20 20 45 4C 45 4D 45 4E 54 20 44 52 55 43 4B |: ELEMENT DRUCK|
00001F40: 45 4E 20 22 00 69 2F B2 1B 99 20 53 24 3B 22 12 |EN ".i/... S$;".|
00001F50: 20 20 20 92 20 20 3A 20 20 45 49 4E 20 45 4C 45 | . : EIN ELE|
00001F60: 4D 45 4E 54 20 56 4F 52 22 00 8F 2F BC 1B 99 20 |MENT VOR"../... |
00001F70: 53 24 3B 22 12 20 46 31 92 20 20 3A 20 20 32 30 |S$;". F1. : 20|
00001F80: 20 45 4C 45 4D 45 4E 54 45 20 56 4F 52 20 22 00 | ELEMENTE VOR ".|
00001F90: B8 2F C6 1B 99 20 53 24 3B 22 12 20 46 33 92 20 |./... S$;". F3. |
00001FA0: 20 3A 20 20 32 30 20 45 4C 45 4D 45 4E 54 45 20 | : 20 ELEMENTE |
00001FB0: 5A 55 52 55 45 43 4B 22 00 E1 2F D0 1B 99 20 53 |ZURUECK"../... S|
00001FC0: 24 3B 22 12 20 5E 20 92 20 20 3A 20 20 45 49 4E |$;". ^ . : EIN|
00001FD0: 20 45 4C 45 4D 45 4E 54 20 5A 55 52 55 45 43 4B | ELEMENT ZURUECK|
00001FE0: 22 00 09 30 DA 1B 99 20 53 24 3B 22 12 20 24 20 |"..0... S$;". $ |
00001FF0: 92 20 20 3A 20 20 44 4D 2D 4C 49 53 54 45 20 45 |. : DM-LISTE E|
00002000: 52 53 54 45 4C 4C 45 4E 22 00 39 30 DF 1B 99 20 |RSTELLEN".90... |
00002010: 53 24 3B 22 12 20 2B 20 92 20 20 3A 20 20 45 4C |S$;". + . : EL|
00002020: 45 4D 45 4E 54 20 45 49 4E 46 55 45 47 45 4E 11 |EMENT EINFUEGEN.|
00002030: 11 20 22 3A 99 22 91 91 22 00 48 30 E4 1B 81 20 |. ":."..".H0... |
00002040: 49 B2 20 31 20 A4 20 42 00 6A 30 EE 1B 99 22 91 |I. 1 . B.j0...".|
00002050: 1D 1D 1D 22 3B 5A 4B 24 22 11 22 3A 99 22 1D 1D |...";ZK$".":."..|
00002060: 1D 20 20 22 3B 42 24 28 49 29 00 76 30 F8 1B 8D |. ";B$(I).v0...|
00002070: 20 31 31 30 30 30 00 97 30 02 1C 8B 20 42 24 28 | 11000..0... B$(|
00002080: 49 29 B2 22 22 AF 20 42 B1 31 20 A7 20 41 24 B2 |I)."". B.1 . A$.|
00002090: 22 40 22 3A 49 B2 31 00 C3 30 0C 1C 8B 20 41 24 |"@":I.1..0... A$|
000020A0: B2 22 40 22 AF 20 42 B1 31 20 A7 20 42 24 28 49 |."@". B.1 . B$(I|
000020B0: 29 B2 42 24 28 42 29 3A 42 B2 42 AB 31 3A 41 24 |).B$(B):B.B.1:A$|
000020C0: B2 22 22 00 E4 30 16 1C 8B 20 41 24 B2 C7 28 31 |.""..0... A$..(1|
000020D0: 33 33 29 20 AF 49 AA 32 30 B3 42 20 A7 20 49 B2 |33) .I.20.B . I.|
000020E0: 49 AA 32 30 00 05 31 20 1C 8B 20 41 24 B2 C7 28 |I.20..1 .. A$..(|
000020F0: 31 33 34 29 20 AF 49 AB 32 30 B1 30 20 A7 20 49 |134) .I.20.0 . I|
00002100: B2 49 AB 32 30 00 3F 31 2A 1C 8B 20 41 24 B2 22 |.I.20.?1*.. A$."|
00002110: 2A 22 20 A7 99 22 91 91 1D 1D 1D 1D 1D 22 3B 22 |*" ..".......";"|
00002120: 12 4B 4F 52 52 45 4B 54 55 52 45 4C 45 4D 45 4E |.KORREKTURELEMEN|
00002130: 54 22 3A 85 22 1D 1D 1D 22 3B 42 24 28 49 29 00 |T":."...";B$(I).|
00002140: 72 31 34 1C 8B 20 41 24 B2 22 2A 22 A7 20 99 22 |r14.. A$."*". ."|
00002150: 91 91 22 3B 5A 4B 24 3A 99 3A 8B 20 42 24 28 49 |..";ZK$:.:. B$(I|
00002160: 29 B2 22 22 A7 20 42 24 28 49 29 B2 22 5A 5A 5A |)."". B$(I)."ZZZ|
00002170: 5A 22 00 8E 31 39 1C 8B 20 41 24 B2 22 24 22 A7 |Z"..19.. A$."$".|
00002180: 20 8D 20 37 35 30 30 3A 89 20 37 30 30 30 00 AC | . 7500:. 7000..|
00002190: 31 3E 1C 8B 20 41 24 B2 22 5F 22 A7 20 41 24 B2 |1>.. A$."_". A$.|
000021A0: 22 22 3A 97 20 36 35 30 2C 30 3A 8E 00 CE 31 48 |"":. 650,0:...1H|
000021B0: 1C 8B 20 41 24 B2 22 5E 22 A7 20 49 B2 49 AB 32 |.. A$."^". I.I.2|
000021C0: 3A 8B 20 49 B3 31 20 A7 20 49 B2 42 AB 31 00 14 |:. I.1 . I.B.1..|
000021D0: 32 52 1C 8B 20 41 24 B2 22 2B 22 A7 20 42 B2 42 |2R.. A$."+". B.B|
000021E0: AA 31 3A 99 22 12 91 91 1D 1D 1D 1D 1D 4E 45 55 |.1:."........NEU|
000021F0: 45 53 20 45 4C 45 4D 45 4E 54 22 3A 85 22 1D 1D |ES ELEMENT":."..|
00002200: 1D 22 3B 42 24 28 42 29 3A 99 22 91 91 22 3B 5A |.";B$(B):."..";Z|
00002210: 4B 24 3A 99 00 32 32 5C 1C 8B 20 41 24 B2 22 50 |K$:..22\.. A$."P|
00002220: 22 A7 20 98 34 2C 22 20 20 20 20 22 3B 42 24 28 |". .4," ";B$(|
00002230: 49 29 00 7A 32 66 1C 8B 41 24 B2 22 5C 22 A7 99 |I).z2f..A$."\"..|
00002240: 56 24 3B 22 4E 41 43 48 20 57 45 4C 43 48 45 4D |V$;"NACH WELCHEM|
00002250: 20 45 4C 45 4D 45 4E 54 20 53 55 43 48 45 4E 20 | ELEMENT SUCHEN |
00002260: 3F 22 3A 99 58 24 3B 3A 8D 31 38 30 30 30 3A 8D |?":.X$;:.18000:.|
00002270: 37 33 31 30 3A 89 37 30 30 30 00 9F 32 70 1C 8B |7310:.7000..2p..|
00002280: 20 C8 28 42 24 28 42 29 2C 34 29 B2 22 5A 5A 5A | .(B$(B),4)."ZZZ|
00002290: 5A 22 AF 20 49 B1 31 20 A7 20 42 B2 42 AB 31 00 |Z". I.1 . B.B.1.|
000022A0: B9 32 7A 1C 99 22 91 91 91 1D 1D 1D 22 3B 5A 4B |.2z.."......";ZK|
000022B0: 24 3A 82 3A 89 37 31 34 30 00 BF 32 84 1C 8E 00 |$:.:.7140..2....|
000022C0: CE 32 8E 1C 8B 20 4B 24 B2 22 22 A7 20 8E 00 EA |.2... K$."". ...|
000022D0: 32 98 1C 46 B2 30 3A 8B 20 C9 28 4B 24 2C 31 29 |2..F.0:. .(K$,1)|
000022E0: B2 22 2A 22 20 A7 20 46 B2 31 00 08 33 A2 1C 51 |."*" . F.1..3..Q|
000022F0: B2 C3 28 4B 24 29 AB 46 3A 51 24 B2 C8 28 4B 24 |..(K$).F:Q$..(K$|
00002300: 2C 51 29 3A 45 5A B2 30 00 35 33 AC 1C 45 45 24 |,Q):EZ.0.53..EE$|
00002310: B2 22 20 4B 45 49 4E 20 57 45 49 54 45 52 45 53 |." KEIN WEITERES|
00002320: 22 3A 45 59 24 B2 22 20 56 4F 52 48 41 4E 44 45 |":EY$." VORHANDE|
00002330: 4E 20 22 3A 99 00 43 33 B6 1C 81 20 4B B2 31 20 |N ":..C3... K.1 |
00002340: A4 20 42 00 67 33 C0 1C 8B 20 C8 28 42 24 28 4B |. B.g3... .(B$(K|
00002350: 29 2C 51 29 B2 51 24 20 A7 20 45 5A B2 31 3A 53 |),Q).Q$ . EZ.1:S|
00002360: 45 B2 31 3A 52 B2 31 00 76 33 CA 1C 8B 20 53 45 |E.1:R.1.v3... SE|
00002370: B2 30 20 A7 20 82 00 9B 33 D4 1C 33 F9 53 45 B2 |.0 . ...3..3.SE.|
00002380: 31 20 A7 99 22 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 42 |1 .."........";B|
00002390: 24 28 4B 29 3A 53 45 B2 30 3A 82 00 BB 33 DE 1C |$(K):SE.0:...3..|
000023A0: 8B 20 45 5A B2 30 20 A7 99 22 1D 1D 11 12 22 3B |. EZ.0 .."....";|
000023B0: 45 5A 24 AA 45 58 24 AA 45 59 24 00 E8 33 E8 1C |EZ$.EX$.EY$..3..|
000023C0: 8B 45 5A B2 31 A7 99 22 11 11 22 3A 99 22 1D 1D |.EZ.1.."..":."..|
000023D0: 12 22 3B 45 45 24 AA 45 5A 24 AA 45 59 24 3A 99 |.";EE$.EZ$.EY$:.|
000023E0: 22 1D 1D 22 3B 57 53 24 00 FC 33 F2 1C 99 58 24 |"..";WS$..3...X$|
000023F0: 3B 5A 4D 24 3A 8D 20 31 31 30 30 30 00 02 34 FC |;ZM$:. 11000..4.|
00002400: 1C 8E 00 40 34 4C 1D 99 22 93 11 11 1D 1D 12 20 |...@4L.."...... |
00002410: 44 4D 2D 4C 49 53 54 45 4E 45 52 53 54 45 4C 4C |DM-LISTENERSTELL|
00002420: 45 55 4E 47 20 92 11 11 22 3A 99 22 11 11 22 3B |EUNG ...":."..";|
00002430: 58 24 3B 5A 4D 24 3A 99 22 13 11 11 11 11 11 22 |X$;ZM$:."......"|
00002440: 00 69 34 56 1D 81 20 4A B2 31 20 A4 20 42 3A 99 |.i4V.. J.1 . B:.|
00002450: 22 20 20 22 3B 3A 43 24 B2 C8 28 42 24 28 4A 29 |" ";:C$..(B$(J)|
00002460: 2C 31 37 29 3A 99 43 24 3B 00 98 34 60 1D 46 24 |,17):.C$;..4`.F$|
00002470: B2 C9 28 5A 4B 24 AA C4 28 B5 28 C5 28 C9 28 42 |..(ZK$..(.(.(.(B|
00002480: 24 28 4A 29 2C 33 29 29 AD 34 AA 2E 35 29 29 2C |$(J),3)).4..5)),|
00002490: 32 29 3A 99 20 46 24 3B 00 BE 34 6A 1D 99 22 20 |2):. F$;..4j.." |
000024A0: 30 30 30 9D 9D 9D 9D 22 3B 3A 8D 20 31 38 30 30 |000....";:. 1800|
000024B0: 30 3A 8B 20 4B 24 B2 22 5F 22 20 A7 20 8E 00 DE |0:. K$."_" . ...|
000024C0: 34 74 1D 42 24 28 4A 29 B2 43 24 AA 46 24 AA 22 |4t.B$(J).C$.F$."|
000024D0: 20 22 AA C8 28 4B 24 AA 5A 4B 24 2C 33 29 00 EC | "..(K$.ZK$,3)..|
000024E0: 34 7E 1D 99 22 91 22 3B 3A 82 3A 8E 00 F2 34 40 |4~..".";:.:...4@|
000024F0: 1F 8F 00 13 35 4A 1F 8F 20 2A 2A 2A 20 42 49 4C |....5J.. *** BIL|
00002500: 44 53 43 48 49 52 4D 2D 41 55 53 47 41 42 45 20 |DSCHIRM-AUSGABE |
00002510: 2A 2A 2A 00 19 35 54 1F 8F 00 66 35 5E 1F 99 56 |***..5T...f5^..V|
00002520: 24 3B 22 49 4E 48 41 4C 54 20 45 49 4E 45 52 20 |$;"INHALT EINER |
00002530: 44 49 53 4B 20 4C 49 53 54 45 4E 20 22 3A 99 58 |DISK LISTEN ":.X|
00002540: 24 3B 22 4F 44 45 52 20 41 4C 4C 45 20 44 49 53 |$;"ODER ALLE DIS|
00002550: 4B 20 44 41 54 45 4E 20 4C 49 53 54 45 4E 20 28 |K DATEN LISTEN (|
00002560: 45 2F 41 29 20 22 00 72 35 68 1F 8D 20 31 31 30 |E/A) ".r5h.. 110|
00002570: 30 30 00 87 35 72 1F 3A 8B 20 41 24 B2 22 45 22 |00..5r.:. A$."E"|
00002580: 20 A7 20 38 31 32 30 00 99 35 7C 1F 99 56 24 3B | . 8120..5|..V$;|
00002590: 5A 4D 24 3A 99 3A 5A B2 31 00 AE 35 86 1F 81 20 |ZM$:.:Z.1..5... |
000025A0: 49 B2 31 20 A4 20 42 3A 20 5A B2 5A AA 31 00 DC |I.1 . B: Z.Z.1..|
000025B0: 35 90 1F 99 22 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 42 |5..."........";B|
000025C0: 24 28 49 29 3A 8B 20 C2 28 36 33 31 29 B2 39 35 |$(I):. .(631).95|
000025D0: 20 A7 20 97 20 31 39 38 2C 30 3A 8E 00 FE 35 9A | . . 198,0:...5.|
000025E0: 1F 8B 20 5A B2 32 33 20 A7 8D 20 31 31 30 30 30 |.. Z.23 .. 11000|
000025F0: 3A 5A B2 31 3A 8B 20 48 B2 31 20 A7 20 8E 00 0E |:Z.1:. H.1 . ...|
00002600: 36 A4 1F 82 20 3A 20 8D 20 31 30 30 30 30 00 14 |6... : . 10000..|
00002610: 36 AE 1F 8E 00 51 36 B8 1F 99 56 24 3B 22 57 45 |6....Q6...V$;"WE|
00002620: 4C 43 48 45 20 44 49 53 4B 20 4C 49 53 54 45 4E |LCHE DISK LISTEN|
00002630: 20 22 3A 99 58 24 3B 22 49 44 2E 4E 52 20 45 49 | ":.X$;"ID.NR EI|
00002640: 4E 47 45 42 45 4E 20 22 3B 3A 8D 20 31 38 30 30 |NGEBEN ";:. 1800|
00002650: 30 00 86 36 C2 1F 81 20 49 B2 31 20 A4 20 42 3A |0..6... I.1 . B:|
00002660: 8B 20 4B 24 B2 CA 28 42 24 28 49 29 2C 31 38 2C |. K$..(B$(I),18,|
00002670: 32 29 20 A7 20 99 22 1D 1D 1D 1D 1D 1D 1D 1D 22 |2) . ."........"|
00002680: 3B 42 24 28 49 29 00 8C 36 CC 1F 82 00 98 36 D6 |;B$(I)..6.....6.|
00002690: 1F 8D 20 31 30 30 30 30 00 D5 36 E0 1F 99 58 24 |.. 10000..6...X$|
000026A0: 3B 22 4E 4F 43 48 20 45 49 4E 45 20 44 49 53 4B |;"NOCH EINE DISK|
000026B0: 20 4C 49 53 54 45 4E 20 28 4A 2F 4E 29 20 22 3A | LISTEN (J/N) ":|
000026C0: 8D 31 31 30 30 30 3A 8B 20 41 24 B2 22 4A 22 A7 |.11000:. A$."J".|
000026D0: 20 38 31 32 30 00 DB 36 EA 1F 8E 00 E1 36 08 20 | 8120..6.....6. |
000026E0: 8F 00 11 37 12 20 8F 20 2A 2A 2A 20 4C 49 53 54 |...7. . *** LIST|
000026F0: 45 4E 20 4E 41 43 48 20 49 44 20 4B 52 49 54 45 |EN NACH ID KRITE|
00002700: 52 49 55 4D 20 45 52 53 54 45 4C 4C 45 4E 20 2A |RIUM ERSTELLEN *|
00002710: 2A 00 17 37 1C 20 8F 00 4D 37 26 20 99 56 24 3B |*..7. ..M7& .V$;|
00002720: 22 4C 49 53 54 45 4E 20 4E 41 43 48 20 49 44 20 |"LISTEN NACH ID |
00002730: 4B 52 49 54 45 52 49 55 4D 20 45 52 53 54 45 4C |KRITERIUM ERSTEL|
00002740: 4C 45 4E 20 22 3A 99 58 24 3B 5A 4D 24 00 8A 37 |LEN ":.X$;ZM$..7|
00002750: 30 20 99 58 24 3B 22 4E 41 43 48 20 57 45 4C 43 |0 .X$;"NACH WELC|
00002760: 48 45 4D 20 4B 52 49 54 45 52 49 55 4D 20 53 55 |HEM KRITERIUM SU|
00002770: 43 48 45 4E 20 3F 22 3B 3A 8D 31 38 30 30 30 3A |CHEN ?";:.18000:|
00002780: 46 24 B2 C8 28 4B 24 2C 31 29 00 9A 37 3A 20 8B |F$..(K$,1)..7: .|
00002790: 20 46 24 B2 22 5F 22 A7 20 8E 00 D0 37 44 20 99 | F$."_". ...7D .|
000027A0: 58 24 3B 22 44 41 54 45 4E 44 49 53 4B 45 54 54 |X$;"DATENDISKETT|
000027B0: 45 20 45 49 4E 4C 45 47 45 4E 20 22 3A 8D 31 37 |E EINLEGEN ":.17|
000027C0: 30 30 30 3A 46 49 24 B2 22 40 3A 22 AA 46 49 24 |000:FI$."@:".FI$|
000027D0: 00 FC 37 4E 20 58 B2 30 3A 81 20 49 B2 31 20 A4 |..7N X.0:. I.1 .|
000027E0: 20 42 3A 8B 20 CA 28 42 24 28 49 29 2C 31 38 2C | B:. .(B$(I),18,|
000027F0: 31 29 B2 46 24 A7 20 58 B2 58 AA 31 00 02 38 58 |1).F$. X.X.1..8X|
00002800: 20 82 00 30 38 62 20 8B 20 58 B2 30 20 A7 99 58 | ..08b . X.0 ..X|
00002810: 24 3B 22 4B 45 49 4E 20 45 4C 45 4D 45 4E 54 20 |$;"KEIN ELEMENT |
00002820: 56 4F 52 48 2E 22 3A 8D 20 31 30 30 30 30 3A 8E |VORH.":. 10000:.|
00002830: 00 4B 38 6C 20 9F 31 2C 38 2C 31 2C 46 49 24 AA |.K8l .1,8,1,FI$.|
00002840: 22 2C 53 2C 57 22 3A 98 31 2C 58 00 6E 38 76 20 |",S,W":.1,X.n8v |
00002850: 8D 20 31 36 30 30 30 3A 8B 20 54 B3 B1 30 20 A7 |. 16000:. T..0 .|
00002860: 20 8D 20 31 30 30 30 30 3A A0 20 31 3A 8E 00 A9 | . 10000:. 1:...|
00002870: 38 80 20 81 20 49 B2 31 A4 20 42 3A 8B 20 CA 28 |8. . I.1. B:. .(|
00002880: 42 24 28 49 29 2C 31 38 2C 31 29 B2 46 24 A7 99 |B$(I),18,1).F$..|
00002890: 22 20 20 20 20 20 20 20 20 22 3B 42 24 28 49 29 |" ";B$(I)|
000028A0: 3A 98 31 2C 42 24 28 49 29 00 B5 38 8A 20 82 3A |:.1,B$(I)..8. .:|
000028B0: A0 20 31 3A 8E 00 BB 38 28 23 8F 00 E2 38 32 23 |. 1:...8(#...82#|
000028C0: 8F 20 2A 2A 2A 20 44 41 54 45 4E 20 45 52 57 45 |. *** DATEN ERWE|
000028D0: 49 54 45 52 4E 2F 4C 4F 45 53 43 48 45 4E 20 2A |ITERN/LOESCHEN *|
000028E0: 2A 2A 00 E8 38 3C 23 8F 00 08 39 46 23 99 56 24 |**..8<#...9F#.V$|
000028F0: 3B 22 46 31 20 92 20 44 41 54 45 4E 20 45 52 57 |;"F1 . DATEN ERW|
00002900: 45 49 54 45 52 4E 20 22 00 2B 39 50 23 99 58 24 |EITERN ".+9P#.X$|
00002910: 3B 22 46 33 20 92 20 44 41 54 45 4E 20 46 49 4C |;"F3 . DATEN FIL|
00002920: 45 20 5A 55 4C 41 44 45 4E 20 22 00 53 39 5A 23 |E ZULADEN ".S9Z#|
00002930: 99 58 24 3B 22 46 35 20 92 20 44 41 54 45 4E 20 |.X$;"F5 . DATEN |
00002940: 4C 4F 45 53 43 48 45 4E 20 28 49 44 2E 4E 52 2E |LOESCHEN (ID.NR.|
00002950: 29 20 22 00 7A 39 64 23 99 58 24 3B 22 46 37 20 |) ".z9d#.X$;"F7 |
00002960: 92 20 53 54 41 4E 44 41 52 44 4B 4F 50 46 20 53 |. STANDARDKOPF S|
00002970: 50 45 49 43 48 45 52 4E 20 22 00 86 39 6E 23 99 |PEICHERN "..9n#.|
00002980: 58 24 3B 5A 4D 24 00 92 39 78 23 8D 20 31 31 30 |X$;ZM$..9x#. 110|
00002990: 30 30 00 A5 39 82 23 8B 20 41 24 B2 C7 28 39 35 |00..9.#. A$..(95|
000029A0: 29 20 A7 20 8E 00 C9 39 8C 23 8B 20 41 24 B2 C7 |) . ...9.#. A$..|
000029B0: 28 31 33 33 29 A7 20 47 54 B2 31 3A 49 B2 42 AA |(133). GT.1:I.B.|
000029C0: 31 20 3A 89 20 31 30 30 30 00 EE 39 96 23 8B 20 |1 :. 1000..9.#. |
000029D0: 41 24 B2 C7 28 31 33 34 29 A7 20 46 4A B2 42 3A |A$..(134). FJ.B:|
000029E0: 8D 20 36 30 30 30 3A 46 4A 20 B2 30 3A 8E 00 05 |. 6000:FJ .0:...|
000029F0: 3A A0 23 8B 20 41 24 B2 C7 28 31 33 35 29 20 A7 |:.#. A$..(135) .|
00002A00: 20 39 31 36 30 00 40 3A AA 23 8B 41 24 B2 C7 28 | 9160.@:.#.A$..(|
00002A10: 31 33 36 29 A7 20 9F 20 37 2C 38 2C 37 2C 22 40 |136). . 7,8,7,"@|
00002A20: 3A 53 54 41 4E 44 41 52 44 4B 4F 50 46 2C 53 2C |:STANDARDKOPF,S,|
00002A30: 57 22 3A 98 37 2C 42 4E 24 3A 98 37 2C 42 41 24 |W":.7,BN$:.7,BA$|
00002A40: 00 63 3A B4 23 8B 20 41 24 B2 C7 28 31 33 36 29 |.c:.#. A$..(136)|
00002A50: A7 20 98 37 2C 42 57 24 3A 98 37 2C 42 54 24 3A |. .7,BW$:.7,BT$:|
00002A60: A0 20 37 00 6E 3A BE 23 89 20 39 30 33 30 00 A2 |. 7.n:.#. 9030..|
00002A70: 3A C8 23 99 56 24 3B 22 45 49 4E 47 41 42 45 20 |:.#.V$;"EINGABE |
00002A80: 44 45 52 20 5A 55 20 4C 4F 45 53 43 48 45 4E 44 |DER ZU LOESCHEND|
00002A90: 45 4E 20 49 44 20 4E 52 2E 20 3F 20 22 3A 99 58 |EN ID NR. ? ":.X|
00002AA0: 24 3B 00 AE 3A D2 23 8D 20 31 38 30 30 30 00 DD |$;..:.#. 18000..|
00002AB0: 3A DC 23 99 58 24 3B 22 53 4F 4C 4C 20 22 3B 4B |:.#.X$;"SOLL ";K|
00002AC0: 24 3B 22 47 45 4C 4F 45 53 43 48 54 20 57 45 52 |$;"GELOESCHT WER|
00002AD0: 44 45 4E 20 28 4A 2F 4E 29 20 3F 20 22 00 F7 3A |DEN (J/N) ? "..:|
00002AE0: E6 23 8D 20 31 31 30 30 30 3A 8B 20 41 24 B3 B1 |.#. 11000:. A$..|
00002AF0: 22 4A 22 20 A7 20 8E 00 05 3B F0 23 81 20 49 B2 |"J" . ...;.#. I.|
00002B00: 31 20 A4 20 42 00 25 3B FA 23 8B 20 4B 24 B2 CA |1 . B.%;.#. K$..|
00002B10: 28 42 24 28 49 29 2C 31 38 2C 32 29 20 A7 20 8D |(B$(I),18,2) . .|
00002B20: 20 39 32 34 30 00 2B 3B 04 24 82 00 31 3B 0E 24 | 9240.+;.$..1;.$|
00002B30: 8E 00 4F 3B 18 24 81 20 4A B2 49 20 A4 20 42 3A |..O;.$. J.I . B:|
00002B40: 42 24 28 4A 29 B2 42 24 28 4A AA 31 29 3A 82 00 |B$(J).B$(J.1):..|
00002B50: 61 3B 22 24 49 B2 49 AB 31 3A 42 B2 42 AB 31 3A |a;"$I.I.1:B.B.1:|
00002B60: 8E 00 89 3B 10 27 99 58 24 3B 22 54 41 53 54 45 |...;.'.X$;"TASTE|
00002B70: 20 44 52 55 45 43 4B 45 4E 20 22 3A 54 B2 30 3A | DRUECKEN ":T.0:|
00002B80: 8D 20 31 31 30 30 30 3A 8E 00 A2 3B F8 2A A1 20 |. 11000:...;.*. |
00002B90: 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 31 31 30 |A$:. A$."" . 110|
00002BA0: 30 30 00 A8 3B 02 2B 8E 00 AE 3B E0 2E 8F 00 CF |00..;.+...;.....|
00002BB0: 3B EA 2E 8F 20 2A 2A 20 42 4C 4F 43 4B 53 20 46 |;... ** BLOCKS F|
00002BC0: 52 45 45 20 52 4F 55 54 49 4E 45 20 2A 2A 2A 00 |REE ROUTINE ***.|
00002BD0: D5 3B F4 2E 8F 00 EE 3B FE 2E 99 20 56 24 3B 42 |.;.....;... V$;B|
00002BE0: 46 24 3B 22 20 46 55 4E 4B 54 49 4F 4E 22 00 17 |F$;" FUNKTION"..|
00002BF0: 3C 08 2F 46 49 24 B2 22 40 3A 22 AA 42 46 24 3A |<./FI$."@:".BF$:|
00002C00: 81 20 49 B2 31 20 A4 20 32 30 30 3A 46 46 24 28 |. I.1 . 200:FF$(|
00002C10: 49 29 B2 22 22 3A 82 00 3C 3C 12 2F 46 46 B2 31 |I)."":..<<./FF.1|
00002C20: 3A 4B B2 32 3A 49 B2 32 3A 42 52 24 B2 22 46 55 |:K.2:I.2:BR$."FU|
00002C30: 4E 4B 54 49 4F 4E 20 45 4E 44 45 22 00 71 3C 1C |NKTION ENDE".q<.|
00002C40: 2F 99 58 24 3B 22 42 49 54 54 45 20 57 41 52 54 |/.X$;"BITTE WART|
00002C50: 45 4E 20 42 49 53 20 22 3B 42 52 24 3A 46 46 24 |EN BIS ";BR$:FF$|
00002C60: 28 31 29 B2 CA 28 42 24 28 31 29 2C 31 38 2C 32 |(1)..(B$(1),18,2|
00002C70: 29 00 8A 3C 26 2F 46 46 24 28 49 29 B2 CA 28 42 |)..<&/FF$(I)..(B|
00002C80: 24 28 4B 29 2C 31 38 2C 32 29 00 9A 3C 30 2F 81 |$(K),18,2)..<0/.|
00002C90: 20 4A B2 31 20 A4 20 49 AB 31 00 B6 3C 3A 2F 8B | J.1 . I.1..<:/.|
00002CA0: 20 46 46 24 28 49 29 B2 46 46 24 28 4A 29 20 A7 | FF$(I).FF$(J) .|
00002CB0: 20 31 32 31 32 30 00 BC 3C 44 2F 82 00 C6 3C 4E | 12120..<D/...<N|
00002CC0: 2F 49 B2 49 AA 31 00 DE 3C 58 2F 4B B2 4B AA 31 |/I.I.1..<X/K.K.1|
00002CD0: 3A 8B 20 4B B1 42 20 A7 20 31 32 31 34 30 00 EA |:. K.B . 12140..|
00002CE0: 3C 62 2F 89 20 31 32 30 37 30 00 F4 3C 6C 2F 5A |<b/. 12070..<l/Z|
00002CF0: B2 49 AB 31 00 04 3D 76 2F 81 20 43 B2 31 20 A4 |.I.1..=v/. C.1 .|
00002D00: 20 5A AB 31 00 32 3D 80 2F 4A B2 43 AA 31 3A 99 | Z.1.2=./J.C.1:.|
00002D10: 20 58 24 3B 22 45 4C 45 4D 45 4E 54 20 20 20 20 | X$;"ELEMENT |
00002D20: 20 20 20 9D 9D 9D 9D 22 3B 4A AB 31 3B 22 91 91 | ....";J.1;"..|
00002D30: 91 22 00 40 3D 8A 2F 81 20 44 B2 4A 20 A4 20 5A |.".@=./. D.J . Z|
00002D40: 00 5C 3D 94 2F 8B 20 46 46 24 28 43 29 B1 46 46 |.\=./. FF$(C).FF|
00002D50: 24 28 44 29 20 A7 20 31 32 32 30 30 00 68 3D 9E |$(D) . 12200.h=.|
00002D60: 2F 89 20 31 32 32 31 30 00 94 3D A8 2F 43 24 28 |/. 12210..=./C$(|
00002D70: 30 29 B2 46 46 24 28 43 29 3A 46 46 24 28 43 29 |0).FF$(C):FF$(C)|
00002D80: B2 46 46 24 28 44 29 3A 46 46 24 28 44 29 B2 43 |.FF$(D):FF$(D).C|
00002D90: 24 28 30 29 00 9A 3D B2 2F 82 00 A0 3D BC 2F 82 |$(0)..=./...=./.|
00002DA0: 00 D9 3D C6 2F 99 58 24 3B 22 42 4C 4F 43 4B 53 |..=./.X$;"BLOCKS|
00002DB0: 20 57 45 52 44 45 4E 20 41 44 44 49 45 52 54 22 | WERDEN ADDIERT"|
00002DC0: 3A 42 4C 24 B2 22 12 44 49 53 4B 20 22 3A 42 4D |:BL$.".DISK ":BM|
00002DD0: 24 B2 22 12 22 AA 42 46 24 00 E1 3D D0 2F 4A B2 |$.".".BF$..=./J.|
00002DE0: 31 00 FC 3D DA 2F 81 20 49 B2 31 20 A4 20 42 3A |1..=./. I.1 . B:|
00002DF0: 8B 20 49 B2 31 20 A7 20 47 53 B2 30 00 20 3E E4 |. I.1 . GS.0. >.|
00002E00: 2F 8B CA 28 42 24 28 49 29 2C 31 38 2C 32 29 B2 |/..(B$(I),18,2).|
00002E10: 46 46 24 28 4A 29 20 A7 20 8D 20 31 32 33 35 30 |FF$(J) . . 12350|
00002E20: 00 5D 3E EE 2F 82 3A 46 46 24 28 4A 29 B2 42 46 |.]>./.:FF$(J).BF|
00002E30: 24 AA 22 44 49 53 4B 20 22 AA 46 46 24 28 4A 29 |$."DISK ".FF$(J)|
00002E40: AA 22 20 22 AA C9 28 5A 4B 24 AA C4 28 36 36 34 |." "..(ZK$..(664|
00002E50: AB 47 53 29 2C 33 29 3A 4A B2 4A AA 31 00 71 3E |.GS),3):J.J.1.q>|
00002E60: F8 2F 8B 20 4A B3 5A AA 31 20 A7 20 31 32 32 35 |./. J.Z.1 . 1225|
00002E70: 30 00 7E 3E 02 30 99 20 58 24 3B 42 52 24 00 AD |0.~>.0. X$;BR$..|
00002E80: 3E 0C 30 99 58 24 3B 22 44 52 55 43 4B 45 52 20 |>.0.X$;"DRUCKER |
00002E90: 4F 44 45 52 20 53 43 52 45 45 4E 20 28 44 2F 53 |ODER SCREEN (D/S|
00002EA0: 29 20 22 3A 8D 20 31 31 30 30 30 3A 99 00 D5 3E |) ":. 11000:...>|
00002EB0: 16 30 8B 20 41 24 B3 B1 22 53 22 AF 20 41 24 B3 |.0. A$.."S". A$.|
00002EC0: B1 22 44 22 A7 20 8D 20 31 31 30 30 30 3A 89 20 |."D". . 11000:. |
00002ED0: 31 32 33 32 30 00 EA 3E 20 30 8B 20 41 24 B2 22 |12320..> 0. A$."|
00002EE0: 44 22 20 A7 20 31 32 33 38 30 00 07 3F 2A 30 81 |D" . 12380..?*0.|
00002EF0: 20 49 B2 31 20 A4 20 5A 3A 99 22 1D 1D 1D 1D 22 | I.1 . Z:."...."|
00002F00: 3B 46 46 24 28 49 29 00 1D 3F 34 30 8D 20 31 31 |;FF$(I)..?40. 11|
00002F10: 30 30 30 3A 82 3A 89 20 31 32 34 32 30 00 35 3F |000:.:. 12420.5?|
00002F20: 3E 30 47 B2 30 3A 47 B2 C5 28 C9 28 42 24 28 49 |>0G.0:G..(.(B$(I|
00002F30: 29 2C 33 29 29 00 41 3F 48 30 47 53 B2 47 53 AA |),3)).A?H0GS.GS.|
00002F40: 47 00 47 3F 52 30 8E 00 68 3F 5C 30 99 58 24 3B |G.G?R0..h?\0.X$;|
00002F50: 22 44 52 55 43 4B 45 52 20 45 49 4E 53 43 48 41 |"DRUCKER EINSCHA|
00002F60: 4C 54 45 4E 20 21 20 22 00 74 3F 66 30 8D 20 31 |LTEN ! ".t?f0. 1|
00002F70: 30 30 30 30 00 7E 3F 70 30 9F 20 34 2C 34 00 A7 |0000.~?p0. 4,4..|
00002F80: 3F 7A 30 81 20 49 B2 31 20 A4 20 5A 3A 98 34 2C |?z0. I.1 . Z:.4,|
00002F90: 22 20 20 20 20 20 22 3B 46 46 24 28 49 29 3A 82 |" ";FF$(I):.|
00002FA0: 3A 98 34 3A A0 20 34 00 E6 3F 84 30 99 56 24 3B |:.4:. 4..?.0.V$;|
00002FB0: 22 44 41 54 45 4E 20 41 55 46 20 44 49 53 4B 20 |"DATEN AUF DISK |
00002FC0: 53 50 45 49 43 48 45 52 4E 20 3F 20 28 4A 2F 4E |SPEICHERN ? (J/N|
00002FD0: 29 22 3A 8D 31 31 30 30 30 3A 8B 20 41 24 B3 B1 |)":.11000:. A$..|
00002FE0: 22 4A 22 A7 20 8E 00 09 40 8E 30 99 58 24 3B 22 |"J". ...@.0.X$;"|
00002FF0: 44 41 54 45 4E 20 44 49 53 4B 45 54 54 45 20 45 |DATEN DISKETTE E|
00003000: 49 4E 4C 45 47 45 4E 20 22 00 2D 40 98 30 8D 20 |INLEGEN ".-@.0. |
00003010: 31 30 30 30 30 3A 9F 20 32 2C 38 2C 32 2C 46 49 |10000:. 2,8,2,FI|
00003020: 24 AA 22 2C 53 2C 57 22 3A 98 32 2C 5A 00 4B 40 |$.",S,W":.2,Z.K@|
00003030: A2 30 81 20 49 B2 31 20 A4 20 5A 3A 98 32 2C 46 |.0. I.1 . Z:.2,F|
00003040: 46 24 28 49 29 3A 82 3A A0 20 32 00 51 40 AC 30 |F$(I):.:. 2.Q@.0|
00003050: 8E 00 57 40 B0 36 8F 00 81 40 BA 36 8F 20 2A 2A |..W@.6...@.6. **|
00003060: 2A 20 41 55 53 53 4F 52 54 49 45 52 45 4E 20 46 |* AUSSORTIEREN F|
00003070: 52 45 4D 44 45 52 20 4C 49 53 54 45 4E 20 2A 2A |REMDER LISTEN **|
00003080: 2A 00 87 40 C4 36 8F 00 95 40 CE 36 8B 20 42 B3 |*..@.6...@.6. B.|
00003090: 32 20 A7 20 8E 00 DE 40 D8 36 99 56 24 3B 22 41 |2 . ...@.6.V$;"A|
000030A0: 55 53 53 4F 52 54 49 45 52 52 45 4E 20 46 52 45 |USSORTIERREN FRE|
000030B0: 4D 44 45 52 20 4C 49 53 54 45 4E 22 3A 44 49 24 |MDER LISTEN":DI$|
000030C0: B2 22 40 3A 44 49 46 46 45 52 45 4E 5A 22 3A 4C |."@:DIFFERENZ":L|
000030D0: 49 24 B2 22 4C 49 53 54 45 22 3A 58 B2 31 00 10 |I$."LISTE":X.1..|
000030E0: 41 E2 36 99 58 24 3B 22 4D 49 54 20 57 45 4C 43 |A.6.X$;"MIT WELC|
000030F0: 48 45 52 20 4C 49 53 54 45 20 56 45 52 47 4C 45 |HER LISTE VERGLE|
00003100: 49 43 48 45 4E 20 3F 22 3A 8D 20 31 37 30 30 30 |ICHEN ?":. 17000|
00003110: 00 4F 41 EC 36 99 58 24 3B 22 57 49 56 49 45 4C |.OA.6.X$;"WIVIEL|
00003120: 20 5A 45 49 43 48 45 4E 20 56 45 52 47 4C 45 49 | ZEICHEN VERGLEI|
00003130: 43 48 45 4E 20 28 31 2D 32 30 29 20 22 3B 3A 8D |CHEN (1-20) ";:.|
00003140: 20 31 38 30 30 30 3A 53 4B B2 C5 28 4B 24 29 00 | 18000:SK..(K$).|
00003150: 63 41 F6 36 8B 20 53 4B B1 32 35 20 A7 20 53 4B |cA.6. SK.25 . SK|
00003160: B2 32 35 00 91 41 00 37 9F 20 35 2C 38 2C 35 2C |.25..A.7. 5,8,5,|
00003170: 46 49 24 AA 22 2C 53 2C 52 22 3A 8D 20 31 36 30 |FI$.",S,R":. 160|
00003180: 30 30 3A 8B 20 54 B3 B1 30 20 A7 20 31 34 31 30 |00:. T..0 . 1410|
00003190: 30 00 B6 41 0A 37 9F 20 32 2C 38 2C 32 2C 22 40 |0..A.7. 2,8,2,"@|
000031A0: 3A 4C 49 53 54 45 22 AA 22 2C 53 2C 57 22 3A 8D |:LISTE".",S,W":.|
000031B0: 20 31 36 30 30 30 00 E5 41 14 37 8B 20 54 B3 B1 | 16000..A.7. T..|
000031C0: 30 20 A7 20 A0 20 35 3A A0 20 32 3A 20 99 58 24 |0 . . 5:. 2: .X$|
000031D0: 3B 4B 24 3A 99 58 24 3B 5A 4D 24 3A 8D 20 31 31 |;K$:.X$;ZM$:. 11|
000031E0: 30 30 30 3A 8E 00 EE 41 1E 37 84 35 2C 43 00 FC |000:...A.7.5,C..|
000031F0: 41 28 37 81 20 4A B2 31 20 A4 20 43 00 12 42 32 |A(7. J.1 . C..B2|
00003200: 37 84 35 2C 44 24 3A 99 22 1D 1D 1D 1D 1D 22 3B |7.5,D$:.".....";|
00003210: 44 24 00 20 42 3C 37 81 20 49 B2 31 20 A4 20 42 |D$. B<7. I.1 . B|
00003220: 00 42 42 46 37 8B 20 C8 28 44 24 2C 53 4B 29 B2 |.BBF7. .(D$,SK).|
00003230: C8 28 42 24 28 49 29 2C 53 4B 29 A7 20 31 34 33 |.(B$(I),SK). 143|
00003240: 30 30 00 4A 42 50 37 82 20 49 00 5A 42 5A 37 98 |00.JBP7. I.ZBZ7.|
00003250: 32 2C 44 24 3A 58 B2 58 AA 31 00 62 42 64 37 82 |2,D$:X.X.1.bBd7.|
00003260: 20 4A 00 73 42 6E 37 A0 35 3A A0 20 32 3A 58 B2 | J.sBn7.5:. 2:X.|
00003270: 58 AB 31 00 A9 42 78 37 8B 20 58 B2 30 20 A7 99 |X.1..Bx7. X.0 ..|
00003280: 22 93 11 12 20 4B 45 49 4E 20 4E 45 55 45 53 20 |"... KEIN NEUES |
00003290: 45 4C 45 4D 45 4E 54 20 47 45 46 55 4E 44 45 4E |ELEMENT GEFUNDEN|
000032A0: 22 3A 89 20 31 30 30 30 30 00 C0 42 82 37 9F 20 |":. 10000..B.7. |
000032B0: 37 2C 38 2C 37 2C 44 49 24 AA 22 2C 53 2C 57 22 |7,8,7,DI$.",S,W"|
000032C0: 00 C9 42 8C 37 98 37 2C 58 00 E0 42 96 37 9F 20 |..B.7.7,X..B.7. |
000032D0: 35 2C 38 2C 35 2C 4C 49 24 AA 22 2C 53 2C 52 22 |5,8,5,LI$.",S,R"|
000032E0: 00 FC 42 A0 37 81 20 49 B2 31 20 A4 20 58 3A 84 |..B.7. I.1 . X:.|
000032F0: 35 2C 44 24 3A 98 37 2C 44 24 3A 82 00 08 43 AA |5,D$:.7,D$:...C.|
00003300: 37 A0 20 37 3A A0 20 35 00 30 43 B4 37 99 56 24 |7. 7:. 5.0C.7.V$|
00003310: 3B 22 44 41 53 20 41 55 53 53 4F 52 54 49 45 52 |;"DAS AUSSORTIER|
00003320: 45 4E 20 49 53 54 20 42 45 45 4E 44 45 54 20 22 |EN IST BEENDET "|
00003330: 00 57 43 BE 37 99 58 24 3B 22 44 41 53 20 44 41 |.WC.7.X$;"DAS DA|
00003340: 54 45 4E 46 49 4C 45 20 3C 20 44 49 46 46 45 52 |TENFILE < DIFFER|
00003350: 45 4E 5A 20 3E 20 22 00 76 43 C8 37 99 58 24 3B |ENZ > ".vC.7.X$;|
00003360: 22 4B 41 4E 4E 20 51 F9 4C 41 44 45 4E 20 57 45 |"KANN Q.LADEN WE|
00003370: 52 44 45 4E 20 22 00 9E 43 D2 37 9F 20 31 35 2C |RDEN "..C.7. 15,|
00003380: 38 2C 31 35 2C 22 53 30 3A 4C 49 53 54 45 22 3A |8,15,"S0:LISTE":|
00003390: A0 20 31 35 3A 8D 20 31 36 30 30 30 3A 8E 00 B0 |. 15:. 16000:...|
000033A0: 43 DC 37 8B 20 4A B2 43 20 A7 20 31 34 31 39 30 |C.7. J.C . 14190|
000033B0: 00 B8 43 E6 37 82 20 4A 00 BE 43 F0 37 8E 00 C4 |..C.7. J..C.7...|
000033C0: 43 98 3A 8F 00 E3 43 A2 3A 8F 20 2A 2A 2A 20 41 |C.:...C.:. *** A|
000033D0: 42 46 52 41 47 45 20 52 4F 55 54 49 4E 45 4E 20 |BFRAGE ROUTINEN |
000033E0: 2A 2A 2A 00 E9 43 AC 3A 8F 00 FB 43 80 3E 84 33 |***..C.:...C.>.3|
000033F0: 2C 54 2C 4B 24 2C 4F 2C 4F 3A 8E 00 2B 44 68 42 |,T,K$,O,O:..+DhB|
00003400: 99 20 58 24 3B 22 46 49 4C 45 20 4E 41 4D 45 20 |. X$;"FILE NAME |
00003410: 22 3B 3A 46 B2 31 3A 8D 20 31 38 30 30 30 3A 46 |";:F.1:. 18000:F|
00003420: B2 30 3A 46 49 24 B2 4B 24 3A 8E 00 35 44 50 46 |.0:FI$.K$:..5DPF|
00003430: 4B 24 B2 22 22 00 50 44 5A 46 8D 20 31 31 30 30 |K$."".PDZF. 1100|
00003440: 30 3A 8B 41 24 B2 C7 28 31 33 29 A7 20 99 3A 8E |0:.A$..(13). .:.|
00003450: 00 83 44 64 46 8B 20 41 24 B2 C7 28 32 30 29 20 |..DdF. A$..(20) |
00003460: AF 20 C3 28 4B 24 29 B3 B1 30 20 A7 20 4B 24 B2 |. .(K$)..0 . K$.|
00003470: C8 28 4B 24 2C C3 28 4B 24 29 AB 31 29 3A 99 20 |.(K$,.(K$).1):. |
00003480: 41 24 3B 00 A1 44 6E 46 8B 20 44 52 B2 31 20 AF |A$;..DnF. DR.1 .|
00003490: 20 C3 28 4B 24 29 B2 33 33 20 A7 20 31 38 30 31 | .(K$).33 . 1801|
000034A0: 30 00 BE 44 78 46 8B 20 46 B2 31 20 AF 20 C3 28 |0..DxF. F.1 . .(|
000034B0: 4B 24 29 B2 31 38 20 A7 20 31 38 30 31 30 00 DE |K$).18 . 18010..|
000034C0: 44 82 46 8B 20 41 24 B1 C7 28 33 31 29 20 A7 20 |D.F. A$..(31) . |
000034D0: 4B 24 B2 4B 24 AA 41 24 3A 99 20 41 24 3B 00 EA |K$.K$.A$:. A$;..|
000034E0: 44 8C 46 89 20 31 38 30 31 30 00 FD 44 20 4E DB |D.F. 18010..D N.|
000034F0: 33 3A DA 31 2C 35 30 30 2C 31 32 3A 8E 00 00 00 |3:.1,500,12:....|
00003500: 29 |) |
.......1,G(133)......2,G(137).+....3,G(1
34).9....4,G(138).G....5,G(135).U....6,G
(139).C....7,G(136).Q....8,G(140)......0
,3,2:.4,1:.1,8,7.........D.."........"..
.N.. DISKSORTER C64......"QQ QQQ QQQ Q
Q QQQ QQQ QQQ QQQ QQQ QQQ"......"Q Q Q
Q Q Q Q Q Q Q Q Q Q Q Q".@...."
Q Q Q QQQ QQ QQQ Q Q QQ Q QQ QQ "
.O...."Q Q Q Q Q Q Q Q Q Q Q Q Q
Q Q"......"QQ QQQ QQQ Q Q QQQ QQQ Q
Q Q QQQ Q Q".I.".."......BITTE TASTE D
RUECKEN!":. 11000...,.. *** VARIABLEN-DE
FINITION ***...6.....@.S$."......".4.T.B
F$."BLOCKS FREE":EZ$." ELEMENT":EX$." NI
CHT"...^.V$."...... ":M$.".....":X$."...
.. ":N$."... ":ZM$.". _ . . ZUM MENUE "
...H.FI$."STANDARDKOPF"...R...A.|.. ***
STANDARDKOPF EINLESEN ***.G.......... 7,
8,7,FI$.",S,R"......7,BN$,BA$,BW$,BT$: 7
:. X$;"DATUM ?";:. 18000:DA$.K$.7.... B$
(850),FF$(200):. 3,8,15.=.....Q.... ***
MENUE ***._.B.N$."... "...L.ZK$."
"...V.. N$;".. (C)198
3 .".C....N$;"F1 . DATEN PER DISK EINLES
EN"...... N$;"F3 . DATEN ERWEITERN / LOE
SCHEN "...... N$;"F5 . LISTE EDITIEREN".
/.... N$;"F7 . LISTE SORTIEREN".Q.... N$
;"F2 . DATEN ABSPEICHERN".....N$;"F4 .
DATEN EINLESEN . CLR . QUIT"...... N$
;"F6 . LISTE DRUCKEN . % . SPEZ.LIST
E"...&.. N$;"F8 . LISTE AUF SCREEN . &
. DISK OPER."...0.. N$;"* . ";BF$;"
. $ . DIRECTORY ".<.:.. N$;"\ . ANDE
RE BILDSCHIRM FARBE".H.D.. N$;"! . AUSS
ORTIEREN FREMDER LISTE ".T.N.. 11000...X
.. A$.G(133). I.0:BB.B:B.0:Q.0:. 1000:.
A$."_". B.BB.D.B.. A$.G(138). . 6000...L
.. A$.G(37). . 8200...V.. A$.G(135). . 4
,4:. 7000: 4...... A$.G(38). . 6300.,..
.. A$.G(33). . 14000.I.... A$.G(36). B.B
.2:I.B:H.1:GT.1:G.0:. 1050:H.0:B.B.2:GT.
0...... A$.G(136). . 4000...... A$.G(147
). . 65299...... A$.G(137). . 5000.J....
A$.G(134). . 9000...F.. A$.G(139). .4,4
:. 3000: 4...P.. A$.G(140). . 8000...Z.
. A$.G(92). . 2000.<.... A$.G(42). BB.B:
. 12000:B.BB.F.... 450.L.....R.....J....
*** DISKLESER ***.P.........G.0:. V$;"D
ISK EINLEGEN : DATEN KOMPLETT ":.X$;"ODE
R EINZELN ";......"EINLESEN ? (K/E)":. X
$;ZM$:. 10000:. A$."E". G.1...... A$."_"
. ....... V$;"ICH LESE DISK ":.X$;.0.$..
1,8,0,"$0" :GB.1.Z.... 16000:." ."K$".."
:.T..0..10000: 1:..H.8..#1,A$,F$...B..#1
,A$,F$:B$(I.1).""...L..#1,A$,F$. .V.C.0:
L$." "...`.. A$.."". C.F(A$).Q.J.. F$.
."".C.C.F(F$).256...T.Q$.J(D(C),2):L$.H(
Q$.L$,3)...~..#1,F$:. F$."". ."....";L$;
" ";BF$:. 1295.4.... F$..G(34). 1150.E..
..#1,F$:. F$..G(34). B$(I.Q).B$(I.Q).F$:
.1170.|.... Q.1 . B$(I.1).""......#1,F$:
. F$.G(32). 1190.....C$."".F...C$.C$.F$:
.#1,F$:. F$.."" . 1210...D.. GB.1 . GB$.
C$:GB.0...N.B$(I.Q).H(B$(I.Q).ZK$,17).H(
GB$,3).I(ZK$.Q$,3).I.X.."..";B$(I.Q);"..
.";". ";H(C$,5);:. G.0 . GT.0 . ..L....
GT.1 . GT.0:B$(I)."":.:.1090...... Q.1 .
Q.0:B$(I.1).""...... G.1 . GT.0 . I.0 .
.". J/N...";:. 11000.X.... A$."N" .."NE
IN";:GT.1:. 1250.....I.I.1:. G.1 ..". JA
":Z.Z.1.4.... I.Q.1.850 ..X$;"SPEICHER I
ST VOLL":.X$;ZM$: 1:.11000:..?.... 1090.
Y... 1:. H.1 . . 10000:..Y.... X$;"N0CH
EINE DISK (J/N)".....QW$.D(I.1)...(..X$
;"BISHER WURDEN ";QW$;" DATEN GELESEN ..
..".G.2.. 11000...<.. A$."J". GT.1:. V$;
:. 1060...F.. A$.."N". 1330...P.B.I.1: 1
...Z.A$."":T.0...D...".P...<.Z.. *** FAR
BWECHSEL ***.B.....R...I.0:F.0:J.0.Y....
V$;"F1. .FARBWECHSEL BILDSCHIRM"......
X$;"F3. .FARBWECHSEL HINTERGRUND".E....
X$;"F5. .FARBWECHSEL SCHRIFT".Q....X$;ZM
$... .. 11000...*.. A$.G(133). I.I.1:.4,
I:.I.15.I.0.).4.. A$.G(134). J.J.1:.0,J:
.J.15.J.0.O.>.. A$.G(135). F.F.1:.1,F:.F
.15.F.0._.H.. A$."_". ..J.R.. 2040.P....
...B.. *** DRUCKER AUSGABE ***...L.ZK$.H
(ZK$.ZK$,33)...V.J$.". JA ":N$.".NEIN":F
1$.N$:F3$.J$:F5$.J$:F7$.N$:F2$.N$:Z$."..
...".....Y$.".".Z$:F4$.N$:DR.1..........
.T$.".. ".A...ST$."":AN$."BITTE FUNKTION
WAEHLEN".B...."....... DRUCKER AUSGABE
."...... F1$;T$;"F1 . DRUCK-BEGINN ."...
... F3$;T$;"F3 . STAND.KOPF MIT DRUCKEN
."......F5$;T$;"F5 . PROGRAMM-LISTE DRUC
KEN ."...&.. F7$;T$;"F7 . PREIS-LISTE DR
UCKEN .".3.0.. F2$;T$;"F2 . LISTE NACH K
RITERIUM .".].:.. F4$;T$;"F4 . STANDARDK
OPF AENDERN ".O.D.. X$;"..";ZM$.Z.N.. ".
."......".";:. J.1 . 20:. ".";:.:.Z$;;ST
$...... Y$;AN$.Q.... C.1 . C.0:.3450:F4$
.N$:.3070...... 11000.. ... A$.G(133). F
1$.N$. F1$.J$: . 3070.- F.. A$.G(134). F
3$.J$. F3$.N$: . 3070.U P.. A$.G(134). F
3$.N$. F3$.J$: . 3070.. Z.. A$.G(135). F
5$.N$. F5$.J$:F2$.N$:F7$.N$:. 3070.. ...
A$.G(135). F5$.J$. F5$.N$:. 3070.X ...
A$.G(136). F7$.J$. F7$.N$:. 3070..!... A
$.G(136). F7$.N$. F7$.J$:F2$.N$:F5$.N$:.
3070.B!... A$.G(137). F2$.N$. F2$.J$:F7
$.N$:F5$.N$:. 3070.J!... A$.G(137). F2$.
J$. F2$.N$: . 3070..!... A$.G(95) . DR.0
:...! .. A$.G(138) . F4$.J$:C.1:.3070.F!
*..A$.G(95) . A$.G(137) . 3250..!4..".":
. J.1 .19:.".";:.:.Z$;ZK$:.".";Z$;"OK ?(
J/N)".."9..Y$;ZK$:. 11000:. A$.."J". ..^
">..".":. J.1 .19:.".";:.:.Z$;"WIEVIEL Z
EILEN PRO SEITE ?>=15".."H.. Y$;ZK$:."..
";Y$;:. 18000:DZ.E(K$):. DZ.15 . DZ.300
. 3390.."M.. F2$.N$. F5$.N$. F7$.N$ . ..
R"R.. F3$.J$. 3530.."\.. F3$.N$. 3590.."
F.. F3$."_" . ..."P....#Z.ST$."DATUM ?":
. 3510:DA$.K$.;#..ST$."NAME ?":.3510:BN$
.K$.A#..ST$."STRASSE,NR. ?":. 3510:BA$.K
$..#..ST$."WOHNORT ?":. 3510:BW$.K$..#..
ST$."TELEFON ?":. 3510:BT$.K$..#....N#..
.".":. J.1 .19:.".";:.:.Z$;ST$..#... Y$;
ZK$:."..";Y$;:. 18000..$...".":. J.1 .19
:.".";:.:. Z$;ZK$:. Y$;ZK$:..6$J.ZD.0:.
F3$.J$ . ZD.15.W$T..4,G(14)" ";BN$:.4,"
";BA$.V$...4," ";BW$:.4," ";BT$:.4..
$...4," DISKETTENINHALT VOM";DA$..$...4
:.4," PROGRAMME:";B;G(15).A$...4.U$...
F2$.J$ . 3760..$... F7$.N$ . 3610..%..QS
$."PRG.NAME KB. PREIS ":. 3620.:%
..QS$."PRG.NAME ID BL. ".N%$.Z
D$." ":. 3640.^%8.DD..(B.3).1.F%B.S.1..
%L.B$(B.1)."":B$(B.2)."":B$(B.3).""..%V.
.4,H(" ".QS$.QS$.QS$,78).T%`..4,"
";:. T.1 .74:.4,G(101);:.:.4..%J.. T.1 .
DD..&T..4," ";B$(S);" ";B$(S.DD);"
";B$(S.2.DD)."&~.ZD.ZD.1.B&..S.S.1:. Z
D.DZ . ZD.0:. 3740.J&...:..L&...".":. J.
1 .19:.".";:.:. Z$;..&..."DRUCKERPAPIER
JUSTIEREN ? ":. Y$;"TASTE DRUECKEN ";:.
11000:...&..F.2:.".":. I.1 .19:.".";:.:
.Z$;ZK$:.Y$;ZK$:."...."..'...Z$;"ID.CODE
EINGEBEN !":.Y$;:. 18000.('... I(K$,1).
"*". F.1.;'D.K$.H(K$.ZK$,F)._'N.. I.1 .
B:. ZD.DZ . ZD.0:. 3740..'X.. J(B$(I),18
,F).K$ . .4," ";B$(I):ZD.ZD.1..'...:.
4..'.....' ...B'... *** SORTIERROUTINE *
**.H'.....(... V$;"SORTIER-ROUTINE LAEUF
T!":B$(B.1)."ZZZZZZZZ":F.0.-(C.. X$;"ALP
HABETISCH ODER NACH ID.NR. ?".Z(H..X$;"(
A/I)":. X$;ZM$:. 11000:. A$."_". ..M(W..
A$."I" . F.1.|(... C .1 . B..(...65286,
11:.20000..(..J.C.1:. X$;"ELEMENT
....";J.1;"...".M(... D.J . B..(... F.1
. I(B$(C),6).I(B$(D),6). 4120..)... B$(C
).B$(D) .4120..)... 4130.@)..C$(0).B$(C)
:B$(C).B$(D):B$(D).C$(0).F)"...L),...Z)-
..65286,27..)6.. V$;"DOPPELTE DATEN AUSS
ORTIEREN (J/N) "..)@.. 11000..)J.. A$."J
" . 4190..)T...R)^.. V$;"ES WIRD AUSSORT
IERT ":J.1..*H.. X$;"WIEVIELE ZEICHEN BE
RUECKSICHTIGEN ?":.X$;:. 18000.2*R.SS.E(
K$):. SS.0 . SS.25 . SS.25.Y*|.. H(B$(J)
,SS).H(B$(J.1),SS) . 4270.C*..J.J.1.W*..
. J..B.1 . 4220..*... I.B.1 . B.10:B$(I)
."":...*.....*... I. J . B..*..B$(I).B$(
I.1).B*B...Y*L.J.J.1:B.B.1:. 4230..*V...
.*.....+... *** DATEN FILE SPEICHERN ***
..+....3+... V$;"DATEN WERDEN GESPEICHER
T ".M+... 17000:I.0:. X$;"SICHER ? (J/N)
":. 11000:.A$.."J". ...+... 2,8,2,"@:" .
FI$.",S,W"..+D.. 16000:.X$;K$:. T..0 .
2:. 10000:...+N..2,B..+X.. G.1 . . I.1
. Z:.2,B$(I):. 5100..+... I.1 . B:.2,B$(
I)..,.....,.. 2..,.....,P...6,Z.. *** D
ATEN FILE EINLESEN ***.<,....F,... V$;"D
ATEN WERDEN GELESEN ":. X$;ZM$.,... 170
00:. K$."_" . ...,... X$;"DATEN FILE ";F
I$" EINLESEN (J/N)"..,... 11000.H,... A$
.."J". ...,... 2,8,0,FI$.",S,R":."....."
;..-J.. 16000:." ."K$"..":. T..0 . . 100
00: 2:..!-T..2,B.5-... I.FJ.1 . B.FJ.Q-
...2,B$(I):.: 2:B.B.FJ:..P-... V$;"DISK
OPERATION MODE"..-...X$;"DISKETTENBEFEH
LE S, V, N, R, I ".X-... X$;"BEFEHL ?";:
. 18000:FI$.K$:. X$;"AUSFUEHREN (J/N) ?"
..-... 11000..-... A$."_" . ..*.D..A$."J
"..15,8,15:.15,FI$: 15:.16000:.T..0..X$;
K$.6.I.. 10000.D.J.. T.0 . ..W.N..".";X$
:. 6310.].X...R.B.. *** EDITOR ***.X.L..
...V.. 650,128...... S$;"....... @ . :
ELEMENT LOESCHEN".V.... S$;". \ . : E
LEMENT SUCHEN"...... S$;". * . : ELEME
NT VERBESSERN"../... S$;". _ . : ";I(Z
M$,13).D/... S$;". P . : ELEMENT DRUCK
EN ".I/... S$;". . : EIN ELEMENT VOR
"../... S$;". F1. : 20 ELEMENTE VOR ".
./F.. S$;". F3. : 20 ELEMENTE ZURUECK"
../P.. S$;". ^ . : EIN ELEMENT ZURUECK
"..0Z.. S$;". $ . : DM-LISTE ERSTELLEN
".90... S$;". + . : ELEMENT EINFUEGEN.
. ":."..".H0... I. 1 . B.J0..."....";ZK$
".":."... ";B$(I).V0... 11000..0... B$(
I)."". B.1 . A$."@":I.1.C0... A$."@". B.
1 . B$(I).B$(B):B.B.1:A$.""..0... A$.G(1
33) .I.20.B . I.I.20..1 .. A$.G(134) .I.
20.0 . I.I.20.?1*.. A$."*" ..".......";"
.KORREKTURELEMENT":."...";B$(I).R14.. A$
."*". ."..";ZK$:.:. B$(I)."". B$(I)."ZZZ
Z"..19.. A$."$". . 7500:. 7000..1>.. A$.
"_". A$."":. 650,0:..N1H.. A$."^". I.I.2
:. I.1 . I.B.1..2R.. A$."+". B.B.1:."...
.....NEUES ELEMENT":."...";B$(B):."..";Z
K$:..22\.. A$."P". .4," ";B$(I).Z2F..
A$."\"..V$;"NACH WELCHEM ELEMENT SUCHEN
?":.X$;:.18000:.7310:.7000..2P.. H(B$(B)
,4)."ZZZZ". I.1 . B.B.1..2Z.."......";ZK
$:.:.7140..2....N2... K$."". ...2..F.0:.
I(K$,1)."*" . F.1..3..Q.C(K$).F:Q$.H(K$
,Q):EZ.0.53..EE$." KEIN WEITERES":EY$."
VORHANDEN ":..C3... K.1 . B.G3... H(B$(K
),Q).Q$ . EZ.1:SE.1:R.1.V3J.. SE.0 . ...
3T.3.SE.1 .."........";B$(K):SE.0:...3..
. EZ.0 .."....";EZ$.EX$.EY$..3...EZ.1.."
..":."...";EE$.EZ$.EY$:."..";WS$..3...X$
;ZM$:. 11000..4....@4L.."...... DM-LISTE
NERSTELLEUNG ...":."..";X$;ZM$:."......"
.I4V.. J.1 . B:." ";:C$.H(B$(J),17):.C$
;..4`.F$.I(ZK$.D(.(E(I(B$(J),3)).4..5)),
2):. F$;..4J.." 000....";:. 18000:. K$."
_" . ...4T.B$(J).C$.F$." ".H(K$.ZK$,3)..
4~..".";:.:...4@....5J.. *** BILDSCHIRM-
AUSGABE ***..5T...F5^..V$;"INHALT EINER
DISK LISTEN ":.X$;"ODER ALLE DISK DATEN
LISTEN (E/A) ".R5H.. 11000..5R.:. A$."E"
. 8120..5|..V$;ZM$:.:Z.1..5... I.1 . B:
Z.Z.1..5..."........";B$(I):. B(631).95
. . 198,0:...5... Z.23 .. 11000:Z.1:. H
.1 . ...6... : . 10000..6....Q6...V$;"WE
LCHE DISK LISTEN ":.X$;"ID.NR EINGEBEN "
;:. 18000..6B.. I.1 . B:. K$.J(B$(I),18,
2) . ."........";B$(I)..6L....6V.. 10000
.U6...X$;"NOCH EINE DISK LISTEN (J/N) ":
.11000:. A$."J". 8120..6.....6. ...7. .
*** LISTEN NACH ID KRITERIUM ERSTELLEN *
*..7. ..M7& .V$;"LISTEN NACH ID KRITERIU
M ERSTELLEN ":.X$;ZM$..70 .X$;"NACH WELC
HEM KRITERIUM SUCHEN ?";:.18000:F$.H(K$,
1)..7: . F$."_". ..P7D .X$;"DATENDISKETT
E EINLEGEN ":.17000:FI$."@:".FI$..7N X.0
:. I.1 . B:. J(B$(I),18,1).F$. X.X.1..8X
..08B . X.0 ..X$;"KEIN ELEMENT VORH.":.
10000:..K8L .1,8,1,FI$.",S,W":.1,X.N8V
. 16000:. T..0 . . 10000: 1:...8. . I.1
. B:. J(B$(I),18,1).F$.." ";B$(I)
:.1,B$(I)..8. .: 1:...8(#...82#. *** DA
TEN ERWEITERN/LOESCHEN ***..8<#...9F#.V$
;"F1 . DATEN ERWEITERN ".+9P#.X$;"F3 . D
ATEN FILE ZULADEN ".S9Z#.X$;"F5 . DATEN
LOESCHEN (ID.NR.) ".Z9D#.X$;"F7 . STANDA
RDKOPF SPEICHERN "..9N#.X$;ZM$..9X#. 110
00..9.#. A$.G(95) . ..I9.#. A$.G(133). G
T.1:I.B.1 :. 1000..9.#. A$.G(134). FJ.B:
. 6000:FJ .0:...: #. A$.G(135) . 9160.@:
.#.A$.G(136). . 7,8,7,"@:STANDARDKOPF,S,
W":.7,BN$:.7,BA$.C:.#. A$.G(136). .7,BW$
:.7,BT$: 7.N:.#. 9030..:H#.V$;"EINGABE
DER ZU LOESCHENDEN ID NR. ? ":.X$;..:R#.
18000..:.#.X$;"SOLL ";K$;"GELOESCHT WER
DEN (J/N) ? "..:.#. 11000:. A$.."J" . ..
.;.#. I.1 . B.%;.#. K$.J(B$(I),18,2) . .
9240.+;.$..1;.$..O;.$. J.I . B:B$(J).B$
(J.1):..A;"$I.I.1:B.B.1:...;.'.X$;"TASTE
DRUECKEN ":T.0:. 11000:...;.*. A$:. A$.
"" . 11000..;.+...;....O;... ** BLOCKS F
REE ROUTINE ***.U;.....;... V$;BF$;" FUN
KTION"..<./FI$."@:".BF$:. I.1 . 200:FF$(
I)."":..<<./FF.1:K.2:I.2:BR$."FUNKTION E
NDE".Q<./.X$;"BITTE WARTEN BIS ";BR$:FF$
(1).J(B$(1),18,2)..<&/FF$(I).J(B$(K),18,
2)..<0/. J.1 . I.1..<:/. FF$(I).FF$(J) .
12120..<D/..F<N/I.I.1..<X/K.K.1:. K.B .
12140..<B/. 12070..<L/Z.I.1..=V/. C.1 .
Z.1.2=./J.C.1:. X$;"ELEMENT ...."
;J.1;"...".@=./. D.J . Z.\=./. FF$(C).FF
$(D) . 12200.H=./. 12210..=./C$(0).FF$(C
):FF$(C).FF$(D):FF$(D).C$(0)..=./.. =./.
.Y=F/.X$;"BLOCKS WERDEN ADDIERT":BL$.".D
ISK ":BM$.".".BF$..=P/J.1..=Z/. I.1 . B:
. I.1 . GS.0. >./.J(B$(I),18,2).FF$(J) .
. 12350.]>./.:FF$(J).BF$."DISK ".FF$(J)
." ".I(ZK$.D(664.GS),3):J.J.1.Q>./. J.Z.
1 . 12250.~>.0. X$;BR$..>.0.X$;"DRUCKER
ODER SCREEN (D/S) ":. 11000:..U>.0. A$..
"S". A$.."D". . 11000:. 12320..> 0. A$."
D" . 12380..?*0. I.1 . Z:."....";FF$(I).
.?40. 11000:.:. 12420.5?>0G.0:G.E(I(B$(I
),3)).A?H0GS.GS.G.G?R0..H?\0.X$;"DRUCKER
EINSCHALTEN ! ".T?F0. 10000.~?P0. 4,4..
?Z0. I.1 . Z:.4," ";FF$(I):.:.4: 4.
.?.0.V$;"DATEN AUF DISK SPEICHERN ? (J/N
)":.11000:. A$.."J". ...@.0.X$;"DATEN DI
SKETTE EINLEGEN ".-@.0. 10000:. 2,8,2,FI
$.",S,W":.2,Z.K@.0. I.1 . Z:.2,FF$(I):.:
2.Q@.0..W@.6...@.6. *** AUSSORTIEREN F
REMDER LISTEN ***..@D6...@N6. B.2 . ...@
X6.V$;"AUSSORTIERREN FREMDER LISTEN":DI$
."@:DIFFERENZ":LI$."LISTE":X.1..A.6.X$;"
MIT WELCHER LISTE VERGLEICHEN ?":. 17000
.OA.6.X$;"WIVIEL ZEICHEN VERGLEICHEN (1-
20) ";:. 18000:SK.E(K$).CA.6. SK.25 . SK
.25..A.7. 5,8,5,FI$.",S,R":. 16000:. T..
0 . 14100..A.7. 2,8,2,"@:LISTE".",S,W":.
16000..A.7. T..0 . 5: 2: .X$;K$:.X$;
ZM$:. 11000:...A.7.5,C..A(7. J.1 . C..B2
7.5,D$:.".....";D$. B<7. I.1 . B.BBF7. H
(D$,SK).H(B$(I),SK). 14300.JBP7. I.ZBZ7.
2,D$:X.X.1.BBD7. J.SBN7 5: 2:X.X.1..BX7
. X.0 .."... KEIN NEUES ELEMENT GEFUNDEN
":. 10000..B.7. 7,8,7,DI$.",S,W".IB.7.7,
X..B.7. 5,8,5,LI$.",S,R"..B 7. I.1 . X:.
5,D$:.7,D$:...C.7 7: 5.0C.7.V$;"DAS AU
SSORTIEREN IST BEENDET ".WC.7.X$;"DAS DA
TENFILE < DIFFERENZ > ".VCH7.X$;"KANN Q.
LADEN WERDEN "..CR7. 15,8,15,"S0:LISTE":
15:. 16000:...C.7. J.C . 14190..C.7. J
..C.7..DC.:...C.:. *** ABFRAGE ROUTINEN
***..C.:...C.>.3,T,K$,O,O:..+DHB. X$;"FI
LE NAME ";:F.1:. 18000:F.0:FI$.K$:..5DPF
K$."".PDZF. 11000:.A$.G(13). .:...DDF. A
$.G(20) . C(K$)..0 . K$.H(K$,C(K$).1):.
A$;..DNF. DR.1 . C(K$).33 . 18010..DXF.
F.1 . C(K$).18 . 18010..D.F. A$.G(31) .
K$.K$.A$:. A$;..D.F. 18010..D N.3:Z1,500
,12:....)
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL