DISKSORTER
FILE INFORMATION
FILENAME(S): DISKSORTER
FILE TYPE(S): PRG
FILE SIZE: 12.1K
FIRST SEEN: 2025-10-20 14:30:48
APPEARS ON: 1 disk(s)
FILE HASH
dcee1950d468a40bf4bee1de96b8d12683a54b5dbe99b6fe7c7e41c468420fea
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C LANDWEHR | DISKSORTER | PRG | Treasure Chest - Klaus Der Suhler | 26 | 6 | 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: A0 D1 A0 D1 A0 D1 D1 D1 A0 D1 D1 D1 A0 D1 D1 D1 |................|
00000040: A0 D1 D1 D1 A0 D1 D1 D1 A0 D1 D1 D1 22 00 7C 08 |............".|.|
00000050: FA 00 99 22 D1 A0 D1 A0 A0 D1 A0 A0 D1 A0 A0 A0 |..."............|
00000060: D1 A0 D1 A0 D1 A0 A0 A0 D1 A0 D1 A0 D1 A0 D1 A0 |................|
00000070: A0 D1 A0 A0 D1 A0 A0 A0 D1 A0 D1 22 00 AB 08 04 |..........."....|
00000080: 01 99 22 D1 A0 D1 A0 A0 D1 A0 A0 D1 D1 D1 A0 D1 |..".............|
00000090: D1 A0 A0 D1 D1 D1 A0 D1 A0 D1 A0 D1 D1 A0 A0 A0 |................|
000000A0: D1 A0 A0 D1 D1 A0 A0 D1 D1 A0 22 00 DA 08 0E 01 |..........".....|
000000B0: 99 22 D1 A0 D1 A0 A0 D1 A0 A0 A0 A0 D1 A0 D1 A0 |."..............|
000000C0: D1 A0 A0 A0 D1 A0 D1 A0 D1 A0 D1 A0 D1 A0 A0 D1 |................|
000000D0: A0 A0 D1 A0 A0 A0 D1 A0 D1 22 00 09 09 18 01 99 |........."......|
000000E0: 22 D1 D1 A0 A0 D1 D1 D1 A0 D1 D1 D1 A0 D1 A0 D1 |"...............|
000000F0: A0 D1 D1 D1 A0 D1 D1 D1 A0 D1 A0 D1 A0 A0 D1 A0 |................|
00000100: A0 D1 D1 D1 A0 D1 A0 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 B6 0A | "...|
00000290: D6 01 99 4E 24 3B 22 93 1D 20 28 43 29 20 31 39 |...N$;".. (C) 19|
000002A0: 38 33 20 92 20 49 44 45 41 53 4F 46 54 20 26 20 |83 . IDEASOFT & |
000002B0: 53 54 4F 4E 45 22 00 DD 0A E0 01 99 4E 24 3B 22 |STONE"......N$;"|
000002C0: 46 31 20 92 20 44 41 54 45 4E 20 50 45 52 20 44 |F1 . DATEN PER D|
000002D0: 49 53 4B 20 45 49 4E 4C 45 53 45 4E 22 00 08 0B |ISK EINLESEN"...|
000002E0: EA 01 99 4E 24 3B 22 46 33 20 92 20 44 41 54 45 |...N$;"F3 . DATE|
000002F0: 4E 20 45 52 57 45 49 54 45 52 4E 20 2F 20 4C 4F |N ERWEITERN / LO|
00000300: 45 53 43 48 45 4E 20 22 00 27 0B F4 01 99 4E 24 |ESCHEN ".'....N$|
00000310: 3B 22 46 35 20 92 20 4C 49 53 54 45 20 45 44 49 |;"F5 . LISTE EDI|
00000320: 54 49 45 52 45 4E 22 00 46 0B FE 01 99 4E 24 3B |TIEREN".F....N$;|
00000330: 22 46 37 20 92 20 4C 49 53 54 45 20 53 4F 52 54 |"F7 . LISTE SORT|
00000340: 49 45 52 45 4E 22 00 67 0B 08 02 99 4E 24 3B 22 |IEREN".g....N$;"|
00000350: 46 32 20 92 20 44 41 54 45 4E 20 41 42 53 50 45 |F2 . DATEN ABSPE|
00000360: 49 43 48 45 52 4E 22 00 95 0B 12 02 99 4E 24 3B |ICHERN"......N$;|
00000370: 22 46 34 20 92 20 44 41 54 45 4E 20 45 49 4E 4C |"F4 . DATEN EINL|
00000380: 45 53 45 4E 20 20 20 20 12 20 43 4C 52 20 92 20 |ESEN . CLR . |
00000390: 51 55 49 54 22 00 C7 0B 1C 02 99 4E 24 3B 22 46 |QUIT"......N$;"F|
000003A0: 36 20 92 20 4C 49 53 54 45 20 44 52 55 43 4B 45 |6 . LISTE DRUCKE|
000003B0: 4E 20 20 20 20 20 12 20 25 20 92 20 53 50 45 5A |N . % . SPEZ|
000003C0: 2E 4C 49 53 54 45 22 00 F9 0B 26 02 99 4E 24 3B |.LISTE"...&..N$;|
000003D0: 22 46 38 20 92 20 4C 49 53 54 45 20 41 55 46 20 |"F8 . LISTE AUF |
000003E0: 53 43 52 45 45 4E 20 20 12 20 26 20 92 20 44 49 |SCREEN . & . DI|
000003F0: 53 4B 20 4F 50 45 52 2E 22 00 27 0C 30 02 99 4E |SK OPER.".'.0..N|
00000400: 24 3B 22 2A 20 20 92 20 22 3B 42 46 24 3B 22 20 |$;"* . ";BF$;" |
00000410: 20 20 20 20 20 20 12 20 24 20 92 20 44 49 52 45 | . $ . DIRE|
00000420: 43 54 4F 52 59 22 22 00 4E 0C 3A 02 99 4E 24 3B |CTORY"".N.:..N$;|
00000430: 22 5C 20 20 92 20 41 4E 44 45 52 45 20 42 49 4C |"\ . ANDERE BIL|
00000440: 44 53 43 48 49 52 4D 20 46 41 52 42 45 22 00 79 |DSCHIRM FARBE".y|
00000450: 0C 44 02 99 4E 24 3B 22 21 20 20 92 20 41 55 53 |.D..N$;"! . AUS|
00000460: 53 4F 52 54 49 45 52 45 4E 20 46 52 45 4D 44 45 |SORTIEREN FREMDE|
00000470: 52 20 4C 49 53 54 45 20 22 00 84 0C 4E 02 8D 31 |R LISTE "...N..1|
00000480: 31 30 30 30 00 B7 0C 58 02 8B 41 24 B2 C7 28 31 |1000...X..A$..(1|
00000490: 33 33 29 A7 49 B2 30 3A 42 42 B2 42 3A 42 B2 30 |33).I.0:BB.B:B.0|
000004A0: 3A 51 B2 30 3A 8D 31 30 30 30 3A 8B 41 24 B2 22 |:Q.0:.1000:.A$."|
000004B0: 5F 22 A7 42 B2 42 42 00 CC 0C 62 02 8B 41 24 B2 |_".B.BB...b..A$.|
000004C0: C7 28 31 33 38 29 A7 8D 36 30 30 30 00 E0 0C 6C |.(138)..6000...l|
000004D0: 02 8B 41 24 B2 C7 28 33 37 29 A7 8D 38 32 30 30 |..A$..(37)..8200|
000004E0: 00 FD 0C 76 02 8B 41 24 B2 C7 28 31 33 35 29 A7 |...v..A$..(135).|
000004F0: 9F 34 2C 34 3A 8D 37 30 30 30 3A A0 34 00 11 0D |.4,4:.7000:.4...|
00000500: 80 02 8B 41 24 B2 C7 28 33 38 29 A7 8D 36 33 30 |...A$..(38)..630|
00000510: 30 00 26 0D 8A 02 8B 41 24 B2 C7 28 33 33 29 A7 |0.&....A$..(33).|
00000520: 8D 31 34 30 30 30 00 60 0D 94 02 8B 41 24 B2 C7 |.14000.`....A$..|
00000530: 28 33 36 29 A7 42 B2 42 AA 32 3A 49 B2 42 3A 48 |(36).B.B.2:I.B:H|
00000540: B2 31 3A 47 54 B2 31 3A 47 B2 30 3A 8D 31 30 35 |.1:GT.1:G.0:.105|
00000550: 30 3A 48 B2 30 3A 42 B2 42 AB 32 3A 47 54 B2 30 |0:H.0:B.B.2:GT.0|
00000560: 00 75 0D 9E 02 8B 41 24 B2 C7 28 31 33 36 29 A7 |.u....A$..(136).|
00000570: 8D 34 30 30 30 00 86 0D A8 02 8B 41 24 B2 C7 28 |.4000......A$..(|
00000580: 31 34 37 29 A7 80 00 9B 0D B2 02 8B 41 24 B2 C7 |147)........A$..|
00000590: 28 31 33 37 29 A7 8D 35 30 30 30 00 B0 0D BC 02 |(137)..5000.....|
000005A0: 8B 41 24 B2 C7 28 31 33 34 29 A7 8D 39 30 30 30 |.A$..(134)..9000|
000005B0: 00 CD 0D C6 02 8B 41 24 B2 C7 28 31 33 39 29 A7 |......A$..(139).|
000005C0: 9F 34 2C 34 3A 8D 33 30 30 30 3A A0 34 00 E2 0D |.4,4:.3000:.4...|
000005D0: D0 02 8B 41 24 B2 C7 28 31 34 30 29 A7 8D 38 30 |...A$..(140)..80|
000005E0: 30 30 00 F6 0D DA 02 8B 41 24 B2 C7 28 39 32 29 |00......A$..(92)|
000005F0: A7 8D 32 30 30 30 00 15 0E E4 02 8B 41 24 B2 C7 |..2000......A$..|
00000600: 28 34 32 29 A7 42 42 B2 42 3A 8D 31 32 30 30 30 |(42).BB.B:.12000|
00000610: 3A 42 B2 42 42 00 1E 0E EE 02 89 34 35 30 00 24 |:B.BB......450.$|
00000620: 0E E8 03 8F 00 67 0E 06 04 47 B2 30 3A 99 56 24 |.....g...G.0:.V$|
00000630: 3B 22 44 49 53 4B 20 45 49 4E 4C 45 47 45 4E 20 |;"DISK EINLEGEN |
00000640: 3A 20 44 41 54 45 4E 20 4B 4F 4D 50 4C 45 54 54 |: DATEN KOMPLETT|
00000650: 20 22 3A 99 58 24 3B 22 4F 44 45 52 20 45 49 4E | ":.X$;"ODER EIN|
00000660: 5A 45 4C 4E 20 22 3B 00 9A 0E 0B 04 99 22 45 49 |ZELN ";......"EI|
00000670: 4E 4C 45 53 45 4E 20 3F 20 28 4B 2F 45 29 22 3A |NLESEN ? (K/E)":|
00000680: 99 58 24 3B 5A 4D 24 3A 8D 31 30 30 30 30 3A 8B |.X$;ZM$:.10000:.|
00000690: 41 24 B2 22 45 22 A7 47 B2 31 00 A8 0E 10 04 8B |A$."E".G.1......|
000006A0: 41 24 B2 22 5F 22 A7 8E 00 C6 0E 1A 04 99 56 24 |A$."_"........V$|
000006B0: 3B 22 49 43 48 20 4C 45 53 45 20 44 49 53 4B 20 |;"ICH LESE DISK |
000006C0: 22 3A 99 58 24 3B 00 DB 0E 24 04 9F 31 2C 38 2C |":.X$;...$..1,8,|
000006D0: 30 2C 22 24 30 22 3A 47 42 B2 31 00 04 0F 2E 04 |0,"$0":GB.1.....|
000006E0: 8D 31 36 30 30 30 3A 99 22 20 12 22 4B 24 22 11 |.16000:." ."K$".|
000006F0: 11 22 3A 8B 54 B3 B1 30 A7 8D 31 30 30 30 30 3A |.":.T..0..10000:|
00000700: A0 31 3A 8E 00 12 0F 38 04 A1 23 31 2C 41 24 2C |.1:....8..#1,A$,|
00000710: 46 24 00 2B 0F 42 04 A1 23 31 2C 41 24 2C 46 24 |F$.+.B..#1,A$,F$|
00000720: 3A 42 24 28 49 AA 31 29 B2 22 22 00 39 0F 4C 04 |:B$(I.1)."".9.L.|
00000730: A1 23 31 2C 41 24 2C 46 24 00 4A 0F 56 04 43 B2 |.#1,A$,F$.J.V.C.|
00000740: 30 3A 4C 24 B2 22 20 20 20 22 00 5E 0F 60 04 8B |0:L$." ".^.`..|
00000750: 41 24 B3 B1 22 22 A7 43 B2 C6 28 41 24 29 00 78 |A$.."".C..(A$).x|
00000760: 0F 6A 04 8B 46 24 B3 B1 22 22 A7 43 B2 43 AA C6 |.j..F$.."".C.C..|
00000770: 28 46 24 29 AC 32 35 36 00 97 0F 74 04 51 24 B2 |(F$).256...t.Q$.|
00000780: CA 28 C4 28 43 29 2C 32 29 3A 4C 24 B2 C8 28 51 |.(.(C),2):L$..(Q|
00000790: 24 AA 4C 24 2C 33 29 00 C2 0F 7E 04 A1 23 31 2C |$.L$,3)...~..#1,|
000007A0: 46 24 3A 8B 46 24 B2 22 22 A7 99 22 11 1D 1D 12 |F$:.F$."".."....|
000007B0: 22 3B 4C 24 3B 22 20 22 3B 42 46 24 3A 89 31 32 |";L$;" ";BF$:.12|
000007C0: 39 35 00 D6 0F 88 04 8B 46 24 B3 B1 C7 28 33 34 |95......F$...(34|
000007D0: 29 A7 31 31 35 30 00 05 10 92 04 A1 23 31 2C 46 |).1150......#1,F|
000007E0: 24 3A 8B 46 24 B3 B1 C7 28 33 34 29 A7 42 24 28 |$:.F$...(34).B$(|
000007F0: 49 AA 51 29 B2 42 24 28 49 AA 51 29 AA 46 24 3A |I.Q).B$(I.Q).F$:|
00000800: 89 31 31 37 30 00 19 10 9C 04 8B 51 B2 31 A7 42 |.1170......Q.1.B|
00000810: 24 28 49 AA 31 29 B2 22 22 00 33 10 A6 04 A1 23 |$(I.1)."".3....#|
00000820: 31 2C 46 24 3A 8B 46 24 B2 C7 28 33 32 29 A7 31 |1,F$:.F$..(32).1|
00000830: 31 39 30 00 3D 10 B0 04 43 24 B2 22 22 00 5E 10 |190.=...C$."".^.|
00000840: BA 04 43 24 B2 43 24 AA 46 24 3A A1 23 31 2C 46 |..C$.C$.F$:.#1,F|
00000850: 24 3A 8B 46 24 B3 B1 22 22 A7 31 32 31 30 00 74 |$:.F$.."".1210.t|
00000860: 10 C4 04 8B 47 42 B2 31 A7 47 42 24 B2 43 24 3A |....GB.1.GB$.C$:|
00000870: 47 42 B2 30 00 A7 10 CE 04 42 24 28 49 AA 51 29 |GB.0.....B$(I.Q)|
00000880: B2 C8 28 42 24 28 49 AA 51 29 AA 5A 4B 24 2C 31 |..(B$(I.Q).ZK$,1|
00000890: 37 29 AA C8 28 47 42 24 2C 33 29 AA C9 28 5A 4B |7)..(GB$,3)..(ZK|
000008A0: 24 AA 51 24 2C 33 29 00 D9 10 D8 04 99 22 1D 1D |$.Q$,3)......"..|
000008B0: 22 3B 42 24 28 49 AA 51 29 3B 22 1D 1D 1D 22 3B |";B$(I.Q);"...";|
000008C0: 22 12 20 22 3B C8 28 43 24 2C 35 29 3B 3A 8B 47 |". ";.(C$,5);:.G|
000008D0: B2 30 AF 47 54 B2 30 A7 99 00 F9 10 E2 04 8B 47 |.0.GT.0........G|
000008E0: 54 B2 31 A7 47 54 B2 30 3A 42 24 28 49 29 B2 22 |T.1.GT.0:B$(I)."|
000008F0: 22 3A 99 3A 89 31 30 39 30 00 11 11 EC 04 8B 51 |":.:.1090......Q|
00000900: B2 31 A7 51 B2 30 3A 42 24 28 49 AA 31 29 B2 22 |.1.Q.0:B$(I.1)."|
00000910: 22 00 53 11 F6 04 8B 47 B2 31 AF 47 54 B2 30 AF |".S....G.1.GT.0.|
00000920: 49 B1 30 A7 99 22 92 20 4A 2F 4E 9D 9D 9D 22 3B |I.0..". J/N...";|
00000930: 3A 8D 31 31 30 30 30 3A 8B 41 24 B2 22 4E 22 A7 |:.11000:.A$."N".|
00000940: 99 22 4E 45 49 4E 22 3B 3A 47 54 B2 31 3A 89 31 |."NEIN";:GT.1:.1|
00000950: 32 35 30 00 6A 11 00 05 49 B2 49 AA 31 3A 8B 47 |250.j...I.I.1:.G|
00000960: B2 31 A7 99 22 92 20 4A 41 22 00 A5 11 05 05 8B |.1..". JA"......|
00000970: 49 AA 51 AA 31 B2 38 35 30 A7 99 58 24 3B 22 53 |I.Q.1.850..X$;"S|
00000980: 50 45 49 43 48 45 52 20 49 53 54 20 56 4F 4C 4C |PEICHER IST VOLL|
00000990: 22 3A 99 58 24 3B 5A 4D 24 3A A0 31 3A 8D 31 31 |":.X$;ZM$:.1:.11|
000009A0: 30 30 30 3A 8E 00 AF 11 0A 05 89 31 30 39 30 00 |000:.......1090.|
000009B0: C4 11 0F 05 A0 31 3A 8B 48 B2 31 A7 8D 31 30 30 |.....1:.H.1..100|
000009C0: 30 30 3A 8E 00 E3 11 14 05 99 58 24 3B 22 4E 4F |00:.......X$;"NO|
000009D0: 43 48 20 45 49 4E 45 20 44 49 53 4B 20 28 4A 2F |CH EINE DISK (J/|
000009E0: 4E 29 22 00 F2 11 1E 05 51 57 24 B2 C4 28 49 AB |N)".....QW$..(I.|
000009F0: 31 29 00 25 12 28 05 99 58 24 3B 22 42 49 53 48 |1).%.(..X$;"BISH|
00000A00: 45 52 20 57 55 52 44 45 4E 20 22 3B 51 57 24 3B |ER WURDEN ";QW$;|
00000A10: 22 20 44 41 54 45 4E 20 47 45 4C 45 53 45 4E 20 |" DATEN GELESEN |
00000A20: 11 11 11 11 22 00 30 12 32 05 8D 31 31 30 30 30 |....".0.2..11000|
00000A30: 00 4C 12 3C 05 8B 41 24 B2 22 4A 22 A7 47 54 B2 |.L.<..A$."J".GT.|
00000A40: 31 3A 99 56 24 3B 3A 89 31 30 36 30 00 5E 12 46 |1:.V$;:.1060.^.F|
00000A50: 05 8B 41 24 B3 B1 22 4E 22 A7 31 33 33 30 00 6B |..A$.."N".1330.k|
00000A60: 12 50 05 42 B2 49 AB 31 3A A0 31 00 79 12 5A 05 |.P.B.I.1:.1.y.Z.|
00000A70: 41 24 B2 22 22 3A 54 B2 30 00 7F 12 64 05 8E 00 |A$."":T.0...d...|
00000A80: 9A 12 D0 07 8F 20 20 2A 2A 2A 2A 46 41 52 42 57 |..... ****FARBW|
00000A90: 45 43 48 53 45 4C 2A 2A 2A 2A 00 AA 12 EE 07 49 |ECHSEL****.....I|
00000AA0: B2 30 3A 46 B2 30 3A 4A B2 30 00 D0 12 F8 07 99 |.0:F.0:J.0......|
00000AB0: 56 24 3B 22 46 31 92 20 12 46 41 52 42 57 45 43 |V$;"F1. .FARBWEC|
00000AC0: 48 53 45 4C 20 42 49 4C 44 53 43 48 49 52 4D 22 |HSEL BILDSCHIRM"|
00000AD0: 00 F7 12 02 08 99 58 24 3B 22 46 33 92 20 12 46 |......X$;"F3. .F|
00000AE0: 41 52 42 57 45 43 48 53 45 4C 20 48 49 4E 54 45 |ARBWECHSEL HINTE|
00000AF0: 52 47 52 55 4E 44 22 00 1A 13 0C 08 99 58 24 3B |RGRUND"......X$;|
00000B00: 22 46 35 92 20 12 46 41 52 42 57 45 43 48 53 45 |"F5. .FARBWECHSE|
00000B10: 4C 20 53 43 48 52 49 46 54 22 00 26 13 16 08 99 |L SCHRIFT".&....|
00000B20: 58 24 3B 5A 4D 24 00 31 13 20 08 8D 31 31 30 30 |X$;ZM$.1. ..1100|
00000B30: 30 00 4F 13 2A 08 8B 41 24 B2 C7 28 31 33 33 29 |0.O.*..A$..(133)|
00000B40: A7 49 B2 49 AA 31 3A 97 35 33 32 38 30 2C 49 00 |.I.I.1:.53280,I.|
00000B50: 6D 13 34 08 8B 41 24 B2 C7 28 31 33 34 29 A7 4A |m.4..A$..(134).J|
00000B60: B2 4A AA 31 3A 97 35 33 32 38 31 2C 4A 00 89 13 |.J.1:.53281,J...|
00000B70: 3E 08 8B 41 24 B2 C7 28 31 33 35 29 A7 46 B2 46 |>..A$..(135).F.F|
00000B80: AA 31 3A 97 36 34 36 2C 46 00 97 13 48 08 8B 41 |.1:.646,F...H..A|
00000B90: 24 B2 22 5F 22 A7 8E 00 A1 13 52 08 89 32 30 34 |$."_".....R..204|
00000BA0: 30 00 C3 13 B8 0B 8F 20 2A 2A 2A 2A 20 20 44 52 |0...... **** DR|
00000BB0: 55 43 4B 45 52 2D 41 55 53 47 41 42 45 20 20 2A |UCKER-AUSGABE *|
00000BC0: 2A 2A 2A 00 D9 13 CC 0B 5A 4B 24 B2 C8 28 5A 4B |***.....ZK$..(ZK|
00000BD0: 24 AA 5A 4B 24 2C 33 33 29 00 21 14 D6 0B 4A 24 |$.ZK$,33).!...J$|
00000BE0: B2 22 12 20 4A 41 20 22 3A 4E 24 B2 22 12 4E 45 |.". JA ":N$.".NE|
00000BF0: 49 4E 22 3A 46 31 24 B2 4E 24 3A 46 33 24 B2 4A |IN":F1$.N$:F3$.J|
00000C00: 24 3A 46 35 24 B2 4A 24 3A 46 37 24 B2 4E 24 3A |$:F5$.J$:F7$.N$:|
00000C10: 46 32 24 B2 4E 24 3A 5A 24 B2 22 1D 1D 1D 1D 1D |F2$.N$:Z$.".....|
00000C20: 22 00 3B 14 E0 0B 59 24 B2 22 11 22 AA 5A 24 3A |".;...Y$.".".Z$:|
00000C30: 46 34 24 B2 4E 24 3A 44 52 B2 31 00 48 14 F4 0B |F4$.N$:DR.1.H...|
00000C40: 54 24 B2 22 1D 12 20 22 00 70 14 FE 0B 53 54 24 |T$.".. ".p...ST$|
00000C50: B2 22 22 3A 41 4E 24 B2 22 42 49 54 54 45 20 46 |."":AN$."BITTE F|
00000C60: 55 4E 4B 54 49 4F 4E 20 57 41 45 48 4C 45 4E 22 |UNKTION WAEHLEN"|
00000C70: 00 91 14 03 0C 99 22 93 1D 1D 1D 1D 1D 12 20 44 |......"....... D|
00000C80: 52 55 43 4B 45 52 20 41 55 53 47 41 42 45 20 11 |RUCKER AUSGABE .|
00000C90: 22 00 B3 14 08 0C 99 46 31 24 3B 54 24 3B 22 46 |"......F1$;T$;"F|
00000CA0: 31 20 92 20 44 52 55 43 4B 2D 42 45 47 49 4E 4E |1 . DRUCK-BEGINN|
00000CB0: 20 11 22 00 DF 14 12 0C 99 46 33 24 3B 54 24 3B | ."......F3$;T$;|
00000CC0: 22 46 33 20 92 20 53 54 41 4E 44 2E 4B 4F 50 46 |"F3 . STAND.KOPF|
00000CD0: 20 4D 49 54 20 44 52 55 43 4B 45 4E 20 11 22 00 | MIT DRUCKEN .".|
00000CE0: 0B 15 1C 0C 99 46 35 24 3B 54 24 3B 22 46 35 20 |.....F5$;T$;"F5 |
00000CF0: 92 20 50 52 4F 47 52 41 4D 4D 2D 4C 49 53 54 45 |. PROGRAMM-LISTE|
00000D00: 20 44 52 55 43 4B 45 4E 20 11 22 00 34 15 26 0C | DRUCKEN .".4.&.|
00000D10: 99 46 37 24 3B 54 24 3B 22 46 37 20 92 20 50 52 |.F7$;T$;"F7 . PR|
00000D20: 45 49 53 2D 4C 49 53 54 45 20 44 52 55 43 4B 45 |EIS-LISTE DRUCKE|
00000D30: 4E 20 11 22 00 5E 15 30 0C 99 46 32 24 3B 54 24 |N .".^.0..F2$;T$|
00000D40: 3B 22 46 32 20 92 20 4C 49 53 54 45 20 4E 41 43 |;"F2 . LISTE NAC|
00000D50: 48 20 4B 52 49 54 45 52 49 55 4D 20 11 22 00 87 |H KRITERIUM ."..|
00000D60: 15 3A 0C 99 46 34 24 3B 54 24 3B 22 46 34 20 92 |.:..F4$;T$;"F4 .|
00000D70: 20 53 54 41 4E 44 41 52 44 4B 4F 50 46 20 41 45 | STANDARDKOPF AE|
00000D80: 4E 44 45 52 4E 20 22 00 98 15 44 0C 99 58 24 3B |NDERN "...D..X$;|
00000D90: 22 9D 9D 22 3B 5A 4D 24 00 A2 15 4E 0C 99 22 11 |"..";ZM$...N..".|
00000DA0: 11 22 00 D0 15 58 0C 99 22 20 20 20 20 B0 C0 C0 |."...X.." ...|
00000DB0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000DC0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE |................|
00000DD0: 00 FE 15 62 0C 99 22 20 20 20 20 C2 20 20 20 20 |...b.." . |
00000DE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000DF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 00 2C | ..,|
00000E00: 16 6C 0C 99 22 20 20 20 20 AB C0 C0 C0 C0 C0 C0 |.l.." .......|
00000E10: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000E20: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 B3 00 5A 16 76 |.............Z.v|
00000E30: 0C 99 22 20 20 20 20 C2 20 20 20 20 20 20 20 20 |.." . |
00000E40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E50: 20 20 20 20 20 20 20 20 20 C2 00 88 16 80 0C 99 | .......|
00000E60: 22 20 20 20 20 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |" ...........|
00000E70: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000E80: C0 C0 C0 C0 C0 C0 C0 BD 00 AB 16 8A 0C 99 22 13 |..............".|
00000E90: 22 3B 3A 81 4A B2 31 A4 32 30 3A 99 22 11 22 3B |";:.J.1.20:.".";|
00000EA0: 3A 82 3A 99 5A 24 3B 3B 53 54 24 00 B7 16 94 0C |:.:.Z$;;ST$.....|
00000EB0: 99 59 24 3B 41 4E 24 00 D7 16 9E 0C 8B 43 B2 31 |.Y$;AN$......C.1|
00000EC0: A7 43 B2 30 3A 8D 33 34 35 30 3A 46 34 24 B2 4E |.C.0:.3450:F4$.N|
00000ED0: 24 3A 89 33 30 37 30 00 F6 16 A8 0C 8B 46 31 24 |$:.3070......F1$|
00000EE0: B2 4A 24 A7 46 31 24 B2 4E 24 3A 8D 33 33 38 30 |.J$.F1$.N$:.3380|
00000EF0: 3A 89 33 30 37 30 00 01 17 B2 0C 8D 31 31 30 30 |:.3070......1100|
00000F00: 30 00 24 17 BC 0C 8B 41 24 B2 C7 28 31 33 33 29 |0.$....A$..(133)|
00000F10: AF 46 31 24 B2 4E 24 A7 46 31 24 B2 4A 24 3A 89 |.F1$.N$.F1$.J$:.|
00000F20: 33 30 37 30 00 47 17 C6 0C 8B 41 24 B2 C7 28 31 |3070.G....A$..(1|
00000F30: 33 34 29 AF 46 33 24 B2 4A 24 A7 46 33 24 B2 4E |34).F3$.J$.F3$.N|
00000F40: 24 3A 89 33 30 37 30 00 6A 17 D0 0C 8B 41 24 B2 |$:.3070.j....A$.|
00000F50: C7 28 31 33 34 29 AF 46 33 24 B2 4E 24 A7 46 33 |.(134).F3$.N$.F3|
00000F60: 24 B2 4A 24 3A 89 33 30 37 30 00 9B 17 DA 0C 8B |$.J$:.3070......|
00000F70: 41 24 B2 C7 28 31 33 35 29 AF 46 35 24 B2 4E 24 |A$..(135).F5$.N$|
00000F80: A7 46 35 24 B2 4A 24 3A 46 32 24 B2 4E 24 3A 46 |.F5$.J$:F2$.N$:F|
00000F90: 37 24 B2 4E 24 3A 89 33 30 37 30 00 BE 17 E4 0C |7$.N$:.3070.....|
00000FA0: 8B 41 24 B2 C7 28 31 33 35 29 AF 46 35 24 B2 4A |.A$..(135).F5$.J|
00000FB0: 24 A7 46 35 24 B2 4E 24 3A 89 33 30 37 30 00 E1 |$.F5$.N$:.3070..|
00000FC0: 17 EE 0C 8B 41 24 B2 C7 28 31 33 36 29 AF 46 37 |....A$..(136).F7|
00000FD0: 24 B2 4A 24 A7 46 37 24 B2 4E 24 3A 89 33 30 37 |$.J$.F7$.N$:.307|
00000FE0: 30 00 12 18 F8 0C 8B 41 24 B2 C7 28 31 33 36 29 |0......A$..(136)|
00000FF0: AF 46 37 24 B2 4E 24 A7 46 37 24 B2 4A 24 3A 46 |.F7$.N$.F7$.J$:F|
00001000: 32 24 B2 4E 24 3A 46 35 24 B2 4E 24 3A 89 33 30 |2$.N$:F5$.N$:.30|
00001010: 37 30 00 43 18 02 0D 8B 41 24 B2 C7 28 31 33 37 |70.C....A$..(137|
00001020: 29 AF 46 32 24 B2 4E 24 A7 46 32 24 B2 4A 24 3A |).F2$.N$.F2$.J$:|
00001030: 46 37 24 B2 4E 24 3A 46 35 24 B2 4E 24 3A 89 33 |F7$.N$:F5$.N$:.3|
00001040: 30 37 30 00 66 18 0C 0D 8B 41 24 B2 C7 28 31 33 |070.f....A$..(13|
00001050: 37 29 AF 46 32 24 B2 4A 24 A7 46 32 24 B2 4E 24 |7).F2$.J$.F2$.N$|
00001060: 3A 89 33 30 37 30 00 7B 18 16 0D 8B 41 24 B2 C7 |:.3070.{....A$..|
00001070: 28 39 35 29 A7 44 52 B2 30 3A 8E 00 9B 18 20 0D |(95).DR.0:.... .|
00001080: 8B 41 24 B2 C7 28 31 33 38 29 A7 46 34 24 B2 4A |.A$..(138).F4$.J|
00001090: 24 3A 43 B2 31 3A 89 33 30 37 30 00 B8 18 2A 0D |$:C.1:.3070...*.|
000010A0: 8B 41 24 B3 C7 28 39 35 29 B0 41 24 B1 C7 28 31 |.A$..(95).A$..(1|
000010B0: 33 37 29 A7 33 32 35 30 00 EE 18 34 0D 99 22 13 |37).3250...4..".|
000010C0: 22 3A 81 4A B2 31 A4 31 39 3A 99 22 11 22 3B 3A |":.J.1.19:.".";:|
000010D0: 82 3A 99 5A 24 3B 5A 4B 24 3A 99 22 91 22 3B 5A |.:.Z$;ZK$:.".";Z|
000010E0: 24 3B 22 4F 4B 20 3F 20 28 4A 2F 4E 29 22 00 0D |$;"OK ? (J/N)"..|
000010F0: 19 39 0D 99 59 24 3B 5A 4B 24 3A 8D 31 31 30 30 |.9..Y$;ZK$:.1100|
00001100: 30 3A 8B 20 41 24 B3 B1 22 4A 22 A7 8E 00 4B 19 |0:. A$.."J"...K.|
00001110: 3E 0D 99 22 13 22 3A 81 4A B2 31 A4 31 39 3A 99 |>..".":.J.1.19:.|
00001120: 22 11 22 3B 3A 82 3A 99 5A 24 3B 22 57 49 45 56 |".";:.:.Z$;"WIEV|
00001130: 49 45 4C 20 5A 45 49 4C 45 4E 20 50 52 4F 20 53 |IEL ZEILEN PRO S|
00001140: 45 49 54 45 20 3F 3E 3D 31 35 22 00 84 19 48 0D |EITE ?>=15"...H.|
00001150: 99 59 24 3B 5A 4B 24 3A 99 22 91 91 22 3B 59 24 |.Y$;ZK$:."..";Y$|
00001160: 3B 3A 8D 31 38 30 30 30 3A 44 5A B2 C5 28 4B 24 |;:.18000:DZ..(K$|
00001170: 29 3A 8B 44 5A B3 31 35 B0 44 5A B1 33 30 30 A7 |):.DZ.15.DZ.300.|
00001180: 33 33 39 30 00 A0 19 4D 0D 8B 46 32 24 B2 4E 24 |3390...M..F2$.N$|
00001190: AF 46 35 24 B2 4E 24 AF 46 37 24 B2 4E 24 A7 8E |.F5$.N$.F7$.N$..|
000011A0: 00 B1 19 52 0D 8B 46 33 24 B2 4A 24 A7 33 35 33 |...R..F3$.J$.353|
000011B0: 30 00 C2 19 5C 0D 8B 46 33 24 B2 4E 24 A7 33 35 |0...\..F3$.N$.35|
000011C0: 39 30 00 D0 19 66 0D 8B 41 24 B2 22 5F 22 A7 8E |90...f..A$."_"..|
000011D0: 00 D6 19 70 0D 8E 00 F5 19 7A 0D 53 54 24 B2 22 |...p.....z.ST$."|
000011E0: 44 41 54 55 4D 20 3F 22 3A 8D 33 35 31 30 3A 44 |DATUM ?":.3510:D|
000011F0: 41 24 B2 4B 24 00 13 1A 84 0D 53 54 24 B2 22 4E |A$.K$.....ST$."N|
00001200: 41 4D 45 20 3F 22 3A 8D 33 35 31 30 3A 42 4E 24 |AME ?":.3510:BN$|
00001210: B2 4B 24 00 38 1A 8E 0D 53 54 24 B2 22 53 54 52 |.K$.8...ST$."STR|
00001220: 41 53 53 45 2C 4E 52 2E 20 3F 22 3A 8D 33 35 31 |ASSE,NR. ?":.351|
00001230: 30 3A 42 41 24 B2 4B 24 00 59 1A 98 0D 53 54 24 |0:BA$.K$.Y...ST$|
00001240: B2 22 57 4F 48 4E 4F 52 54 20 3F 22 3A 8D 33 35 |."WOHNORT ?":.35|
00001250: 31 30 3A 42 57 24 B2 4B 24 00 7A 1A A2 0D 53 54 |10:BW$.K$.z...ST|
00001260: 24 B2 22 54 45 4C 45 46 4F 4E 20 3F 22 3A 8D 33 |$."TELEFON ?":.3|
00001270: 35 31 30 3A 42 54 24 B2 4B 24 00 80 1A AC 0D 8E |510:BT$.K$......|
00001280: 00 A1 1A B6 0D 99 22 13 22 3A 81 4A B2 31 A4 31 |......".":.J.1.1|
00001290: 39 3A 99 22 11 22 3B 3A 82 3A 99 5A 24 3B 53 54 |9:.".";:.:.Z$;ST|
000012A0: 24 00 BE 1A BB 0D 99 59 24 3B 5A 4B 24 3A 99 22 |$......Y$;ZK$:."|
000012B0: 91 91 22 3B 59 24 3B 3A 8D 31 38 30 30 30 00 E9 |..";Y$;:.18000..|
000012C0: 1A C0 0D 99 22 13 22 3A 81 4A B2 31 A4 31 39 3A |....".":.J.1.19:|
000012D0: 99 22 11 22 3B 3A 82 3A 99 5A 24 3B 5A 4B 24 3A |.".";:.:.Z$;ZK$:|
000012E0: 99 59 24 3B 5A 4B 24 3A 8E 00 00 1B CA 0D 5A 44 |.Y$;ZK$:......ZD|
000012F0: B2 30 3A 8B 46 33 24 B2 4A 24 A7 5A 44 B2 31 35 |.0:.F3$.J$.ZD.15|
00001300: 00 21 1B D4 0D 98 34 2C C7 28 31 34 29 22 20 20 |.!....4,.(14)" |
00001310: 22 3B 42 4E 24 3A 98 34 2C 22 20 20 22 3B 42 41 |";BN$:.4," ";BA|
00001320: 24 00 40 1B DE 0D 98 34 2C 22 20 20 22 3B 42 57 |$.@....4," ";BW|
00001330: 24 3A 98 34 2C 22 20 20 22 3B 42 54 24 3A 98 34 |$:.4," ";BT$:.4|
00001340: 00 64 1B E8 0D 98 34 2C 22 20 20 44 49 53 4B 45 |.d....4," DISKE|
00001350: 54 54 45 4E 49 4E 48 41 4C 54 20 56 4F 4D 20 22 |TTENINHALT VOM "|
00001360: 3B 44 41 24 00 85 1B F2 0D 98 34 3A 98 34 2C 22 |;DA$......4:.4,"|
00001370: 20 20 50 52 4F 47 52 41 4D 4D 45 3A 22 3B 42 3B | PROGRAMME:";B;|
00001380: C7 28 31 35 29 00 8C 1B FC 0D 98 34 00 9D 1B 06 |.(15)......4....|
00001390: 0E 8B 46 32 24 B2 4A 24 A7 33 37 36 30 00 AE 1B |..F2$.J$.3760...|
000013A0: 0B 0E 8B 46 37 24 B2 4E 24 A7 33 36 31 30 00 D2 |...F7$.N$.3610..|
000013B0: 1B 10 0E 51 53 24 B2 22 50 52 47 2E 4E 41 4D 45 |...QS$."PRG.NAME|
000013C0: 20 4B 42 2E 20 50 52 45 49 53 20 22 3A 89 33 36 | KB. PREIS ":.36|
000013D0: 32 30 00 F7 1B 1A 0E 51 53 24 B2 22 50 52 47 2E |20.....QS$."PRG.|
000013E0: 4E 41 4D 45 20 20 20 20 20 20 20 20 20 49 44 20 |NAME ID |
000013F0: 42 4C 2E 20 20 20 22 00 0A 1C 24 0E 5A 44 24 B2 |BL. "...$.ZD$.|
00001400: 22 20 20 22 3A 89 33 36 34 30 00 1A 1C 38 0E 44 |" ":.3640...8.D|
00001410: 44 B2 B5 28 42 AD 33 29 AA 31 00 22 1C 42 0E 53 |D..(B.3).1.".B.S|
00001420: B2 31 00 47 1C 4C 0E 42 24 28 42 AA 31 29 B2 22 |.1.G.L.B$(B.1)."|
00001430: 22 3A 42 24 28 42 AA 32 29 B2 22 22 3A 42 24 28 |":B$(B.2)."":B$(|
00001440: 42 AA 33 29 B2 22 22 00 67 1C 56 0E 98 34 2C C8 |B.3)."".g.V..4,.|
00001450: 28 22 20 20 20 20 22 AA 51 53 24 AA 51 53 24 AA |(" ".QS$.QS$.|
00001460: 51 53 24 2C 37 38 29 00 8E 1C 60 0E 98 34 2C 22 |QS$,78)...`..4,"|
00001470: 20 20 20 20 22 3B 3A 81 54 B2 31 A4 37 34 3A 98 | ";:.T.1.74:.|
00001480: 34 2C C7 28 31 30 31 29 3B 3A 82 3A 98 34 00 9A |4,.(101);:.:.4..|
00001490: 1C 6A 0E 81 54 B2 31 A4 44 44 00 CE 1C 74 0E 98 |.j..T.1.DD...t..|
000014A0: 34 2C 22 20 20 20 20 22 3B 42 24 28 53 29 3B 22 |4," ";B$(S);"|
000014B0: 20 20 20 22 3B 42 24 28 53 AA 44 44 29 3B 22 20 | ";B$(S.DD);" |
000014C0: 20 20 22 3B 42 24 28 53 AA 32 AC 44 44 29 00 DA | ";B$(S.2.DD)..|
000014D0: 1C 7E 0E 5A 44 B2 5A 44 AA 31 00 F6 1C 88 0E 53 |.~.ZD.ZD.1.....S|
000014E0: B2 53 AA 31 3A 8B 5A 44 B2 44 5A A7 5A 44 B2 30 |.S.1:.ZD.DZ.ZD.0|
000014F0: 3A 8D 33 37 34 30 00 FE 1C 92 0E 82 3A 8E 00 1C |:.3740......:...|
00001500: 1D 9C 0E 99 22 13 22 3A 81 4A B2 31 A4 31 39 3A |....".":.J.1.19:|
00001510: 99 22 11 22 3B 3A 82 3A 99 5A 24 3B 00 5E 1D A6 |.".";:.:.Z$;.^..|
00001520: 0E 99 22 44 52 55 43 4B 45 52 50 41 50 49 45 52 |.."DRUCKERPAPIER|
00001530: 20 4A 55 53 54 49 45 52 45 4E 20 3F 20 22 3A 99 | JUSTIEREN ? ":.|
00001540: 59 24 3B 22 54 41 53 54 45 20 44 52 55 45 43 4B |Y$;"TASTE DRUECK|
00001550: 45 4E 20 22 3B 3A 8D 31 31 30 30 30 3A 8E 00 93 |EN ";:.11000:...|
00001560: 1D B0 0E 46 B2 32 3A 99 22 13 22 3A 81 49 B2 31 |...F.2:.".":.I.1|
00001570: A4 31 39 3A 99 22 11 22 3B 3A 82 3A 99 5A 24 3B |.19:.".";:.:.Z$;|
00001580: 5A 4B 24 3A 99 59 24 3B 5A 4B 24 3A 99 22 91 91 |ZK$:.Y$;ZK$:."..|
00001590: 91 91 22 00 BC 1D B5 0E 99 5A 24 3B 22 49 44 2E |.."......Z$;"ID.|
000015A0: 43 4F 44 45 20 45 49 4E 47 45 42 45 4E 20 21 22 |CODE EINGEBEN !"|
000015B0: 3A 99 59 24 3B 3A 8D 31 38 30 30 30 00 D1 1D BA |:.Y$;:.18000....|
000015C0: 0E 8B C9 28 4B 24 2C 31 29 B2 22 2A 22 A7 46 B2 |...(K$,1)."*".F.|
000015D0: 31 00 E4 1D C4 0E 4B 24 B2 C8 28 4B 24 AA 5A 4B |1.....K$..(K$.ZK|
000015E0: 24 2C 46 29 00 01 1E CE 0E 81 49 B2 31 A4 42 3A |$,F)......I.1.B:|
000015F0: 8B 5A 44 B2 44 5A A7 5A 44 B2 30 3A 8D 33 37 34 |.ZD.DZ.ZD.0:.374|
00001600: 30 00 2F 1E D8 0E 8B CA 28 42 24 28 49 29 2C 31 |0./.....(B$(I),1|
00001610: 38 2C 46 29 B2 4B 24 A7 98 34 2C 22 20 20 20 20 |8,F).K$..4," |
00001620: 22 3B 42 24 28 49 29 3A 5A 44 B2 5A 44 AA 31 00 |";B$(I):ZD.ZD.1.|
00001630: 38 1E E2 0E 82 3A 98 34 00 3E 1E EC 0E 8E 00 5F |8....:.4.>....._|
00001640: 1E A0 0F 8F 20 20 20 2A 2A 2A 20 20 53 4F 52 54 |.... *** SORT|
00001650: 49 45 52 52 4F 55 54 49 4E 45 20 20 2A 2A 2A 00 |IERROUTINE ***.|
00001660: 98 1E BE 0F 99 56 24 3B 22 53 4F 52 54 49 45 52 |.....V$;"SORTIER|
00001670: 2D 52 4F 55 54 49 4E 45 20 4C 41 45 55 46 54 21 |-ROUTINE LAEUFT!|
00001680: 22 3A 42 24 28 42 AA 31 29 B2 22 5A 5A 5A 5A 5A |":B$(B.1)."ZZZZZ|
00001690: 5A 5A 5A 22 3A 46 B2 30 00 C2 1E C3 0F 99 58 24 |ZZZ":F.0......X$|
000016A0: 3B 22 41 4C 50 48 41 42 45 54 49 53 43 48 20 4F |;"ALPHABETISCH O|
000016B0: 44 45 52 20 4E 41 43 48 20 49 44 2E 4E 52 2E 20 |DER NACH ID.NR. |
000016C0: 3F 22 00 EB 1E C8 0F 99 58 24 3B 22 28 41 2F 49 |?"......X$;"(A/I|
000016D0: 29 22 3A 99 58 24 3B 5A 4D 24 3A 8D 31 31 30 30 |)":.X$;ZM$:.1100|
000016E0: 30 3A 8B 41 24 B2 22 5F 22 A7 8E 00 FB 1E D7 0F |0:.A$."_".......|
000016F0: 8B 41 24 B2 22 49 22 A7 46 B2 31 00 06 1F DC 0F |.A$."I".F.1.....|
00001700: 81 43 B2 31 A4 42 00 33 1F E6 0F 4A B2 43 AA 31 |.C.1.B.3...J.C.1|
00001710: 3A 99 58 24 3B 22 45 4C 45 4D 45 4E 54 20 20 20 |:.X$;"ELEMENT |
00001720: 20 20 20 20 9D 9D 9D 9D 22 3B 4A AB 31 3B 22 91 | ....";J.1;".|
00001730: 91 91 22 00 3E 1F F0 0F 81 44 B2 4A A4 42 00 62 |..".>....D.J.B.b|
00001740: 1F FA 0F 8B 46 B2 31 AF C9 28 42 24 28 43 29 2C |....F.1..(B$(C),|
00001750: 36 29 B1 C9 28 42 24 28 44 29 2C 36 29 A7 34 31 |6)..(B$(D),6).41|
00001760: 32 30 00 78 1F 04 10 8B 42 24 28 43 29 B1 42 24 |20.x....B$(C).B$|
00001770: 28 44 29 A7 34 31 32 30 00 82 1F 0E 10 89 34 31 |(D).4120......41|
00001780: 33 30 00 AA 1F 18 10 43 24 28 30 29 B2 42 24 28 |30.....C$(0).B$(|
00001790: 43 29 3A 42 24 28 43 29 B2 42 24 28 44 29 3A 42 |C):B$(C).B$(D):B|
000017A0: 24 28 44 29 B2 43 24 28 30 29 00 B0 1F 22 10 82 |$(D).C$(0)..."..|
000017B0: 00 B6 1F 2C 10 82 00 E3 1F 36 10 99 56 24 3B 22 |...,.....6..V$;"|
000017C0: 44 4F 50 50 45 4C 54 45 20 44 41 54 45 4E 20 41 |DOPPELTE DATEN A|
000017D0: 55 53 53 4F 52 54 49 45 52 45 4E 20 28 4A 2F 4E |USSORTIEREN (J/N|
000017E0: 29 20 22 00 EE 1F 40 10 8D 31 31 30 30 30 00 FF |) "...@..11000..|
000017F0: 1F 4A 10 8B 41 24 B2 22 4A 22 A7 34 31 39 30 00 |.J..A$."J".4190.|
00001800: 05 20 54 10 8E 00 28 20 5E 10 99 56 24 3B 22 45 |. T...( ^..V$;"E|
00001810: 53 20 57 49 52 44 20 41 55 53 53 4F 52 54 49 45 |S WIRD AUSSORTIE|
00001820: 52 54 20 22 3A 4A B2 31 00 62 20 68 10 99 58 24 |RT ":J.1.b h..X$|
00001830: 3B 22 57 49 45 56 49 45 4C 45 20 5A 45 49 43 48 |;"WIEVIELE ZEICH|
00001840: 45 4E 20 42 45 52 55 45 43 4B 53 49 43 48 54 49 |EN BERUECKSICHTI|
00001850: 47 45 4E 20 3F 22 3A 99 58 24 3B 3A 8D 31 38 30 |GEN ?":.X$;:.180|
00001860: 30 30 00 81 20 72 10 53 53 B2 C5 28 4B 24 29 3A |00.. r.SS..(K$):|
00001870: 8B 53 53 B2 30 B0 53 53 B1 32 35 A7 53 53 B2 32 |.SS.0.SS.25.SS.2|
00001880: 35 00 A5 20 7C 10 8B C8 28 42 24 28 4A 29 2C 53 |5.. |...(B$(J),S|
00001890: 53 29 B2 C8 28 42 24 28 4A AA 31 29 2C 53 53 29 |S)..(B$(J.1),SS)|
000018A0: A7 34 32 37 30 00 AF 20 86 10 4A B2 4A AA 31 00 |.4270.. ..J.J.1.|
000018B0: C0 20 90 10 8B 4A B3 B2 42 AB 31 A7 34 32 32 30 |. ...J..B.1.4220|
000018C0: 00 DB 20 9A 10 81 49 B2 42 AA 31 A4 42 AA 31 30 |.. ...I.B.1.B.10|
000018D0: 3A 42 24 28 49 29 B2 22 22 3A 82 00 E1 20 A4 10 |:B$(I)."":... ..|
000018E0: 8E 00 EC 20 AE 10 81 49 B2 4A A4 42 00 FE 20 B8 |... ...I.J.B.. .|
000018F0: 10 42 24 28 49 29 B2 42 24 28 49 AA 31 29 00 04 |.B$(I).B$(I.1)..|
00001900: 21 C2 10 82 00 1A 21 CC 10 4A B2 4A AB 31 3A 42 |!.....!..J.J.1:B|
00001910: B2 42 AB 31 3A 89 34 32 33 30 00 20 21 D6 10 8E |.B.1:.4230. !...|
00001920: 00 3F 21 88 13 8F 20 20 20 20 2A 2A 20 44 41 54 |.?!... ** DAT|
00001930: 45 4E 20 53 50 45 49 43 48 45 52 4E 20 2A 2A 00 |EN SPEICHERN **.|
00001940: 63 21 A6 13 99 56 24 3B 22 44 41 54 45 4E 20 57 |c!...V$;"DATEN W|
00001950: 45 52 44 45 4E 20 47 45 53 50 45 49 43 48 45 52 |ERDEN GESPEICHER|
00001960: 54 20 22 00 99 21 B0 13 8D 31 37 30 30 30 3A 49 |T "..!...17000:I|
00001970: B2 30 3A 99 58 24 3B 22 53 49 43 48 45 52 20 3F |.0:.X$;"SICHER ?|
00001980: 20 28 4A 2F 4E 29 22 3A 8D 31 31 30 30 30 3A 8B | (J/N)":.11000:.|
00001990: 41 24 B3 B1 22 4A 22 A7 8E 00 AF 21 BA 13 9F 32 |A$.."J"....!...2|
000019A0: 2C 38 2C 32 2C 46 49 24 AA 22 2C 53 2C 57 22 00 |,8,2,FI$.",S,W".|
000019B0: D3 21 C4 13 8D 31 36 30 30 30 3A 99 58 24 3B 4B |.!...16000:.X$;K|
000019C0: 24 3A 8B 54 B3 B1 30 A7 A0 32 3A 8D 31 30 30 30 |$:.T..0..2:.1000|
000019D0: 30 3A 8E 00 DC 21 CE 13 98 32 2C 42 00 FC 21 D8 |0:...!...2,B..!.|
000019E0: 13 8B 47 B2 31 A7 81 49 B2 31 A4 5A 3A 98 32 2C |..G.1..I.1.Z:.2,|
000019F0: 46 46 24 28 49 29 3A 89 35 31 30 30 00 10 22 E2 |FF$(I):.5100..".|
00001A00: 13 81 49 B2 31 A4 42 3A 98 32 2C 42 24 28 49 29 |..I.1.B:.2,B$(I)|
00001A10: 00 16 22 EC 13 82 00 1D 22 F6 13 A0 32 00 23 22 |.."....."...2.#"|
00001A20: 00 14 8E 00 48 22 70 17 8F 20 20 20 2A 2A 2A 20 |....H"p.. *** |
00001A30: 44 41 54 45 4E 20 46 49 4C 45 53 20 45 49 4E 4C |DATEN FILES EINL|
00001A40: 45 53 45 4E 20 2A 2A 2A 00 70 22 8E 17 99 56 24 |ESEN ***.p"...V$|
00001A50: 3B 22 44 41 54 45 4E 20 57 45 52 44 45 4E 20 47 |;"DATEN WERDEN G|
00001A60: 45 4C 45 53 45 4E 20 22 3A 99 58 24 3B 5A 4D 24 |ELESEN ":.X$;ZM$|
00001A70: 00 85 22 98 17 8D 31 37 30 30 30 3A 8B 4B 24 B2 |.."...17000:.K$.|
00001A80: 22 5F 22 A7 8E 00 B1 22 A2 17 99 58 24 3B 22 44 |"_"...."...X$;"D|
00001A90: 41 54 45 4E 20 46 49 4C 45 20 22 3B 46 49 24 22 |ATEN FILE ";FI$"|
00001AA0: 20 45 49 4E 4C 45 53 45 4E 20 28 4A 2F 4E 29 20 | EINLESEN (J/N) |
00001AB0: 22 00 BC 22 AC 17 8D 31 31 30 30 30 00 CB 22 B6 |".."...11000..".|
00001AC0: 17 8B 41 24 B3 B1 22 4A 22 A7 8E 00 EB 22 C0 17 |..A$.."J"...."..|
00001AD0: 9F 32 2C 38 2C 32 2C 46 49 24 AA 22 2C 53 2C 52 |.2,8,2,FI$.",S,R|
00001AE0: 22 3A 99 22 11 11 1D 1D 1D 22 3B 00 14 23 CA 17 |":.".....";..#..|
00001AF0: 8D 31 36 30 30 30 3A 99 22 20 12 22 4B 24 22 11 |.16000:." ."K$".|
00001B00: 11 22 3A 8B 54 B3 B1 30 A7 8D 31 30 30 30 30 3A |.":.T..0..10000:|
00001B10: A0 32 3A 8E 00 1D 23 D4 17 84 32 2C 42 00 2E 23 |.2:...#...2,B..#|
00001B20: DE 17 81 49 B2 46 4A AA 31 A4 42 AA 46 4A 00 49 |...I.FJ.1.B.FJ.I|
00001B30: 23 E8 17 84 32 2C 42 24 28 49 29 3A 82 3A A0 32 |#...2,B$(I):.:.2|
00001B40: 3A 42 B2 42 AA 46 4A 3A 8E 00 67 23 9C 18 99 56 |:B.B.FJ:..g#...V|
00001B50: 24 3B 22 44 49 53 4B 20 4F 50 45 52 41 54 49 4F |$;"DISK OPERATIO|
00001B60: 4E 20 4D 4F 44 45 22 00 91 23 A6 18 99 58 24 3B |N MODE"..#...X$;|
00001B70: 22 44 49 53 4B 45 54 54 45 4E 42 45 46 45 48 4C |"DISKETTENBEFEHL|
00001B80: 45 20 53 2C 20 56 2C 20 4E 2C 20 52 2C 20 49 20 |E S, V, N, R, I |
00001B90: 22 00 CC 23 B0 18 99 58 24 3B 22 42 45 46 45 48 |"..#...X$;"BEFEH|
00001BA0: 4C 20 3F 22 3B 3A 8D 31 38 30 30 30 3A 46 49 24 |L ?";:.18000:FI$|
00001BB0: B2 4B 24 3A 99 58 24 3B 22 41 55 53 46 55 45 48 |.K$:.X$;"AUSFUEH|
00001BC0: 52 45 4E 20 28 4A 2F 4E 29 20 3F 22 00 D7 23 B5 |REN (J/N) ?"..#.|
00001BD0: 18 8D 31 31 30 30 30 00 E5 23 BA 18 8B 41 24 B2 |..11000..#...A$.|
00001BE0: 22 5F 22 A7 8E 00 21 24 C4 18 8B 41 24 B2 22 4A |"_"...!$...A$."J|
00001BF0: 22 A7 9F 31 35 2C 38 2C 31 35 3A 98 31 35 2C 46 |"..15,8,15:.15,F|
00001C00: 49 24 3A A0 31 35 3A 8D 31 36 30 30 30 3A 8B 54 |I$:.15:.16000:.T|
00001C10: B3 B1 30 A7 99 58 24 3B 4B 24 3A 8D 31 30 30 30 |..0..X$;K$:.1000|
00001C20: 30 00 2C 24 C9 18 8B 54 B2 30 A7 8E 00 3E 24 CE |0.,$...T.0...>$.|
00001C30: 18 99 22 13 22 3B 58 24 3A 89 36 33 31 30 00 57 |..".";X$:.6310.W|
00001C40: 24 58 1B 8F 20 20 20 20 2A 2A 2A 20 45 44 49 54 |$X.. *** EDIT|
00001C50: 4F 52 20 20 2A 2A 2A 00 64 24 76 1B 97 36 35 30 |OR ***.d$v..650|
00001C60: 2C 31 32 38 00 8F 24 80 1B 99 53 24 3B 22 93 1D |,128..$...S$;"..|
00001C70: 1D 1D 1D 1D 12 20 40 20 92 20 20 3A 20 20 45 4C |..... @ . : EL|
00001C80: 45 4D 45 4E 54 20 4C 4F 45 53 43 48 45 4E 22 00 |EMENT LOESCHEN".|
00001C90: B2 24 8A 1B 99 53 24 3B 22 12 20 5C 20 92 20 20 |.$...S$;". \ . |
00001CA0: 3A 20 20 45 4C 45 4D 45 4E 54 20 53 55 43 48 45 |: ELEMENT SUCHE|
00001CB0: 4E 22 00 D9 24 94 1B 99 53 24 3B 22 12 20 2A 20 |N"..$...S$;". * |
00001CC0: 92 20 20 3A 20 20 45 4C 45 4D 45 4E 54 20 56 45 |. : ELEMENT VE|
00001CD0: 52 42 45 53 53 45 52 4E 22 00 F8 24 9E 1B 99 53 |RBESSERN"..$...S|
00001CE0: 24 3B 22 12 20 5F 20 92 20 20 3A 20 20 22 3B C9 |$;". _ . : ";.|
00001CF0: 28 5A 4D 24 2C 31 33 29 00 1D 25 A8 1B 99 53 24 |(ZM$,13)..%...S$|
00001D00: 3B 22 12 20 50 20 92 20 20 3A 20 20 45 4C 45 4D |;". P . : ELEM|
00001D10: 45 4E 54 20 44 52 55 43 4B 45 4E 20 22 00 41 25 |ENT DRUCKEN ".A%|
00001D20: B2 1B 99 53 24 3B 22 12 20 20 20 92 20 20 3A 20 |...S$;". . : |
00001D30: 20 45 49 4E 20 45 4C 45 4D 45 4E 54 20 56 4F 52 | EIN ELEMENT VOR|
00001D40: 22 00 66 25 BC 1B 99 53 24 3B 22 12 20 46 31 92 |".f%...S$;". F1.|
00001D50: 20 20 3A 20 20 32 30 20 45 4C 45 4D 45 4E 54 45 | : 20 ELEMENTE|
00001D60: 20 56 4F 52 20 22 00 8E 25 C6 1B 99 53 24 3B 22 | VOR "..%...S$;"|
00001D70: 12 20 46 33 92 20 20 3A 20 20 32 30 20 45 4C 45 |. F3. : 20 ELE|
00001D80: 4D 45 4E 54 45 20 5A 55 52 55 45 43 4B 22 00 B6 |MENTE ZURUECK"..|
00001D90: 25 D0 1B 99 53 24 3B 22 12 20 5E 20 92 20 20 3A |%...S$;". ^ . :|
00001DA0: 20 20 45 49 4E 20 45 4C 45 4D 45 4E 54 20 5A 55 | EIN ELEMENT ZU|
00001DB0: 52 55 45 43 4B 22 00 DD 25 DA 1B 99 53 24 3B 22 |RUECK"..%...S$;"|
00001DC0: 12 20 24 20 92 20 20 3A 20 20 44 4D 2D 4C 49 53 |. $ . : DM-LIS|
00001DD0: 54 45 20 45 52 53 54 45 4C 4C 45 4E 22 00 06 26 |TE ERSTELLEN"..&|
00001DE0: DF 1B 99 53 24 3B 22 12 20 2B 20 92 20 20 3A 20 |...S$;". + . : |
00001DF0: 20 45 4C 45 4D 45 4E 54 20 45 49 4E 46 55 45 47 | ELEMENT EINFUEG|
00001E00: 45 4E 20 22 3A 99 00 11 26 E4 1B 81 49 B2 31 A4 |EN ":...&...I.1.|
00001E10: 42 00 34 26 EE 1B 99 22 91 1D 1D 1D 22 3B 5A 4B |B.4&..."....";ZK|
00001E20: 24 3B 22 11 22 3A 99 22 1D 1D 1D 20 20 22 3B 42 |$;".":."... ";B|
00001E30: 24 28 49 29 00 3F 26 F8 1B 8D 31 31 30 30 30 00 |$(I).?&...11000.|
00001E40: 5D 26 02 1C 8B 42 24 28 31 29 B2 22 22 AF 20 42 |]&...B$(1)."". B|
00001E50: B1 31 A7 41 24 B2 22 40 22 3A 49 B2 31 00 85 26 |.1.A$."@":I.1..&|
00001E60: 0C 1C 8B 41 24 B2 22 40 22 AF 42 B1 31 A7 42 24 |...A$."@".B.1.B$|
00001E70: 28 49 29 B2 42 24 28 42 29 3A 42 B2 42 AB 31 3A |(I).B$(B):B.B.1:|
00001E80: 41 24 B2 22 22 00 A2 26 16 1C 8B 41 24 B2 C7 28 |A$.""..&...A$..(|
00001E90: 31 33 33 29 AF 49 AA 32 30 B3 42 A7 49 B2 49 AA |133).I.20.B.I.I.|
00001EA0: 32 30 00 BF 26 20 1C 8B 41 24 B2 C7 28 31 33 34 |20..& ..A$..(134|
00001EB0: 29 AF 49 AB 32 30 B1 30 A7 49 B2 49 AB 32 30 00 |).I.20.0.I.I.20.|
00001EC0: F7 26 2A 1C 8B 41 24 B2 22 2A 22 A7 99 22 91 91 |.&*..A$."*".."..|
00001ED0: 1D 1D 1D 1D 1D 22 3B 22 12 4B 4F 52 52 45 4B 54 |.....";".KORREKT|
00001EE0: 55 52 45 4C 45 4D 45 4E 54 22 3A 85 22 1D 1D 1D |URELEMENT":."...|
00001EF0: 22 3B 42 24 28 49 29 00 26 27 34 1C 8B 41 24 B2 |";B$(I).&'4..A$.|
00001F00: 22 2A 22 A7 99 22 91 91 22 3B 5A 4B 24 3A 99 3A |"*".."..";ZK$:.:|
00001F10: 8B 42 24 28 49 29 B2 22 22 A7 42 24 28 49 29 B2 |.B$(I)."".B$(I).|
00001F20: 22 5A 5A 5A 5A 22 00 3E 27 39 1C 8B 41 24 B2 22 |"ZZZZ".>'9..A$."|
00001F30: 24 22 A7 8D 37 35 30 30 3A 89 37 30 30 30 00 59 |$"..7500:.7000.Y|
00001F40: 27 3E 1C 8B 41 24 B2 22 5F 22 A7 41 24 B2 22 22 |'>..A$."_".A$.""|
00001F50: 3A 97 36 35 30 2C 30 3A 8E 00 76 27 48 1C 8B 41 |:.650,0:..v'H..A|
00001F60: 24 B2 22 5E 22 A7 49 B2 49 AB 32 3A 8B 49 B3 31 |$."^".I.I.2:.I.1|
00001F70: A7 49 B2 42 AB 31 00 BA 27 52 1C 8B 41 24 B2 22 |.I.B.1..'R..A$."|
00001F80: 2B 22 A7 42 B2 42 AA 31 3A 99 22 12 91 91 1D 1D |+".B.B.1:.".....|
00001F90: 1D 1D 1D 4E 45 55 45 53 20 45 4C 45 4D 45 4E 54 |...NEUES ELEMENT|
00001FA0: 22 3A 85 22 1D 1D 1D 22 3B 42 24 28 42 29 3A 99 |":."...";B$(B):.|
00001FB0: 22 91 91 22 3B 5A 4B 24 3A 99 00 D6 27 5C 1C 8B |"..";ZK$:...'\..|
00001FC0: 41 24 B2 22 50 22 A7 98 34 2C 22 20 20 20 20 22 |A$."P"..4," "|
00001FD0: 3B 42 24 28 49 29 00 1E 28 66 1C 8B 41 24 B2 22 |;B$(I)..(f..A$."|
00001FE0: 5C 22 A7 99 56 24 3B 22 4E 41 43 48 20 57 45 4C |\"..V$;"NACH WEL|
00001FF0: 43 48 45 4D 20 45 4C 45 4D 45 4E 54 20 53 55 43 |CHEM ELEMENT SUC|
00002000: 48 45 4E 20 3F 22 3A 99 58 24 3B 3A 8D 31 38 30 |HEN ?":.X$;:.180|
00002010: 30 30 3A 8D 37 33 31 30 3A 89 37 30 30 30 00 3F |00:.7310:.7000.?|
00002020: 28 70 1C 8B C8 28 42 24 28 42 29 2C 34 29 B2 22 |(p...(B$(B),4)."|
00002030: 5A 5A 5A 5A 22 AF 49 B1 31 A7 42 B2 42 AB 31 00 |ZZZZ".I.1.B.B.1.|
00002040: 59 28 7A 1C 99 22 91 91 91 1D 1D 1D 22 3B 5A 4B |Y(z.."......";ZK|
00002050: 24 3A 82 3A 89 37 31 34 30 00 5F 28 84 1C 8E 00 |$:.:.7140._(....|
00002060: 6C 28 8E 1C 8B 4B 24 B2 22 22 A7 8E 00 85 28 98 |l(...K$.""....(.|
00002070: 1C 46 B2 30 3A 8B C9 28 4B 24 2C 31 29 B2 22 2A |.F.0:..(K$,1)."*|
00002080: 22 A7 46 B2 31 00 A3 28 A2 1C 51 B2 C3 28 4B 24 |".F.1..(..Q..(K$|
00002090: 29 AB 46 3A 51 24 B2 C8 28 4B 24 2C 51 29 3A 45 |).F:Q$..(K$,Q):E|
000020A0: 5A B2 30 00 D0 28 AC 1C 45 45 24 B2 22 20 4B 45 |Z.0..(..EE$." KE|
000020B0: 49 4E 20 57 45 49 54 45 52 45 53 22 3A 45 59 24 |IN WEITERES":EY$|
000020C0: B2 22 20 56 4F 52 48 41 4E 44 45 4E 20 22 3A 99 |." VORHANDEN ":.|
000020D0: 00 DB 28 B6 1C 81 4B B2 31 A4 42 00 FC 28 C0 1C |..(...K.1.B..(..|
000020E0: 8B C8 28 42 24 28 4B 29 2C 51 29 B2 51 24 A7 45 |..(B$(K),Q).Q$.E|
000020F0: 5A B2 31 3A 53 45 B2 31 3A 52 B2 31 00 08 29 CA |Z.1:SE.1:R.1..).|
00002100: 1C 8B 53 45 B2 30 A7 82 00 2B 29 D4 1C 8B 53 45 |..SE.0...+)...SE|
00002110: B2 31 A7 99 22 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 42 |.1.."........";B|
00002120: 24 28 4B 29 3A 53 45 B2 30 3A 82 00 49 29 DE 1C |$(K):SE.0:..I)..|
00002130: 8B 45 5A B2 30 A7 99 22 1D 1D 11 12 22 3B 45 5A |.EZ.0.."....";EZ|
00002140: 24 AA 45 58 24 AA 45 59 24 00 76 29 E8 1C 8B 45 |$.EX$.EY$.v)...E|
00002150: 5A B2 31 A7 99 22 11 11 22 3A 99 22 1D 1D 12 22 |Z.1.."..":."..."|
00002160: 3B 45 45 24 AA 45 5A 24 AA 45 59 24 3A 99 22 1D |;EE$.EZ$.EY$:.".|
00002170: 1D 22 3B 57 53 24 00 89 29 F2 1C 99 58 24 3B 5A |.";WS$..)...X$;Z|
00002180: 4D 24 3A 8D 31 31 30 30 30 00 8F 29 FC 1C 8E 00 |M$:.11000..)....|
00002190: CC 29 4C 1D 99 22 93 11 11 1D 1D 12 20 44 4D 2D |.)L.."...... DM-|
000021A0: 4C 49 53 54 45 4E 45 52 53 54 45 4C 4C 55 4E 47 |LISTENERSTELLUNG|
000021B0: 20 92 11 11 22 3A 99 22 11 11 22 3B 58 24 3B 5A | ...":."..";X$;Z|
000021C0: 4D 24 3A 99 22 13 11 11 11 11 11 22 00 F2 29 56 |M$:."......"..)V|
000021D0: 1D 81 4A B2 49 A4 42 3A 99 22 20 20 22 3B 3A 43 |..J.I.B:." ";:C|
000021E0: 24 B2 C8 28 42 24 28 4A 29 2C 31 37 29 3A 99 43 |$..(B$(J),17):.C|
000021F0: 24 3B 00 20 2A 60 1D 46 24 B2 C9 28 5A 4B 24 AA |$;. *`.F$..(ZK$.|
00002200: C4 28 B5 28 C5 28 C9 28 42 24 28 4A 29 2C 33 29 |.(.(.(.(B$(J),3)|
00002210: 29 AD 34 AA 2E 35 29 29 2C 32 29 3A 99 46 24 3B |).4..5)),2):.F$;|
00002220: 00 41 2A 6A 1D 99 22 20 30 30 30 9D 9D 9D 22 3B |.A*j.." 000...";|
00002230: 3A 8D 31 38 30 30 30 3A 8B 4B 24 B2 22 5F 22 A7 |:.18000:.K$."_".|
00002240: 8E 00 61 2A 74 1D 42 24 28 4A 29 B2 43 24 AA 46 |..a*t.B$(J).C$.F|
00002250: 24 AA 22 20 22 AA C8 28 4B 24 AA 5A 4B 24 2C 33 |$." "..(K$.ZK$,3|
00002260: 29 00 6F 2A 7E 1D 99 22 91 22 3B 3A 82 3A 8E 00 |).o*~..".";:.:..|
00002270: 75 2A 40 1F 8F 00 C2 2A 5E 1F 99 56 24 3B 22 49 |u*@....*^..V$;"I|
00002280: 4E 48 41 4C 54 20 45 49 4E 45 52 20 44 49 53 4B |NHALT EINER DISK|
00002290: 20 4C 49 53 54 45 4E 20 22 3A 99 58 24 3B 22 4F | LISTEN ":.X$;"O|
000022A0: 44 45 52 20 41 4C 4C 45 20 44 49 53 4B 20 44 41 |DER ALLE DISK DA|
000022B0: 54 45 4E 20 4C 49 53 54 45 4E 20 28 45 2F 41 29 |TEN LISTEN (E/A)|
000022C0: 20 22 00 CD 2A 68 1F 8D 31 31 30 30 30 00 DF 2A | "..*h..11000..*|
000022D0: 72 1F 3A 8B 41 24 B2 22 45 22 A7 38 31 32 30 00 |r.:.A$."E".8120.|
000022E0: F1 2A 7C 1F 99 56 24 3B 5A 4D 24 3A 99 3A 5A B2 |.*|..V$;ZM$:.:Z.|
000022F0: 31 00 02 2B 86 1F 81 49 B2 31 A4 42 3A 5A B2 5A |1..+...I.1.B:Z.Z|
00002300: AA 31 00 2C 2B 90 1F 99 22 1D 1D 1D 1D 1D 1D 1D |.1.,+...".......|
00002310: 1D 22 3B 42 24 28 49 29 3A 8B C2 28 36 33 31 29 |.";B$(I):..(631)|
00002320: B2 39 35 A7 97 31 39 38 2C 30 3A 8E 00 48 2B 9A |.95..198,0:..H+.|
00002330: 1F 8B 5A B2 32 33 A7 8D 31 31 30 30 30 3A 5A B2 |..Z.23..11000:Z.|
00002340: 31 3A 8B 48 B2 31 A7 8E 00 55 2B A4 1F 82 3A 8D |1:.H.1...U+...:.|
00002350: 31 30 30 30 30 00 5B 2B AE 1F 8E 00 97 2B B8 1F |10000.[+.....+..|
00002360: 99 56 24 3B 22 57 45 4C 43 48 45 20 44 49 53 4B |.V$;"WELCHE DISK|
00002370: 20 4C 49 53 54 45 4E 20 22 3A 99 58 24 3B 22 49 | LISTEN ":.X$;"I|
00002380: 44 2E 4E 52 20 45 49 4E 47 45 42 45 4E 20 22 3B |D.NR EINGEBEN ";|
00002390: 3A 8D 31 38 30 30 30 00 C6 2B C2 1F 81 49 B2 31 |:.18000..+...I.1|
000023A0: A4 42 3A 8B 4B 24 B2 CA 28 42 24 28 49 29 2C 31 |.B:.K$..(B$(I),1|
000023B0: 38 2C 32 29 A7 99 22 1D 1D 1D 1D 1D 1D 1D 1D 22 |8,2).."........"|
000023C0: 3B 42 24 28 49 29 00 CC 2B CC 1F 82 00 D7 2B D6 |;B$(I)..+.....+.|
000023D0: 1F 8D 31 30 30 30 30 00 12 2C E0 1F 99 58 24 3B |..10000..,...X$;|
000023E0: 22 4E 4F 43 48 20 45 49 4E 45 20 44 49 53 4B 20 |"NOCH EINE DISK |
000023F0: 4C 49 53 54 45 4E 20 28 4A 2F 4E 29 20 22 3A 8D |LISTEN (J/N) ":.|
00002400: 31 31 30 30 30 3A 8B 41 24 B2 22 4A 22 A7 38 31 |11000:.A$."J".81|
00002410: 32 30 00 18 2C EA 1F 8E 00 1E 2C 08 20 8F 00 54 |20..,.....,. ..T|
00002420: 2C 26 20 99 56 24 3B 22 4C 49 53 54 45 4E 20 4E |,& .V$;"LISTEN N|
00002430: 41 43 48 20 49 44 20 4B 52 49 54 45 52 49 55 4D |ACH ID KRITERIUM|
00002440: 20 45 52 53 54 45 4C 4C 45 4E 20 22 3A 99 58 24 | ERSTELLEN ":.X$|
00002450: 3B 5A 4D 24 00 91 2C 30 20 99 58 24 3B 22 4E 41 |;ZM$..,0 .X$;"NA|
00002460: 43 48 20 57 45 4C 43 48 45 4D 20 4B 52 49 54 45 |CH WELCHEM KRITE|
00002470: 52 49 55 4D 20 53 55 43 48 45 4E 20 3F 22 3B 3A |RIUM SUCHEN ?";:|
00002480: 8D 31 38 30 30 30 3A 46 24 B2 C8 28 4B 24 2C 31 |.18000:F$..(K$,1|
00002490: 29 00 9F 2C 3A 20 8B 46 24 B2 22 5F 22 A7 8E 00 |)..,: .F$."_"...|
000024A0: D6 2C 44 20 99 58 24 3B 22 44 41 54 45 4E 20 44 |.,D .X$;"DATEN D|
000024B0: 49 53 4B 45 54 54 45 20 45 49 4E 4C 45 47 45 4E |ISKETTE EINLEGEN|
000024C0: 20 22 3A 8D 31 37 30 30 30 3A 46 49 24 B2 22 40 | ":.17000:FI$."@|
000024D0: 3A 22 AA 46 49 24 00 FD 2C 4E 20 58 B2 30 3A 81 |:".FI$..,N X.0:.|
000024E0: 49 B2 31 A4 42 3A 8B CA 28 42 24 28 49 29 2C 31 |I.1.B:..(B$(I),1|
000024F0: 38 2C 31 29 B2 46 24 A7 58 B2 58 AA 31 00 03 2D |8,1).F$.X.X.1..-|
00002500: 58 20 82 00 2E 2D 62 20 8B 58 B2 30 A7 99 58 24 |X ...-b .X.0..X$|
00002510: 3B 22 4B 45 49 4E 20 45 4C 45 4D 45 4E 54 20 56 |;"KEIN ELEMENT V|
00002520: 4F 52 48 2E 22 3A 8D 31 30 30 30 30 3A 8E 00 49 |ORH.":.10000:..I|
00002530: 2D 6C 20 9F 31 2C 38 2C 31 2C 46 49 24 AA 22 2C |-l .1,8,1,FI$.",|
00002540: 53 2C 57 22 3A 98 31 2C 58 00 66 2D 76 20 8D 31 |S,W":.1,X.f-v .1|
00002550: 36 30 30 30 3A 8B 54 B3 B1 30 A7 8D 31 30 30 30 |6000:.T..0..1000|
00002560: 30 3A A0 31 3A 8E 00 9E 2D 80 20 81 49 B2 31 A4 |0:.1:...-. .I.1.|
00002570: 42 3A 8B CA 28 42 24 28 49 29 2C 31 38 2C 31 29 |B:..(B$(I),18,1)|
00002580: B2 46 24 A7 99 22 20 20 20 20 20 20 20 20 22 3B |.F$.." ";|
00002590: 42 24 28 49 29 3A 98 31 2C 42 24 28 49 29 00 A9 |B$(I):.1,B$(I)..|
000025A0: 2D 8A 20 82 3A A0 31 3A 8E 00 AF 2D 28 23 8F 00 |-. .:.1:...-(#..|
000025B0: CF 2D 46 23 99 56 24 3B 22 46 31 20 92 20 44 41 |.-F#.V$;"F1 . DA|
000025C0: 54 45 4E 20 45 52 57 45 49 54 45 52 4E 20 22 00 |TEN ERWEITERN ".|
000025D0: F0 2D 50 23 99 58 24 3B 22 46 33 20 92 20 44 41 |.-P#.X$;"F3 . DA|
000025E0: 54 45 4E 20 46 49 4C 45 20 5A 55 4C 41 44 45 4E |TEN FILE ZULADEN|
000025F0: 00 18 2E 5A 23 99 58 24 3B 22 46 35 20 92 20 44 |...Z#.X$;"F5 . D|
00002600: 41 54 45 4E 20 4C 4F 45 53 43 48 45 4E 20 28 49 |ATEN LOESCHEN (I|
00002610: 44 2E 4E 52 2E 29 20 22 00 3F 2E 64 23 99 58 24 |D.NR.) ".?.d#.X$|
00002620: 3B 22 46 37 20 92 20 53 54 41 4E 44 41 52 44 4B |;"F7 . STANDARDK|
00002630: 4F 50 46 20 53 50 45 49 43 48 45 52 4E 20 22 00 |OPF SPEICHERN ".|
00002640: 4B 2E 6E 23 99 58 24 3B 5A 4D 24 00 56 2E 78 23 |K.n#.X$;ZM$.V.x#|
00002650: 8D 31 31 30 30 30 00 66 2E 82 23 8B 41 24 B2 C7 |.11000.f..#.A$..|
00002660: 28 39 35 29 A7 8E 00 86 2E 8C 23 8B 41 24 B2 C7 |(95)......#.A$..|
00002670: 28 31 33 33 29 A7 47 54 B2 31 3A 49 B2 42 AA 31 |(133).GT.1:I.B.1|
00002680: 3A 89 31 30 30 30 00 A7 2E 96 23 8B 41 24 B2 C7 |:.1000....#.A$..|
00002690: 28 31 33 34 29 A7 46 4A B2 42 3A 8D 36 30 30 30 |(134).FJ.B:.6000|
000026A0: 3A 46 4A B2 30 3A 8E 00 BB 2E A0 23 8B 41 24 B2 |:FJ.0:.....#.A$.|
000026B0: C7 28 31 33 35 29 A7 39 31 36 30 00 F4 2E AA 23 |.(135).9160....#|
000026C0: 8B 41 24 B2 C7 28 31 33 36 29 A7 9F 37 2C 38 2C |.A$..(136)..7,8,|
000026D0: 37 2C 22 40 3A 53 54 41 4E 44 41 52 44 4B 4F 50 |7,"@:STANDARDKOP|
000026E0: 46 2C 53 2C 57 22 3A 98 37 2C 42 4E 24 3A 98 37 |F,S,W":.7,BN$:.7|
000026F0: 2C 42 41 24 00 14 2F B4 23 8B 41 24 B2 C7 28 31 |,BA$../.#.A$..(1|
00002700: 33 36 29 A7 98 37 2C 42 57 24 3A 98 37 2C 42 54 |36)..7,BW$:.7,BT|
00002710: 24 3A A0 37 00 1E 2F BE 23 89 39 30 33 30 00 52 |$:.7../.#.9030.R|
00002720: 2F C8 23 99 56 24 3B 22 45 49 4E 47 41 42 45 20 |/.#.V$;"EINGABE |
00002730: 44 45 52 20 5A 55 20 4C 4F 45 53 43 48 45 4E 44 |DER ZU LOESCHEND|
00002740: 45 4E 20 49 44 20 4E 52 2E 20 3F 20 22 3A 99 58 |EN ID NR. ? ":.X|
00002750: 24 3B 00 5D 2F D2 23 8D 31 38 30 30 30 00 8D 2F |$;.]/.#.18000../|
00002760: DC 23 99 58 24 3B 22 53 4F 4C 4C 20 22 3B 4B 24 |.#.X$;"SOLL ";K$|
00002770: 3B 22 20 47 45 4C 4F 45 53 43 48 54 20 57 45 52 |;" GELOESCHT WER|
00002780: 44 45 4E 20 28 4A 2F 4E 29 20 3F 20 22 00 A3 2F |DEN (J/N) ? "../|
00002790: E6 23 8D 31 31 30 30 30 3A 8B 41 24 B3 B1 22 4A |.#.11000:.A$.."J|
000027A0: 22 A7 8E 00 AE 2F F0 23 81 49 B2 31 A4 42 00 CA |"..../.#.I.1.B..|
000027B0: 2F FA 23 8B 4B 24 B2 CA 28 42 24 28 49 29 2C 31 |/.#.K$..(B$(I),1|
000027C0: 38 2C 32 29 A7 8D 39 32 34 30 00 D0 2F 04 24 82 |8,2)..9240../.$.|
000027D0: 00 D6 2F 0E 24 8E 00 F1 2F 18 24 81 4A B2 49 A4 |../.$.../.$.J.I.|
000027E0: 42 3A 42 24 28 4A 29 B2 42 24 28 4A AA 31 29 3A |B:B$(J).B$(J.1):|
000027F0: 82 00 03 30 22 24 49 B2 49 AB 31 3A 42 B2 42 AB |...0"$I.I.1:B.B.|
00002800: 31 3A 8E 00 2A 30 10 27 99 58 24 3B 22 54 41 53 |1:..*0.'.X$;"TAS|
00002810: 54 45 20 44 52 55 45 43 4B 45 4E 20 22 3A 54 B2 |TE DRUECKEN ":T.|
00002820: 30 3A 8D 31 31 30 30 30 3A 8E 00 3F 30 F8 2A A1 |0:.11000:..?0.*.|
00002830: 41 24 3A 8B 41 24 B2 22 22 A7 31 31 30 30 30 00 |A$:.A$."".11000.|
00002840: 45 30 02 2B 8E 00 4B 30 E0 2E 8F 00 63 30 FE 2E |E0.+..K0....c0..|
00002850: 99 56 24 3B 42 46 24 3B 22 20 46 55 4E 4B 54 49 |.V$;BF$;" FUNKTI|
00002860: 4F 4E 22 00 89 30 08 2F 46 49 24 B2 22 40 3A 22 |ON"..0./FI$."@:"|
00002870: AA 42 46 24 3A 81 49 B2 31 A4 32 30 30 3A 46 46 |.BF$:.I.1.200:FF|
00002880: 24 28 49 29 B2 22 22 3A 82 00 AE 30 12 2F 46 46 |$(I)."":...0./FF|
00002890: B2 31 3A 4B B2 32 3A 49 B2 32 3A 42 52 24 B2 22 |.1:K.2:I.2:BR$."|
000028A0: 46 55 4E 54 4B 49 4F 4E 20 45 4E 44 45 22 00 E3 |FUNTKION ENDE"..|
000028B0: 30 1C 2F 99 58 24 3B 22 42 49 54 54 45 20 57 41 |0./.X$;"BITTE WA|
000028C0: 52 54 45 4E 20 42 49 53 20 22 3B 42 52 24 3A 46 |RTEN BIS ";BR$:F|
000028D0: 46 24 28 31 29 B2 CA 28 42 24 28 31 29 2C 31 38 |F$(1)..(B$(1),18|
000028E0: 2C 32 29 00 FC 30 26 2F 46 46 24 28 49 29 B2 CA |,2)..0&/FF$(I)..|
000028F0: 28 42 24 28 4B 29 2C 31 38 2C 32 29 00 09 31 30 |(B$(K),18,2)..10|
00002900: 2F 81 4A B2 31 A4 49 AB 31 00 22 31 3A 2F 8B 46 |/.J.1.I.1."1:/.F|
00002910: 46 24 28 49 29 B2 46 46 24 28 4A 29 A7 31 32 31 |F$(I).FF$(J).121|
00002920: 32 30 00 28 31 44 2F 82 00 32 31 4E 2F 49 B2 49 |20.(1D/..21N/I.I|
00002930: AA 31 00 47 31 58 2F 4B B2 4B AA 31 3A 8B 4B B1 |.1.G1X/K.K.1:.K.|
00002940: 42 A7 31 32 31 34 30 00 52 31 62 2F 89 31 32 30 |B.12140.R1b/.120|
00002950: 37 30 00 5C 31 6C 2F 5A B2 49 AB 31 00 69 31 76 |70.\1l/Z.I.1.i1v|
00002960: 2F 81 43 B2 31 A4 5A AB 31 00 96 31 80 2F 4A B2 |/.C.1.Z.1..1./J.|
00002970: 43 AA 31 3A 99 58 24 3B 22 45 4C 45 4D 45 4E 54 |C.1:.X$;"ELEMENT|
00002980: 20 20 20 20 20 20 20 9D 9D 9D 9D 22 3B 4A AB 31 | ....";J.1|
00002990: 3B 22 91 91 91 22 00 A1 31 8A 2F 81 44 B2 4A A4 |;"..."..1./.D.J.|
000029A0: 5A 00 BA 31 94 2F 8B 46 46 24 28 43 29 B1 46 46 |Z..1./.FF$(C).FF|
000029B0: 24 28 44 29 A7 31 32 32 30 30 00 C5 31 9E 2F 89 |$(D).12200..1./.|
000029C0: 31 32 32 31 30 00 F1 31 A8 2F 43 24 28 30 29 B2 |12210..1./C$(0).|
000029D0: 46 46 24 28 43 29 3A 46 46 24 28 43 29 B2 46 46 |FF$(C):FF$(C).FF|
000029E0: 24 28 44 29 3A 46 46 24 28 44 29 B2 43 24 28 30 |$(D):FF$(D).C$(0|
000029F0: 29 00 F7 31 B2 2F 82 00 FD 31 BC 2F 82 00 36 32 |)..1./...1./..62|
00002A00: C6 2F 99 58 24 3B 22 42 4C 4F 43 4B 53 20 57 45 |./.X$;"BLOCKS WE|
00002A10: 52 44 45 4E 20 41 44 44 49 45 52 54 22 3A 42 4C |RDEN ADDIERT":BL|
00002A20: 24 B2 22 12 44 49 53 4B 20 22 3A 42 4D 24 B2 22 |$.".DISK ":BM$."|
00002A30: 12 22 AA 42 46 24 00 3E 32 D0 2F 4A B2 31 00 53 |.".BF$.>2./J.1.S|
00002A40: 32 DA 2F 81 49 B2 31 A4 42 3A 8B 49 B2 31 A7 47 |2./.I.1.B:.I.1.G|
00002A50: 53 B2 30 00 74 32 E4 2F 8B CA 28 42 24 28 49 29 |S.0.t2./..(B$(I)|
00002A60: 2C 31 38 2C 32 29 B2 46 46 24 28 4A 29 A7 8D 31 |,18,2).FF$(J)..1|
00002A70: 32 33 35 30 00 B2 32 EE 2F 82 3A 46 46 24 28 4A |2350..2./.:FF$(J|
00002A80: 29 B2 42 46 24 AA 22 20 44 49 53 4B 20 22 AA 46 |).BF$." DISK ".F|
00002A90: 46 24 28 4A 29 AA 22 20 22 AA C9 28 5A 4B 24 AA |F$(J)." "..(ZK$.|
00002AA0: C4 28 36 36 34 AB 47 53 29 2C 33 29 3A 4A B2 4A |.(664.GS),3):J.J|
00002AB0: AA 31 00 C3 32 F8 2F 8B 4A B3 5A AA 31 A7 31 32 |.1..2./.J.Z.1.12|
00002AC0: 32 35 30 00 CF 32 02 30 99 58 24 3B 42 52 24 00 |250..2.0.X$;BR$.|
00002AD0: FD 32 0C 30 99 58 24 3B 22 44 52 55 43 4B 45 52 |.2.0.X$;"DRUCKER|
00002AE0: 20 4F 44 45 52 20 53 43 52 45 45 4E 20 28 44 2F | ODER SCREEN (D/|
00002AF0: 53 29 20 22 3A 8D 31 31 30 30 30 3A 99 00 20 33 |S) ":.11000:.. 3|
00002B00: 16 30 8B 41 24 B3 B1 22 53 22 AF 41 24 B3 B1 22 |.0.A$.."S".A$.."|
00002B10: 44 22 A7 8D 31 31 30 30 30 3A 89 31 32 33 32 30 |D"..11000:.12320|
00002B20: 00 32 33 20 30 8B 41 24 B2 22 44 22 A7 31 32 33 |.23 0.A$."D".123|
00002B30: 38 30 00 4C 33 2A 30 81 49 B2 31 A4 5A 3A 99 22 |80.L3*0.I.1.Z:."|
00002B40: 1D 1D 1D 1D 22 3B 46 46 24 28 49 29 00 60 33 34 |....";FF$(I).`34|
00002B50: 30 8D 31 31 30 30 30 3A 82 3A 89 31 32 34 32 30 |0.11000:.:.12420|
00002B60: 00 78 33 3E 30 47 B2 30 3A 47 B2 C5 28 C9 28 42 |.x3>0G.0:G..(.(B|
00002B70: 24 28 49 29 2C 33 29 29 00 84 33 48 30 47 53 B2 |$(I),3))..3H0GS.|
00002B80: 47 53 AA 47 00 8A 33 52 30 8E 00 AB 33 5C 30 99 |GS.G..3R0...3\0.|
00002B90: 58 24 3B 22 44 52 55 43 4B 45 52 20 45 49 4E 53 |X$;"DRUCKER EINS|
00002BA0: 43 48 41 4C 54 45 4E 20 21 20 22 00 B6 33 66 30 |CHALTEN ! "..3f0|
00002BB0: 8D 31 30 30 30 30 00 BF 33 70 30 9F 34 2C 34 00 |.10000..3p0.4,4.|
00002BC0: E4 33 7A 30 81 49 B2 31 A4 5A 3A 98 34 2C 22 20 |.3z0.I.1.Z:.4," |
00002BD0: 20 20 20 20 22 3B 46 46 24 28 49 29 3A 82 3A 98 | ";FF$(I):.:.|
00002BE0: 34 3A A0 34 00 21 34 84 30 99 56 24 3B 22 44 41 |4:.4.!4.0.V$;"DA|
00002BF0: 54 45 4E 20 41 55 46 20 44 49 53 4B 20 53 50 45 |TEN AUF DISK SPE|
00002C00: 49 43 48 45 52 4E 20 3F 20 28 4A 2F 4E 29 22 3A |ICHERN ? (J/N)":|
00002C10: 8D 31 31 30 30 30 3A 8B 41 24 B3 B1 22 4A 22 A7 |.11000:.A$.."J".|
00002C20: 8E 00 44 34 8E 30 99 58 24 3B 22 44 41 54 45 4E |..D4.0.X$;"DATEN|
00002C30: 20 44 49 53 4B 45 54 54 45 20 45 49 4E 4C 45 47 | DISKETTE EINLEG|
00002C40: 45 4E 20 22 00 66 34 98 30 8D 31 30 30 30 30 3A |EN ".f4.0.10000:|
00002C50: 9F 32 2C 38 2C 32 2C 46 49 24 AA 22 2C 53 2C 57 |.2,8,2,FI$.",S,W|
00002C60: 22 3A 98 32 2C 5A 00 80 34 A2 30 81 49 B2 31 A4 |":.2,Z..4.0.I.1.|
00002C70: 5A 3A 98 32 2C 46 46 24 28 49 29 3A 82 3A A0 32 |Z:.2,FF$(I):.:.2|
00002C80: 00 86 34 AC 30 8E 00 8C 34 B0 36 8F 00 97 34 CE |..4.0...4.6...4.|
00002C90: 36 8B 42 B3 32 A7 8E 00 DF 34 D8 36 99 56 24 3B |6.B.2....4.6.V$;|
00002CA0: 22 41 55 53 53 4F 52 54 49 45 52 45 4E 20 46 52 |"AUSSORTIEREN FR|
00002CB0: 45 4D 44 45 52 20 4C 49 53 54 45 4E 22 3A 44 49 |EMDER LISTEN":DI|
00002CC0: 24 B2 22 40 3A 44 49 46 46 45 52 45 4E 5A 22 3A |$."@:DIFFERENZ":|
00002CD0: 4C 49 24 B2 22 4C 49 53 54 45 22 3A 58 B2 31 00 |LI$."LISTE":X.1.|
00002CE0: 10 35 E2 36 99 58 24 3B 22 4D 49 54 20 57 45 4C |.5.6.X$;"MIT WEL|
00002CF0: 43 48 45 52 20 4C 49 53 54 45 20 56 45 52 47 4C |CHER LISTE VERGL|
00002D00: 45 49 43 48 45 4E 20 3F 22 3A 8D 31 37 30 30 30 |EICHEN ?":.17000|
00002D10: 00 4F 35 EC 36 99 58 24 3B 22 57 49 45 56 49 45 |.O5.6.X$;"WIEVIE|
00002D20: 4C 20 5A 45 49 43 48 45 4E 20 56 45 52 47 4C 45 |L ZEICHEN VERGLE|
00002D30: 49 43 48 45 4E 20 28 31 2D 32 30 29 20 22 3B 3A |ICHEN (1-20) ";:|
00002D40: 8D 31 38 30 30 30 3A 53 4B B2 C5 28 4B 24 29 00 |.18000:SK..(K$).|
00002D50: 60 35 F6 36 8B 53 4B B1 32 35 A7 53 4B B2 32 35 |`5.6.SK.25.SK.25|
00002D60: 00 89 35 00 37 9F 35 2C 38 2C 35 2C 46 49 24 AA |..5.7.5,8,5,FI$.|
00002D70: 22 2C 53 2C 52 22 3A 8D 31 36 30 30 30 3A 8B 54 |",S,R":.16000:.T|
00002D80: B3 B1 30 A7 31 34 31 30 30 00 AC 35 0A 37 9F 32 |..0.14100..5.7.2|
00002D90: 2C 38 2C 32 2C 22 40 3A 4C 49 53 54 45 22 AA 22 |,8,2,"@:LISTE"."|
00002DA0: 2C 53 2C 57 22 3A 8D 31 36 30 30 30 00 D4 35 14 |,S,W":.16000..5.|
00002DB0: 37 8B 54 B3 B1 30 A7 A0 35 3A A0 32 3A 99 58 24 |7.T..0..5:.2:.X$|
00002DC0: 3B 4B 24 3A 99 58 24 3B 5A 4D 24 3A 8D 31 31 30 |;K$:.X$;ZM$:.110|
00002DD0: 30 30 3A 8E 00 DD 35 1E 37 84 35 2C 43 00 E8 35 |00:...5.7.5,C..5|
00002DE0: 28 37 81 4A B2 31 A4 43 00 FE 35 32 37 84 35 2C |(7.J.1.C..527.5,|
00002DF0: 44 24 3A 99 22 1D 1D 1D 1D 1D 22 3B 44 24 00 09 |D$:.".....";D$..|
00002E00: 36 3C 37 81 49 B2 31 A4 42 00 29 36 46 37 8B C8 |6<7.I.1.B.)6F7..|
00002E10: 28 44 24 2C 53 4B 29 B2 C8 28 42 24 28 49 29 2C |(D$,SK)..(B$(I),|
00002E20: 53 4B 29 A7 31 34 33 30 30 00 30 36 50 37 82 49 |SK).14300.06P7.I|
00002E30: 00 40 36 5A 37 98 32 2C 44 24 3A 58 B2 58 AA 31 |.@6Z7.2,D$:X.X.1|
00002E40: 00 47 36 64 37 82 4A 00 57 36 6E 37 A0 35 3A A0 |.G6d7.J.W6n7.5:.|
00002E50: 32 3A 58 B2 58 AB 31 00 8A 36 78 37 8B 58 B2 30 |2:X.X.1..6x7.X.0|
00002E60: A7 99 22 93 11 12 20 4B 45 49 4E 20 4E 45 55 45 |.."... KEIN NEUE|
00002E70: 53 20 45 4C 45 4D 45 4E 54 20 47 45 46 55 4E 44 |S ELEMENT GEFUND|
00002E80: 45 4E 22 3A 89 31 30 30 30 30 00 A0 36 82 37 9F |EN":.10000..6.7.|
00002E90: 37 2C 38 2C 37 2C 44 49 24 AA 22 2C 53 2C 57 22 |7,8,7,DI$.",S,W"|
00002EA0: 00 A9 36 8C 37 98 37 2C 58 00 BF 36 96 37 9F 35 |..6.7.7,X..6.7.5|
00002EB0: 2C 38 2C 35 2C 4C 49 24 AA 22 2C 53 2C 52 22 00 |,8,5,LI$.",S,R".|
00002EC0: D8 36 A0 37 81 49 B2 31 A4 58 3A 84 35 2C 44 24 |.6.7.I.1.X:.5,D$|
00002ED0: 3A 98 37 2C 44 24 3A 82 00 E2 36 AA 37 A0 37 3A |:.7,D$:...6.7.7:|
00002EE0: A0 35 00 0A 37 B4 37 99 56 24 3B 22 44 41 53 20 |.5..7.7.V$;"DAS |
00002EF0: 41 55 53 53 4F 52 54 49 45 52 45 4E 20 49 53 54 |AUSSORTIEREN IST|
00002F00: 20 42 45 45 4E 44 45 54 20 22 00 31 37 BE 37 99 | BEENDET ".17.7.|
00002F10: 58 24 3B 22 44 41 53 20 44 41 54 45 4E 46 49 4C |X$;"DAS DATENFIL|
00002F20: 45 20 3C 20 44 49 46 46 45 52 45 4E 5A 20 3E 20 |E < DIFFERENZ > |
00002F30: 22 00 50 37 C8 37 99 58 24 2C 22 4B 41 4E 4E 20 |".P7.7.X$,"KANN |
00002F40: 47 45 4C 41 44 45 4E 20 57 45 52 44 45 4E 20 22 |GELADEN WERDEN "|
00002F50: 00 75 37 D2 37 9F 31 35 2C 38 2C 31 35 2C 22 53 |.u7.7.15,8,15,"S|
00002F60: 30 3A 4C 49 53 54 45 22 3A A0 31 35 3A 8D 31 36 |0:LISTE":.15:.16|
00002F70: 30 30 30 3A 8E 00 84 37 DC 37 8B 4A B2 43 A7 31 |000:...7.7.J.C.1|
00002F80: 34 31 39 30 00 8B 37 E6 37 82 4A 00 91 37 F0 37 |4190..7.7.J..7.7|
00002F90: 8E 00 A3 37 80 3E 84 33 2C 54 2C 4B 24 2C 4F 2C |...7.>.3,T,K$,O,|
00002FA0: 4F 3A 8E 00 D1 37 68 42 99 58 24 3B 22 46 49 4C |O:...7hB.X$;"FIL|
00002FB0: 45 20 4E 41 4D 45 20 22 3B 3A 46 B2 31 3A 8D 31 |E NAME ";:F.1:.1|
00002FC0: 38 30 30 30 3A 46 B2 30 3A 46 49 24 B2 4B 24 3A |8000:F.0:FI$.K$:|
00002FD0: 8E 00 DB 37 50 46 4B 24 B2 22 22 00 F4 37 5A 46 |...7PFK$.""..7ZF|
00002FE0: 8D 31 31 30 30 30 3A 8B 41 24 B2 C7 28 31 33 29 |.11000:.A$..(13)|
00002FF0: A7 99 3A 8E 00 23 38 64 46 8B 20 41 24 B2 C7 28 |..:..#8dF. A$..(|
00003000: 32 30 29 AF 20 C3 28 4B 24 29 B3 B1 30 A7 4B 24 |20). .(K$)..0.K$|
00003010: B2 C8 28 4B 24 2C C3 28 4B 24 29 AB 31 29 3A 99 |..(K$,.(K$).1):.|
00003020: 41 24 3B 00 3E 38 6E 46 8B 20 44 52 B2 31 AF 20 |A$;.>8nF. DR.1. |
00003030: C3 28 4B 24 29 B2 33 33 A7 31 38 30 31 30 00 57 |.(K$).33.18010.W|
00003040: 38 78 46 8B 20 46 B2 31 AF C3 28 4B 24 29 B2 31 |8xF. F.1..(K$).1|
00003050: 38 A7 31 38 30 31 30 00 73 38 82 46 8B 41 24 B1 |8.18010.s8.F.A$.|
00003060: C7 28 33 31 29 A7 4B 24 B2 4B 24 AA 41 24 3A 99 |.(31).K$.K$.A$:.|
00003070: 41 24 3B 00 7F 38 8C 46 89 20 31 38 30 31 30 00 |A$;..8.F. 18010.|
00003080: 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$."
"...V..N$;".. (C) 1983 . IDE
ASOFT & STONE"......N$;"F1 . DATEN PER D
ISK EINLESEN"......N$;"F3 . DATEN ERWEIT
ERN / LOESCHEN ".'....N$;"F5 . LISTE EDI
TIEREN".F....N$;"F7 . LISTE SORTIEREN".G
....N$;"F2 . DATEN ABSPEICHERN"......N$;
"F4 . DATEN EINLESEN . CLR . QUIT".G.
...N$;"F6 . LISTE DRUCKEN . % . SPEZ
.LISTE"...&..N$;"F8 . LISTE AUF SCREEN
. & . DISK OPER.".'.0..N$;"* . ";BF$;"
. $ . DIRECTORY"".N.:..N$;"\ . AN
DERE BILDSCHIRM FARBE".Y.D..N$;"! . AUS
SORTIEREN FREMDER LISTE "...N..11000...X
..A$.G(133).I.0:BB.B:B.0:Q.0:.1000:.A$."
_".B.BB.L.B..A$.G(138)..6000...L..A$.G(3
7)..8200...V..A$.G(135)..4,4:.7000: 4...
...A$.G(38)..6300.&....A$.G(33)..14000.`
....A$.G(36).B.B.2:I.B:H.1:GT.1:G.0:.105
0:H.0:B.B.2:GT.0.U....A$.G(136)..4000...
...A$.G(147)........A$.G(137)..5000.....
.A$.G(134)..9000.M.F..A$.G(139)..4,4:.30
00: 4...P..A$.G(140)..8000...Z..A$.G(92)
..2000......A$.G(42).BB.B:.12000:B.BB...
...450.$.....G...G.0:.V$;"DISK EINLEGEN
: DATEN KOMPLETT ":.X$;"ODER EINZELN ";.
....."EINLESEN ? (K/E)":.X$;ZM$:.10000:.
A$."E".G.1......A$."_"...F....V$;"ICH LE
SE 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)."".9.L.
.#1,A$,F$.J.V.C.0:L$." ".^.`..A$.."".C
.F(A$).X.J..F$.."".C.C.F(F$).256...T.Q$.
J(D(C),2):L$.H(Q$.L$,3).B.~..#1,F$:.F$."
".."....";L$;" ";BF$:.1295.V....F$..G(34
).1150......#1,F$:.F$..G(34).B$(I.Q).B$(
I.Q).F$:.1170......Q.1.B$(I.1)."".3....#
1,F$:.F$.G(32).1190.=...C$."".^...C$.C$.
F$:.#1,F$:.F$.."".1210.T.D..GB.1.GB$.C$:
GB.0...N.B$(I.Q).H(B$(I.Q).ZK$,17).H(GB$
,3).I(ZK$.Q$,3).Y.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)."
".S....G.1.GT.0.I.0..". J/N...";:.11000:
.A$."N".."NEIN";:GT.1:.1250.J...I.I.1:.G
.1..". JA"......I.Q.1.850..X$;"SPEICHER
IST VOLL":.X$;ZM$: 1:.11000:.......1090.
D... 1:.H.1..10000:.......X$;"NOCH EINE
DISK (J/N)".....QW$.D(I.1).%.(..X$;"BISH
ER WURDEN ";QW$;" DATEN GELESEN ....".0.
2..11000.L.<..A$."J".GT.1:.V$;:.1060.^.F
..A$.."N".1330.K.P.B.I.1: 1.Y.Z.A$."":T.
0..D.....P.. ****FARBWECHSEL****.....I
.0:F.0:J.0.P....V$;"F1. .FARBWECHSEL BIL
DSCHIRM"......X$;"F3. .FARBWECHSEL HINTE
RGRUND"......X$;"F5. .FARBWECHSEL SCHRIF
T".&....X$;ZM$.1. ..11000.O.*..A$.G(133)
.I.I.1:.53280,I.M.4..A$.G(134).J.J.1:.53
281,J...>..A$.G(135).F.F.1:.646,F...H..A
$."_".....R..2040.C.... **** DRUCKER-AU
SGABE ****.Y.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.H...T$.".. ".P...ST$."":AN$.
"BITTE FUNKTION WAEHLEN"......"....... D
RUCKER AUSGABE ."......F1$;T$;"F1 . DRUC
K-BEGINN ."......F3$;T$;"F3 . STAND.KOPF
MIT DRUCKEN ."......F5$;T$;"F5 . PROGRA
MM-LISTE DRUCKEN .".4.&..F7$;T$;"F7 . PR
EIS-LISTE DRUCKEN .".^.0..F2$;T$;"F2 . L
ISTE NACH KRITERIUM ."...:..F4$;T$;"F4 .
STANDARDKOPF AENDERN "...D..X$;"..";ZM$
...N.."..".P.X.." ...................
...................B.." B
B.,.L.." .......
.............................Z.V.." B
B......
" ...................................
......".";:.J.1.20:.".";:.:.Z$;;ST$.....
.Y$;AN$.W....C.1.C.0:.3450:F4$.N$:.3070.
.....F1$.J$.F1$.N$:.3380:.3070......1100
0.$....A$.G(133).F1$.N$.F1$.J$:.3070.G.F
..A$.G(134).F3$.J$.F3$.N$:.3070.J.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......A$.G
(136).F7$.J$.F7$.N$:.3070......A$.G(136)
.F7$.N$.F7$.J$:F2$.N$:F5$.N$:.3070.C....
A$.G(137).F2$.N$.F2$.J$:F7$.N$:F5$.N$:.3
070.F....A$.G(137).F2$.J$.F2$.N$:.3070.{
....A$.G(95).DR.0:.... ..A$.G(138).F4$.J
$:C.1:.3070...*..A$.G(95).A$.G(137).3250
...4..".":.J.1.19:.".";:.:.Z$;ZK$:.".";Z
$;"OK ? (J/N)"...9..Y$;ZK$:.11000:. A$..
"J"...K.>..".":.J.1.19:.".";:.:.Z$;"WIEV
IEL ZEILEN PRO SEITE ?>=15"...H..Y$;ZK$:
."..";Y$;:.18000:DZ.E(K$):.DZ.15.DZ.300.
3390. .M..F2$.N$.F5$.N$.F7$.N$.....R..F3
$.J$.3530.B.\..F3$.N$.3590.P.F..A$."_"..
.V.P.....Z.ST$."DATUM ?":.3510:DA$.K$...
..ST$."NAME ?":.3510:BN$.K$.8...ST$."STR
ASSE,NR. ?":.3510:BA$.K$.Y...ST$."WOHNOR
T ?":.3510:BW$.K$.Z...ST$."TELEFON ?":.3
510:BT$.K$............".":.J.1.19:.".";:
.:.Z$;ST$......Y$;ZK$:."..";Y$;:.18000..
....".":.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.D....4," DISKETTENINHALT VOM "
;DA$......4:.4," PROGRAMME:";B;G(15)...
...4......F2$.J$.3760......F7$.N$.3610.R
...QS$."PRG.NAME KB. PREIS ":.3620.....Q
S$."PRG.NAME ID BL. "...$.ZD$.
" ":.3640...8.DD..(B.3).1.".B.S.1.G.L.B
$(B.1)."":B$(B.2)."":B$(B.3)."".G.V..4,H
(" ".QS$.QS$.QS$,78)...`..4," ";:.
T.1.74:.4,G(101);:.:.4...J..T.1.DD.N.T..
4," ";B$(S);" ";B$(S.DD);" ";B$(S
.2.DD).Z.~.ZD.ZD.1.....S.S.1:.ZD.DZ.ZD.0
:.3740......:.......".":.J.1.19:.".";:.:
.Z$;.^...."DRUCKERPAPIER JUSTIEREN ? ":.
Y$;"TASTE DRUECKEN ";:.11000:......F.2:.
".":.I.1.19:.".";:.:.Z$;ZK$:.Y$;ZK$:."..
.."......Z$;"ID.CODE EINGEBEN !":.Y$;:.1
8000.Q....I(K$,1)."*".F.1...D.K$.H(K$.ZK
$,F)...N..I.1.B:.ZD.DZ.ZD.0:.3740./.X..J
(B$(I),18,F).K$..4," ";B$(I):ZD.ZD.1.
8....:.4.>....._. .. *** SORTIERROUTI
NE ***......V$;"SORTIER-ROUTINE LAEUFT!
":B$(B.1)."ZZZZZZZZ":F.0.B.C..X$;"ALPHAB
ETISCH ODER NACH ID.NR. ?"...H..X$;"(A/I
)":.X$;ZM$:.11000:.A$."_".....W..A$."I".
F.1......C.1.B.3...J.C.1:.X$;"ELEMENT
....";J.1;"...".>....D.J.B.B....F.1.
I(B$(C),6).I(B$(D),6).4120.X....B$(C).B$
(D).4120......4130.....C$(0).B$(C):B$(C)
.B$(D):B$(D).C$(0)...".....,.....6..V$;"
DOPPELTE DATEN AUSSORTIEREN (J/N) "...@.
.11000...J..A$."J".4190.. T...( ^..V$;"E
S WIRD AUSSORTIERT ":J.1.B H..X$;"WIEVIE
LE ZEICHEN BERUECKSICHTIGEN ?":.X$;:.180
00.. 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)."
":... ..... ...I.J.B.. ..B$(I).B$(I.1)..
!B....!L.J.J.1:B.B.1:.4230. !V...?!...
** DATEN SPEICHERN **.C!...V$;"DATEN W
ERDEN GESPEICHERT "..!...17000:I.0:.X$;"
SICHER ? (J/N)":.11000:.A$.."J"....!...2
,8,2,FI$.",S,W".S!D..16000:.X$;K$:.T..0.
2:.10000:...!N..2,B..!X..G.1..I.1.Z:.2,
FF$(I):.5100.."...I.1.B:.2,B$(I)..".....
".. 2.#"....H"P.. *** DATEN FILES EINL
ESEN ***.P"...V$;"DATEN WERDEN GELESEN "
:.X$;ZM$.."...17000:.K$."_"...."...X$;"D
ATEN FILE ";FI$" EINLESEN (J/N) ".."...1
1000.K"...A$.."J"...."...2,8,2,FI$.",S,R
":.".....";..#J..16000:." ."K$"..":.T..0
..10000: 2:...#T..2,B..#...I.FJ.1.B.FJ.I
#...2,B$(I):.: 2:B.B.FJ:..G#...V$;"DISK
OPERATION MODE"..#...X$;"DISKETTENBEFEHL
E S, V, N, R, I ".L#...X$;"BEFEHL ?";:.1
8000:FI$.K$:.X$;"AUSFUEHREN (J/N) ?".W#.
..11000..#...A$."_"...!$D..A$."J"..15,8,
15:.15,FI$: 15:.16000:.T..0..X$;K$:.1000
0.,$I..T.0...>$N..".";X$:.6310.W$X..
*** EDITOR ***.D$V..650,128..$...S$;"..
..... @ . : ELEMENT LOESCHEN"..$...S$;
". \ . : ELEMENT SUCHEN".Y$...S$;". *
. : ELEMENT VERBESSERN"..$...S$;". _ .
: ";I(ZM$,13)..%...S$;". P . : ELEM
ENT DRUCKEN ".A%...S$;". . : EIN ELE
MENT VOR".F%...S$;". F1. : 20 ELEMENTE
VOR "..%F..S$;". F3. : 20 ELEMENTE ZU
RUECK"..%P..S$;". ^ . : EIN ELEMENT ZU
RUECK"..%Z..S$;". $ . : DM-LISTE ERSTE
LLEN"..&...S$;". + . : ELEMENT EINFUEG
EN ":...&...I.1.B.4&..."....";ZK$;".":."
... ";B$(I).?&...11000.]&...B$(1)."". B
.1.A$."@":I.1..&...A$."@".B.1.B$(I).B$(B
):B.B.1:A$.""..&...A$.G(133).I.20.B.I.I.
20..& ..A$.G(134).I.20.0.I.I.20..&*..A$.
"*"..".......";".KORREKTURELEMENT":."...
";B$(I).&'4..A$."*".."..";ZK$:.:.B$(I)."
".B$(I)."ZZZZ".>'9..A$."$"..7500:.7000.Y
'>..A$."_".A$."":.650,0:..V'H..A$."^".I.
I.2:.I.1.I.B.1..'R..A$."+".B.B.1:.".....
...NEUES ELEMENT":."...";B$(B):."..";ZK$
:..V'\..A$."P"..4," ";B$(I)..(F..A$."
\"..V$;"NACH WELCHEM ELEMENT SUCHEN ?":.
X$;:.18000:.7310:.7000.?(P..H(B$(B),4)."
ZZZZ".I.1.B.B.1.Y(Z.."......";ZK$:.:.714
0._(....L(...K$.""....(..F.0:.I(K$,1)."*
".F.1..(..Q.C(K$).F:Q$.H(K$,Q):EZ.0.P(..
EE$." KEIN WEITERES":EY$." VORHANDEN ":.
..(...K.1.B..(...H(B$(K),Q).Q$.EZ.1:SE.1
:R.1..)J..SE.0...+)T..SE.1.."........";B
$(K):SE.0:..I)...EZ.0.."....";EZ$.EX$.EY
$.V)...EZ.1.."..":."...";EE$.EZ$.EY$:.".
.";WS$..)...X$;ZM$:.11000..)....L)L.."..
.... DM-LISTENERSTELLUNG ...":."..";X$;Z
M$:."......"..)V..J.I.B:." ";:C$.H(B$(J
),17):.C$;. *`.F$.I(ZK$.D(.(E(I(B$(J),3)
).4..5)),2):.F$;.A*J.." 000...";:.18000:
.K$."_"...A*T.B$(J).C$.F$." ".H(K$.ZK$,3
).O*~..".";:.:..U*@...B*^..V$;"INHALT EI
NER DISK LISTEN ":.X$;"ODER ALLE DISK DA
TEN LISTEN (E/A) ".M*H..11000..*R.:.A$."
E".8120..*|..V$;ZM$:.:Z.1..+...I.1.B:Z.Z
.1.,+..."........";B$(I):.B(631).95..198
,0:..H+...Z.23..11000:Z.1:.H.1...U+...:.
10000.[+.....+...V$;"WELCHE DISK LISTEN
":.X$;"ID.NR EINGEBEN ";:.18000.F+B..I.1
.B:.K$.J(B$(I),18,2).."........";B$(I).L
+L...W+V..10000..,...X$;"NOCH EINE DISK
LISTEN (J/N) ":.11000:.A$."J".8120..,...
..,. ..T,& .V$;"LISTEN NACH ID KRITERIUM
ERSTELLEN ":.X$;ZM$..,0 .X$;"NACH WELCH
EM KRITERIUM SUCHEN ?";:.18000:F$.H(K$,1
)..,: .F$."_"...V,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:..I
-L .1,8,1,FI$.",S,W":.1,X.F-V .16000:.T.
.0..10000: 1:...-. .I.1.B:.J(B$(I),18,1)
.F$.." ";B$(I):.1,B$(I)..-. .: 1:
...-(#..O-F#.V$;"F1 . DATEN ERWEITERN ".
.-P#.X$;"F3 . DATEN FILE ZULADEN...Z#.X$
;"F5 . DATEN LOESCHEN (ID.NR.) ".?.D#.X$
;"F7 . STANDARDKOPF SPEICHERN ".K.N#.X$;
ZM$.V.X#.11000.F..#.A$.G(95)......#.A$.G
(133).GT.1:I.B.1:.1000....#.A$.G(134).FJ
.B:.6000:FJ.0:.... #.A$.G(135).9160....#
.A$.G(136)..7,8,7,"@:STANDARDKOPF,S,W":.
7,BN$:.7,BA$../.#.A$.G(136)..7,BW$:.7,BT
$: 7../.#.9030.R/H#.V$;"EINGABE DER ZU L
OESCHENDEN ID NR. ? ":.X$;.]/R#.18000../
.#.X$;"SOLL ";K$;" GELOESCHT WERDEN (J/N
) ? "../.#.11000:.A$.."J"..../.#.I.1.B.J
/.#.K$.J(B$(I),18,2)..9240.P/.$..V/.$...
/.$.J.I.B:B$(J).B$(J.1):...0"$I.I.1:B.B.
1:..*0.'.X$;"TASTE DRUECKEN ":T.0:.11000
:..?0.*.A$:.A$."".11000.E0.+..K0....C0..
.V$;BF$;" FUNKTION"..0./FI$."@:".BF$:.I.
1.200:FF$(I)."":...0./FF.1:K.2:I.2:BR$."
FUNTKION ENDE"..0./.X$;"BITTE WARTEN BIS
";BR$:FF$(1).J(B$(1),18,2)..0&/FF$(I).J
(B$(K),18,2)..10/.J.1.I.1."1:/.FF$(I).FF
$(J).12120.(1D/..21N/I.I.1.G1X/K.K.1:.K.
B.12140.R1B/.12070.\1L/Z.I.1.I1V/.C.1.Z.
1..1./J.C.1:.X$;"ELEMENT ....";J.1
;"..."..1./.D.J.Z..1./.FF$(C).FF$(D).122
00.E1./.12210..1./C$(0).FF$(C):FF$(C).FF
$(D):FF$(D).C$(0)..1./...1./..62F/.X$;"B
LOCKS WERDEN ADDIERT":BL$.".DISK ":BM$."
.".BF$.>2P/J.1.S2Z/.I.1.B:.I.1.GS.0.T2./
.J(B$(I),18,2).FF$(J)..12350..2./.:FF$(J
).BF$." DISK ".FF$(J)." ".I(ZK$.D(664.GS
),3):J.J.1.C2./.J.Z.1.12250.O2.0.X$;BR$.
.2.0.X$;"DRUCKER ODER SCREEN (D/S) ":.11
000:.. 3.0.A$.."S".A$.."D"..11000:.12320
.23 0.A$."D".12380.L3*0.I.1.Z:."....";FF
$(I).`340.11000:.:.12420.X3>0G.0:G.E(I(B
$(I),3))..3H0GS.GS.G..3R0...3\0.X$;"DRUC
KER EINSCHALTEN ! "..3F0.10000..3P0.4,4.
.3Z0.I.1.Z:.4," ";FF$(I):.:.4: 4.!4.
0.V$;"DATEN AUF DISK SPEICHERN ? (J/N)":
.11000:.A$.."J"...D4.0.X$;"DATEN DISKETT
E EINLEGEN ".F4.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....4X6.V$;"AUSSORTIEREN FR
EMDER LISTEN":DI$."@:DIFFERENZ":LI$."LIS
TE":X.1..5.6.X$;"MIT WELCHER LISTE VERGL
EICHEN ?":.17000.O5.6.X$;"WIEVIEL ZEICHE
N VERGLEICHEN (1-20) ";:.18000:SK.E(K$).
`5.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.T5.7.T..0. 5: 2:.X$;K$:.X$;
ZM$:.11000:...5.7.5,C..5(7.J.1.C..527.5,
D$:.".....";D$..6<7.I.1.B.)6F7.H(D$,SK).
H(B$(I),SK).14300.06P7.I.@6Z7.2,D$:X.X.1
.G6D7.J.W6N7 5: 2:X.X.1..6X7.X.0.."... K
EIN NEUES ELEMENT GEFUNDEN":.10000. 6.7.
7,8,7,DI$.",S,W"..6.7.7,X..6.7.5,8,5,LI$
.",S,R".X6 7.I.1.X:.5,D$:.7,D$:...6.7 7:
5..7.7.V$;"DAS AUSSORTIEREN IST BEENDET
".17.7.X$;"DAS DATENFILE < DIFFERENZ >
".P7H7.X$,"KANN GELADEN WERDEN ".U7R7.15
,8,15,"S0:LISTE": 15:.16000:...7.7.J.C.1
4190..7.7.J..7.7...7.>.3,T,K$,O,O:..Q7HB
.X$;"FILE NAME ";:F.1:.18000:F.0:FI$.K$:
...7PFK$.""..7ZF.11000:.A$.G(13)..:..#8D
F. A$.G(20). C(K$)..0.K$.H(K$,C(K$).1):.
A$;.>8NF. DR.1. C(K$).33.18010.W8XF. F.1
.C(K$).18.18010.S8.F.A$.G(31).K$.K$.A$:.
A$;.8.F. 18010...
> CLICK IMAGE PREVIEW FOR FULL MODAL