_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL