DISKSORTER
FILE INFORMATION
FILENAME(S): DISKSORTER
FILE TYPE(S): PRG
FILE SIZE: 12K
FIRST SEEN: 2025-12-02 23:21:56
APPEARS ON: 1 disk(s)
FILE HASH
18b6d32ca155567a9db0881d8ac4db3654a9b02ec65d5d2df49cf83da718b821
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DIVERSE | DISKSORTER | PRG | swasti, dinkel | 17 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 E6 00 99 22 93 11 05 22 3A 97 35 33 |......."...":.53|
00000010: 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 00 4D |280,0:.53281,0.M|
00000020: 08 F0 00 99 22 D1 D1 20 20 D1 D1 D1 20 D1 D1 D1 |....".. ... ...|
00000030: 20 D1 20 D1 20 D1 D1 D1 20 D1 D1 D1 20 D1 D1 D1 | . . ... ... ...|
00000040: 20 D1 D1 D1 20 D1 D1 D1 20 D1 D1 D1 22 00 7C 08 | ... ... ...".|.|
00000050: FA 00 99 22 D1 20 D1 20 20 D1 20 20 D1 20 20 20 |...". . . . |
00000060: D1 20 D1 20 D1 20 20 20 D1 20 D1 20 D1 20 D1 20 |. . . . . . . |
00000070: 20 D1 20 20 D1 20 20 20 D1 20 D1 22 00 AB 08 04 | . . . ."....|
00000080: 01 99 22 D1 20 D1 20 20 D1 20 20 D1 D1 D1 20 D1 |..". . . ... .|
00000090: D1 20 20 D1 D1 D1 20 D1 20 D1 20 D1 D1 20 20 20 |. ... . . .. |
000000A0: D1 20 20 D1 D1 20 20 D1 D1 20 22 00 DA 08 0E 01 |. .. .. ".....|
000000B0: 99 22 D1 20 D1 20 20 D1 20 20 20 20 D1 20 D1 20 |.". . . . . |
000000C0: D1 20 20 20 D1 20 D1 20 D1 20 D1 20 D1 20 20 D1 |. . . . . . .|
000000D0: 20 20 D1 20 20 20 D1 20 D1 22 00 09 09 18 01 99 | . . ."......|
000000E0: 22 D1 D1 20 20 D1 D1 D1 20 D1 D1 D1 20 D1 20 D1 |".. ... ... . .|
000000F0: 20 D1 D1 D1 20 D1 D1 D1 20 D1 20 D1 20 20 D1 20 | ... ... . . . |
00000100: 20 D1 D1 D1 20 D1 20 D1 22 00 33 09 22 01 99 22 | ... . .".3.".."|
00000110: 11 11 11 11 1D 1D 42 49 54 54 45 20 54 41 53 54 |......BITTE TAST|
00000120: 45 20 44 52 55 45 43 4B 45 4E 21 22 3A 8D 31 31 |E DRUECKEN!":.11|
00000130: 30 30 30 00 5A 09 40 01 53 24 B2 22 11 1D 1D 1D |000.Z.@.S$."....|
00000140: 1D 1D 22 3A 97 35 33 32 38 30 2C 30 3A 97 35 33 |..":.53280,0:.53|
00000150: 32 38 31 2C 30 3A 99 22 1E 22 00 8C 09 54 01 42 |281,0:."."...T.B|
00000160: 46 24 B2 22 42 4C 4F 43 4B 53 20 46 52 45 45 22 |F$."BLOCKS FREE"|
00000170: 3A 45 5A 24 B2 22 20 45 4C 45 4D 45 4E 54 22 3A |:EZ$." ELEMENT":|
00000180: 45 58 24 B2 22 20 4E 49 43 48 54 22 00 D8 09 5E |EX$." NICHT"...^|
00000190: 01 56 24 B2 22 93 11 11 1D 1D 12 20 22 3A 4D 24 |.V$."...... ":M$|
000001A0: B2 22 11 11 1D 1D 1D 22 3A 58 24 B2 22 11 11 1D |.".....":X$."...|
000001B0: 1D 12 20 22 3A 4E 24 B2 22 11 1D 12 20 22 3A 5A |.. ":N$."... ":Z|
000001C0: 4D 24 B2 22 12 20 5F 20 92 20 12 20 20 5A 55 4D |M$.". _ . . ZUM|
000001D0: 20 4D 45 4E 55 45 20 22 00 EF 09 68 01 46 49 24 | MENUE "...h.FI$|
000001E0: B2 22 53 54 41 4E 44 41 52 44 4B 4F 50 46 22 00 |."STANDARDKOPF".|
000001F0: 05 0A 90 01 9F 37 2C 38 2C 37 2C 46 49 24 AA 22 |.....7,8,7,FI$."|
00000200: 2C 53 2C 52 22 00 3C 0A 9A 01 84 37 2C 42 4E 24 |,S,R".<....7,BN$|
00000210: 2C 42 41 24 2C 42 57 24 2C 42 54 24 3A A0 37 3A |,BA$,BW$,BT$:.7:|
00000220: 99 58 24 3B 22 44 41 54 55 4D 20 3F 22 3B 3A 8D |.X$;"DATUM ?";:.|
00000230: 31 38 30 30 30 3A 44 41 24 B2 4B 24 00 5A 0A A4 |18000:DA$.K$.Z..|
00000240: 01 86 42 24 28 38 35 30 29 2C 46 46 24 28 32 30 |..B$(850),FF$(20|
00000250: 30 29 3A 9F 33 2C 38 2C 31 35 00 68 0A C2 01 4E |0):.3,8,15.h...N|
00000260: 24 B2 22 11 1D 12 20 22 00 8D 0A CC 01 5A 4B 24 |$."... ".....ZK$|
00000270: B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
00000280: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 C1 0A | "...|
00000290: D6 01 99 4E 24 3B 22 93 1D 20 28 43 29 31 39 38 |...N$;".. (C)198|
000002A0: 33 20 92 20 42 59 20 42 2E 57 49 4E 4B 4C 45 52 |3 . BY B.WINKLER|
000002B0: 20 54 45 4C 28 30 32 32 31 29 38 38 31 33 37 33 | TEL(0221)881373|
000002C0: 22 00 E8 0A E0 01 99 4E 24 3B 22 46 31 20 92 20 |"......N$;"F1 . |
000002D0: 44 41 54 45 4E 20 50 45 52 20 44 49 53 4B 20 45 |DATEN PER DISK E|
000002E0: 49 4E 4C 45 53 45 4E 22 00 13 0B EA 01 99 4E 24 |INLESEN"......N$|
000002F0: 3B 22 46 33 20 92 20 44 41 54 45 4E 20 45 52 57 |;"F3 . DATEN ERW|
00000300: 45 49 54 45 52 4E 20 2F 20 4C 4F 45 53 43 48 45 |EITERN / LOESCHE|
00000310: 4E 20 22 00 32 0B F4 01 99 4E 24 3B 22 46 35 20 |N ".2....N$;"F5 |
00000320: 92 20 4C 49 53 54 45 20 45 44 49 54 49 45 52 45 |. LISTE EDITIERE|
00000330: 4E 22 00 51 0B FE 01 99 4E 24 3B 22 46 37 20 92 |N".Q....N$;"F7 .|
00000340: 20 4C 49 53 54 45 20 53 4F 52 54 49 45 52 45 4E | LISTE SORTIEREN|
00000350: 22 00 72 0B 08 02 99 4E 24 3B 22 46 32 20 92 20 |".r....N$;"F2 . |
00000360: 44 41 54 45 4E 20 41 42 53 50 45 49 43 48 45 52 |DATEN ABSPEICHER|
00000370: 4E 22 00 A0 0B 12 02 99 4E 24 3B 22 46 34 20 92 |N"......N$;"F4 .|
00000380: 20 44 41 54 45 4E 20 45 49 4E 4C 45 53 45 4E 20 | DATEN EINLESEN |
00000390: 20 20 20 12 20 43 4C 52 20 92 20 51 55 49 54 22 | . CLR . QUIT"|
000003A0: 00 D2 0B 1C 02 99 4E 24 3B 22 46 36 20 92 20 4C |......N$;"F6 . L|
000003B0: 49 53 54 45 20 44 52 55 43 4B 45 4E 20 20 20 20 |ISTE DRUCKEN |
000003C0: 20 12 20 25 20 92 20 53 50 45 5A 2E 4C 49 53 54 | . % . SPEZ.LIST|
000003D0: 45 22 00 04 0C 26 02 99 4E 24 3B 22 46 38 20 92 |E"...&..N$;"F8 .|
000003E0: 20 4C 49 53 54 45 20 41 55 46 20 53 43 52 45 45 | LISTE AUF SCREE|
000003F0: 4E 20 20 12 20 26 20 92 20 44 49 53 4B 20 4F 50 |N . & . DISK OP|
00000400: 45 52 2E 22 00 33 0C 30 02 99 4E 24 3B 22 2A 20 |ER.".3.0..N$;"* |
00000410: 20 92 20 22 3B 42 46 24 3B 22 20 20 20 20 20 20 | . ";BF$;" |
00000420: 20 12 20 24 20 92 20 44 49 52 45 43 54 4F 52 59 | . $ . DIRECTORY|
00000430: 20 22 22 00 5A 0C 3A 02 99 4E 24 3B 22 5C 20 20 | "".Z.:..N$;"\ |
00000440: 92 20 41 4E 44 45 52 45 20 42 49 4C 44 53 43 48 |. ANDERE BILDSCH|
00000450: 49 52 4D 20 46 41 52 42 45 22 00 85 0C 44 02 99 |IRM FARBE"...D..|
00000460: 4E 24 3B 22 21 20 20 92 20 41 55 53 53 4F 52 54 |N$;"! . AUSSORT|
00000470: 49 45 52 45 4E 20 46 52 45 4D 44 45 52 20 4C 49 |IEREN FREMDER LI|
00000480: 53 54 45 20 22 00 90 0C 4E 02 8D 31 31 30 30 30 |STE "...N..11000|
00000490: 00 C3 0C 58 02 8B 41 24 B2 C7 28 31 33 33 29 A7 |...X..A$..(133).|
000004A0: 49 B2 30 3A 42 42 B2 42 3A 42 B2 30 3A 51 B2 30 |I.0:BB.B:B.0:Q.0|
000004B0: 3A 8D 31 30 33 30 3A 8B 41 24 B2 22 5F 22 A7 42 |:.1030:.A$."_".B|
000004C0: B2 42 42 00 D8 0C 62 02 8B 41 24 B2 C7 28 31 33 |.BB...b..A$..(13|
000004D0: 38 29 A7 8D 36 30 30 30 00 EC 0C 6C 02 8B 41 24 |8)..6000...l..A$|
000004E0: B2 C7 28 33 37 29 A7 8D 38 32 30 30 00 09 0D 76 |..(37)..8200...v|
000004F0: 02 8B 41 24 B2 C7 28 31 33 35 29 A7 9F 34 2C 34 |..A$..(135)..4,4|
00000500: 3A 8D 37 30 30 30 3A A0 34 00 1D 0D 80 02 8B 41 |:.7000:.4......A|
00000510: 24 B2 C7 28 33 38 29 A7 8D 36 33 30 30 00 32 0D |$..(38)..6300.2.|
00000520: 8A 02 8B 41 24 B2 C7 28 33 33 29 A7 8D 31 34 30 |...A$..(33)..140|
00000530: 30 30 00 6C 0D 94 02 8B 41 24 B2 C7 28 33 36 29 |00.l....A$..(36)|
00000540: A7 42 B2 42 AA 32 3A 49 B2 42 3A 48 B2 31 3A 47 |.B.B.2:I.B:H.1:G|
00000550: 54 B2 31 3A 47 B2 30 3A 8D 31 30 35 30 3A 48 B2 |T.1:G.0:.1050:H.|
00000560: 30 3A 42 B2 42 AB 32 3A 47 54 B2 30 00 81 0D 9E |0:B.B.2:GT.0....|
00000570: 02 8B 41 24 B2 C7 28 31 33 36 29 A7 8D 34 30 30 |..A$..(136)..400|
00000580: 30 00 97 0D A8 02 8B 41 24 B2 C7 28 31 34 37 29 |0......A$..(147)|
00000590: A7 9E 36 34 37 33 38 00 AC 0D B2 02 8B 41 24 B2 |..64738......A$.|
000005A0: C7 28 31 33 37 29 A7 8D 35 30 30 30 00 C1 0D BC |.(137)..5000....|
000005B0: 02 8B 41 24 B2 C7 28 31 33 34 29 A7 8D 39 30 30 |..A$..(134)..900|
000005C0: 30 00 DE 0D C6 02 8B 41 24 B2 C7 28 31 33 39 29 |0......A$..(139)|
000005D0: A7 9F 34 2C 34 3A 8D 33 30 30 30 3A A0 34 00 F3 |..4,4:.3000:.4..|
000005E0: 0D D0 02 8B 41 24 B2 C7 28 31 34 30 29 A7 8D 38 |....A$..(140)..8|
000005F0: 30 30 30 00 07 0E DA 02 8B 41 24 B2 C7 28 39 32 |000......A$..(92|
00000600: 29 A7 8D 32 30 30 30 00 26 0E E4 02 8B 41 24 B2 |)..2000.&....A$.|
00000610: C7 28 34 32 29 A7 42 42 B2 42 3A 8D 31 32 30 30 |.(42).BB.B:.1200|
00000620: 30 3A 42 B2 42 42 00 2F 0E EE 02 89 34 35 30 00 |0:B.BB./....450.|
00000630: 35 0E E8 03 8F 00 78 0E 06 04 47 B2 30 3A 99 56 |5.....x...G.0:.V|
00000640: 24 3B 22 44 49 53 4B 20 45 49 4E 4C 45 47 45 4E |$;"DISK EINLEGEN|
00000650: 20 3A 20 44 41 54 45 4E 20 4B 4F 4D 50 4C 45 54 | : DATEN KOMPLET|
00000660: 54 20 22 3A 99 58 24 3B 22 4F 44 45 52 20 45 49 |T ":.X$;"ODER EI|
00000670: 4E 5A 45 4C 4E 20 22 3B 00 AB 0E 0B 04 99 22 45 |NZELN ";......"E|
00000680: 49 4E 4C 45 53 45 4E 20 3F 20 28 4B 2F 45 29 22 |INLESEN ? (K/E)"|
00000690: 3A 99 58 24 3B 5A 4D 24 3A 8D 31 30 30 30 30 3A |:.X$;ZM$:.10000:|
000006A0: 8B 41 24 B2 22 45 22 A7 47 B2 31 00 B9 0E 10 04 |.A$."E".G.1.....|
000006B0: 8B 41 24 B2 22 5F 22 A7 8E 00 D7 0E 1A 04 99 56 |.A$."_"........V|
000006C0: 24 3B 22 49 43 48 20 4C 45 53 45 20 44 49 53 4B |$;"ICH LESE DISK|
000006D0: 20 22 3A 99 58 24 3B 00 EC 0E 24 04 9F 31 2C 38 | ":.X$;...$..1,8|
000006E0: 2C 30 2C 22 24 30 22 3A 47 42 B2 31 00 15 0F 2E |,0,"$0":GB.1....|
000006F0: 04 8D 31 36 30 30 30 3A 99 22 20 12 22 4B 24 22 |..16000:." ."K$"|
00000700: 11 11 22 3A 8B 54 B3 B1 30 A7 8D 31 30 30 30 30 |..":.T..0..10000|
00000710: 3A A0 31 3A 8E 00 23 0F 38 04 A1 23 31 2C 41 24 |:.1:..#.8..#1,A$|
00000720: 2C 46 24 00 3C 0F 42 04 A1 23 31 2C 41 24 2C 46 |,F$.<.B..#1,A$,F|
00000730: 24 3A 42 24 28 49 AA 31 29 B2 22 22 00 4A 0F 4C |$:B$(I.1)."".J.L|
00000740: 04 A1 23 31 2C 41 24 2C 46 24 00 5B 0F 56 04 43 |..#1,A$,F$.[.V.C|
00000750: B2 30 3A 4C 24 B2 22 20 20 20 22 00 6F 0F 60 04 |.0:L$." ".o.`.|
00000760: 8B 41 24 B3 B1 22 22 A7 43 B2 C6 28 41 24 29 00 |.A$.."".C..(A$).|
00000770: 89 0F 6A 04 8B 46 24 B3 B1 22 22 A7 43 B2 43 AA |..j..F$.."".C.C.|
00000780: C6 28 46 24 29 AC 32 35 36 00 A8 0F 74 04 51 24 |.(F$).256...t.Q$|
00000790: B2 CA 28 C4 28 43 29 2C 32 29 3A 4C 24 B2 C8 28 |..(.(C),2):L$..(|
000007A0: 51 24 AA 4C 24 2C 33 29 00 D3 0F 7E 04 A1 23 31 |Q$.L$,3)...~..#1|
000007B0: 2C 46 24 3A 8B 46 24 B2 22 22 A7 99 22 11 1D 1D |,F$:.F$."".."...|
000007C0: 12 22 3B 4C 24 3B 22 20 22 3B 42 46 24 3A 89 31 |.";L$;" ";BF$:.1|
000007D0: 32 39 35 00 E7 0F 88 04 8B 46 24 B3 B1 C7 28 33 |295......F$...(3|
000007E0: 34 29 A7 31 31 35 30 00 16 10 92 04 A1 23 31 2C |4).1150......#1,|
000007F0: 46 24 3A 8B 46 24 B3 B1 C7 28 33 34 29 A7 42 24 |F$:.F$...(34).B$|
00000800: 28 49 AA 51 29 B2 42 24 28 49 AA 51 29 AA 46 24 |(I.Q).B$(I.Q).F$|
00000810: 3A 89 31 31 37 30 00 2A 10 9C 04 8B 51 B2 31 A7 |:.1170.*....Q.1.|
00000820: 42 24 28 49 AA 31 29 B2 22 22 00 44 10 A6 04 A1 |B$(I.1)."".D....|
00000830: 23 31 2C 46 24 3A 8B 46 24 B2 C7 28 33 32 29 A7 |#1,F$:.F$..(32).|
00000840: 31 31 39 30 00 4E 10 B0 04 43 24 B2 22 22 00 6F |1190.N...C$."".o|
00000850: 10 BA 04 43 24 B2 43 24 AA 46 24 3A A1 23 31 2C |...C$.C$.F$:.#1,|
00000860: 46 24 3A 8B 46 24 B3 B1 22 22 A7 31 32 31 30 00 |F$:.F$.."".1210.|
00000870: 85 10 C4 04 8B 47 42 B2 31 A7 47 42 24 B2 43 24 |.....GB.1.GB$.C$|
00000880: 3A 47 42 B2 30 00 B8 10 CE 04 42 24 28 49 AA 51 |:GB.0.....B$(I.Q|
00000890: 29 B2 C8 28 42 24 28 49 AA 51 29 AA 5A 4B 24 2C |)..(B$(I.Q).ZK$,|
000008A0: 31 37 29 AA C8 28 47 42 24 2C 33 29 AA C9 28 5A |17)..(GB$,3)..(Z|
000008B0: 4B 24 AA 51 24 2C 33 29 00 EA 10 D8 04 99 22 1D |K$.Q$,3)......".|
000008C0: 1D 22 3B 42 24 28 49 AA 51 29 3B 22 1D 1D 1D 22 |.";B$(I.Q);"..."|
000008D0: 3B 22 12 20 22 3B C8 28 43 24 2C 35 29 3B 3A 8B |;". ";.(C$,5);:.|
000008E0: 47 B2 30 AF 47 54 B2 30 A7 99 00 0A 11 E2 04 8B |G.0.GT.0........|
000008F0: 47 54 B2 31 A7 47 54 B2 30 3A 42 24 28 49 29 B2 |GT.1.GT.0:B$(I).|
00000900: 22 22 3A 99 3A 89 31 30 39 30 00 22 11 EC 04 8B |"":.:.1090."....|
00000910: 51 B2 31 A7 51 B2 30 3A 42 24 28 49 AA 31 29 B2 |Q.1.Q.0:B$(I.1).|
00000920: 22 22 00 64 11 F6 04 8B 47 B2 31 AF 47 54 B2 30 |"".d....G.1.GT.0|
00000930: AF 49 B1 30 A7 99 22 92 20 4A 2F 4E 9D 9D 9D 22 |.I.0..". J/N..."|
00000940: 3B 3A 8D 31 31 30 30 30 3A 8B 41 24 B2 22 4E 22 |;:.11000:.A$."N"|
00000950: A7 99 22 4E 45 49 4E 22 3B 3A 47 54 B2 31 3A 89 |.."NEIN";:GT.1:.|
00000960: 31 32 35 30 00 81 11 00 05 49 B2 49 AA 31 3A 8B |1250.....I.I.1:.|
00000970: 47 B2 31 A7 99 22 92 20 4A 41 22 3A 5A B2 5A AA |G.1..". JA":Z.Z.|
00000980: 31 00 BC 11 05 05 8B 49 AA 51 AA 31 B2 38 35 30 |1......I.Q.1.850|
00000990: A7 99 58 24 3B 22 53 50 45 49 43 48 45 52 20 49 |..X$;"SPEICHER I|
000009A0: 53 54 20 56 4F 4C 4C 22 3A 99 58 24 3B 5A 4D 24 |ST VOLL":.X$;ZM$|
000009B0: 3A A0 31 3A 8D 31 31 30 30 30 3A 8E 00 C6 11 0A |:.1:.11000:.....|
000009C0: 05 89 31 30 39 30 00 DB 11 0F 05 A0 31 3A 8B 48 |..1090......1:.H|
000009D0: B2 31 A7 8D 31 30 30 30 30 3A 8E 00 FA 11 14 05 |.1..10000:......|
000009E0: 99 58 24 3B 22 4E 4F 43 48 20 45 49 4E 45 20 44 |.X$;"NOCH EINE D|
000009F0: 49 53 4B 20 28 4A 2F 4E 29 22 00 09 12 1E 05 51 |ISK (J/N)".....Q|
00000A00: 57 24 B2 C4 28 49 AB 31 29 00 3C 12 28 05 99 58 |W$..(I.1).<.(..X|
00000A10: 24 3B 22 42 49 53 48 45 52 20 57 55 52 44 45 4E |$;"BISHER WURDEN|
00000A20: 20 22 3B 51 57 24 3B 22 20 44 41 54 45 4E 20 47 | ";QW$;" DATEN G|
00000A30: 45 4C 45 53 45 4E 20 11 11 11 11 22 00 47 12 32 |ELESEN ....".G.2|
00000A40: 05 8D 31 31 30 30 30 00 63 12 3C 05 8B 41 24 B2 |..11000.c.<..A$.|
00000A50: 22 4A 22 A7 47 54 B2 31 3A 99 56 24 3B 3A 89 31 |"J".GT.1:.V$;:.1|
00000A60: 30 36 30 00 75 12 46 05 8B 41 24 B3 B1 22 4E 22 |060.u.F..A$.."N"|
00000A70: A7 31 33 33 30 00 82 12 50 05 42 B2 49 AB 31 3A |.1330...P.B.I.1:|
00000A80: A0 31 00 90 12 5A 05 41 24 B2 22 22 3A 54 B2 30 |.1...Z.A$."":T.0|
00000A90: 00 96 12 64 05 8E 00 9C 12 D0 07 8F 00 AC 12 EE |...d............|
00000AA0: 07 49 B2 30 3A 46 B2 30 3A 4A B2 30 00 D2 12 F8 |.I.0:F.0:J.0....|
00000AB0: 07 99 56 24 3B 22 46 31 92 20 12 46 41 52 42 57 |..V$;"F1. .FARBW|
00000AC0: 45 43 48 53 45 4C 20 42 49 4C 44 53 43 48 49 52 |ECHSEL BILDSCHIR|
00000AD0: 4D 22 00 F9 12 02 08 99 58 24 3B 22 46 33 92 20 |M"......X$;"F3. |
00000AE0: 12 46 41 52 42 57 45 43 48 53 45 4C 20 48 49 4E |.FARBWECHSEL HIN|
00000AF0: 54 45 52 47 52 55 4E 44 22 00 1C 13 0C 08 99 58 |TERGRUND"......X|
00000B00: 24 3B 22 46 35 92 20 12 46 41 52 42 57 45 43 48 |$;"F5. .FARBWECH|
00000B10: 53 45 4C 20 53 43 48 52 49 46 54 22 00 28 13 16 |SEL SCHRIFT".(..|
00000B20: 08 99 58 24 3B 5A 4D 24 00 33 13 20 08 8D 31 31 |..X$;ZM$.3. ..11|
00000B30: 30 30 30 00 51 13 2A 08 8B 41 24 B2 C7 28 31 33 |000.Q.*..A$..(13|
00000B40: 33 29 A7 49 B2 49 AA 31 3A 97 35 33 32 38 31 2C |3).I.I.1:.53281,|
00000B50: 49 00 6F 13 34 08 8B 41 24 B2 C7 28 31 33 34 29 |I.o.4..A$..(134)|
00000B60: A7 4A B2 4A AA 31 3A 97 35 33 32 38 30 2C 4A 00 |.J.J.1:.53280,J.|
00000B70: 8B 13 3E 08 8B 41 24 B2 C7 28 31 33 35 29 A7 46 |..>..A$..(135).F|
00000B80: B2 46 AA 31 3A 97 36 34 36 2C 46 00 99 13 48 08 |.F.1:.646,F...H.|
00000B90: 8B 41 24 B2 22 5F 22 A7 8E 00 A3 13 52 08 89 32 |.A$."_".....R..2|
00000BA0: 30 34 30 00 A9 13 B8 0B 8F 00 BF 13 CC 0B 5A 4B |040...........ZK|
00000BB0: 24 B2 C8 28 5A 4B 24 AA 5A 4B 24 2C 33 33 29 00 |$..(ZK$.ZK$,33).|
00000BC0: 07 14 D6 0B 4A 24 B2 22 12 20 4A 41 20 22 3A 4E |....J$.". JA ":N|
00000BD0: 24 B2 22 12 4E 45 49 4E 22 3A 46 31 24 B2 4E 24 |$.".NEIN":F1$.N$|
00000BE0: 3A 46 33 24 B2 4A 24 3A 46 35 24 B2 4A 24 3A 46 |:F3$.J$:F5$.J$:F|
00000BF0: 37 24 B2 4E 24 3A 46 32 24 B2 4E 24 3A 5A 24 B2 |7$.N$:F2$.N$:Z$.|
00000C00: 22 1D 1D 1D 1D 1D 22 00 21 14 E0 0B 59 24 B2 22 |".....".!...Y$."|
00000C10: 11 22 AA 5A 24 3A 46 34 24 B2 4E 24 3A 44 52 B2 |.".Z$:F4$.N$:DR.|
00000C20: 31 00 27 14 EA 0B 8F 00 34 14 F4 0B 54 24 B2 22 |1.'.....4...T$."|
00000C30: 1D 12 20 22 00 5C 14 FE 0B 53 54 24 B2 22 22 3A |.. ".\...ST$."":|
00000C40: 41 4E 24 B2 22 42 49 54 54 45 20 46 55 4E 4B 54 |AN$."BITTE FUNKT|
00000C50: 49 4F 4E 20 57 41 45 48 4C 45 4E 22 00 7D 14 03 |ION WAEHLEN".}..|
00000C60: 0C 99 22 93 1D 1D 1D 1D 1D 12 20 44 52 55 43 4B |.."....... DRUCK|
00000C70: 45 52 20 41 55 53 47 41 42 45 20 11 22 00 9F 14 |ER AUSGABE ."...|
00000C80: 08 0C 99 46 31 24 3B 54 24 3B 22 46 31 20 92 20 |...F1$;T$;"F1 . |
00000C90: 44 52 55 43 4B 2D 42 45 47 49 4E 4E 20 11 22 00 |DRUCK-BEGINN .".|
00000CA0: CB 14 12 0C 99 46 33 24 3B 54 24 3B 22 46 33 20 |.....F3$;T$;"F3 |
00000CB0: 92 20 53 54 41 4E 44 2E 4B 4F 50 46 20 4D 49 54 |. STAND.KOPF MIT|
00000CC0: 20 44 52 55 43 4B 45 4E 20 11 22 00 F7 14 1C 0C | DRUCKEN .".....|
00000CD0: 99 46 35 24 3B 54 24 3B 22 46 35 20 92 20 50 52 |.F5$;T$;"F5 . PR|
00000CE0: 4F 47 52 41 4D 4D 2D 4C 49 53 54 45 20 44 52 55 |OGRAMM-LISTE DRU|
00000CF0: 43 4B 45 4E 20 11 22 00 20 15 26 0C 99 46 37 24 |CKEN .". .&..F7$|
00000D00: 3B 54 24 3B 22 46 37 20 92 20 50 52 45 49 53 2D |;T$;"F7 . PREIS-|
00000D10: 4C 49 53 54 45 20 44 52 55 43 4B 45 4E 20 11 22 |LISTE DRUCKEN ."|
00000D20: 00 4A 15 30 0C 99 46 32 24 3B 54 24 3B 22 46 32 |.J.0..F2$;T$;"F2|
00000D30: 20 92 20 4C 49 53 54 45 20 4E 41 43 48 20 4B 52 | . LISTE NACH KR|
00000D40: 49 54 45 52 49 55 4D 20 11 22 00 73 15 3A 0C 99 |ITERIUM .".s.:..|
00000D50: 46 34 24 3B 54 24 3B 22 46 34 20 92 20 53 54 41 |F4$;T$;"F4 . STA|
00000D60: 4E 44 41 52 44 4B 4F 50 46 20 41 45 4E 44 45 52 |NDARDKOPF AENDER|
00000D70: 4E 20 22 00 84 15 44 0C 99 58 24 3B 22 9D 9D 22 |N "...D..X$;".."|
00000D80: 3B 5A 4D 24 00 8E 15 4E 0C 99 22 11 11 22 00 BC |;ZM$...N..".."..|
00000D90: 15 58 0C 99 22 20 20 20 20 B0 C0 C0 C0 C0 C0 C0 |.X.." .......|
00000DA0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000DB0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 00 EA 15 62 |...............b|
00000DC0: 0C 99 22 20 20 20 20 C2 20 20 20 20 20 20 20 20 |.." . |
00000DD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000DE0: 20 20 20 20 20 20 20 20 20 C2 00 18 16 6C 0C 99 | ....l..|
00000DF0: 22 20 20 20 20 AB C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |" ...........|
00000E00: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000E10: C0 C0 C0 C0 C0 C0 C0 B3 00 46 16 76 0C 99 22 20 |.........F.v.." |
00000E20: 20 20 20 C2 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00000E30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E40: 20 20 20 20 20 C2 00 74 16 80 0C 99 22 20 20 20 | ..t...." |
00000E50: 20 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 | ...............|
00000E60: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000E70: C0 C0 C0 BD 00 97 16 8A 0C 99 22 13 22 3B 3A 81 |..........".";:.|
00000E80: 4A B2 31 A4 32 30 3A 99 22 11 22 3B 3A 82 3A 99 |J.1.20:.".";:.:.|
00000E90: 5A 24 3B 3B 53 54 24 00 A3 16 94 0C 99 59 24 3B |Z$;;ST$......Y$;|
00000EA0: 41 4E 24 00 C3 16 9E 0C 8B 43 B2 31 A7 43 B2 30 |AN$......C.1.C.0|
00000EB0: 3A 8D 33 34 35 30 3A 46 34 24 B2 4E 24 3A 89 33 |:.3450:F4$.N$:.3|
00000EC0: 30 37 30 00 E2 16 A8 0C 8B 46 31 24 B2 4A 24 A7 |070......F1$.J$.|
00000ED0: 46 31 24 B2 4E 24 3A 8D 33 33 38 30 3A 89 33 30 |F1$.N$:.3380:.30|
00000EE0: 37 30 00 ED 16 B2 0C 8D 31 31 30 30 30 00 10 17 |70......11000...|
00000EF0: BC 0C 8B 41 24 B2 C7 28 31 33 33 29 AF 46 31 24 |...A$..(133).F1$|
00000F00: B2 4E 24 A7 46 31 24 B2 4A 24 3A 89 33 30 37 30 |.N$.F1$.J$:.3070|
00000F10: 00 33 17 C6 0C 8B 41 24 B2 C7 28 31 33 34 29 AF |.3....A$..(134).|
00000F20: 46 33 24 B2 4A 24 A7 46 33 24 B2 4E 24 3A 89 33 |F3$.J$.F3$.N$:.3|
00000F30: 30 37 30 00 56 17 D0 0C 8B 41 24 B2 C7 28 31 33 |070.V....A$..(13|
00000F40: 34 29 AF 46 33 24 B2 4E 24 A7 46 33 24 B2 4A 24 |4).F3$.N$.F3$.J$|
00000F50: 3A 89 33 30 37 30 00 87 17 DA 0C 8B 41 24 B2 C7 |:.3070......A$..|
00000F60: 28 31 33 35 29 AF 46 35 24 B2 4E 24 A7 46 35 24 |(135).F5$.N$.F5$|
00000F70: B2 4A 24 3A 46 32 24 B2 4E 24 3A 46 37 24 B2 4E |.J$:F2$.N$:F7$.N|
00000F80: 24 3A 89 33 30 37 30 00 AA 17 E4 0C 8B 41 24 B2 |$:.3070......A$.|
00000F90: C7 28 31 33 35 29 AF 46 35 24 B2 4A 24 A7 46 35 |.(135).F5$.J$.F5|
00000FA0: 24 B2 4E 24 3A 89 33 30 37 30 00 CD 17 EE 0C 8B |$.N$:.3070......|
00000FB0: 41 24 B2 C7 28 31 33 36 29 AF 46 37 24 B2 4A 24 |A$..(136).F7$.J$|
00000FC0: A7 46 37 24 B2 4E 24 3A 89 33 30 37 30 00 FE 17 |.F7$.N$:.3070...|
00000FD0: F8 0C 8B 41 24 B2 C7 28 31 33 36 29 AF 46 37 24 |...A$..(136).F7$|
00000FE0: B2 4E 24 A7 46 37 24 B2 4A 24 3A 46 32 24 B2 4E |.N$.F7$.J$:F2$.N|
00000FF0: 24 3A 46 35 24 B2 4E 24 3A 89 33 30 37 30 00 2F |$:F5$.N$:.3070./|
00001000: 18 02 0D 8B 41 24 B2 C7 28 31 33 37 29 AF 46 32 |....A$..(137).F2|
00001010: 24 B2 4E 24 A7 46 32 24 B2 4A 24 3A 46 37 24 B2 |$.N$.F2$.J$:F7$.|
00001020: 4E 24 3A 46 35 24 B2 4E 24 3A 89 33 30 37 30 00 |N$:F5$.N$:.3070.|
00001030: 52 18 0C 0D 8B 41 24 B2 C7 28 31 33 37 29 AF 46 |R....A$..(137).F|
00001040: 32 24 B2 4A 24 A7 46 32 24 B2 4E 24 3A 89 33 30 |2$.J$.F2$.N$:.30|
00001050: 37 30 00 67 18 16 0D 8B 41 24 B2 C7 28 39 35 29 |70.g....A$..(95)|
00001060: A7 44 52 B2 30 3A 8E 00 87 18 20 0D 8B 41 24 B2 |.DR.0:.... ..A$.|
00001070: C7 28 31 33 38 29 A7 46 34 24 B2 4A 24 3A 43 B2 |.(138).F4$.J$:C.|
00001080: 31 3A 89 33 30 37 30 00 A4 18 2A 0D 8B 41 24 B3 |1:.3070...*..A$.|
00001090: C7 28 39 35 29 B0 41 24 B1 C7 28 31 33 37 29 A7 |.(95).A$..(137).|
000010A0: 33 32 35 30 00 DA 18 34 0D 99 22 13 22 3A 81 4A |3250...4..".":.J|
000010B0: B2 31 A4 31 39 3A 99 22 11 22 3B 3A 82 3A 99 5A |.1.19:.".";:.:.Z|
000010C0: 24 3B 5A 4B 24 3A 99 22 91 22 3B 5A 24 3B 22 4F |$;ZK$:.".";Z$;"O|
000010D0: 4B 20 3F 20 28 4A 2F 4E 29 22 00 F8 18 39 0D 99 |K ? (J/N)"...9..|
000010E0: 59 24 3B 5A 4B 24 3A 8D 31 31 30 30 30 3A 8B 41 |Y$;ZK$:.11000:.A|
000010F0: 24 B3 B1 22 4A 22 A7 8E 00 36 19 3E 0D 99 22 13 |$.."J"...6.>..".|
00001100: 22 3A 81 4A B2 31 A4 31 39 3A 99 22 11 22 3B 3A |":.J.1.19:.".";:|
00001110: 82 3A 99 5A 24 3B 22 57 49 45 56 49 45 4C 20 5A |.:.Z$;"WIEVIEL Z|
00001120: 45 49 4C 45 4E 20 50 52 4F 20 53 45 49 54 45 20 |EILEN PRO SEITE |
00001130: 3F 3E 3D 31 35 22 00 6F 19 48 0D 99 59 24 3B 5A |?>=15".o.H..Y$;Z|
00001140: 4B 24 3A 99 22 91 91 22 3B 59 24 3B 3A 8D 31 38 |K$:."..";Y$;:.18|
00001150: 30 30 30 3A 44 5A B2 C5 28 4B 24 29 3A 8B 44 5A |000:DZ..(K$):.DZ|
00001160: B3 31 35 B0 44 5A B1 33 30 30 A7 33 33 39 30 00 |.15.DZ.300.3390.|
00001170: 8B 19 4D 0D 8B 46 32 24 B2 4E 24 AF 46 35 24 B2 |..M..F2$.N$.F5$.|
00001180: 4E 24 AF 46 37 24 B2 4E 24 A7 8E 00 9C 19 52 0D |N$.F7$.N$.....R.|
00001190: 8B 46 33 24 B2 4A 24 A7 33 35 33 30 00 AD 19 5C |.F3$.J$.3530...\|
000011A0: 0D 8B 46 33 24 B2 4E 24 A7 33 35 39 30 00 BB 19 |..F3$.N$.3590...|
000011B0: 66 0D 8B 41 24 B2 22 5F 22 A7 8E 00 C1 19 70 0D |f..A$."_".....p.|
000011C0: 8E 00 E0 19 7A 0D 53 54 24 B2 22 44 41 54 55 4D |....z.ST$."DATUM|
000011D0: 20 3F 22 3A 8D 33 35 31 30 3A 44 41 24 B2 4B 24 | ?":.3510:DA$.K$|
000011E0: 00 FE 19 84 0D 53 54 24 B2 22 4E 41 4D 45 20 3F |.....ST$."NAME ?|
000011F0: 22 3A 8D 33 35 31 30 3A 42 4E 24 B2 4B 24 00 23 |":.3510:BN$.K$.#|
00001200: 1A 8E 0D 53 54 24 B2 22 53 54 52 41 53 53 45 2C |...ST$."STRASSE,|
00001210: 4E 52 2E 20 3F 22 3A 8D 33 35 31 30 3A 42 41 24 |NR. ?":.3510:BA$|
00001220: B2 4B 24 00 44 1A 98 0D 53 54 24 B2 22 57 4F 48 |.K$.D...ST$."WOH|
00001230: 4E 4F 52 54 20 3F 22 3A 8D 33 35 31 30 3A 42 57 |NORT ?":.3510:BW|
00001240: 24 B2 4B 24 00 65 1A A2 0D 53 54 24 B2 22 54 45 |$.K$.e...ST$."TE|
00001250: 4C 45 46 4F 4E 20 3F 22 3A 8D 33 35 31 30 3A 42 |LEFON ?":.3510:B|
00001260: 54 24 B2 4B 24 00 6B 1A AC 0D 8E 00 8C 1A B6 0D |T$.K$.k.........|
00001270: 99 22 13 22 3A 81 4A B2 31 A4 31 39 3A 99 22 11 |.".":.J.1.19:.".|
00001280: 22 3B 3A 82 3A 99 5A 24 3B 53 54 24 00 A9 1A BB |";:.:.Z$;ST$....|
00001290: 0D 99 59 24 3B 5A 4B 24 3A 99 22 91 91 22 3B 59 |..Y$;ZK$:."..";Y|
000012A0: 24 3B 3A 8D 31 38 30 30 30 00 D4 1A C0 0D 99 22 |$;:.18000......"|
000012B0: 13 22 3A 81 4A B2 31 A4 31 39 3A 99 22 11 22 3B |.":.J.1.19:.".";|
000012C0: 3A 82 3A 99 5A 24 3B 5A 4B 24 3A 99 59 24 3B 5A |:.:.Z$;ZK$:.Y$;Z|
000012D0: 4B 24 3A 8E 00 EB 1A CA 0D 5A 44 B2 30 3A 8B 46 |K$:......ZD.0:.F|
000012E0: 33 24 B2 4A 24 A7 5A 44 B2 31 35 00 0C 1B D4 0D |3$.J$.ZD.15.....|
000012F0: 98 34 2C C7 28 31 34 29 22 20 20 22 3B 42 4E 24 |.4,.(14)" ";BN$|
00001300: 3A 98 34 2C 22 20 20 22 3B 42 41 24 00 2B 1B DE |:.4," ";BA$.+..|
00001310: 0D 98 34 2C 22 20 20 22 3B 42 57 24 3A 98 34 2C |..4," ";BW$:.4,|
00001320: 22 20 20 22 3B 42 54 24 3A 98 34 00 4F 1B E8 0D |" ";BT$:.4.O...|
00001330: 98 34 2C 22 20 20 44 49 53 4B 45 54 54 45 4E 49 |.4," DISKETTENI|
00001340: 4E 48 41 4C 54 20 56 4F 4D 20 22 3B 44 41 24 00 |NHALT VOM ";DA$.|
00001350: 70 1B F2 0D 98 34 3A 98 34 2C 22 20 20 50 52 4F |p....4:.4," PRO|
00001360: 47 52 41 4D 4D 45 3A 22 3B 42 3B C7 28 31 35 29 |GRAMME:";B;.(15)|
00001370: 00 77 1B FC 0D 98 34 00 88 1B 06 0E 8B 46 32 24 |.w....4......F2$|
00001380: B2 4A 24 A7 33 37 36 30 00 99 1B 0B 0E 8B 46 37 |.J$.3760......F7|
00001390: 24 B2 4E 24 A7 33 36 31 30 00 C4 1B 10 0E 51 53 |$.N$.3610.....QS|
000013A0: 24 B2 22 50 52 47 2E 4E 41 4D 45 20 20 20 20 20 |$."PRG.NAME |
000013B0: 20 20 20 4B 42 2E 20 50 52 45 49 53 20 22 3A 89 | KB. PREIS ":.|
000013C0: 33 36 32 30 00 E9 1B 1A 0E 51 53 24 B2 22 50 52 |3620.....QS$."PR|
000013D0: 47 2E 4E 41 4D 45 20 20 20 20 20 20 20 20 20 49 |G.NAME I|
000013E0: 44 20 42 4C 2E 20 20 20 22 00 FC 1B 24 0E 5A 44 |D BL. "...$.ZD|
000013F0: 24 B2 22 20 20 22 3A 89 33 36 34 30 00 0C 1C 38 |$." ":.3640...8|
00001400: 0E 44 44 B2 B5 28 42 AD 33 29 AA 31 00 14 1C 42 |.DD..(B.3).1...B|
00001410: 0E 53 B2 31 00 39 1C 4C 0E 42 24 28 42 AA 31 29 |.S.1.9.L.B$(B.1)|
00001420: B2 22 22 3A 42 24 28 42 AA 32 29 B2 22 22 3A 42 |."":B$(B.2)."":B|
00001430: 24 28 42 AA 33 29 B2 22 22 00 59 1C 56 0E 98 34 |$(B.3)."".Y.V..4|
00001440: 2C C8 28 22 20 20 20 20 22 AA 51 53 24 AA 51 53 |,.(" ".QS$.QS|
00001450: 24 AA 51 53 24 2C 37 38 29 00 80 1C 60 0E 98 34 |$.QS$,78)...`..4|
00001460: 2C 22 20 20 20 20 22 3B 3A 81 54 B2 31 A4 37 34 |," ";:.T.1.74|
00001470: 3A 98 34 2C C7 28 31 30 31 29 3B 3A 82 3A 98 34 |:.4,.(101);:.:.4|
00001480: 00 8C 1C 6A 0E 81 54 B2 31 A4 44 44 00 C0 1C 74 |...j..T.1.DD...t|
00001490: 0E 98 34 2C 22 20 20 20 20 22 3B 42 24 28 53 29 |..4," ";B$(S)|
000014A0: 3B 22 20 20 20 22 3B 42 24 28 53 AA 44 44 29 3B |;" ";B$(S.DD);|
000014B0: 22 20 20 20 22 3B 42 24 28 53 AA 32 AC 44 44 29 |" ";B$(S.2.DD)|
000014C0: 00 CC 1C 7E 0E 5A 44 B2 5A 44 AA 31 00 E8 1C 88 |...~.ZD.ZD.1....|
000014D0: 0E 53 B2 53 AA 31 3A 8B 5A 44 B2 44 5A A7 5A 44 |.S.S.1:.ZD.DZ.ZD|
000014E0: B2 30 3A 8D 33 37 34 30 00 F0 1C 92 0E 82 3A 8E |.0:.3740......:.|
000014F0: 00 0E 1D 9C 0E 99 22 13 22 3A 81 4A B2 31 A4 31 |......".":.J.1.1|
00001500: 39 3A 99 22 11 22 3B 3A 82 3A 99 5A 24 3B 00 50 |9:.".";:.:.Z$;.P|
00001510: 1D A6 0E 99 22 44 52 55 43 4B 45 52 50 41 50 49 |...."DRUCKERPAPI|
00001520: 45 52 20 4A 55 53 54 49 45 52 45 4E 20 3F 20 22 |ER JUSTIEREN ? "|
00001530: 3A 99 59 24 3B 22 54 41 53 54 45 20 44 52 55 45 |:.Y$;"TASTE DRUE|
00001540: 43 4B 45 4E 20 22 3B 3A 8D 31 31 30 30 30 3A 8E |CKEN ";:.11000:.|
00001550: 00 85 1D B0 0E 46 B2 32 3A 99 22 13 22 3A 81 49 |.....F.2:.".":.I|
00001560: B2 31 A4 31 39 3A 99 22 11 22 3B 3A 82 3A 99 5A |.1.19:.".";:.:.Z|
00001570: 24 3B 5A 4B 24 3A 99 59 24 3B 5A 4B 24 3A 99 22 |$;ZK$:.Y$;ZK$:."|
00001580: 91 91 91 91 22 00 AE 1D B5 0E 99 5A 24 3B 22 49 |...."......Z$;"I|
00001590: 44 2E 43 4F 44 45 20 45 49 4E 47 45 42 45 4E 20 |D.CODE EINGEBEN |
000015A0: 21 22 3A 99 59 24 3B 3A 8D 31 38 30 30 30 00 C3 |!":.Y$;:.18000..|
000015B0: 1D BA 0E 8B C9 28 4B 24 2C 31 29 B2 22 2A 22 A7 |.....(K$,1)."*".|
000015C0: 46 B2 31 00 D6 1D C4 0E 4B 24 B2 C8 28 4B 24 AA |F.1.....K$..(K$.|
000015D0: 5A 4B 24 2C 46 29 00 F3 1D CE 0E 81 49 B2 31 A4 |ZK$,F)......I.1.|
000015E0: 42 3A 8B 5A 44 B2 44 5A A7 5A 44 B2 30 3A 8D 33 |B:.ZD.DZ.ZD.0:.3|
000015F0: 37 34 30 00 21 1E D8 0E 8B CA 28 42 24 28 49 29 |740.!.....(B$(I)|
00001600: 2C 31 38 2C 46 29 B2 4B 24 A7 98 34 2C 22 20 20 |,18,F).K$..4," |
00001610: 20 20 22 3B 42 24 28 49 29 3A 5A 44 B2 5A 44 AA | ";B$(I):ZD.ZD.|
00001620: 31 00 2A 1E E2 0E 82 3A 98 34 00 30 1E EC 0E 8E |1.*....:.4.0....|
00001630: 00 36 1E A0 0F 8F 00 6F 1E BE 0F 99 56 24 3B 22 |.6.....o....V$;"|
00001640: 53 4F 52 54 49 45 52 2D 52 4F 55 54 49 4E 45 20 |SORTIER-ROUTINE |
00001650: 4C 41 45 55 46 54 21 22 3A 42 24 28 42 AA 31 29 |LAEUFT!":B$(B.1)|
00001660: B2 22 5A 5A 5A 5A 5A 5A 5A 5A 22 3A 46 B2 30 00 |."ZZZZZZZZ":F.0.|
00001670: 99 1E C3 0F 99 58 24 3B 22 41 4C 50 48 41 42 45 |.....X$;"ALPHABE|
00001680: 54 49 53 43 48 20 4F 44 45 52 20 4E 41 43 48 20 |TISCH ODER NACH |
00001690: 49 44 2E 4E 52 2E 20 3F 22 00 C2 1E C8 0F 99 58 |ID.NR. ?"......X|
000016A0: 24 3B 22 28 41 2F 49 29 22 3A 99 58 24 3B 5A 4D |$;"(A/I)":.X$;ZM|
000016B0: 24 3A 8D 31 31 30 30 30 3A 8B 41 24 B2 22 5F 22 |$:.11000:.A$."_"|
000016C0: A7 8E 00 D2 1E D7 0F 8B 41 24 B2 22 49 22 A7 46 |........A$."I".F|
000016D0: B2 31 00 DD 1E DC 0F 81 43 B2 31 A4 42 00 0A 1F |.1......C.1.B...|
000016E0: E6 0F 4A B2 43 AA 31 3A 99 58 24 3B 22 45 4C 45 |..J.C.1:.X$;"ELE|
000016F0: 4D 45 4E 54 20 20 20 20 20 20 20 9D 9D 9D 9D 22 |MENT ...."|
00001700: 3B 4A AB 31 3B 22 91 91 91 22 00 15 1F F0 0F 81 |;J.1;"..."......|
00001710: 44 B2 4A A4 42 00 39 1F FA 0F 8B 46 B2 31 AF C9 |D.J.B.9....F.1..|
00001720: 28 42 24 28 43 29 2C 36 29 B1 C9 28 42 24 28 44 |(B$(C),6)..(B$(D|
00001730: 29 2C 36 29 A7 34 31 32 30 00 4F 1F 04 10 8B 42 |),6).4120.O....B|
00001740: 24 28 43 29 B1 42 24 28 44 29 A7 34 31 32 30 00 |$(C).B$(D).4120.|
00001750: 59 1F 0E 10 89 34 31 33 30 00 81 1F 18 10 43 24 |Y....4130.....C$|
00001760: 28 30 29 B2 42 24 28 43 29 3A 42 24 28 43 29 B2 |(0).B$(C):B$(C).|
00001770: 42 24 28 44 29 3A 42 24 28 44 29 B2 43 24 28 30 |B$(D):B$(D).C$(0|
00001780: 29 00 87 1F 22 10 82 00 8D 1F 2C 10 82 00 BA 1F |)...".....,.....|
00001790: 36 10 99 56 24 3B 22 44 4F 50 50 45 4C 54 45 20 |6..V$;"DOPPELTE |
000017A0: 44 41 54 45 4E 20 41 55 53 53 4F 52 54 49 45 52 |DATEN AUSSORTIER|
000017B0: 45 4E 20 28 4A 2F 4E 29 20 22 00 C5 1F 40 10 8D |EN (J/N) "...@..|
000017C0: 31 31 30 30 30 00 D6 1F 4A 10 8B 41 24 B2 22 4A |11000...J..A$."J|
000017D0: 22 A7 34 31 39 30 00 DC 1F 54 10 8E 00 FF 1F 5E |".4190...T.....^|
000017E0: 10 99 56 24 3B 22 45 53 20 57 49 52 44 20 41 55 |..V$;"ES WIRD AU|
000017F0: 53 53 4F 52 54 49 45 52 54 20 22 3A 4A B2 31 00 |SSORTIERT ":J.1.|
00001800: 39 20 68 10 99 58 24 3B 22 57 49 45 56 49 45 4C |9 h..X$;"WIEVIEL|
00001810: 45 20 5A 45 49 43 48 45 4E 20 42 45 52 55 45 43 |E ZEICHEN BERUEC|
00001820: 4B 53 49 43 48 54 49 47 45 4E 20 3F 22 3A 99 58 |KSICHTIGEN ?":.X|
00001830: 24 3B 3A 8D 31 38 30 30 30 00 58 20 72 10 53 53 |$;:.18000.X r.SS|
00001840: B2 C5 28 4B 24 29 3A 8B 53 53 B2 30 B0 53 53 B1 |..(K$):.SS.0.SS.|
00001850: 32 35 A7 53 53 B2 32 35 00 7C 20 7C 10 8B C8 28 |25.SS.25.| |...(|
00001860: 42 24 28 4A 29 2C 53 53 29 B2 C8 28 42 24 28 4A |B$(J),SS)..(B$(J|
00001870: AA 31 29 2C 53 53 29 A7 34 32 37 30 00 86 20 86 |.1),SS).4270.. .|
00001880: 10 4A B2 4A AA 31 00 97 20 90 10 8B 4A B3 B2 42 |.J.J.1.. ...J..B|
00001890: AB 31 A7 34 32 32 30 00 B2 20 9A 10 81 49 B2 42 |.1.4220.. ...I.B|
000018A0: AA 31 A4 42 AA 31 30 3A 42 24 28 49 29 B2 22 22 |.1.B.10:B$(I).""|
000018B0: 3A 82 00 B8 20 A4 10 8E 00 C3 20 AE 10 81 49 B2 |:... ..... ...I.|
000018C0: 4A A4 42 00 D5 20 B8 10 42 24 28 49 29 B2 42 24 |J.B.. ..B$(I).B$|
000018D0: 28 49 AA 31 29 00 DB 20 C2 10 82 00 F1 20 CC 10 |(I.1).. ..... ..|
000018E0: 4A B2 4A AB 31 3A 42 B2 42 AB 31 3A 89 34 32 33 |J.J.1:B.B.1:.423|
000018F0: 30 00 F7 20 D6 10 8E 00 FD 20 88 13 8F 00 21 21 |0.. ..... ....!!|
00001900: A6 13 99 56 24 3B 22 44 41 54 45 4E 20 57 45 52 |...V$;"DATEN WER|
00001910: 44 45 4E 20 47 45 53 50 45 49 43 48 45 52 54 20 |DEN GESPEICHERT |
00001920: 22 00 57 21 B0 13 8D 31 37 30 30 30 3A 49 B2 30 |".W!...17000:I.0|
00001930: 3A 99 58 24 3B 22 53 49 43 48 45 52 20 3F 20 28 |:.X$;"SICHER ? (|
00001940: 4A 2F 4E 29 22 3A 8D 31 31 30 30 30 3A 8B 41 24 |J/N)":.11000:.A$|
00001950: B3 B1 22 4A 22 A7 8E 00 6D 21 BA 13 9F 32 2C 38 |.."J"...m!...2,8|
00001960: 2C 32 2C 46 49 24 AA 22 2C 53 2C 57 22 00 91 21 |,2,FI$.",S,W"..!|
00001970: C4 13 8D 31 36 30 30 30 3A 99 58 24 3B 4B 24 3A |...16000:.X$;K$:|
00001980: 8B 54 B3 B1 30 A7 A0 32 3A 8D 31 30 30 30 30 3A |.T..0..2:.10000:|
00001990: 8E 00 9A 21 CE 13 98 32 2C 42 00 B9 21 D8 13 8B |...!...2,B..!...|
000019A0: 47 B2 31 A7 81 49 B2 31 A4 5A 3A 98 32 2C 42 24 |G.1..I.1.Z:.2,B$|
000019B0: 28 49 29 3A 89 35 31 30 30 00 CD 21 E2 13 81 49 |(I):.5100..!...I|
000019C0: B2 31 A4 42 3A 98 32 2C 42 24 28 49 29 00 D3 21 |.1.B:.2,B$(I)..!|
000019D0: EC 13 82 00 DA 21 F6 13 A0 32 00 E0 21 00 14 8E |.....!...2..!...|
000019E0: 00 E6 21 70 17 8F 00 0E 22 8E 17 99 56 24 3B 22 |..!p...."...V$;"|
000019F0: 44 41 54 45 4E 20 57 45 52 44 45 4E 20 47 45 4C |DATEN WERDEN GEL|
00001A00: 45 53 45 4E 20 22 3A 99 58 24 3B 5A 4D 24 00 23 |ESEN ":.X$;ZM$.#|
00001A10: 22 98 17 8D 31 37 30 30 30 3A 8B 4B 24 B2 22 5F |"...17000:.K$."_|
00001A20: 22 A7 8E 00 4F 22 A2 17 99 58 24 3B 22 44 41 54 |"...O"...X$;"DAT|
00001A30: 45 4E 20 46 49 4C 45 20 22 3B 46 49 24 22 20 45 |EN FILE ";FI$" E|
00001A40: 49 4E 4C 45 53 45 4E 20 28 4A 2F 4E 29 20 22 00 |INLESEN (J/N) ".|
00001A50: 5A 22 AC 17 8D 31 31 30 30 30 00 69 22 B6 17 8B |Z"...11000.i"...|
00001A60: 41 24 B3 B1 22 4A 22 A7 8E 00 89 22 C0 17 9F 32 |A$.."J"...."...2|
00001A70: 2C 38 2C 32 2C 46 49 24 AA 22 2C 53 2C 52 22 3A |,8,2,FI$.",S,R":|
00001A80: 99 22 11 11 1D 1D 1D 22 3B 00 B2 22 CA 17 8D 31 |.".....";.."...1|
00001A90: 36 30 30 30 3A 99 22 20 12 22 4B 24 22 11 11 22 |6000:." ."K$".."|
00001AA0: 3A 8B 54 B3 B1 30 A7 8D 31 30 30 30 30 3A A0 32 |:.T..0..10000:.2|
00001AB0: 3A 8E 00 BB 22 D4 17 84 32 2C 42 00 CC 22 DE 17 |:..."...2,B.."..|
00001AC0: 81 49 B2 46 4A AA 31 A4 42 AA 46 4A 00 E7 22 E8 |.I.FJ.1.B.FJ..".|
00001AD0: 17 84 32 2C 42 24 28 49 29 3A 82 3A A0 32 3A 42 |..2,B$(I):.:.2:B|
00001AE0: B2 42 AA 46 4A 3A 8E 00 05 23 9C 18 99 56 24 3B |.B.FJ:...#...V$;|
00001AF0: 22 44 49 53 4B 20 4F 50 45 52 41 54 49 4F 4E 20 |"DISK OPERATION |
00001B00: 4D 4F 44 45 22 00 2F 23 A6 18 99 58 24 3B 22 44 |MODE"./#...X$;"D|
00001B10: 49 53 4B 45 54 54 45 4E 42 45 46 45 48 4C 45 20 |ISKETTENBEFEHLE |
00001B20: 53 2C 20 56 2C 20 4E 2C 20 52 2C 20 49 20 22 00 |S, V, N, R, I ".|
00001B30: 6A 23 B0 18 99 58 24 3B 22 42 45 46 45 48 4C 20 |j#...X$;"BEFEHL |
00001B40: 3F 22 3B 3A 8D 31 38 30 30 30 3A 46 49 24 B2 4B |?";:.18000:FI$.K|
00001B50: 24 3A 99 58 24 3B 22 41 55 53 46 55 45 48 52 45 |$:.X$;"AUSFUEHRE|
00001B60: 4E 20 28 4A 2F 4E 29 20 3F 22 00 75 23 B5 18 8D |N (J/N) ?".u#...|
00001B70: 31 31 30 30 30 00 83 23 BA 18 8B 41 24 B2 22 5F |11000..#...A$."_|
00001B80: 22 A7 8E 00 BF 23 C4 18 8B 41 24 B2 22 4A 22 A7 |"....#...A$."J".|
00001B90: 9F 31 35 2C 38 2C 31 35 3A 98 31 35 2C 46 49 24 |.15,8,15:.15,FI$|
00001BA0: 3A A0 31 35 3A 8D 31 36 30 30 30 3A 8B 54 B3 B1 |:.15:.16000:.T..|
00001BB0: 30 A7 99 58 24 3B 4B 24 3A 8D 31 30 30 30 30 00 |0..X$;K$:.10000.|
00001BC0: CA 23 C9 18 8B 54 B2 30 A7 8E 00 DC 23 CE 18 99 |.#...T.0....#...|
00001BD0: 22 13 22 3B 58 24 3A 89 36 33 31 30 00 E2 23 58 |".";X$:.6310..#X|
00001BE0: 1B 8F 00 EF 23 76 1B 97 36 35 30 2C 31 32 38 00 |....#v..650,128.|
00001BF0: 1A 24 80 1B 99 53 24 3B 22 93 1D 1D 1D 1D 1D 12 |.$...S$;".......|
00001C00: 20 40 20 92 20 20 3A 20 20 45 4C 45 4D 45 4E 54 | @ . : ELEMENT|
00001C10: 20 4C 4F 45 53 43 48 45 4E 22 00 3D 24 8A 1B 99 | LOESCHEN".=$...|
00001C20: 53 24 3B 22 12 20 5C 20 92 20 20 3A 20 20 45 4C |S$;". \ . : EL|
00001C30: 45 4D 45 4E 54 20 53 55 43 48 45 4E 22 00 64 24 |EMENT SUCHEN".d$|
00001C40: 94 1B 99 53 24 3B 22 12 20 2A 20 92 20 20 3A 20 |...S$;". * . : |
00001C50: 20 45 4C 45 4D 45 4E 54 20 56 45 52 42 45 53 53 | ELEMENT VERBESS|
00001C60: 45 52 4E 22 00 83 24 9E 1B 99 53 24 3B 22 12 20 |ERN"..$...S$;". |
00001C70: 5F 20 92 20 20 3A 20 20 22 3B C9 28 5A 4D 24 2C |_ . : ";.(ZM$,|
00001C80: 31 33 29 00 A8 24 A8 1B 99 53 24 3B 22 12 20 50 |13)..$...S$;". P|
00001C90: 20 92 20 20 3A 20 20 45 4C 45 4D 45 4E 54 20 44 | . : ELEMENT D|
00001CA0: 52 55 43 4B 45 4E 20 22 00 CC 24 B2 1B 99 53 24 |RUCKEN "..$...S$|
00001CB0: 3B 22 12 20 20 20 92 20 20 3A 20 20 45 49 4E 20 |;". . : EIN |
00001CC0: 45 4C 45 4D 45 4E 54 20 56 4F 52 22 00 F1 24 BC |ELEMENT VOR"..$.|
00001CD0: 1B 99 53 24 3B 22 12 20 46 31 92 20 20 3A 20 20 |..S$;". F1. : |
00001CE0: 32 30 20 45 4C 45 4D 45 4E 54 45 20 56 4F 52 20 |20 ELEMENTE VOR |
00001CF0: 22 00 19 25 C6 1B 99 53 24 3B 22 12 20 46 33 92 |"..%...S$;". F3.|
00001D00: 20 20 3A 20 20 32 30 20 45 4C 45 4D 45 4E 54 45 | : 20 ELEMENTE|
00001D10: 20 5A 55 52 55 45 43 4B 22 00 41 25 D0 1B 99 53 | ZURUECK".A%...S|
00001D20: 24 3B 22 12 20 5E 20 92 20 20 3A 20 20 45 49 4E |$;". ^ . : EIN|
00001D30: 20 45 4C 45 4D 45 4E 54 20 5A 55 52 55 45 43 4B | ELEMENT ZURUECK|
00001D40: 22 00 68 25 DA 1B 99 53 24 3B 22 12 20 24 20 92 |".h%...S$;". $ .|
00001D50: 20 20 3A 20 20 44 4D 2D 4C 49 53 54 45 20 45 52 | : DM-LISTE ER|
00001D60: 53 54 45 4C 4C 45 4E 22 00 97 25 DF 1B 99 53 24 |STELLEN"..%...S$|
00001D70: 3B 22 12 20 2B 20 92 20 20 3A 20 20 45 4C 45 4D |;". + . : ELEM|
00001D80: 45 4E 54 20 45 49 4E 46 55 45 47 45 4E 11 11 20 |ENT EINFUEGEN.. |
00001D90: 22 3A 99 22 91 91 22 00 A2 25 E4 1B 81 49 B2 31 |":.".."..%...I.1|
00001DA0: A4 42 00 C7 25 EE 1B 99 22 91 1D 1D 1D 22 3B 5A |.B..%..."....";Z|
00001DB0: 4B 24 22 11 22 20 20 3A 20 99 22 1D 1D 1D 20 20 |K$"." : ."... |
00001DC0: 22 3B 42 24 28 49 29 00 D2 25 F8 1B 8D 31 31 30 |";B$(I)..%...110|
00001DD0: 30 30 00 EF 25 02 1C 8B 42 24 28 31 29 B2 22 22 |00..%...B$(1).""|
00001DE0: AF 42 B1 31 A7 41 24 B2 22 40 22 3A 49 B2 31 00 |.B.1.A$."@":I.1.|
00001DF0: 17 26 0C 1C 8B 41 24 B2 22 40 22 AF 42 B1 31 A7 |.&...A$."@".B.1.|
00001E00: 42 24 28 49 29 B2 42 24 28 42 29 3A 42 B2 42 AB |B$(I).B$(B):B.B.|
00001E10: 31 3A 41 24 B2 22 22 00 34 26 16 1C 8B 41 24 B2 |1:A$."".4&...A$.|
00001E20: C7 28 31 33 33 29 AF 49 AA 32 30 B3 42 A7 49 B2 |.(133).I.20.B.I.|
00001E30: 49 AA 32 30 00 51 26 20 1C 8B 41 24 B2 C7 28 31 |I.20.Q& ..A$..(1|
00001E40: 33 34 29 AF 49 AB 32 30 B1 30 A7 49 B2 49 AB 32 |34).I.20.0.I.I.2|
00001E50: 30 00 89 26 2A 1C 8B 41 24 B2 22 2A 22 A7 99 22 |0..&*..A$."*".."|
00001E60: 91 91 1D 1D 1D 1D 1D 22 3B 22 12 4B 4F 52 52 45 |.......";".KORRE|
00001E70: 4B 54 55 52 45 4C 45 4D 45 4E 54 22 3A 85 22 1D |KTURELEMENT":.".|
00001E80: 1D 1D 22 3B 42 24 28 49 29 00 B8 26 34 1C 8B 41 |..";B$(I)..&4..A|
00001E90: 24 B2 22 2A 22 A7 99 22 91 91 22 3B 5A 4B 24 3A |$."*".."..";ZK$:|
00001EA0: 99 3A 8B 42 24 28 49 29 B2 22 22 A7 42 24 28 49 |.:.B$(I)."".B$(I|
00001EB0: 29 B2 22 5A 5A 5A 5A 22 00 D0 26 39 1C 8B 41 24 |)."ZZZZ"..&9..A$|
00001EC0: B2 22 24 22 A7 8D 37 35 30 30 3A 89 37 30 30 30 |."$"..7500:.7000|
00001ED0: 00 EB 26 3E 1C 8B 41 24 B2 22 5F 22 A7 41 24 B2 |..&>..A$."_".A$.|
00001EE0: 22 22 3A 97 36 35 30 2C 30 3A 8E 00 08 27 48 1C |"":.650,0:...'H.|
00001EF0: 8B 41 24 B2 22 5E 22 A7 49 B2 49 AB 32 3A 8B 49 |.A$."^".I.I.2:.I|
00001F00: B3 31 A7 49 B2 42 AB 31 00 4C 27 52 1C 8B 41 24 |.1.I.B.1.L'R..A$|
00001F10: B2 22 2B 22 A7 42 B2 42 AA 31 3A 99 22 12 91 91 |."+".B.B.1:."...|
00001F20: 1D 1D 1D 1D 1D 4E 45 55 45 53 20 45 4C 45 4D 45 |.....NEUES ELEME|
00001F30: 4E 54 22 3A 85 22 1D 1D 1D 22 3B 42 24 28 42 29 |NT":."...";B$(B)|
00001F40: 3A 99 22 91 91 22 3B 5A 4B 24 3A 99 00 68 27 5C |:."..";ZK$:..h'\|
00001F50: 1C 8B 41 24 B2 22 50 22 A7 98 34 2C 22 20 20 20 |..A$."P"..4," |
00001F60: 20 22 3B 42 24 28 49 29 00 B0 27 66 1C 8B 41 24 | ";B$(I)..'f..A$|
00001F70: B2 22 5C 22 A7 99 56 24 3B 22 4E 41 43 48 20 57 |."\"..V$;"NACH W|
00001F80: 45 4C 43 48 45 4D 20 45 4C 45 4D 45 4E 54 20 53 |ELCHEM ELEMENT S|
00001F90: 55 43 48 45 4E 20 3F 22 3A 99 58 24 3B 3A 8D 31 |UCHEN ?":.X$;:.1|
00001FA0: 38 30 30 30 3A 8D 37 33 31 30 3A 89 37 30 30 30 |8000:.7310:.7000|
00001FB0: 00 D1 27 70 1C 8B C8 28 42 24 28 42 29 2C 34 29 |..'p...(B$(B),4)|
00001FC0: B2 22 5A 5A 5A 5A 22 AF 49 B1 31 A7 42 B2 42 AB |."ZZZZ".I.1.B.B.|
00001FD0: 31 00 EB 27 7A 1C 99 22 91 91 91 1D 1D 1D 22 3B |1..'z.."......";|
00001FE0: 5A 4B 24 3A 82 3A 89 37 31 34 30 00 F1 27 84 1C |ZK$:.:.7140..'..|
00001FF0: 8E 00 FE 27 8E 1C 8B 4B 24 B2 22 22 A7 8E 00 17 |...'...K$.""....|
00002000: 28 98 1C 46 B2 30 3A 8B C9 28 4B 24 2C 31 29 B2 |(..F.0:..(K$,1).|
00002010: 22 2A 22 A7 46 B2 31 00 35 28 A2 1C 51 B2 C3 28 |"*".F.1.5(..Q..(|
00002020: 4B 24 29 AB 46 3A 51 24 B2 C8 28 4B 24 2C 51 29 |K$).F:Q$..(K$,Q)|
00002030: 3A 45 5A B2 30 00 62 28 AC 1C 45 45 24 B2 22 20 |:EZ.0.b(..EE$." |
00002040: 4B 45 49 4E 20 57 45 49 54 45 52 45 53 22 3A 45 |KEIN WEITERES":E|
00002050: 59 24 B2 22 20 56 4F 52 48 41 4E 44 45 4E 20 22 |Y$." VORHANDEN "|
00002060: 3A 99 00 6D 28 B6 1C 81 4B B2 31 A4 42 00 8E 28 |:..m(...K.1.B..(|
00002070: C0 1C 8B C8 28 42 24 28 4B 29 2C 51 29 B2 51 24 |....(B$(K),Q).Q$|
00002080: A7 45 5A B2 31 3A 53 45 B2 31 3A 52 B2 31 00 9A |.EZ.1:SE.1:R.1..|
00002090: 28 CA 1C 8B 53 45 B2 30 A7 82 00 BD 28 D4 1C 8B |(...SE.0....(...|
000020A0: 53 45 B2 31 A7 99 22 1D 1D 1D 1D 1D 1D 1D 1D 22 |SE.1.."........"|
000020B0: 3B 42 24 28 4B 29 3A 53 45 B2 30 3A 82 00 DB 28 |;B$(K):SE.0:...(|
000020C0: DE 1C 8B 45 5A B2 30 A7 99 22 1D 1D 11 12 22 3B |...EZ.0.."....";|
000020D0: 45 5A 24 AA 45 58 24 AA 45 59 24 00 08 29 E8 1C |EZ$.EX$.EY$..)..|
000020E0: 8B 45 5A B2 31 A7 99 22 11 11 22 3A 99 22 1D 1D |.EZ.1.."..":."..|
000020F0: 12 22 3B 45 45 24 AA 45 5A 24 AA 45 59 24 3A 99 |.";EE$.EZ$.EY$:.|
00002100: 22 1D 1D 22 3B 57 53 24 00 1B 29 F2 1C 99 58 24 |"..";WS$..)...X$|
00002110: 3B 5A 4D 24 3A 8D 31 31 30 30 30 00 21 29 FC 1C |;ZM$:.11000.!)..|
00002120: 8E 00 5E 29 4C 1D 99 22 93 11 11 1D 1D 12 20 44 |..^)L.."...... D|
00002130: 4D 2D 4C 49 53 54 45 4E 45 52 53 54 45 4C 4C 55 |M-LISTENERSTELLU|
00002140: 4E 47 20 92 11 11 22 3A 99 22 11 11 22 3B 58 24 |NG ...":."..";X$|
00002150: 3B 5A 4D 24 3A 99 22 13 11 11 11 11 11 22 00 84 |;ZM$:."......"..|
00002160: 29 56 1D 81 4A B2 49 A4 42 3A 99 22 20 20 22 3B |)V..J.I.B:." ";|
00002170: 3A 43 24 B2 C8 28 42 24 28 4A 29 2C 31 37 29 3A |:C$..(B$(J),17):|
00002180: 99 43 24 3B 00 B2 29 60 1D 46 24 B2 C9 28 5A 4B |.C$;..)`.F$..(ZK|
00002190: 24 AA C4 28 B5 28 C5 28 C9 28 42 24 28 4A 29 2C |$..(.(.(.(B$(J),|
000021A0: 33 29 29 AD 34 AA 2E 35 29 29 2C 32 29 3A 99 46 |3)).4..5)),2):.F|
000021B0: 24 3B 00 D3 29 6A 1D 99 22 20 30 30 30 9D 9D 9D |$;..)j.." 000...|
000021C0: 22 3B 3A 8D 31 38 30 30 30 3A 8B 4B 24 B2 22 5F |";:.18000:.K$."_|
000021D0: 22 A7 8E 00 F3 29 74 1D 42 24 28 4A 29 B2 43 24 |"....)t.B$(J).C$|
000021E0: AA 46 24 AA 22 20 22 AA C8 28 4B 24 AA 5A 4B 24 |.F$." "..(K$.ZK$|
000021F0: 2C 33 29 00 01 2A 7E 1D 99 22 91 22 3B 3A 82 3A |,3)..*~..".";:.:|
00002200: 8E 00 07 2A 40 1F 8F 00 54 2A 5E 1F 99 56 24 3B |...*@...T*^..V$;|
00002210: 22 49 4E 48 41 4C 54 20 45 49 4E 45 52 20 44 49 |"INHALT EINER DI|
00002220: 53 4B 20 4C 49 53 54 45 4E 20 22 3A 99 58 24 3B |SK LISTEN ":.X$;|
00002230: 22 4F 44 45 52 20 41 4C 4C 45 20 44 49 53 4B 20 |"ODER ALLE DISK |
00002240: 44 41 54 45 4E 20 4C 49 53 54 45 4E 20 28 45 2F |DATEN LISTEN (E/|
00002250: 41 29 20 22 00 5F 2A 68 1F 8D 31 31 30 30 30 00 |A) "._*h..11000.|
00002260: 71 2A 72 1F 3A 8B 41 24 B2 22 45 22 A7 38 31 32 |q*r.:.A$."E".812|
00002270: 30 00 83 2A 7C 1F 99 56 24 3B 5A 4D 24 3A 99 3A |0..*|..V$;ZM$:.:|
00002280: 5A B2 31 00 94 2A 86 1F 81 49 B2 31 A4 42 3A 5A |Z.1..*...I.1.B:Z|
00002290: B2 5A AA 31 00 BE 2A 90 1F 99 22 1D 1D 1D 1D 1D |.Z.1..*...".....|
000022A0: 1D 1D 1D 22 3B 42 24 28 49 29 3A 8B C2 28 36 33 |...";B$(I):..(63|
000022B0: 31 29 B2 39 35 A7 97 31 39 38 2C 30 3A 8E 00 DA |1).95..198,0:...|
000022C0: 2A 9A 1F 8B 5A B2 32 33 A7 8D 31 31 30 30 30 3A |*...Z.23..11000:|
000022D0: 5A B2 31 3A 8B 48 B2 31 A7 8E 00 E7 2A A4 1F 82 |Z.1:.H.1....*...|
000022E0: 3A 8D 31 30 30 30 30 00 ED 2A AE 1F 8E 00 29 2B |:.10000..*....)+|
000022F0: B8 1F 99 56 24 3B 22 57 45 4C 43 48 45 20 44 49 |...V$;"WELCHE DI|
00002300: 53 4B 20 4C 49 53 54 45 4E 20 22 3A 99 58 24 3B |SK LISTEN ":.X$;|
00002310: 22 49 44 2E 4E 52 20 45 49 4E 47 45 42 45 4E 20 |"ID.NR EINGEBEN |
00002320: 22 3B 3A 8D 31 38 30 30 30 00 58 2B C2 1F 81 49 |";:.18000.X+...I|
00002330: B2 31 A4 42 3A 8B 4B 24 B2 CA 28 42 24 28 49 29 |.1.B:.K$..(B$(I)|
00002340: 2C 31 38 2C 32 29 A7 99 22 1D 1D 1D 1D 1D 1D 1D |,18,2)..".......|
00002350: 1D 22 3B 42 24 28 49 29 00 5E 2B CC 1F 82 00 69 |.";B$(I).^+....i|
00002360: 2B D6 1F 8D 31 30 30 30 30 00 A4 2B E0 1F 99 58 |+...10000..+...X|
00002370: 24 3B 22 4E 4F 43 48 20 45 49 4E 45 20 44 49 53 |$;"NOCH EINE DIS|
00002380: 4B 20 4C 49 53 54 45 4E 20 28 4A 2F 4E 29 20 22 |K LISTEN (J/N) "|
00002390: 3A 8D 31 31 30 30 30 3A 8B 41 24 B2 22 4A 22 A7 |:.11000:.A$."J".|
000023A0: 38 31 32 30 00 AA 2B EA 1F 8E 00 B0 2B 08 20 8F |8120..+.....+. .|
000023B0: 00 E6 2B 26 20 99 56 24 3B 22 4C 49 53 54 45 4E |..+& .V$;"LISTEN|
000023C0: 20 4E 41 43 48 20 49 44 20 4B 52 49 54 45 52 49 | NACH ID KRITERI|
000023D0: 55 4D 20 45 52 53 54 45 4C 4C 45 4E 20 22 3A 99 |UM ERSTELLEN ":.|
000023E0: 58 24 3B 5A 4D 24 00 23 2C 30 20 99 58 24 3B 22 |X$;ZM$.#,0 .X$;"|
000023F0: 4E 41 43 48 20 57 45 4C 43 48 45 4D 20 4B 52 49 |NACH WELCHEM KRI|
00002400: 54 45 52 49 55 4D 20 53 55 43 48 45 4E 20 3F 22 |TERIUM SUCHEN ?"|
00002410: 3B 3A 8D 31 38 30 30 30 3A 46 24 B2 C8 28 4B 24 |;:.18000:F$..(K$|
00002420: 2C 31 29 00 31 2C 3A 20 8B 46 24 B2 22 5F 22 A7 |,1).1,: .F$."_".|
00002430: 8E 00 67 2C 44 20 99 58 24 3B 22 44 41 54 45 4E |..g,D .X$;"DATEN|
00002440: 44 49 53 4B 45 54 54 45 20 45 49 4E 4C 45 47 45 |DISKETTE EINLEGE|
00002450: 4E 20 22 3A 8D 31 37 30 30 30 3A 46 49 24 B2 22 |N ":.17000:FI$."|
00002460: 40 3A 22 AA 46 49 24 00 8E 2C 4E 20 58 B2 30 3A |@:".FI$..,N X.0:|
00002470: 81 49 B2 31 A4 42 3A 8B CA 28 42 24 28 49 29 2C |.I.1.B:..(B$(I),|
00002480: 31 38 2C 31 29 B2 46 24 A7 58 B2 58 AA 31 00 94 |18,1).F$.X.X.1..|
00002490: 2C 58 20 82 00 BF 2C 62 20 8B 58 B2 30 A7 99 58 |,X ...,b .X.0..X|
000024A0: 24 3B 22 4B 45 49 4E 20 45 4C 45 4D 45 4E 54 20 |$;"KEIN ELEMENT |
000024B0: 56 4F 52 48 2E 22 3A 8D 31 30 30 30 30 3A 8E 00 |VORH.":.10000:..|
000024C0: DA 2C 6C 20 9F 31 2C 38 2C 31 2C 46 49 24 AA 22 |.,l .1,8,1,FI$."|
000024D0: 2C 53 2C 57 22 3A 98 31 2C 58 00 F7 2C 76 20 8D |,S,W":.1,X..,v .|
000024E0: 31 36 30 30 30 3A 8B 54 B3 B1 30 A7 8D 31 30 30 |16000:.T..0..100|
000024F0: 30 30 3A A0 31 3A 8E 00 2F 2D 80 20 81 49 B2 31 |00:.1:../-. .I.1|
00002500: A4 42 3A 8B CA 28 42 24 28 49 29 2C 31 38 2C 31 |.B:..(B$(I),18,1|
00002510: 29 B2 46 24 A7 99 22 20 20 20 20 20 20 20 20 22 |).F$.." "|
00002520: 3B 42 24 28 49 29 3A 98 31 2C 42 24 28 49 29 00 |;B$(I):.1,B$(I).|
00002530: 3A 2D 8A 20 82 3A A0 31 3A 8E 00 40 2D 28 23 8F |:-. .:.1:..@-(#.|
00002540: 00 60 2D 46 23 99 56 24 3B 22 46 31 20 92 20 44 |.`-F#.V$;"F1 . D|
00002550: 41 54 45 4E 20 45 52 57 45 49 54 45 52 4E 20 22 |ATEN ERWEITERN "|
00002560: 00 81 2D 50 23 99 58 24 3B 22 46 33 20 92 20 44 |..-P#.X$;"F3 . D|
00002570: 41 54 45 4E 20 46 49 4C 45 20 5A 55 4C 41 44 45 |ATEN FILE ZULADE|
00002580: 4E 00 A9 2D 5A 23 99 58 24 3B 22 46 35 20 92 20 |N..-Z#.X$;"F5 . |
00002590: 44 41 54 45 4E 20 4C 4F 45 53 43 48 45 4E 20 28 |DATEN LOESCHEN (|
000025A0: 49 44 2E 4E 52 2E 29 20 22 00 D0 2D 64 23 99 58 |ID.NR.) "..-d#.X|
000025B0: 24 3B 22 46 37 20 92 20 53 54 41 4E 44 41 52 44 |$;"F7 . STANDARD|
000025C0: 4B 4F 50 46 20 53 50 45 49 43 48 45 52 4E 20 22 |KOPF SPEICHERN "|
000025D0: 00 DC 2D 6E 23 99 58 24 3B 5A 4D 24 00 E7 2D 78 |..-n#.X$;ZM$..-x|
000025E0: 23 8D 31 31 30 30 30 00 F7 2D 82 23 8B 41 24 B2 |#.11000..-.#.A$.|
000025F0: C7 28 39 35 29 A7 8E 00 17 2E 8C 23 8B 41 24 B2 |.(95)......#.A$.|
00002600: C7 28 31 33 33 29 A7 47 54 B2 31 3A 49 B2 42 AA |.(133).GT.1:I.B.|
00002610: 31 3A 89 31 30 30 30 00 38 2E 96 23 8B 41 24 B2 |1:.1000.8..#.A$.|
00002620: C7 28 31 33 34 29 A7 46 4A B2 42 3A 8D 36 30 30 |.(134).FJ.B:.600|
00002630: 30 3A 46 4A B2 30 3A 8E 00 4C 2E A0 23 8B 41 24 |0:FJ.0:..L..#.A$|
00002640: B2 C7 28 31 33 35 29 A7 39 31 36 30 00 85 2E AA |..(135).9160....|
00002650: 23 8B 41 24 B2 C7 28 31 33 36 29 A7 9F 37 2C 38 |#.A$..(136)..7,8|
00002660: 2C 37 2C 22 40 3A 53 54 41 4E 44 41 52 44 4B 4F |,7,"@:STANDARDKO|
00002670: 50 46 2C 53 2C 57 22 3A 98 37 2C 42 4E 24 3A 98 |PF,S,W":.7,BN$:.|
00002680: 37 2C 42 41 24 00 A5 2E B4 23 8B 41 24 B2 C7 28 |7,BA$....#.A$..(|
00002690: 31 33 36 29 A7 98 37 2C 42 57 24 3A 98 37 2C 42 |136)..7,BW$:.7,B|
000026A0: 54 24 3A A0 37 00 AF 2E BE 23 89 39 30 33 30 00 |T$:.7....#.9030.|
000026B0: E3 2E C8 23 99 56 24 3B 22 45 49 4E 47 41 42 45 |...#.V$;"EINGABE|
000026C0: 20 44 45 52 20 5A 55 20 4C 4F 45 53 43 48 45 4E | DER ZU LOESCHEN|
000026D0: 44 45 4E 20 49 44 20 4E 52 2E 20 3F 20 22 3A 99 |DEN ID NR. ? ":.|
000026E0: 58 24 3B 00 EE 2E D2 23 8D 31 38 30 30 30 00 1E |X$;....#.18000..|
000026F0: 2F DC 23 99 58 24 3B 22 53 4F 4C 4C 20 22 3B 4B |/.#.X$;"SOLL ";K|
00002700: 24 3B 22 20 47 45 4C 4F 45 53 43 48 54 20 57 45 |$;" GELOESCHT WE|
00002710: 52 44 45 4E 20 28 4A 2F 4E 29 20 3F 20 22 00 34 |RDEN (J/N) ? ".4|
00002720: 2F E6 23 8D 31 31 30 30 30 3A 8B 41 24 B3 B1 22 |/.#.11000:.A$.."|
00002730: 4A 22 A7 8E 00 3F 2F F0 23 81 49 B2 31 A4 42 00 |J"...?/.#.I.1.B.|
00002740: 5B 2F FA 23 8B 4B 24 B2 CA 28 42 24 28 49 29 2C |[/.#.K$..(B$(I),|
00002750: 31 38 2C 32 29 A7 8D 39 32 34 30 00 61 2F 04 24 |18,2)..9240.a/.$|
00002760: 82 00 67 2F 0E 24 8E 00 82 2F 18 24 81 4A B2 49 |..g/.$.../.$.J.I|
00002770: A4 42 3A 42 24 28 4A 29 B2 42 24 28 4A AA 31 29 |.B:B$(J).B$(J.1)|
00002780: 3A 82 00 94 2F 22 24 49 B2 49 AB 31 3A 42 B2 42 |:.../"$I.I.1:B.B|
00002790: AB 31 3A 8E 00 BB 2F 10 27 99 58 24 3B 22 54 41 |.1:.../.'.X$;"TA|
000027A0: 53 54 45 20 44 52 55 45 43 4B 45 4E 20 22 3A 54 |STE DRUECKEN ":T|
000027B0: B2 30 3A 8D 31 31 30 30 30 3A 8E 00 D0 2F F8 2A |.0:.11000:.../.*|
000027C0: A1 41 24 3A 8B 41 24 B2 22 22 A7 31 31 30 30 30 |.A$:.A$."".11000|
000027D0: 00 D6 2F 02 2B 8E 00 DC 2F E0 2E 8F 00 F4 2F FE |../.+.../...../.|
000027E0: 2E 99 56 24 3B 42 46 24 3B 22 20 46 55 4E 4B 54 |..V$;BF$;" FUNKT|
000027F0: 49 4F 4E 22 00 1A 30 08 2F 46 49 24 B2 22 40 3A |ION"..0./FI$."@:|
00002800: 22 AA 42 46 24 3A 81 49 B2 31 A4 32 30 30 3A 46 |".BF$:.I.1.200:F|
00002810: 46 24 28 49 29 B2 22 22 3A 82 00 3F 30 12 2F 46 |F$(I)."":..?0./F|
00002820: 46 B2 31 3A 4B B2 32 3A 49 B2 32 3A 42 52 24 B2 |F.1:K.2:I.2:BR$.|
00002830: 22 46 55 4E 4B 54 49 4F 4E 20 45 4E 44 45 22 00 |"FUNKTION ENDE".|
00002840: 74 30 1C 2F 99 58 24 3B 22 42 49 54 54 45 20 57 |t0./.X$;"BITTE W|
00002850: 41 52 54 45 4E 20 42 49 53 20 22 3B 42 52 24 3A |ARTEN BIS ";BR$:|
00002860: 46 46 24 28 31 29 B2 CA 28 42 24 28 31 29 2C 31 |FF$(1)..(B$(1),1|
00002870: 38 2C 32 29 00 8D 30 26 2F 46 46 24 28 49 29 B2 |8,2)..0&/FF$(I).|
00002880: CA 28 42 24 28 4B 29 2C 31 38 2C 32 29 00 9A 30 |.(B$(K),18,2)..0|
00002890: 30 2F 81 4A B2 31 A4 49 AB 31 00 B3 30 3A 2F 8B |0/.J.1.I.1..0:/.|
000028A0: 46 46 24 28 49 29 B2 46 46 24 28 4A 29 A7 31 32 |FF$(I).FF$(J).12|
000028B0: 31 32 30 00 B9 30 44 2F 82 00 C3 30 4E 2F 49 B2 |120..0D/...0N/I.|
000028C0: 49 AA 31 00 D8 30 58 2F 4B B2 4B AA 31 3A 8B 4B |I.1..0X/K.K.1:.K|
000028D0: B1 42 A7 31 32 31 34 30 00 E3 30 62 2F 89 31 32 |.B.12140..0b/.12|
000028E0: 30 37 30 00 ED 30 6C 2F 5A B2 49 AB 31 00 FA 30 |070..0l/Z.I.1..0|
000028F0: 76 2F 81 43 B2 31 A4 5A AB 31 00 27 31 80 2F 4A |v/.C.1.Z.1.'1./J|
00002900: B2 43 AA 31 3A 99 58 24 3B 22 45 4C 45 4D 45 4E |.C.1:.X$;"ELEMEN|
00002910: 54 20 20 20 20 20 20 20 9D 9D 9D 9D 22 3B 4A AB |T ....";J.|
00002920: 31 3B 22 91 91 91 22 00 32 31 8A 2F 81 44 B2 4A |1;"...".21./.D.J|
00002930: A4 5A 00 4B 31 94 2F 8B 46 46 24 28 43 29 B1 46 |.Z.K1./.FF$(C).F|
00002940: 46 24 28 44 29 A7 31 32 32 30 30 00 56 31 9E 2F |F$(D).12200.V1./|
00002950: 89 31 32 32 31 30 00 82 31 A8 2F 43 24 28 30 29 |.12210..1./C$(0)|
00002960: B2 46 46 24 28 43 29 3A 46 46 24 28 43 29 B2 46 |.FF$(C):FF$(C).F|
00002970: 46 24 28 44 29 3A 46 46 24 28 44 29 B2 43 24 28 |F$(D):FF$(D).C$(|
00002980: 30 29 00 88 31 B2 2F 82 00 8E 31 BC 2F 82 00 C7 |0)..1./...1./...|
00002990: 31 C6 2F 99 58 24 3B 22 42 4C 4F 43 4B 53 20 57 |1./.X$;"BLOCKS W|
000029A0: 45 52 44 45 4E 20 41 44 44 49 45 52 54 22 3A 42 |ERDEN ADDIERT":B|
000029B0: 4C 24 B2 22 12 44 49 53 4B 20 22 3A 42 4D 24 B2 |L$.".DISK ":BM$.|
000029C0: 22 12 22 AA 42 46 24 00 CF 31 D0 2F 4A B2 31 00 |".".BF$..1./J.1.|
000029D0: E4 31 DA 2F 81 49 B2 31 A4 42 3A 8B 49 B2 31 A7 |.1./.I.1.B:.I.1.|
000029E0: 47 53 B2 30 00 05 32 E4 2F 8B CA 28 42 24 28 49 |GS.0..2./..(B$(I|
000029F0: 29 2C 31 38 2C 32 29 B2 46 46 24 28 4A 29 A7 8D |),18,2).FF$(J)..|
00002A00: 31 32 33 35 30 00 43 32 EE 2F 82 3A 46 46 24 28 |12350.C2./.:FF$(|
00002A10: 4A 29 B2 42 46 24 AA 22 20 44 49 53 4B 20 22 AA |J).BF$." DISK ".|
00002A20: 46 46 24 28 4A 29 AA 22 20 22 AA C9 28 5A 4B 24 |FF$(J)." "..(ZK$|
00002A30: AA C4 28 36 36 34 AB 47 53 29 2C 33 29 3A 4A B2 |..(664.GS),3):J.|
00002A40: 4A AA 31 00 54 32 F8 2F 8B 4A B3 5A AA 31 A7 31 |J.1.T2./.J.Z.1.1|
00002A50: 32 32 35 30 00 60 32 02 30 99 58 24 3B 42 52 24 |2250.`2.0.X$;BR$|
00002A60: 00 8E 32 0C 30 99 58 24 3B 22 44 52 55 43 4B 45 |..2.0.X$;"DRUCKE|
00002A70: 52 20 4F 44 45 52 20 53 43 52 45 45 4E 20 28 44 |R ODER SCREEN (D|
00002A80: 2F 53 29 20 22 3A 8D 31 31 30 30 30 3A 99 00 B1 |/S) ":.11000:...|
00002A90: 32 16 30 8B 41 24 B3 B1 22 53 22 AF 41 24 B3 B1 |2.0.A$.."S".A$..|
00002AA0: 22 44 22 A7 8D 31 31 30 30 30 3A 89 31 32 33 32 |"D"..11000:.1232|
00002AB0: 30 00 C3 32 20 30 8B 41 24 B2 22 44 22 A7 31 32 |0..2 0.A$."D".12|
00002AC0: 33 38 30 00 DD 32 2A 30 81 49 B2 31 A4 5A 3A 99 |380..2*0.I.1.Z:.|
00002AD0: 22 1D 1D 1D 1D 22 3B 46 46 24 28 49 29 00 F1 32 |"....";FF$(I)..2|
00002AE0: 34 30 8D 31 31 30 30 30 3A 82 3A 89 31 32 34 32 |40.11000:.:.1242|
00002AF0: 30 00 09 33 3E 30 47 B2 30 3A 47 B2 C5 28 C9 28 |0..3>0G.0:G..(.(|
00002B00: 42 24 28 49 29 2C 33 29 29 00 15 33 48 30 47 53 |B$(I),3))..3H0GS|
00002B10: B2 47 53 AA 47 00 1B 33 52 30 8E 00 3C 33 5C 30 |.GS.G..3R0..<3\0|
00002B20: 99 58 24 3B 22 44 52 55 43 4B 45 52 20 45 49 4E |.X$;"DRUCKER EIN|
00002B30: 53 43 48 41 4C 54 45 4E 20 21 20 22 00 47 33 66 |SCHALTEN ! ".G3f|
00002B40: 30 8D 31 30 30 30 30 00 50 33 70 30 9F 34 2C 34 |0.10000.P3p0.4,4|
00002B50: 00 75 33 7A 30 81 49 B2 31 A4 5A 3A 98 34 2C 22 |.u3z0.I.1.Z:.4,"|
00002B60: 20 20 20 20 20 22 3B 46 46 24 28 49 29 3A 82 3A | ";FF$(I):.:|
00002B70: 98 34 3A A0 34 00 B2 33 84 30 99 56 24 3B 22 44 |.4:.4..3.0.V$;"D|
00002B80: 41 54 45 4E 20 41 55 46 20 44 49 53 4B 20 53 50 |ATEN AUF DISK SP|
00002B90: 45 49 43 48 45 52 4E 20 3F 20 28 4A 2F 4E 29 22 |EICHERN ? (J/N)"|
00002BA0: 3A 8D 31 31 30 30 30 3A 8B 41 24 B3 B1 22 4A 22 |:.11000:.A$.."J"|
00002BB0: A7 8E 00 D5 33 8E 30 99 58 24 3B 22 44 41 54 45 |....3.0.X$;"DATE|
00002BC0: 4E 20 44 49 53 4B 45 54 54 45 20 45 49 4E 4C 45 |N DISKETTE EINLE|
00002BD0: 47 45 4E 20 22 00 F7 33 98 30 8D 31 30 30 30 30 |GEN "..3.0.10000|
00002BE0: 3A 9F 32 2C 38 2C 32 2C 46 49 24 AA 22 2C 53 2C |:.2,8,2,FI$.",S,|
00002BF0: 57 22 3A 98 32 2C 5A 00 11 34 A2 30 81 49 B2 31 |W":.2,Z..4.0.I.1|
00002C00: A4 5A 3A 98 32 2C 46 46 24 28 49 29 3A 82 3A A0 |.Z:.2,FF$(I):.:.|
00002C10: 32 00 17 34 AC 30 8E 00 1D 34 B0 36 8F 00 28 34 |2..4.0...4.6..(4|
00002C20: CE 36 8B 42 B3 32 A7 8E 00 70 34 D8 36 99 56 24 |.6.B.2...p4.6.V$|
00002C30: 3B 22 41 55 53 53 4F 52 54 49 45 52 45 4E 20 46 |;"AUSSORTIEREN F|
00002C40: 52 45 4D 44 45 52 20 4C 49 53 54 45 4E 22 3A 44 |REMDER LISTEN":D|
00002C50: 49 24 B2 22 40 3A 44 49 46 46 45 52 45 4E 5A 22 |I$."@:DIFFERENZ"|
00002C60: 3A 4C 49 24 B2 22 4C 49 53 54 45 22 3A 58 B2 31 |:LI$."LISTE":X.1|
00002C70: 00 A1 34 E2 36 99 58 24 3B 22 4D 49 54 20 57 45 |..4.6.X$;"MIT WE|
00002C80: 4C 43 48 45 52 20 4C 49 53 54 45 20 56 45 52 47 |LCHER LISTE VERG|
00002C90: 4C 45 49 43 48 45 4E 20 3F 22 3A 8D 31 37 30 30 |LEICHEN ?":.1700|
00002CA0: 30 00 E0 34 EC 36 99 58 24 3B 22 57 49 45 56 49 |0..4.6.X$;"WIEVI|
00002CB0: 45 4C 20 5A 45 49 43 48 45 4E 20 56 45 52 47 4C |EL ZEICHEN VERGL|
00002CC0: 45 49 43 48 45 4E 20 28 31 2D 32 30 29 20 22 3B |EICHEN (1-20) ";|
00002CD0: 3A 8D 31 38 30 30 30 3A 53 4B B2 C5 28 4B 24 29 |:.18000:SK..(K$)|
00002CE0: 00 F1 34 F6 36 8B 53 4B B1 32 35 A7 53 4B B2 32 |..4.6.SK.25.SK.2|
00002CF0: 35 00 1A 35 00 37 9F 35 2C 38 2C 35 2C 46 49 24 |5..5.7.5,8,5,FI$|
00002D00: AA 22 2C 53 2C 52 22 3A 8D 31 36 30 30 30 3A 8B |.",S,R":.16000:.|
00002D10: 54 B3 B1 30 A7 31 34 31 30 30 00 3D 35 0A 37 9F |T..0.14100.=5.7.|
00002D20: 32 2C 38 2C 32 2C 22 40 3A 4C 49 53 54 45 22 AA |2,8,2,"@:LISTE".|
00002D30: 22 2C 53 2C 57 22 3A 8D 31 36 30 30 30 00 65 35 |",S,W":.16000.e5|
00002D40: 14 37 8B 54 B3 B1 30 A7 A0 35 3A A0 32 3A 99 58 |.7.T..0..5:.2:.X|
00002D50: 24 3B 4B 24 3A 99 58 24 3B 5A 4D 24 3A 8D 31 31 |$;K$:.X$;ZM$:.11|
00002D60: 30 30 30 3A 8E 00 6E 35 1E 37 84 35 2C 43 00 79 |000:..n5.7.5,C.y|
00002D70: 35 28 37 81 4A B2 31 A4 43 00 8F 35 32 37 84 35 |5(7.J.1.C..527.5|
00002D80: 2C 44 24 3A 99 22 1D 1D 1D 1D 1D 22 3B 44 24 00 |,D$:.".....";D$.|
00002D90: 9A 35 3C 37 81 49 B2 31 A4 42 00 BA 35 46 37 8B |.5<7.I.1.B..5F7.|
00002DA0: C8 28 44 24 2C 53 4B 29 B2 C8 28 42 24 28 49 29 |.(D$,SK)..(B$(I)|
00002DB0: 2C 53 4B 29 A7 31 34 33 30 30 00 C1 35 50 37 82 |,SK).14300..5P7.|
00002DC0: 49 00 D1 35 5A 37 98 32 2C 44 24 3A 58 B2 58 AA |I..5Z7.2,D$:X.X.|
00002DD0: 31 00 D8 35 64 37 82 4A 00 E8 35 6E 37 A0 35 3A |1..5d7.J..5n7.5:|
00002DE0: A0 32 3A 58 B2 58 AB 31 00 1B 36 78 37 8B 58 B2 |.2:X.X.1..6x7.X.|
00002DF0: 30 A7 99 22 93 11 12 20 4B 45 49 4E 20 4E 45 55 |0.."... KEIN NEU|
00002E00: 45 53 20 45 4C 45 4D 45 4E 54 20 47 45 46 55 4E |ES ELEMENT GEFUN|
00002E10: 44 45 4E 22 3A 89 31 30 30 30 30 00 31 36 82 37 |DEN":.10000.16.7|
00002E20: 9F 37 2C 38 2C 37 2C 44 49 24 AA 22 2C 53 2C 57 |.7,8,7,DI$.",S,W|
00002E30: 22 00 3A 36 8C 37 98 37 2C 58 00 50 36 96 37 9F |".:6.7.7,X.P6.7.|
00002E40: 35 2C 38 2C 35 2C 4C 49 24 AA 22 2C 53 2C 52 22 |5,8,5,LI$.",S,R"|
00002E50: 00 69 36 A0 37 81 49 B2 31 A4 58 3A 84 35 2C 44 |.i6.7.I.1.X:.5,D|
00002E60: 24 3A 98 37 2C 44 24 3A 82 00 73 36 AA 37 A0 37 |$:.7,D$:..s6.7.7|
00002E70: 3A A0 35 00 9B 36 B4 37 99 56 24 3B 22 44 41 53 |:.5..6.7.V$;"DAS|
00002E80: 20 41 55 53 53 4F 52 54 49 45 52 45 4E 20 49 53 | AUSSORTIEREN IS|
00002E90: 54 20 42 45 45 4E 44 45 54 20 22 00 C2 36 BE 37 |T BEENDET "..6.7|
00002EA0: 99 58 24 3B 22 44 41 53 20 44 41 54 45 4E 46 49 |.X$;"DAS DATENFI|
00002EB0: 4C 45 20 3C 20 44 49 46 46 45 52 45 4E 5A 20 3E |LE < DIFFERENZ >|
00002EC0: 20 22 00 E1 36 C8 37 99 58 24 3B 22 4B 41 4E 4E | "..6.7.X$;"KANN|
00002ED0: 20 47 45 4C 41 44 45 4E 20 57 45 52 44 45 4E 20 | GELADEN WERDEN |
00002EE0: 22 00 06 37 D2 37 9F 31 35 2C 38 2C 31 35 2C 22 |"..7.7.15,8,15,"|
00002EF0: 53 30 3A 4C 49 53 54 45 22 3A A0 31 35 3A 8D 31 |S0:LISTE":.15:.1|
00002F00: 36 30 30 30 3A 8E 00 15 37 DC 37 8B 4A B2 43 A7 |6000:...7.7.J.C.|
00002F10: 31 34 31 39 30 00 1C 37 E6 37 82 4A 00 22 37 F0 |14190..7.7.J."7.|
00002F20: 37 8E 00 28 37 98 3A 8F 00 3A 37 80 3E 84 33 2C |7..(7.:..:7.>.3,|
00002F30: 54 2C 4B 24 2C 4F 2C 4F 3A 8E 00 68 37 68 42 99 |T,K$,O,O:..h7hB.|
00002F40: 58 24 3B 22 46 49 4C 45 20 4E 41 4D 45 20 22 3B |X$;"FILE NAME ";|
00002F50: 3A 46 B2 31 3A 8D 31 38 30 30 30 3A 46 B2 30 3A |:F.1:.18000:F.0:|
00002F60: 46 49 24 B2 4B 24 3A 8E 00 72 37 50 46 4B 24 B2 |FI$.K$:..r7PFK$.|
00002F70: 22 22 00 8B 37 5A 46 8D 31 31 30 30 30 3A 8B 41 |""..7ZF.11000:.A|
00002F80: 24 B2 C7 28 31 33 29 A7 99 3A 8E 00 B8 37 64 46 |$..(13)..:...7dF|
00002F90: 8B 41 24 B2 C7 28 32 30 29 AF C3 28 4B 24 29 B3 |.A$..(20)..(K$).|
00002FA0: B1 30 A7 4B 24 B2 C8 28 4B 24 2C C3 28 4B 24 29 |.0.K$..(K$,.(K$)|
00002FB0: AB 31 29 3A 99 41 24 3B 00 D1 37 6E 46 8B 44 52 |.1):.A$;..7nF.DR|
00002FC0: B2 31 AF C3 28 4B 24 29 B2 33 33 A7 31 38 30 31 |.1..(K$).33.1801|
00002FD0: 30 00 E9 37 78 46 8B 46 B2 31 AF C3 28 4B 24 29 |0..7xF.F.1..(K$)|
00002FE0: B2 31 38 A7 31 38 30 31 30 00 05 38 82 46 8B 41 |.18.18010..8.F.A|
00002FF0: 24 B1 C7 28 33 31 29 A7 4B 24 B2 4B 24 AA 41 24 |$..(31).K$.K$.A$|
00003000: 3A 99 41 24 3B 00 10 38 8C 46 89 31 38 30 31 30 |:.A$;..8.F.18010|
00003010: 00 00 00 |... |
......."...":.53280,0:.53281,0.M...."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 ".Z...."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".3.".."......BI
TTE TASTE DRUECKEN!":.11000.Z.@.S$."....
..":.53280,0:.53281,0:."."...T.BF$."BLOC
KS FREE":EZ$." ELEMENT":EX$." NICHT".X.^
.V$."...... ":M$.".....":X$."..... ":N$.
"... ":ZM$.". _ . . ZUM MENUE "...H.FI$
."STANDARDKOPF"......7,8,7,FI$.",S,R".<.
...7,BN$,BA$,BW$,BT$: 7:.X$;"DATUM ?";:.
18000:DA$.K$.Z....B$(850),FF$(200):.3,8,
15.H.B.N$."... "...L.ZK$."
".A.V..N$;".. (C)1983 . BY B
.WINKLER TEL(0221)881373"......N$;"F1 .
DATEN PER DISK EINLESEN"......N$;"F3 . D
ATEN ERWEITERN / LOESCHEN ".2....N$;"F5
. LISTE EDITIEREN".Q....N$;"F7 . LISTE S
ORTIEREN".R....N$;"F2 . DATEN ABSPEICHER
N". ....N$;"F4 . DATEN EINLESEN . CLR
. QUIT".R....N$;"F6 . LISTE DRUCKEN
. % . SPEZ.LISTE"...&..N$;"F8 . LISTE A
UF SCREEN . & . DISK OPER.".3.0..N$;"*
. ";BF$;" . $ . DIRECTORY "".Z.:.
.N$;"\ . ANDERE BILDSCHIRM FARBE"...D..
N$;"! . AUSSORTIEREN FREMDER LISTE "...
N..11000.C.X..A$.G(133).I.0:BB.B:B.0:Q.0
:.1030:.A$."_".B.BB.X.B..A$.G(138)..6000
...L..A$.G(37)..8200...V..A$.G(135)..4,4
:.7000: 4......A$.G(38)..6300.2....A$.G(
33)..14000.L....A$.G(36).B.B.2:I.B:H.1:G
T.1:G.0:.1050:H.0:B.B.2:GT.0......A$.G(1
36)..4000......A$.G(147)..64738......A$.
G(137)..5000.A....A$.G(134)..9000...F..A
$.G(139)..4,4:.3000: 4...P..A$.G(140)..8
000...Z..A$.G(92)..2000.&....A$.G(42).BB
.B:.12000:B.BB./....450.5.....X...G.0:.V
$;"DISK EINLEGEN : DATEN KOMPLETT ":.X$;
"ODER EINZELN ";......"EINLESEN ? (K/E)"
:.X$;ZM$:.10000:.A$."E".G.1......A$."_".
..W....V$;"ICH LESE DISK ":.X$;...$..1,8
,0,"$0":GB.1......16000:." ."K$"..":.T..
0..10000: 1:..#.8..#1,A$,F$.<.B..#1,A$,F
$:B$(I.1)."".J.L..#1,A$,F$.[.V.C.0:L$."
".O.`..A$.."".C.F(A$)...J..F$.."".C.C.
F(F$).256...T.Q$.J(D(C),2):L$.H(Q$.L$,3)
.S.~..#1,F$:.F$."".."....";L$;" ";BF$:.1
295......F$..G(34).1150......#1,F$:.F$..
G(34).B$(I.Q).B$(I.Q).F$:.1170.*....Q.1.
B$(I.1)."".D....#1,F$:.F$.G(32).1190.N..
.C$."".O...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)...X..".
.";B$(I.Q);"...";". ";H(C$,5);:.G.0.GT.0
........GT.1.GT.0:B$(I)."":.:.1090."....
Q.1.Q.0:B$(I.1)."".D....G.1.GT.0.I.0..".
J/N...";:.11000:.A$."N".."NEIN";:GT.1:.
1250.....I.I.1:.G.1..". JA":Z.Z.1......I
.Q.1.850..X$;"SPEICHER IST VOLL":.X$;ZM$
: 1:.11000:..F....1090..... 1:.H.1..1000
0:.......X$;"NOCH EINE DISK (J/N)".....Q
W$.D(I.1).<.(..X$;"BISHER WURDEN ";QW$;"
DATEN GELESEN ....".G.2..11000.C.<..A$.
"J".GT.1:.V$;:.1060.U.F..A$.."N".1330...
P.B.I.1: 1...Z.A$."":T.0...D.....P......
.I.0:F.0:J.0.R....V$;"F1. .FARBWECHSEL B
ILDSCHIRM"......X$;"F3. .FARBWECHSEL HIN
TERGRUND"......X$;"F5. .FARBWECHSEL SCHR
IFT".(....X$;ZM$.3. ..11000.Q.*..A$.G(13
3).I.I.1:.53281,I.O.4..A$.G(134).J.J.1:.
53280,J...>..A$.G(135).F.F.1:.646,F...H.
.A$."_".....R..2040.........L.ZK$.H(ZK$.
ZK$,33)...V.J$.". JA ":N$.".NEIN":F1$.N$
:F3$.J$:F5$.J$:F7$.N$:F2$.N$:Z$.".....".
!...Y$.".".Z$:F4$.N$:DR.1.'.....4...T$."
.. ".\...ST$."":AN$."BITTE FUNKTION WAEH
LEN".}...."....... DRUCKER AUSGABE ."...
...F1$;T$;"F1 . DRUCK-BEGINN .".K....F3$
;T$;"F3 . STAND.KOPF MIT DRUCKEN .".....
.F5$;T$;"F5 . PROGRAMM-LISTE DRUCKEN .".
.&..F7$;T$;"F7 . PREIS-LISTE DRUCKEN ."
.J.0..F2$;T$;"F2 . LISTE NACH KRITERIUM
.".S.:..F4$;T$;"F4 . STANDARDKOPF AENDER
N "...D..X$;"..";ZM$...N..".."...X.."
......................................B
.." B
B...L.." ...........................
.........F.V.." B
B.T...." ...............
..........................".";:.J.1.20:.
".";:.:.Z$;;ST$......Y$;AN$.C....C.1.C.0
:.3450:F4$.N$:.3070......F1$.J$.F1$.N$:.
3380:.3070......11000......A$.G(133).F1$
.N$.F1$.J$:.3070.3.F..A$.G(134).F3$.J$.F
3$.N$:.3070.V.P..A$.G(134).F3$.N$.F3$.J$
:.3070...Z..A$.G(135).F5$.N$.F5$.J$:F2$.
N$:F7$.N$:.3070......A$.G(135).F5$.J$.F5
$.N$:.3070.M....A$.G(136).F7$.J$.F7$.N$:
.3070......A$.G(136).F7$.N$.F7$.J$:F2$.N
$:F5$.N$:.3070./....A$.G(137).F2$.N$.F2$
.J$:F7$.N$:F5$.N$:.3070.R....A$.G(137).F
2$.J$.F2$.N$:.3070.G....A$.G(95).DR.0:..
.. ..A$.G(138).F4$.J$:C.1:.3070...*..A$.
G(95).A$.G(137).3250.Z.4..".":.J.1.19:."
.";:.:.Z$;ZK$:.".";Z$;"OK ? (J/N)"...9..
Y$;ZK$:.11000:.A$.."J"...6.>..".":.J.1.1
9:.".";:.:.Z$;"WIEVIEL ZEILEN PRO SEITE
?>=15".O.H..Y$;ZK$:."..";Y$;:.18000:DZ.E
(K$):.DZ.15.DZ.300.3390...M..F2$.N$.F5$.
N$.F7$.N$.....R..F3$.J$.3530...\..F3$.N$
.3590...F..A$."_"...A.P.....Z.ST$."DATUM
?":.3510:DA$.K$.....ST$."NAME ?":.3510:
BN$.K$.#...ST$."STRASSE,NR. ?":.3510:BA$
.K$.D...ST$."WOHNORT ?":.3510:BW$.K$.E..
.ST$."TELEFON ?":.3510:BT$.K$.K.........
.".":.J.1.19:.".";:.:.Z$;ST$......Y$;ZK$
:."..";Y$;:.18000.T....".":.J.1.19:.".";
:.:.Z$;ZK$:.Y$;ZK$:....J.ZD.0:.F3$.J$.ZD
.15...T..4,G(14)" ";BN$:.4," ";BA$.+..
..4," ";BW$:.4," ";BT$:.4.O....4," DI
SKETTENINHALT VOM ";DA$.P....4:.4," PRO
GRAMME:";B;G(15).W....4......F2$.J$.3760
......F7$.N$.3610.D...QS$."PRG.NAME
KB. PREIS ":.3620.....QS$."PRG.NAME
ID BL. "...$.ZD$." ":.3640...8
.DD..(B.3).1...B.S.1.9.L.B$(B.1)."":B$(B
.2)."":B$(B.3)."".Y.V..4,H(" ".QS$.QS
$.QS$,78)...`..4," ";:.T.1.74:.4,G(10
1);:.:.4...J..T.1.DD...T..4," ";B$(S)
;" ";B$(S.DD);" ";B$(S.2.DD).L.~.ZD.
ZD.1.....S.S.1:.ZD.DZ.ZD.0:.3740......:.
......".":.J.1.19:.".";:.:.Z$;.P...."DRU
CKERPAPIER JUSTIEREN ? ":.Y$;"TASTE DRUE
CKEN ";:.11000:......F.2:.".":.I.1.19:."
.";:.:.Z$;ZK$:.Y$;ZK$:."...."......Z$;"I
D.CODE EINGEBEN !":.Y$;:.18000.C....I(K$
,1)."*".F.1.V.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.0....
.6. ...O....V$;"SORTIER-ROUTINE LAEUFT!"
:B$(B.1)."ZZZZZZZZ":F.0...C..X$;"ALPHABE
TISCH ODER NACH ID.NR. ?".B.H..X$;"(A/I)
":.X$;ZM$:.11000:.A$."_"...R.W..A$."I".F
.1......C.1.B.....J.C.1:.X$;"ELEMENT
....";J.1;"..."......D.J.B.9....F.1.I
(B$(C),6).I(B$(D),6).4120.O....B$(C).B$(
D).4120.Y....4130.....C$(0).B$(C):B$(C).
B$(D):B$(D).C$(0)...".....,.....6..V$;"D
OPPELTE DATEN AUSSORTIEREN (J/N) ".E.@..
11000.V.J..A$."J".4190...T.....^..V$;"ES
WIRD AUSSORTIERT ":J.1.9 H..X$;"WIEVIEL
E ZEICHEN BERUECKSICHTIGEN ?":.X$;:.1800
0.X R.SS.E(K$):.SS.0.SS.25.SS.25.| |..H(
B$(J),SS).H(B$(J.1),SS).4270.. ..J.J.1..
...J..B.1.4220.. ...I.B.1.B.10:B$(I).""
:... ....C ...I.J.B.U ..B$(I).B$(I.1)..
B.... L.J.J.1:B.B.1:.4230.. V.... ....!!
...V$;"DATEN WERDEN GESPEICHERT ".W!...1
7000:I.0:.X$;"SICHER ? (J/N)":.11000:.A$
.."J"...M!...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.M!...I.1.B:.2,
B$(I).S!....Z!.. 2..!.....!P...."...V$;"
DATEN WERDEN GELESEN ":.X$;ZM$.#"...1700
0:.K$."_"...O"...X$;"DATEN FILE ";FI$" E
INLESEN (J/N) ".Z"...11000.I"...A$.."J".
..."...2,8,2,FI$.",S,R":.".....";.."J..1
6000:." ."K$"..":.T..0..10000: 2:..."T..
2,B.L"...I.FJ.1.B.FJ.."...2,B$(I):.: 2:B
.B.FJ:...#...V$;"DISK OPERATION MODE"./#
...X$;"DISKETTENBEFEHLE S, V, N, R, I ".
J#...X$;"BEFEHL ?";:.18000:FI$.K$:.X$;"A
USFUEHREN (J/N) ?".U#...11000..#...A$."_
"....#D..A$."J"..15,8,15:.15,FI$: 15:.16
000:.T..0..X$;K$:.10000.J#I..T.0....#N..
".";X$:.6310..#X....#V..650,128..$...S$;
"....... @ . : ELEMENT LOESCHEN".=$...
S$;". \ . : ELEMENT SUCHEN".D$...S$;".
* . : ELEMENT VERBESSERN"..$...S$;".
_ . : ";I(ZM$,13)..$...S$;". P . : E
LEMENT DRUCKEN ".L$...S$;". . : EIN
ELEMENT VOR"..$...S$;". F1. : 20 ELEME
NTE VOR "..%F..S$;". F3. : 20 ELEMENTE
ZURUECK".A%P..S$;". ^ . : EIN ELEMENT
ZURUECK".H%Z..S$;". $ . : DM-LISTE ER
STELLEN"..%...S$;". + . : ELEMENT EINF
UEGEN.. ":.".."..%...I.1.B.G%..."....";Z
K$"." : ."... ";B$(I).R%...11000..%...
B$(1)."".B.1.A$."@":I.1..&...A$."@".B.1.
B$(I).B$(B):B.B.1:A$."".4&...A$.G(133).I
.20.B.I.I.20.Q& ..A$.G(134).I.20.0.I.I.2
0..&*..A$."*"..".......";".KORREKTURELEM
ENT":."...";B$(I)..&4..A$."*".."..";ZK$:
.:.B$(I)."".B$(I)."ZZZZ".P&9..A$."$"..75
00:.7000..&>..A$."_".A$."":.650,0:...'H.
.A$."^".I.I.2:.I.1.I.B.1.L'R..A$."+".B.B
.1:."........NEUES ELEMENT":."...";B$(B)
:."..";ZK$:..H'\..A$."P"..4," ";B$(I)
..'F..A$."\"..V$;"NACH WELCHEM ELEMENT S
UCHEN ?":.X$;:.18000:.7310:.7000.Q'P..H(
B$(B),4)."ZZZZ".I.1.B.B.1..'Z.."......";
ZK$:.:.7140..'.....'...K$.""....(..F.0:.
I(K$,1)."*".F.1.5(..Q.C(K$).F:Q$.H(K$,Q)
:EZ.0.B(..EE$." KEIN WEITERES":EY$." VOR
HANDEN ":..M(...K.1.B..(...H(B$(K),Q).Q$
.EZ.1:SE.1:R.1..(J..SE.0....(T..SE.1..".
.......";B$(K):SE.0:...(...EZ.0.."....";
EZ$.EX$.EY$..)...EZ.1.."..":."...";EE$.E
Z$.EY$:."..";WS$..)...X$;ZM$:.11000.!)..
..^)L.."...... DM-LISTENERSTELLUNG ...":
."..";X$;ZM$:."......"..)V..J.I.B:." ";
:C$.H(B$(J),17):.C$;..)`.F$.I(ZK$.D(.(E(
I(B$(J),3)).4..5)),2):.F$;.S)J.." 000...
";:.18000:.K$."_"....)T.B$(J).C$.F$." ".
H(K$.ZK$,3)..*~..".";:.:...*@...T*^..V$;
"INHALT EINER DISK LISTEN ":.X$;"ODER AL
LE DISK DATEN LISTEN (E/A) "._*H..11000.
Q*R.:.A$."E".8120..*|..V$;ZM$:.:Z.1..*..
.I.1.B:Z.Z.1..*..."........";B$(I):.B(63
1).95..198,0:..Z*...Z.23..11000:Z.1:.H.1
....*...:.10000..*....)+...V$;"WELCHE DI
SK LISTEN ":.X$;"ID.NR EINGEBEN ";:.1800
0.X+B..I.1.B:.K$.J(B$(I),18,2)..".......
.";B$(I).^+L...I+V..10000..+...X$;"NOCH
EINE DISK LISTEN (J/N) ":.11000:.A$."J".
8120..+.....+. ...+& .V$;"LISTEN NACH ID
KRITERIUM ERSTELLEN ":.X$;ZM$.#,0 .X$;"
NACH WELCHEM KRITERIUM SUCHEN ?";:.18000
:F$.H(K$,1).1,: .F$."_"...G,D .X$;"DATEN
DISKETTE EINLEGEN ":.17000:FI$."@:".FI$.
.,N X.0:.I.1.B:.J(B$(I),18,1).F$.X.X.1..
,X ...,B .X.0..X$;"KEIN ELEMENT VORH.":.
10000:..Z,L .1,8,1,FI$.",S,W":.1,X..,V .
16000:.T..0..10000: 1:../-. .I.1.B:.J(B$
(I),18,1).F$.." ";B$(I):.1,B$(I).
:-. .: 1:..@-(#..`-F#.V$;"F1 . DATEN ERW
EITERN "..-P#.X$;"F3 . DATEN FILE ZULADE
N..-Z#.X$;"F5 . DATEN LOESCHEN (ID.NR.)
".P-D#.X$;"F7 . STANDARDKOPF SPEICHERN "
..-N#.X$;ZM$..-X#.11000..-.#.A$.G(95)...
...#.A$.G(133).GT.1:I.B.1:.1000.8..#.A$.
G(134).FJ.B:.6000:FJ.0:..L. #.A$.G(135).
9160....#.A$.G(136)..7,8,7,"@:STANDARDKO
PF,S,W":.7,BN$:.7,BA$....#.A$.G(136)..7,
BW$:.7,BT$: 7....#.9030...H#.V$;"EINGABE
DER ZU LOESCHENDEN ID NR. ? ":.X$;...R#
.18000../.#.X$;"SOLL ";K$;" GELOESCHT WE
RDEN (J/N) ? ".4/.#.11000:.A$.."J"...?/.
#.I.1.B.[/.#.K$.J(B$(I),18,2)..9240.A/.$
..G/.$.../.$.J.I.B:B$(J).B$(J.1):.../"$I
.I.1:B.B.1:.../.'.X$;"TASTE DRUECKEN ":T
.0:.11000:..P/.*.A$:.A$."".11000.V/.+...
/...../...V$;BF$;" FUNKTION"..0./FI$."@:
".BF$:.I.1.200:FF$(I)."":..?0./FF.1:K.2:
I.2:BR$."FUNKTION ENDE".T0./.X$;"BITTE W
ARTEN BIS ";BR$:FF$(1).J(B$(1),18,2)..0&
/FF$(I).J(B$(K),18,2)..00/.J.1.I.1..0:/.
FF$(I).FF$(J).12120..0D/..C0N/I.I.1.X0X/
K.K.1:.K.B.12140..0B/.12070..0L/Z.I.1..0
V/.C.1.Z.1.'1./J.C.1:.X$;"ELEMENT
....";J.1;"...".21./.D.J.Z.K1./.FF$(C).F
F$(D).12200.V1./.12210..1./C$(0).FF$(C):
FF$(C).FF$(D):FF$(D).C$(0)..1./...1./..G
1F/.X$;"BLOCKS WERDEN ADDIERT":BL$.".DIS
K ":BM$.".".BF$.O1P/J.1..1Z/.I.1.B:.I.1.
GS.0..2./.J(B$(I),18,2).FF$(J)..12350.C2
./.:FF$(J).BF$." DISK ".FF$(J)." ".I(ZK$
.D(664.GS),3):J.J.1.T2./.J.Z.1.12250.`2.
0.X$;BR$..2.0.X$;"DRUCKER ODER SCREEN (D
/S) ":.11000:...2.0.A$.."S".A$.."D"..110
00:.12320.C2 0.A$."D".12380..2*0.I.1.Z:.
"....";FF$(I)..240.11000:.:.12420..3>0G.
0:G.E(I(B$(I),3))..3H0GS.GS.G..3R0..<3\0
.X$;"DRUCKER EINSCHALTEN ! ".G3F0.10000.
P3P0.4,4.U3Z0.I.1.Z:.4," ";FF$(I):.:
.4: 4..3.0.V$;"DATEN AUF DISK SPEICHERN
? (J/N)":.11000:.A$.."J"...U3.0.X$;"DATE
N DISKETTE EINLEGEN "..3.0.10000:.2,8,2,
FI$.",S,W":.2,Z..4.0.I.1.Z:.2,FF$(I):.:
2..4.0...4.6..(4N6.B.2...P4X6.V$;"AUSSOR
TIEREN FREMDER LISTEN":DI$."@:DIFFERENZ"
:LI$."LISTE":X.1..4.6.X$;"MIT WELCHER LI
STE VERGLEICHEN ?":.17000..4.6.X$;"WIEVI
EL ZEICHEN VERGLEICHEN (1-20) ";:.18000:
SK.E(K$)..4.6.SK.25.SK.25..5.7.5,8,5,FI$
.",S,R":.16000:.T..0.14100.=5.7.2,8,2,"@
:LISTE".",S,W":.16000.E5.7.T..0. 5: 2:.X
$;K$:.X$;ZM$:.11000:..N5.7.5,C.Y5(7.J.1.
C..527.5,D$:.".....";D$..5<7.I.1.B..5F7.
H(D$,SK).H(B$(I),SK).14300.A5P7.I.Q5Z7.2
,D$:X.X.1.X5D7.J..5N7 5: 2:X.X.1..6X7.X.
0.."... KEIN NEUES ELEMENT GEFUNDEN":.10
000.16.7.7,8,7,DI$.",S,W".:6.7.7,X.P6.7.
5,8,5,LI$.",S,R".I6 7.I.1.X:.5,D$:.7,D$:
..S6.7 7: 5..6.7.V$;"DAS AUSSORTIEREN IS
T BEENDET ".B6.7.X$;"DAS DATENFILE < DIF
FERENZ > "..6H7.X$;"KANN GELADEN WERDEN
"..7R7.15,8,15,"S0:LISTE": 15:.16000:...
7.7.J.C.14190..7.7.J."7.7..(7.:..:7.>.3,
T,K$,O,O:..H7HB.X$;"FILE NAME ";:F.1:.18
000:F.0:FI$.K$:..R7PFK$.""..7ZF.11000:.A
$.G(13)..:...7DF.A$.G(20).C(K$)..0.K$.H(
K$,C(K$).1):.A$;.Q7NF.DR.1.C(K$).33.1801
0..7XF.F.1.C(K$).18.18010..8.F.A$.G(31).
K$.K$.A$:.A$;..8.F.18010...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL