TEXTEDITOR V.3.4
FILE INFORMATION
FILENAME(S): TEXTEDITOR V.3.4
FILE TYPE(S): PRG
FILE SIZE: 10.4K
FIRST SEEN: 2025-11-30 01:08:14
APPEARS ON: 5 disk(s)
FILE HASH
4d3aed3ae39d999670bd0c307f34a8c110718f6e7ebae5b6b32c65a2755d43fa
FOUND ON DISKS (5 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| THE COMMODORE | TEXTEDITOR V.3.4 | PRG | Treasure Chest - Wolfgang Rauprich | 31 | 1 | DOWNLOAD FILE |
| R E F L E X | TEXTEDITOR V.3.4 | PRG | Curtcool, Hans Curt | 27 | 10 | DOWNLOAD FILE |
| DEMO DISK | TEXTEDITOR V.3.4 | PRG | DuncanTwain | 13 | 2 | DOWNLOAD FILE |
| 1001 CREW | TEXTEDITOR V.3.4 | PRG | DuncanTwain | 19 | 8 | DOWNLOAD FILE |
| DANIELS DEMO | TEXTEDITOR V.3.4 | PRG | hedning, pewp | 7 | 16 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 00 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..).... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 51 08 01 00 8F 20 |*********.Q.... |
00000030: 2A 20 20 20 20 20 54 45 58 54 45 44 49 54 4F 52 |* TEXTEDITOR|
00000040: 20 56 2E 49 49 49 2E 34 20 20 20 20 20 20 20 20 | V.III.4 |
00000050: 2A 00 79 08 02 00 8F 20 2A 20 20 20 20 20 20 20 |*.y.... * |
00000060: 20 20 3C 43 3E 20 31 39 38 35 20 20 20 20 20 20 | <C> 1985 |
00000070: 20 20 20 20 20 20 20 20 2A 00 A1 08 03 00 8F 20 | *...... |
00000080: 2A 20 20 20 20 20 56 4F 4E 20 4D 49 43 48 41 45 |* VON MICHAE|
00000090: 4C 20 4E 49 43 4B 4C 45 53 20 20 20 20 20 20 20 |L NICKLES |
000000A0: 2A 00 C9 08 04 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*...... ********|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 F8 08 08 00 8B 49 |*********......I|
000000D0: 4D B2 31 A7 97 36 34 38 2C 32 30 34 3A 97 35 33 |M.1..648,204:.53|
000000E0: 32 37 32 2C 35 36 3A 97 35 36 35 37 36 2C 30 3A |272,56:.56576,0:|
000000F0: 99 22 9E 22 3A 89 32 30 00 15 09 09 00 97 35 33 |.".":.20......53|
00000100: 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 3A 99 |280,0:.53281,0:.|
00000110: 22 93 9E 22 3B 00 38 09 0A 00 4D 25 B2 33 30 30 |"..";.8...M%.300|
00000120: 3A 86 20 4D 24 28 4D 25 29 2C 4D 28 4D 25 29 3A |:. M$(M%),M(M%):|
00000130: 8F 20 50 55 46 46 45 52 00 5B 09 0F 00 86 4C 47 |. PUFFER.[....LG|
00000140: 28 31 30 30 29 2C 52 47 28 31 30 30 29 20 20 20 |(100),RG(100) |
00000150: 20 20 3A 8F 20 51 2E 53 4F 52 54 00 AB 09 13 00 | :. Q.SORT.....|
00000160: 8F 20 41 4E 46 41 4E 47 53 4D 45 4E 55 45 20 2D |. ANFANGSMENUE -|
00000170: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000180: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000190: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000001A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 DF 09 14 00 |-----------.....|
000001B0: 99 22 93 12 20 20 20 20 20 20 20 20 54 45 58 54 |.".. TEXT|
000001C0: 45 44 49 54 4F 52 20 2D 20 56 45 52 53 49 4F 4E |EDITOR - VERSION|
000001D0: 20 33 20 20 20 20 20 20 20 20 20 20 92 22 3B 00 | 3 .";.|
000001E0: 12 0A 15 00 99 22 12 20 20 20 20 3C 43 3E 20 31 |.....". <C> 1|
000001F0: 39 38 35 20 56 4F 4E 20 4D 49 43 48 41 45 4C 20 |985 VON MICHAEL |
00000200: 4E 49 43 4B 4C 45 53 20 20 20 20 20 20 20 20 92 |NICKLES .|
00000210: 22 3B 00 3C 0A 16 00 99 22 11 11 20 20 20 20 20 |";.<....".. |
00000220: 41 4C 54 45 20 44 41 54 45 49 20 45 44 49 54 49 |ALTE DATEI EDITI|
00000230: 45 52 45 4E 20 20 2D 20 20 27 41 27 00 64 0A 17 |EREN - 'A'.d..|
00000240: 00 99 22 20 20 20 20 20 4E 45 55 45 20 44 41 54 |.." NEUE DAT|
00000250: 45 49 20 45 52 4F 45 46 46 4E 45 4E 20 20 2D 20 |EI EROEFFNEN - |
00000260: 20 27 4E 27 00 8D 0A 18 00 99 22 11 20 20 20 20 | 'N'......". |
00000270: 20 44 2E 5A 2E 53 41 54 5A 20 4C 41 44 45 4E 20 | D.Z.SATZ LADEN |
00000280: 20 20 20 20 20 20 20 2D 20 20 27 44 27 00 A6 0A | - 'D'...|
00000290: 19 00 A1 49 24 3A 8B C2 28 32 30 33 29 B2 31 A7 |...I$:..(203).1.|
000002A0: 49 24 B2 22 41 22 00 C6 0A 1A 00 8B 49 24 B3 B1 |I$."A"......I$..|
000002B0: 22 41 22 AF 49 24 B3 B1 22 4E 22 AF 49 24 B3 B1 |"A".I$.."N".I$..|
000002C0: 22 44 22 A7 32 35 00 E7 0A 1B 00 8B 49 24 B2 22 |"D".25......I$."|
000002D0: 44 22 A7 49 4D B2 31 3A 93 22 44 2E 5A 2E 53 41 |D".IM.1:."D.Z.SA|
000002E0: 54 5A 22 2C 38 2C 31 00 11 0B 1C 00 97 31 39 38 |TZ",8,1......198|
000002F0: 2C 30 3A 85 22 11 11 44 41 54 45 49 4E 41 4D 45 |,0:."..DATEINAME|
00000300: 20 20 2A 9D 9D 9D 22 3B 44 24 3A 97 31 39 38 2C | *...";D$:.198,|
00000310: 30 00 4F 0B 1D 00 85 22 53 41 54 5A 4C 41 45 4E |0.O...."SATZLAEN|
00000320: 47 45 20 20 34 30 9D 9D 9D 9D 22 3B 53 4C 3A 8B |GE 40....";SL:.|
00000330: 53 4C B3 31 B0 53 4C B1 32 35 34 A7 99 22 47 45 |SL.1.SL.254.."GE|
00000340: 48 54 20 4E 49 43 48 54 20 21 22 3A 89 33 30 00 |HT NICHT !":.30.|
00000350: 5E 0B 1E 00 8B 49 24 B2 22 41 22 A7 34 30 00 8E |^....I$."A".40..|
00000360: 0B 1F 00 85 22 53 41 54 5A 41 4E 5A 41 48 4C 20 |...."SATZANZAHL |
00000370: 22 3B 53 4E 3A 48 42 B2 B5 28 53 4E AD 32 35 35 |";SN:HB..(SN.255|
00000380: 29 3A 4C 42 B2 53 4E AB 48 42 AC 32 35 35 00 C6 |):LB.SN.HB.255..|
00000390: 0B 20 00 99 22 42 49 54 54 45 20 4C 45 45 52 45 |. .."BITTE LEERE|
000003A0: 20 44 49 53 4B 20 45 49 4E 4C 45 47 45 4E 20 3C | DISK EINLEGEN <|
000003B0: 52 45 54 55 52 4E 3E 22 3A 97 31 39 38 2C 30 3A |RETURN>":.198,0:|
000003C0: 92 31 39 38 2C 31 00 D3 0B 21 00 9F 31 35 2C 38 |.198,1...!..15,8|
000003D0: 2C 31 35 00 F6 0B 23 00 98 31 35 2C 22 49 30 22 |,15...#..15,"I0"|
000003E0: 3A 9F 31 2C 38 2C 33 2C 44 24 AA 22 2C 4C 2C 22 |:.1,8,3,D$.",L,"|
000003F0: AA C7 28 53 4C 29 00 18 0C 24 00 98 31 35 2C 22 |..(SL)...$..15,"|
00000400: 50 22 3B C7 28 33 29 3B C7 28 4C 42 29 3B C7 28 |P";.(3);.(LB);.(|
00000410: 48 42 29 3B C7 28 31 29 00 26 0C 25 00 98 31 2C |HB);.(1).&.%..1,|
00000420: C7 28 32 35 35 29 00 31 0C 26 00 A0 31 3A A0 31 |.(255).1.&..1:.1|
00000430: 35 00 3F 0C 28 00 9F 20 31 35 2C 38 2C 31 35 00 |5.?.(.. 15,8,15.|
00000440: 59 0C 29 00 98 31 35 2C 22 49 30 22 3A 9F 20 31 |Y.)..15,"I0":. 1|
00000450: 2C 38 2C 33 2C 44 24 3A 99 00 A9 0C 32 00 8F 20 |,8,3,D$:....2.. |
00000460: 5A 57 49 53 43 48 45 4E 4D 45 4E 55 45 20 2D 2D |ZWISCHENMENUE --|
00000470: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000480: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000490: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000004A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 DC 0C 33 00 99 22 |---------...3.."|
000004B0: 12 53 20 2F 20 4C 20 2F 20 56 20 2F 20 4F 20 2F |.S / L / V / O /|
000004C0: 20 44 20 2F 20 49 20 2F 20 5A 20 2F 20 46 20 2F | D / I / Z / F /|
000004D0: 20 45 4E 44 45 20 20 20 20 92 22 3B 00 EE 0C 34 | ENDE .";...4|
000004E0: 00 A1 49 24 3A 8B 49 24 B2 22 22 A7 35 32 00 06 |..I$:.I$."".52..|
000004F0: 0D 35 00 8B 49 24 B2 22 45 22 A7 99 22 93 22 3B |.5..I$."E"..".";|
00000500: 3A 89 39 39 30 30 00 1E 0D 36 00 8B 49 24 B2 22 |:.9900...6..I$."|
00000510: 56 22 A7 99 22 93 22 3B 3A 89 36 30 30 30 00 37 |V"..".";:.6000.7|
00000520: 0D 37 00 8B 49 24 B2 22 4F 22 A7 99 22 93 22 3B |.7..I$."O"..".";|
00000530: 3A 89 31 30 30 30 30 00 4F 0D 38 00 8B 49 24 B2 |:.10000.O.8..I$.|
00000540: 22 44 22 A7 99 22 93 22 3B 3A 89 37 30 30 30 00 |"D"..".";:.7000.|
00000550: 68 0D 39 00 8B 49 24 B2 22 49 22 A7 99 22 93 22 |h.9..I$."I".."."|
00000560: 3B 3A 89 33 30 30 30 30 00 80 0D 3A 00 8B 49 24 |;:.30000...:..I$|
00000570: B2 22 5A 22 A7 99 22 93 22 3B 3A 89 38 30 30 30 |."Z"..".";:.8000|
00000580: 00 99 0D 3B 00 8B 49 24 B2 22 46 22 A7 99 22 93 |...;..I$."F"..".|
00000590: 22 3B 3A 89 36 31 30 30 30 00 B1 0D 3C 00 8B 49 |";:.61000...<..I|
000005A0: 24 B3 B1 22 53 22 AF 49 24 B3 B1 22 4C 22 A7 35 |$.."S".I$.."L".5|
000005B0: 32 00 D8 0D 3D 00 85 22 53 41 54 5A 4E 52 22 3B |2...=.."SATZNR";|
000005C0: 53 41 3A 8B 20 53 41 B3 30 20 B0 20 53 41 B1 36 |SA:. SA.0 . SA.6|
000005D0: 33 30 30 30 20 A7 36 30 00 F0 0D 40 00 8B 49 24 |3000 .60...@..I$|
000005E0: B2 22 4C 22 A7 99 22 93 22 3B 3A 89 32 30 30 30 |."L"..".";:.2000|
000005F0: 00 0D 0E 42 00 8B 49 24 B2 22 53 22 A7 99 22 93 |...B..I$."S"..".|
00000600: 22 3B 3A 4D 4F B2 31 3A 89 33 30 30 30 00 16 0E |";:MO.1:.3000...|
00000610: 46 00 89 20 35 30 00 64 0E D0 07 8F 20 4C 45 53 |F.. 50.d.... LES|
00000620: 45 4E 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |EN -------------|
00000630: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000640: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000650: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000660: 2D 2D 2D 2D 00 85 0E D1 07 3A 99 22 93 12 22 3B |----.....:."..";|
00000670: 53 41 3B 22 9D 2D 22 3B C4 28 53 41 AA 32 30 29 |SA;".-";.(SA.20)|
00000680: 3B 22 20 92 22 00 8F 0E D5 07 49 41 B2 53 41 00 |;" .".....IA.SA.|
00000690: A3 0E D7 07 81 20 53 41 B2 49 41 20 A4 20 49 41 |..... SA.IA . IA|
000006A0: AA 32 30 00 B5 0E DA 07 3A 20 8D 39 30 30 30 3A |.20.....: .9000:|
000006B0: 8D 39 31 30 30 00 D0 0E E9 07 3A 20 8B 41 B2 35 |.9100.....: .A.5|
000006C0: 30 A7 53 41 B2 49 41 AA 32 31 3A 89 32 30 34 35 |0.SA.IA.21:.2045|
000006D0: 00 E4 0E EE 07 3A 20 8B C3 28 41 24 29 B3 34 30 |.....: ..(A$).40|
000006E0: A7 99 41 24 00 FA 0E F3 07 3A 20 8B C3 28 41 24 |..A$.....: ..(A$|
000006F0: 29 B1 B2 34 30 A7 99 41 24 3B 00 02 0F FD 07 82 |)..40..A$;......|
00000700: 3A 99 00 23 0F FE 07 8B 41 B2 35 30 A7 99 22 53 |:..#....A.50.."S|
00000710: 41 54 5A 4E 55 4D 4D 45 52 20 5A 55 20 48 4F 43 |ATZNUMMER ZU HOC|
00000720: 48 21 22 00 2C 0F 02 08 89 20 35 30 00 7A 0F B8 |H!".,.... 50.z..|
00000730: 0B 8F 20 53 43 48 52 45 49 42 45 4E 20 2D 2D 2D |.. SCHREIBEN ---|
00000740: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000750: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 9F 0F BD 0B 99 |----------......|
00000780: 22 45 49 4E 47 41 42 45 53 41 54 5A 20 20 2F 2F |"EINGABESATZ //|
00000790: 3D 4B 45 49 4E 45 20 45 49 4E 47 41 42 45 22 00 |=KEINE EINGABE".|
000007A0: BC 0F C2 0B 8D 39 30 30 30 20 20 20 3A 8F 20 50 |.....9000 :. P|
000007B0: 4F 53 49 54 49 4F 4E 49 45 52 45 4E 00 01 10 CC |OSITIONIEREN....|
000007C0: 0B 8B 41 B2 35 30 A7 99 22 53 41 54 5A 4E 55 4D |..A.50.."SATZNUM|
000007D0: 4D 45 52 20 5A 55 20 48 4F 43 48 21 22 3A 89 35 |MER ZU HOCH!":.5|
000007E0: 30 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F |0 :.|
000007F0: 20 46 45 48 4C 45 52 4B 41 4E 41 4C 41 42 46 52 | FEHLERKANALABFR|
00000800: 2E 00 44 10 D6 0B 8D 35 30 30 30 30 3A 41 24 B2 |..D....50000:A$.|
00000810: 42 45 24 20 20 20 20 20 20 20 20 20 20 20 20 20 |BE$ |
00000820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000830: 20 20 20 20 20 20 3A 8F 20 49 4E 50 55 54 2D 52 | :. INPUT-R|
00000840: 4F 55 54 2E 00 61 10 E0 0B 8B 41 24 B2 22 2F 2F |OUT..a....A$."//|
00000850: 22 A7 4D 4F B2 30 3A 89 35 30 3A 8F 20 45 4E 44 |".MO.0:.50:. END|
00000860: 45 00 7D 10 EA 0B 8D 39 32 30 30 20 20 20 3A 8F |E.}....9200 :.|
00000870: 20 41 24 20 53 43 48 52 45 49 42 45 4E 00 9F 10 | A$ SCHREIBEN...|
00000880: F4 0B 53 41 B2 53 41 AA 31 20 20 20 20 20 3A 8F |..SA.SA.1 :.|
00000890: 20 4E 41 45 43 48 53 54 45 52 20 53 41 54 5A 00 | NAECHSTER SATZ.|
000008A0: BB 10 FE 0B 89 33 30 31 30 20 20 20 20 3A 8F 20 |.....3010 :. |
000008B0: 4E 45 58 54 20 28 4C 4F 4F 50 29 00 09 11 70 17 |NEXT (LOOP)...p.|
000008C0: 8F 20 56 45 52 53 45 54 5A 45 4E 20 2D 2D 2D 2D |. VERSETZEN ----|
000008D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000008E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000008F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000900: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 1D 11 72 17 99 22 |---------...r.."|
00000910: 93 12 56 45 52 53 45 54 5A 45 4E 92 22 00 63 11 |..VERSETZEN.".c.|
00000920: 7A 17 99 22 11 42 49 54 54 45 20 47 45 42 45 4E |z..".BITTE GEBEN|
00000930: 20 53 49 45 20 41 4E 46 41 4E 47 20 55 4E 44 20 | SIE ANFANG UND |
00000940: 45 4E 44 45 20 44 45 53 20 42 45 2D 20 52 45 49 |ENDE DES BE- REI|
00000950: 43 48 45 53 20 41 4E 2C 20 44 45 4E 20 53 49 45 |CHES AN, DEN SIE|
00000960: 20 22 3B 00 7D 11 7F 17 99 22 56 45 52 53 45 54 | ";.}...."VERSET|
00000970: 5A 45 4E 20 57 4F 4C 4C 45 4E 20 21 22 00 96 11 |ZEN WOLLEN !"...|
00000980: 84 17 97 31 39 38 2C 30 3A 85 22 11 41 4E 46 41 |...198,0:.".ANFA|
00000990: 4E 47 22 3B 41 4E 00 CD 11 85 17 97 31 39 38 2C |NG";AN......198,|
000009A0: 30 3A 85 22 45 4E 44 45 22 3B 45 4E 3A 8B 41 4E |0:."ENDE";EN:.AN|
000009B0: B1 45 4E A7 99 22 44 41 53 20 49 53 54 20 55 4E |.EN.."DAS IST UN|
000009C0: 53 49 4E 4E 20 21 22 3A 89 36 30 32 30 00 07 12 |SINN !":.6020...|
000009D0: 87 17 53 41 B2 41 4E 3A 8D 39 30 30 30 3A 8B 41 |..SA.AN:.9000:.A|
000009E0: B2 35 30 A7 99 22 41 4E 46 41 4E 47 53 53 41 54 |.50.."ANFANGSSAT|
000009F0: 5A 20 45 58 49 53 54 49 45 52 54 20 4E 49 43 48 |Z EXISTIERT NICH|
00000A00: 54 21 22 3A 89 35 30 00 35 12 88 17 53 41 B2 45 |T!":.50.5...SA.E|
00000A10: 4E 3A 8D 39 30 30 30 3A 8B 41 B2 35 30 A7 99 22 |N:.9000:.A.50.."|
00000A20: 45 4E 44 53 41 54 5A 20 5A 55 20 48 4F 43 48 21 |ENDSATZ ZU HOCH!|
00000A30: 22 3A 89 35 30 00 4E 12 8A 17 99 22 11 51 55 45 |":.50.N....".QUE|
00000A40: 4C 4C 44 41 54 45 49 20 3D 20 22 3B 44 24 00 8E |LLDATEI = ";D$..|
00000A50: 12 8C 17 97 31 39 38 2C 30 3A 85 22 5A 49 45 4C |....198,0:."ZIEL|
00000A60: 44 41 54 45 49 20 22 3B 5A 24 3A 8B 20 5A 24 B2 |DATEI ";Z$:. Z$.|
00000A70: 22 22 A7 20 5A 24 B2 44 24 3A 99 22 91 1D 1D 1D |"". Z$.D$:."....|
00000A80: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 44 24 00 CD |..........";D$..|
00000A90: 12 8D 17 99 22 11 42 49 54 54 45 20 41 4E 46 41 |....".BITTE ANFA|
00000AA0: 4E 47 20 44 45 53 20 4E 45 55 45 4E 20 42 45 52 |NG DES NEUEN BER|
00000AB0: 45 49 43 48 53 20 41 4E 47 45 42 45 4E 21 22 3B |EICHS ANGEBEN!";|
00000AC0: 3A 97 31 39 38 2C 30 3A 85 4E 42 3A 99 00 05 13 |:.198,0:.NB:....|
00000AD0: 8E 17 53 41 B2 4E 42 3A 8D 39 30 30 30 3A 8B 41 |..SA.NB:.9000:.A|
00000AE0: B2 35 30 A7 99 22 4E 45 55 45 52 20 41 4E 46 41 |.50.."NEUER ANFA|
00000AF0: 4E 47 53 53 41 54 5A 20 5A 55 20 48 4F 43 48 21 |NGSSATZ ZU HOCH!|
00000B00: 22 3A 89 35 30 00 3A 13 8F 17 53 41 B2 4E 42 AA |":.50.:...SA.NB.|
00000B10: 45 4E AB 41 4E 3A 8D 39 30 30 30 3A 8B 41 B2 35 |EN.AN:.9000:.A.5|
00000B20: 30 A7 99 22 42 45 52 45 49 43 48 20 5A 55 20 47 |0.."BEREICH ZU G|
00000B30: 52 4F 53 53 21 22 3A 89 35 30 00 4F 13 90 17 99 |ROSS!":.50.O....|
00000B40: 22 42 49 54 54 45 20 57 41 52 54 45 4E 21 22 00 |"BITTE WARTEN!".|
00000B50: 89 13 94 17 53 41 B2 41 4E 3A 49 4D B2 30 3A 8B |....SA.AN:IM.0:.|
00000B60: 41 4E B2 45 4E A7 99 22 2A 2A 2A 20 46 45 52 54 |AN.EN.."*** FERT|
00000B70: 49 47 20 2A 2A 2A 22 3A 97 31 39 38 2C 30 3A 92 |IG ***":.198,0:.|
00000B80: 31 39 38 2C 31 3A 89 35 30 00 A4 13 96 17 8D 39 |198,1:.50......9|
00000B90: 30 30 30 3A 8D 39 31 30 30 3A 8B 41 B2 35 30 A7 |000:.9100:.A.50.|
00000BA0: 36 31 30 30 00 B5 13 98 17 4D 24 28 53 41 AB 41 |6100.....M$(SA.A|
00000BB0: 4E 29 B2 41 24 00 C5 13 9D 17 8B 53 41 B2 45 4E |N).A$......SA.EN|
00000BC0: A7 36 31 30 30 00 E2 13 A2 17 8B 53 41 AB 41 4E |.6100......SA.AN|
00000BD0: B2 4D 25 A7 49 4D B2 31 3A 89 36 31 30 30 3A 8F |.M%.IM.1:.6100:.|
00000BE0: 20 2A 00 F4 13 AC 17 53 41 B2 53 41 AA 31 3A 89 | *.....SA.SA.1:.|
00000BF0: 36 30 33 38 00 04 14 D4 17 8F 20 54 52 41 4E 53 |6038...... TRANS|
00000C00: 50 4F 52 54 00 3D 14 DE 17 99 22 42 49 54 54 45 |PORT.=...."BITTE|
00000C10: 20 44 49 53 4B 20 4D 49 54 20 5A 49 45 4C 44 41 | DISK MIT ZIELDA|
00000C20: 54 45 49 20 45 49 4E 4C 45 47 45 4E 20 21 22 3A |TEI EINLEGEN !":|
00000C30: 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 00 57 14 |.198,0:.198,1.W.|
00000C40: E8 17 A0 31 3A 98 31 35 2C 22 49 30 22 3A 9F 31 |...1:.15,"I0":.1|
00000C50: 2C 38 2C 33 2C 5A 24 00 70 14 38 18 53 41 B2 4E |,8,3,Z$.p.8.SA.N|
00000C60: 42 3A 8D 39 30 30 30 3A 8B 41 B2 35 30 A7 35 30 |B:.9000:.A.50.50|
00000C70: 00 8D 14 3D 18 49 49 B2 45 4E AB 41 4E 3A 8B 49 |...=.II.EN.AN:.I|
00000C80: 4D B2 31 A7 49 49 B2 4D 25 3A 8F 20 2A 00 99 14 |M.1.II.M%:. *...|
00000C90: 47 18 81 49 B2 30 A4 49 49 00 B4 14 4C 18 41 24 |G..I.0.II...L.A$|
00000CA0: B2 4D 24 28 49 29 3A 8B 41 24 B2 22 22 A7 41 24 |.M$(I):.A$."".A$|
00000CB0: B2 22 3A 22 00 CA 14 51 18 8D 39 32 30 30 3A 8F |.":"...Q..9200:.|
00000CC0: 20 53 43 48 52 45 49 42 45 4E 00 E5 14 60 18 53 | SCHREIBEN...`.S|
00000CD0: 41 B2 53 41 AA 31 3A 82 49 3A 8B 49 4D B3 B1 30 |A.SA.1:.I:.IM..0|
00000CE0: A7 36 32 36 30 00 23 15 6A 18 99 22 42 49 54 54 |.6260.#.j.."BITT|
00000CF0: 45 20 44 49 53 4B 20 4D 49 54 20 51 55 45 4C 4C |E DISK MIT QUELL|
00000D00: 44 41 54 45 49 20 45 49 4E 4C 45 47 45 4E 20 21 |DATEI EINLEGEN !|
00000D10: 22 3A 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A |":.198,0:.198,1:|
00000D20: 89 35 30 00 61 15 74 18 41 4E B2 41 4E AA 4D 25 |.50.a.t.AN.AN.M%|
00000D30: 3A 4E 42 B2 4E 42 AA 4D 25 3A 99 22 42 49 54 54 |:NB.NB.M%:."BITT|
00000D40: 45 20 44 49 53 4B 20 4D 49 54 20 51 55 45 4C 4C |E DISK MIT QUELL|
00000D50: 44 41 54 45 49 20 45 49 4E 4C 45 47 45 4E 20 21 |DATEI EINLEGEN !|
00000D60: 22 00 93 15 7E 18 97 31 39 38 2C 30 3A 92 31 39 |"...~..198,0:.19|
00000D70: 38 2C 31 3A A0 31 3A 98 31 35 2C 22 49 30 22 3A |8,1:.1:.15,"I0":|
00000D80: 9F 31 2C 38 2C 33 2C 44 24 3A 89 36 30 33 36 3A |.1,8,3,D$:.6036:|
00000D90: 8F 20 2A 00 E1 15 58 1B 8F 20 50 52 49 4E 54 45 |. *...X.. PRINTE|
00000DA0: 52 2D 52 4F 55 54 49 4E 45 20 2D 2D 2D 2D 2D 2D |R-ROUTINE ------|
00000DB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000DC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000DD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000DE0: 2D 00 02 16 59 1B 99 22 93 12 50 52 49 4E 54 45 |-...Y.."..PRINTE|
00000DF0: 52 2D 52 4F 55 54 49 4E 45 20 4D 50 53 20 38 30 |R-ROUTINE MPS 80|
00000E00: 31 92 00 2B 16 5A 1B 85 22 11 41 4E 46 41 4E 47 |1..+.Z..".ANFANG|
00000E10: 22 3B 41 4E 3A 85 22 45 4E 44 45 22 3B 45 4E 3A |";AN:."ENDE";EN:|
00000E20: 8B 41 4E B1 45 4E A7 37 30 30 30 00 65 16 5D 1B |.AN.EN.7000.e.].|
00000E30: 53 41 B2 41 4E 3A 8D 39 30 30 30 3A 8B 41 B2 35 |SA.AN:.9000:.A.5|
00000E40: 30 A7 99 22 41 4E 46 41 4E 47 53 53 41 54 5A 20 |0.."ANFANGSSATZ |
00000E50: 45 58 49 53 54 49 45 52 54 20 4E 49 43 48 54 21 |EXISTIERT NICHT!|
00000E60: 22 3A 89 35 30 00 93 16 5E 1B 53 41 B2 45 4E 3A |":.50...^.SA.EN:|
00000E70: 8D 39 30 30 30 3A 8B 41 B2 35 30 A7 99 22 45 4E |.9000:.A.50.."EN|
00000E80: 44 53 41 54 5A 20 5A 55 20 48 4F 43 48 21 22 3A |DSATZ ZU HOCH!":|
00000E90: 89 35 30 00 AF 16 61 1B 3A 99 22 11 42 49 54 54 |.50...a.:.".BITT|
00000EA0: 45 20 57 41 45 48 4C 45 4E 20 53 49 45 3A 11 00 |E WAEHLEN SIE:..|
00000EB0: CA 16 62 1B 99 2C 22 4E 4F 52 4D 41 4C 45 20 41 |..b..,"NORMALE A|
00000EC0: 55 53 47 41 42 45 20 2E 2E 31 00 E5 16 63 1B 99 |USGABE ..1...c..|
00000ED0: 2C 22 44 2E 5A 2E 53 2E 20 41 55 53 47 41 42 45 |,"D.Z.S. AUSGABE|
00000EE0: 20 2E 2E 2E 32 00 00 17 64 1B 99 2C 22 45 49 47 | ...2...d..,"EIG|
00000EF0: 45 4E 45 20 52 4F 55 54 49 4E 45 20 2E 2E 2E 33 |ENE ROUTINE ...3|
00000F00: 00 1E 17 65 1B A1 49 24 3A 8B C5 28 49 24 29 B3 |...e..I$:..(I$).|
00000F10: 31 B0 C5 28 49 24 29 B1 33 A7 37 30 31 33 00 2F |1..(I$).3.7013./|
00000F20: 17 66 1B 8B 49 24 B2 22 32 22 A7 37 31 30 30 00 |.f..I$."2".7100.|
00000F30: 40 17 67 1B 8B 49 24 B2 22 33 22 A7 37 35 30 30 |@.g..I$."3".7500|
00000F40: 00 65 17 6C 1B 8F 20 4E 4F 52 4D 41 4C 45 20 41 |.e.l.. NORMALE A|
00000F50: 55 53 47 41 42 45 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |USGABE ---------|
00000F60: 2D 2D 2D 2D 2D 00 8C 17 6D 1B 9F 33 2C 34 2C 37 |-----...m..3,4,7|
00000F70: 3A 53 41 B2 41 4E 3A 8D 39 30 30 30 3A 81 53 41 |:SA.AN:.9000:.SA|
00000F80: B2 41 4E A4 45 4E 3A 8D 39 31 30 30 00 BB 17 71 |.AN.EN:.9100...q|
00000F90: 1B 8B 41 B2 35 30 A7 99 22 53 41 54 5A 4E 55 4D |..A.50.."SATZNUM|
00000FA0: 4D 45 52 20 5A 55 20 48 4F 43 48 21 22 3A 53 41 |MER ZU HOCH!":SA|
00000FB0: B2 45 4E AA 31 3A 89 37 30 34 35 00 DB 17 7B 1B |.EN.1:.7045...{.|
00000FC0: 98 33 2C C9 28 22 20 20 20 22 AA C4 28 53 41 29 |.3,.(" "..(SA)|
00000FD0: 2C 33 29 3B 22 20 20 20 20 22 3B 00 F0 17 7C 1B |,3);" ";...|.|
00000FE0: 49 24 B2 22 22 3A 81 49 B2 31 A4 C3 28 41 24 29 |I$."":.I.1..(A$)|
00000FF0: 00 14 18 7D 1B 3A 8B CA 28 41 24 2C 49 2C 31 29 |...}.:..(A$,I,1)|
00001000: B2 22 1D 22 A7 49 24 B2 49 24 AA 22 20 22 3A 89 |.".".I$.I$." ":.|
00001010: 37 30 34 30 00 29 18 7E 1B 3A 49 24 B2 49 24 AA |7040.).~.:I$.I$.|
00001020: CA 28 41 24 2C 49 2C 31 29 00 36 18 80 1B 82 49 |.(A$,I,1).6....I|
00001030: 3A 98 33 2C 49 24 00 47 18 85 1B 82 53 41 3A A0 |:.3,I$.G....SA:.|
00001040: 33 3A 99 3A 89 35 30 00 6C 18 BC 1B 8F 20 44 2E |3:.:.50.l.... D.|
00001050: 5A 2E 53 41 54 5A 20 41 55 53 47 41 42 45 20 2D |Z.SATZ AUSGABE -|
00001060: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 93 18 BD |------------....|
00001070: 1B 9F 33 2C 34 2C 37 3A 53 41 B2 41 4E 3A 8D 39 |..3,4,7:SA.AN:.9|
00001080: 30 30 30 3A 81 53 41 B2 41 4E A4 45 4E 3A 8D 39 |000:.SA.AN.EN:.9|
00001090: 31 30 30 00 C2 18 BE 1B 8B 41 B2 35 30 A7 53 41 |100......A.50.SA|
000010A0: B2 45 4E AA 31 3A 99 22 53 41 54 5A 4E 55 4D 4D |.EN.1:."SATZNUMM|
000010B0: 45 52 20 5A 55 20 48 4F 43 48 21 22 3A 89 37 31 |ER ZU HOCH!":.71|
000010C0: 37 30 00 E3 18 C6 1B 98 33 2C C9 28 22 20 20 20 |70......3,.(" |
000010D0: 20 22 AA C4 28 53 41 29 2C 34 29 3B 22 20 20 20 | "..(SA),4);" |
000010E0: 20 22 3B 00 04 19 D0 1B 49 24 B2 22 22 3A 81 49 | ";.....I$."":.I|
000010F0: B2 31 A4 C3 28 41 24 29 3A 8B 41 24 B2 22 22 A7 |.1..(A$):.A$."".|
00001100: 37 31 36 30 00 18 19 D5 1B 49 4D B2 C6 28 CA 28 |7160.....IM..(.(|
00001110: 41 24 2C 49 2C 31 29 29 00 3B 19 D6 1B 8B 49 4D |A$,I,1)).;....IM|
00001120: B1 36 34 AF 49 4D B3 39 31 B0 49 4D B1 39 36 AF |.64.IM.91.IM.96.|
00001130: 49 4D B3 31 32 33 A7 37 31 36 30 00 58 19 DA 1B |IM.123.7160.X...|
00001140: 8B 49 4D B2 36 34 A7 49 24 B2 49 24 AA C7 28 33 |.IM.64.I$.I$..(3|
00001150: 34 29 3A 89 37 31 37 30 00 73 19 DB 1B 8B 49 4D |4):.7170.s....IM|
00001160: B2 32 39 A7 49 24 B2 49 24 AA 22 20 22 3A 89 37 |.29.I$.I$." ":.7|
00001170: 31 37 30 00 90 19 DF 1B 8B 49 4D B2 31 37 33 A7 |170......IM.173.|
00001180: 49 24 B2 49 24 AA 22 C1 45 22 3A 89 37 31 37 30 |I$.I$.".E":.7170|
00001190: 00 AD 19 E4 1B 8B 49 4D B2 31 37 34 A7 49 24 B2 |......IM.174.I$.|
000011A0: 49 24 AA 22 53 53 22 3A 89 37 31 37 30 00 CA 19 |I$."SS":.7170...|
000011B0: E9 1B 8B 49 4D B2 31 37 36 A7 49 24 B2 49 24 AA |...IM.176.I$.I$.|
000011C0: 22 41 45 22 3A 89 37 31 37 30 00 E7 19 EE 1B 8B |"AE":.7170......|
000011D0: 49 4D B2 31 38 31 A7 49 24 B2 49 24 AA 22 D5 45 |IM.181.I$.I$.".E|
000011E0: 22 3A 89 37 31 37 30 00 04 1A F0 1B 8B 49 4D B2 |":.7170......IM.|
000011F0: 31 38 32 A7 49 24 B2 49 24 AA 22 CF 45 22 3A 89 |182.I$.I$.".E":.|
00001200: 37 31 37 30 00 21 1A F2 1B 8B 49 4D B2 31 38 34 |7170.!....IM.184|
00001210: A7 49 24 B2 49 24 AA 22 55 45 22 3A 89 37 31 37 |.I$.I$."UE":.717|
00001220: 30 00 3E 1A F4 1B 8B 49 4D B2 31 38 35 A7 49 24 |0.>....IM.185.I$|
00001230: B2 49 24 AA 22 4F 45 22 3A 89 37 31 37 30 00 5B |.I$."OE":.7170.[|
00001240: 1A F6 1B 8B 49 4D B2 39 34 A7 49 24 B2 49 24 AA |....IM.94.I$.I$.|
00001250: 22 3A 22 20 20 3A 89 37 31 37 30 00 78 1A F7 1B |":" :.7170.x...|
00001260: 8B 49 4D B2 39 35 A7 49 24 B2 49 24 AA 22 2C 22 |.IM.95.I$.I$.","|
00001270: 20 20 3A 89 37 31 37 30 00 88 1A F8 1B 49 24 B2 | :.7170.....I$.|
00001280: 49 24 AA C7 28 49 4D 29 00 9C 1A 02 1C 82 49 3A |I$..(IM)......I:|
00001290: 98 33 2C 49 24 2C C7 28 31 33 29 3B 00 AD 1A 07 |.3,I$,.(13);....|
000012A0: 1C 82 53 41 3A A0 33 3A 99 3A 89 35 30 00 D2 1A |..SA:.3:.:.50...|
000012B0: 4C 1D 8F 20 45 49 47 45 4E 45 20 52 4F 55 54 49 |L.. EIGENE ROUTI|
000012C0: 4E 45 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |NE -------------|
000012D0: 2D 2D 00 1A 1B 56 1D 99 22 11 53 49 45 20 48 41 |--...V..".SIE HA|
000012E0: 42 45 4E 20 4E 4F 43 48 20 4B 45 49 4E 45 20 45 |BEN NOCH KEINE E|
000012F0: 49 47 45 4E 45 20 50 52 49 4E 54 45 52 2D 20 20 |IGENE PRINTER- |
00001300: 20 20 52 4F 55 54 49 4E 45 20 44 45 46 46 49 4E | ROUTINE DEFFIN|
00001310: 49 45 52 54 21 22 3A 89 35 30 00 68 1B 40 1F 8F |IERT!":.50.h.@..|
00001320: 20 54 45 58 54 20 5A 45 4E 54 52 49 45 52 45 4E | TEXT ZENTRIEREN|
00001330: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00001340: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001350: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001360: 2D 2D 2D 2D 2D 2D 2D 2D 00 9A 1B 41 1F 49 24 B2 |--------...A.I$.|
00001370: 22 22 3A 81 49 B2 31 A4 31 30 3A 49 24 B2 49 24 |"":.I.1.10:I$.I$|
00001380: AA 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00001390: 1D 1D 1D 1D 1D 1D 22 3A 82 49 00 A5 1B 42 1F 8F |......":.I...B..|
000013A0: 53 4C 3D 32 37 00 BE 1B 45 1F 8F 44 49 4D 4D 24 |SL=27...E..DIMM$|
000013B0: 28 33 30 30 29 3A 47 4F 54 4F 38 31 30 30 00 D3 |(300):GOTO8100..|
000013C0: 1B 4A 1F 99 22 12 5A 45 4E 54 52 49 45 52 45 4E |.J..".ZENTRIEREN|
000013D0: 92 11 22 00 1F 1C 4F 1F 99 22 42 49 54 54 45 20 |.."...O.."BITTE |
000013E0: 47 45 42 45 4E 20 53 49 45 20 41 4E 46 41 4E 47 |GEBEN SIE ANFANG|
000013F0: 20 55 4E 44 20 45 4E 44 45 20 44 45 53 20 20 20 | UND ENDE DES |
00001400: 20 20 42 45 52 45 49 43 48 45 53 20 41 4E 2C 20 | BEREICHES AN, |
00001410: 44 45 52 20 5A 45 4E 54 52 49 45 52 54 22 3B 00 |DER ZENTRIERT";.|
00001420: 34 1C 51 1F 99 22 20 57 45 52 44 45 4E 20 53 4F |4.Q.." WERDEN SO|
00001430: 4C 4C 21 22 00 5A 1C 54 1F 85 22 41 4E 46 41 4E |LL!".Z.T.."ANFAN|
00001440: 47 22 3B 41 4E 3A 85 22 45 4E 44 45 22 3B 45 4E |G";AN:."ENDE";EN|
00001450: 3A 8B 41 4E B1 45 4E A7 35 30 00 94 1C 59 1F 53 |:.AN.EN.50...Y.S|
00001460: 41 B2 41 4E 3A 8D 39 30 30 30 3A 8B 41 B2 35 30 |A.AN:.9000:.A.50|
00001470: A7 99 22 41 4E 46 41 4E 47 53 53 41 54 5A 20 45 |.."ANFANGSSATZ E|
00001480: 58 49 53 54 49 45 52 54 20 4E 49 43 48 54 21 22 |XISTIERT NICHT!"|
00001490: 3A 89 35 30 00 C2 1C 5E 1F 53 41 B2 45 4E 3A 8D |:.50...^.SA.EN:.|
000014A0: 39 30 30 30 3A 8B 41 B2 35 30 A7 99 22 45 4E 44 |9000:.A.50.."END|
000014B0: 53 41 54 5A 20 5A 55 20 48 4F 43 48 21 22 3A 89 |SATZ ZU HOCH!":.|
000014C0: 35 30 00 F0 1C 68 1F 99 22 11 4C 49 4E 4B 53 2D |50...h..".LINKS-|
000014D0: 52 45 43 48 54 53 20 42 55 45 4E 44 49 47 20 5A |RECHTS BUENDIG Z|
000014E0: 45 4E 54 52 49 45 52 45 4E 20 20 2D 20 27 31 27 |ENTRIEREN - '1'|
000014F0: 00 1E 1D 6D 1F 99 22 11 49 4E 20 44 49 45 20 4D |...m..".IN DIE M|
00001500: 49 54 54 45 20 5A 45 4E 54 52 49 45 52 45 4E 20 |ITTE ZENTRIEREN |
00001510: 20 20 20 20 20 20 20 20 20 2D 20 27 32 27 00 3F | - '2'.?|
00001520: 1D 72 1F A1 49 49 24 3A 8B 49 49 24 B3 B1 22 31 |.r..II$:.II$.."1|
00001530: 22 AF 49 49 24 B3 B1 22 32 22 A7 38 30 35 30 00 |".II$.."2".8050.|
00001540: 51 1D 7C 1F 8B 49 49 24 B2 22 32 22 A7 38 36 30 |Q.|..II$."2".860|
00001550: 30 00 76 1D A3 1F 8F 20 4C 49 4E 4B 53 2D 52 45 |0.v.... LINKS-RE|
00001560: 43 48 54 53 20 42 55 45 4E 44 49 47 20 2D 2D 2D |CHTS BUENDIG ---|
00001570: 2D 2D 2D 2D 2D 2D 00 8C 1D A4 1F 99 22 11 42 49 |------......".BI|
00001580: 54 54 45 20 57 41 52 54 45 4E 21 22 00 9A 1D A9 |TTE WARTEN!"....|
00001590: 1F 81 53 41 B2 41 4E A4 45 4E 00 B7 1D AE 1F 3A |..SA.AN.EN.....:|
000015A0: 20 8D 39 30 30 30 3A 8D 39 31 30 30 3A 99 41 24 | .9000:.9100:.A$|
000015B0: 3A 99 C3 28 41 24 29 00 E3 1D B8 1F 3A 20 8B C9 |:..(A$).....: ..|
000015C0: 28 41 24 2C 31 29 B2 C7 28 32 39 29 A7 41 24 B2 |(A$,1)..(29).A$.|
000015D0: C8 28 41 24 2C C3 28 41 24 29 AB 31 29 3A 89 38 |.(A$,.(A$).1):.8|
000015E0: 31 32 30 00 0F 1E BA 1F 3A 20 8B C9 28 41 24 2C |120.....: ..(A$,|
000015F0: 31 29 B2 C7 28 33 32 29 A7 41 24 B2 C8 28 41 24 |1)..(32).A$..(A$|
00001600: 2C C3 28 41 24 29 AB 31 29 3A 89 38 31 32 32 00 |,.(A$).1):.8122.|
00001610: 3C 1E BB 1F 3A 20 8B C9 28 41 24 2C 31 29 B2 C7 |<...: ..(A$,1)..|
00001620: 28 31 36 30 29 A7 41 24 B2 C8 28 41 24 2C C3 28 |(160).A$..(A$,.(|
00001630: 41 24 29 AB 31 29 3A 89 38 31 32 33 00 51 1E C2 |A$).1):.8123.Q..|
00001640: 1F 3A 20 8B C3 28 41 24 29 B2 53 4C A7 38 35 32 |.: ..(A$).SL.852|
00001650: 30 00 6E 1E 08 20 3A 20 20 4C 55 B2 53 4C AB C3 |0.n.. : LU.SL..|
00001660: 28 41 24 29 3A 99 22 4C 55 3D 22 3B 4C 55 00 93 |(A$):."LU=";LU..|
00001670: 1E 1C 20 3A 20 20 49 B2 31 3A 49 43 B2 30 3A 8F |.. : I.1:IC.0:.|
00001680: 20 42 45 47 49 4E 20 4C 4F 4F 50 20 2D 2D 2D 2D | BEGIN LOOP ----|
00001690: 2D 2D 2D 00 99 1E 1E 20 3A 00 C3 1E 26 20 3A 20 |---.... :...& : |
000016A0: 20 20 8B CA 28 41 24 2C 49 2C 31 29 B2 22 22 B0 | ..(A$,I,1)."".|
000016B0: CA 28 41 24 2C 49 AA 31 2C 31 29 B2 22 22 A7 38 |.(A$,I.1,1)."".8|
000016C0: 35 33 30 00 DB 1E 27 20 3A 20 20 20 49 4D B2 C6 |530...' : IM..|
000016D0: 28 CA 28 41 24 2C 49 2C 31 29 29 00 F5 1E 28 20 |(.(A$,I,1))...( |
000016E0: 3A 20 20 20 49 4E B2 C6 28 CA 28 41 24 2C 49 AA |: IN..(.(A$,I.|
000016F0: 31 2C 31 29 29 00 19 1F 30 20 3A 20 20 20 8B 49 |1,1))...0 : .I|
00001700: 4D B3 B1 32 39 AF 49 4D B3 B1 33 32 AF 49 4D B3 |M..29.IM..32.IM.|
00001710: B1 31 36 30 A7 38 35 30 30 00 3A 1F 3A 20 3A 20 |.160.8500.:.: : |
00001720: 20 20 8B 49 4E B2 32 39 B0 49 4E B2 33 32 B0 49 | .IN.29.IN.32.I|
00001730: 4E B2 31 36 30 A7 38 35 30 30 00 60 1F 44 20 3A |N.160.8500.`.D :|
00001740: 20 20 20 20 41 24 B2 C8 28 41 24 2C 49 29 AA 22 | A$..(A$,I)."|
00001750: 20 22 AA C9 28 41 24 2C C3 28 41 24 29 AB 49 29 | "..(A$,.(A$).I)|
00001760: 00 91 1F 45 20 3A 20 20 20 8B CA 28 41 24 2C 49 |...E : ..(A$,I|
00001770: 2C 31 29 B2 22 20 22 B0 CA 28 41 24 2C 49 2C 31 |,1)." "..(A$,I,1|
00001780: 29 B2 22 1D 22 A7 49 B2 49 AA 31 3A 89 38 32 36 |).".".I.I.1:.826|
00001790: 31 00 AC 1F 49 20 3A 20 20 20 4C 55 B2 4C 55 AB |1...I : LU.LU.|
000017A0: 31 3A 8B 4C 55 B2 30 A7 38 35 31 30 00 BC 1F 4A |1:.LU.0.8510...J|
000017B0: 20 3A 20 20 20 49 43 B2 49 43 AA 31 00 CA 1F 4E | : IC.IC.1...N|
000017C0: 20 3A 20 20 20 49 B2 49 AA 31 00 D0 1F D0 20 3A | : I.I.1.... :|
000017D0: 00 DA 1F 34 21 49 B2 49 AA 31 00 EC 1F 39 21 8B |...4!I.I.1...9!.|
000017E0: 49 B3 C3 28 41 24 29 A7 38 32 33 30 00 09 20 3E |I..(A$).8230.. >|
000017F0: 21 8B 49 B2 C3 28 41 24 29 AF 4C 55 B1 30 AF 49 |!.I..(A$).LU.0.I|
00001800: 43 B3 B1 30 A7 38 32 32 30 00 19 20 48 21 8D 39 |C..0.8220.. H!.9|
00001810: 30 30 30 3A 8D 39 32 30 30 00 21 20 52 21 82 53 |000:.9200.! R!.S|
00001820: 41 00 29 20 5C 21 89 35 30 00 4E 20 98 21 8F 20 |A.) \!.50.N .!. |
00001830: 49 4E 20 44 49 45 20 4D 49 54 54 45 20 2D 2D 2D |IN DIE MITTE ---|
00001840: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 64 |--------------.d|
00001850: 20 A2 21 99 22 11 42 49 54 54 45 20 57 41 52 54 | .!.".BITTE WART|
00001860: 45 4E 21 22 00 72 20 AC 21 81 53 41 B2 41 4E A4 |EN!".r .!.SA.AN.|
00001870: 45 4E 00 83 20 B6 21 3A 8D 39 30 30 30 3A 8D 39 |EN.. .!:.9000:.9|
00001880: 31 30 30 00 AD 20 BB 21 8B C9 28 41 24 2C 31 29 |100.. .!..(A$,1)|
00001890: B2 C7 28 32 39 29 A7 41 24 B2 C8 28 41 24 2C C3 |..(29).A$..(A$,.|
000018A0: 28 41 24 29 AB 31 29 3A 89 38 36 33 35 00 D7 20 |(A$).1):.8635.. |
000018B0: BC 21 8B C9 28 41 24 2C 31 29 B2 C7 28 33 32 29 |.!..(A$,1)..(32)|
000018C0: A7 41 24 B2 C8 28 41 24 2C C3 28 41 24 29 AB 31 |.A$..(A$,.(A$).1|
000018D0: 29 3A 89 38 36 33 36 00 02 21 BD 21 8B C9 28 41 |):.8636..!.!..(A|
000018E0: 24 2C 31 29 B2 C7 28 31 36 30 29 A7 41 24 B2 C8 |$,1)..(160).A$..|
000018F0: 28 41 24 2C C3 28 41 24 29 AB 31 29 3A 89 38 36 |(A$,.(A$).1):.86|
00001900: 33 37 00 16 21 C0 21 3A 8B C3 28 41 24 29 B2 53 |37..!.!:..(A$).S|
00001910: 4C A7 38 36 38 30 00 38 21 CA 21 3A 41 53 B2 53 |L.8680.8!.!:AS.S|
00001920: 4C AB C3 28 41 24 29 3A 20 8F 20 41 4E 5A 41 48 |L..(A$): . ANZAH|
00001930: 4C 20 53 50 41 43 45 53 00 4E 21 D4 21 3A 41 24 |L SPACES.N!.!:A$|
00001940: B2 C8 28 49 24 2C 41 53 AD 32 29 AA 41 24 00 5F |..(I$,AS.2).A$._|
00001950: 21 DE 21 3A 8D 39 30 30 30 3A 8D 39 32 30 30 00 |!.!:.9000:.9200.|
00001960: 67 21 E8 21 82 53 41 00 6F 21 F2 21 89 35 30 00 |g!.!.SA.o!.!.50.|
00001970: 94 21 28 23 8F 20 50 4F 53 49 54 49 4F 4E 49 45 |.!(#. POSITIONIE|
00001980: 52 45 4E 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |REN ************|
00001990: 2A 2A 2A 2A 00 B2 21 32 23 48 42 25 B2 53 41 AD |****..!2#HB%.SA.|
000019A0: 32 35 36 3A 4C 42 25 B2 53 41 AB 48 42 25 AC 32 |256:LB%.SA.HB%.2|
000019B0: 35 36 00 D6 21 3C 23 98 31 35 2C 22 50 22 3B C7 |56..!<#.15,"P";.|
000019C0: 28 33 29 3B C7 28 4C 42 25 29 3B C7 28 48 42 25 |(3);.(LB%);.(HB%|
000019D0: 29 3B C7 28 31 29 00 E0 21 46 23 84 31 35 2C 41 |);.(1)..!F#.15,A|
000019E0: 00 E6 21 50 23 8E 00 0B 22 8C 23 8F 20 53 41 54 |..!P#...".#. SAT|
000019F0: 5A 20 45 49 4E 4C 45 53 45 4E 20 2A 2A 2A 2A 2A |Z EINLESEN *****|
00001A00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 17 22 96 23 |***********..".#|
00001A10: 8B 41 B2 35 30 A7 8E 00 21 22 A0 23 84 31 2C 41 |.A.50...!".#.1,A|
00001A20: 24 00 27 22 B4 23 8E 00 4C 22 F0 23 8F 20 53 41 |$.'".#..L".#. SA|
00001A30: 54 5A 20 53 43 48 52 45 49 42 45 4E 20 2A 2A 2A |TZ SCHREIBEN ***|
00001A40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 58 22 FA |************.X".|
00001A50: 23 8B 41 B2 35 30 A7 8E 00 7F 22 FB 23 8B 41 24 |#.A.50....".#.A$|
00001A60: B2 22 22 A7 41 24 B2 22 3A 22 3A 8F 20 5A 55 52 |."".A$.":":. ZUR|
00001A70: 20 53 49 43 48 45 52 48 45 49 54 20 21 21 21 00 | SICHERHEIT !!!.|
00001A80: 89 22 04 24 98 31 2C 41 24 00 8F 22 18 24 8E 00 |.".$.1,A$..".$..|
00001A90: B4 22 AC 26 8F 20 42 45 45 4E 44 45 4E 20 2A 2A |.".&. BEENDEN **|
00001AA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001AB0: 2A 2A 2A 2A 00 BC 22 B6 26 A0 20 31 00 C5 22 C0 |****..".&. 1..".|
00001AC0: 26 A0 20 31 35 00 D8 22 CA 26 99 20 22 2B 2B 20 |&. 15..".&. "++ |
00001AD0: 45 4E 44 45 20 2B 2B 22 00 DE 22 D4 26 80 00 2B |ENDE ++"..".&..+|
00001AE0: 23 10 27 8F 20 53 4F 52 54 2D 41 4C 4F 47 41 52 |#.'. SORT-ALOGAR|
00001AF0: 49 54 48 4D 55 53 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |ITHMUS ---------|
00001B00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001B10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001B20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 45 23 1A 27 |-----------.E#.'|
00001B30: 99 22 93 12 44 41 54 45 49 20 53 4F 52 54 49 45 |."..DATEI SORTIE|
00001B40: 52 45 4E 92 22 00 8E 23 74 27 99 22 42 49 54 54 |REN."..#t'."BITT|
00001B50: 45 20 47 45 42 45 4E 20 53 49 45 20 41 4E 46 41 |E GEBEN SIE ANFA|
00001B60: 4E 47 20 55 4E 44 20 45 4E 44 45 20 44 45 53 20 |NG UND ENDE DES |
00001B70: 5A 55 20 20 53 4F 52 54 49 45 52 45 4E 44 45 4E |ZU SORTIERENDEN|
00001B80: 20 42 45 52 45 49 43 48 53 20 41 4E 20 21 00 9F | BEREICHS AN !..|
00001B90: 23 7E 27 85 22 41 4E 46 41 4E 47 22 3B 41 4E 00 |#~'."ANFANG";AN.|
00001BA0: B0 23 88 27 85 22 45 4E 44 45 22 3B 20 20 45 4E |.#.'."ENDE"; EN|
00001BB0: 00 EA 23 8A 27 53 41 B2 41 4E 3A 8D 39 30 30 30 |..#.'SA.AN:.9000|
00001BC0: 3A 8B 41 B2 35 30 A7 99 22 41 4E 46 41 4E 47 53 |:.A.50.."ANFANGS|
00001BD0: 53 41 54 5A 20 45 58 49 53 54 49 45 52 54 20 4E |SATZ EXISTIERT N|
00001BE0: 49 43 48 54 21 22 3A 89 35 30 00 18 24 8C 27 53 |ICHT!":.50..$.'S|
00001BF0: 41 B2 45 4E 3A 8D 39 30 30 30 3A 8B 41 B2 35 30 |A.EN:.9000:.A.50|
00001C00: A7 99 22 45 4E 44 53 41 54 5A 20 5A 55 20 48 4F |.."ENDSATZ ZU HO|
00001C10: 43 48 21 22 3A 89 35 30 00 3F 24 92 27 8B 45 4E |CH!":.50.?$.'.EN|
00001C20: AB 41 4E B1 4D 25 A7 99 22 42 45 52 45 49 43 48 |.AN.M%.."BEREICH|
00001C30: 20 5A 55 20 47 52 4F 53 53 21 22 3A 89 35 30 00 | ZU GROSS!":.50.|
00001C40: 6D 24 97 27 99 22 11 42 49 54 54 45 20 4D 41 52 |m$.'.".BITTE MAR|
00001C50: 4B 49 45 52 45 4E 20 53 49 45 20 44 45 4E 20 42 |KIEREN SIE DEN B|
00001C60: 45 52 45 49 43 48 20 49 4E 4E 45 52 2D 00 9E 24 |EREICH INNER-..$|
00001C70: 98 27 99 22 48 41 4C 42 20 44 45 52 20 53 54 52 |.'."HALB DER STR|
00001C80: 49 4E 47 53 20 4E 41 43 48 20 44 45 4D 20 44 49 |INGS NACH DEM DI|
00001C90: 45 20 53 4F 52 54 49 45 52 55 4E 47 22 3B 00 B4 |E SORTIERUNG";..|
00001CA0: 24 99 27 99 22 45 52 46 4F 4C 47 45 4E 20 53 4F |$.'."ERFOLGEN SO|
00001CB0: 4C 4C 21 22 00 ED 24 9A 27 53 41 B2 41 4E 3A 8D |LL!"..$.'SA.AN:.|
00001CC0: 39 30 30 30 3A 8D 39 31 30 30 3A 8B 41 B2 35 30 |9000:.9100:.A.50|
00001CD0: A7 99 22 53 41 54 5A 20 45 58 49 53 54 49 45 52 |.."SATZ EXISTIER|
00001CE0: 54 20 4E 49 43 48 54 21 22 3A 89 35 30 00 03 25 |T NICHT!":.50..%|
00001CF0: 9B 27 49 47 B2 AB 31 3A 8D 36 30 30 30 30 3A 49 |.'IG..1:.60000:I|
00001D00: 47 B2 30 00 1E 25 9C 27 49 43 B2 30 3A 81 53 41 |G.0..%.'IC.0:.SA|
00001D10: B2 41 4E A4 45 4E 3A 49 43 B2 49 43 AA 31 00 5A |.AN.EN:IC.IC.1.Z|
00001D20: 25 A1 27 3A 8D 39 30 30 30 3A 8D 39 31 30 30 3A |%.':.9000:.9100:|
00001D30: 8B 41 B2 35 30 A7 99 22 53 41 54 5A 4E 55 4D 4D |.A.50.."SATZNUMM|
00001D40: 45 52 20 5A 55 20 48 4F 43 48 21 22 3A 53 41 B2 |ER ZU HOCH!":SA.|
00001D50: 45 4E AA 31 3A 89 31 30 31 35 00 69 25 A2 27 3A |EN.1:.1015.i%.':|
00001D60: 4D 24 28 49 43 29 B2 41 24 00 71 25 A6 27 82 53 |M$(IC).A$.q%.'.S|
00001D70: 41 00 8F 25 C4 27 5A B2 30 3A 4C 47 28 31 29 B2 |A..%.'Z.0:LG(1).|
00001D80: 31 3A 52 47 28 31 29 B2 45 4E AB 41 4E AA 31 00 |1:RG(1).EN.AN.1.|
00001D90: A1 25 CE 27 8D 31 30 32 30 30 3A 89 31 30 34 30 |.%.'.10200:.1040|
00001DA0: 30 00 C4 25 D8 27 8F 20 20 51 55 49 43 4B 53 4F |0..%.'. QUICKSO|
00001DB0: 52 54 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |RT -------------|
00001DC0: 2D 2D 2D 2D 00 E2 25 E2 27 5A B2 5A AA 31 3A 8B |----..%.'Z.Z.1:.|
00001DD0: 4C 47 28 5A 29 B1 B2 52 47 28 5A 29 A7 31 30 33 |LG(Z)..RG(Z).103|
00001DE0: 35 30 00 F6 25 EC 27 58 B2 4C 47 28 5A 29 3A 59 |50..%.'X.LG(Z):Y|
00001DF0: B2 52 47 28 5A 29 00 24 26 F6 27 56 47 24 B2 CA |.RG(Z).$&.'VG$..|
00001E00: 28 4D 24 28 B5 28 28 58 AA 59 29 AD 32 29 29 2C |(M$(.((X.Y).2)),|
00001E10: 4D 41 28 31 29 2C 4D 42 28 31 29 AB 4D 41 28 31 |MA(1),MB(1).MA(1|
00001E20: 29 AA 31 29 00 35 26 00 28 8B 20 58 B1 59 20 A7 |).1).5&.(. X.Y .|
00001E30: 31 30 33 33 30 00 69 26 0A 28 8B 20 CA 28 4D 24 |10330.i&.(. .(M$|
00001E40: 28 58 29 2C 4D 41 28 31 29 2C 4D 42 28 31 29 AB |(X),MA(1),MB(1).|
00001E50: 4D 41 28 31 29 AA 31 29 B3 56 47 24 A7 58 B2 58 |MA(1).1).VG$.X.X|
00001E60: AA 31 3A 89 31 30 32 35 30 00 9D 26 14 28 8B 20 |.1:.10250..&.(. |
00001E70: CA 28 4D 24 28 59 29 2C 4D 41 28 31 29 2C 4D 42 |.(M$(Y),MA(1),MB|
00001E80: 28 31 29 AB 4D 41 28 31 29 AA 31 29 B1 56 47 24 |(1).MA(1).1).VG$|
00001E90: A7 59 B2 59 AB 31 3A 89 31 30 32 36 30 00 AD 26 |.Y.Y.1:.10260..&|
00001EA0: 1E 28 8B 20 58 B1 59 A7 31 30 33 33 30 00 CF 26 |.(. X.Y.10330..&|
00001EB0: 28 28 53 24 B2 4D 24 28 58 29 3A 4D 24 28 58 29 |((S$.M$(X):M$(X)|
00001EC0: B2 4D 24 28 59 29 3A 4D 24 28 59 29 B2 53 24 00 |.M$(Y):M$(Y).S$.|
00001ED0: E6 26 32 28 58 B2 58 AA 31 3A 59 B2 59 AB 31 3A |.&2(X.X.1:Y.Y.1:|
00001EE0: 89 31 30 32 34 30 00 09 27 5A 28 52 47 28 5A AA |.10240..'Z(RG(Z.|
00001EF0: 31 29 B2 59 3A 4C 47 28 5A AA 31 29 B2 4C 47 28 |1).Y:LG(Z.1).LG(|
00001F00: 5A 29 3A 8D 31 30 32 31 30 00 2C 27 64 28 4C 47 |Z):.10210.,'d(LG|
00001F10: 28 5A AA 31 29 B2 58 3A 52 47 28 5A AA 31 29 B2 |(Z.1).X:RG(Z.1).|
00001F20: 52 47 28 5A 29 3A 8D 31 30 32 31 30 00 38 27 6E |RG(Z):.10210.8'n|
00001F30: 28 5A B2 5A AB 31 3A 8E 00 4A 27 A0 28 8F 20 41 |(Z.Z.1:..J'.(. A|
00001F40: 42 53 50 45 49 43 48 45 52 4E 00 65 27 AA 28 49 |BSPEICHERN.e'.(I|
00001F50: 43 B2 30 3A 81 53 41 B2 41 4E A4 45 4E 3A 49 43 |C.0:.SA.AN.EN:IC|
00001F60: B2 49 43 AA 31 00 80 27 B4 28 3A 8D 39 30 30 30 |.IC.1..'.(:.9000|
00001F70: 3A 41 24 B2 4D 24 28 49 43 29 3A 8D 39 32 30 30 |:A$.M$(IC):.9200|
00001F80: 00 88 27 BE 28 82 53 41 00 90 27 04 29 89 35 30 |..'.(.SA..'.).50|
00001F90: 00 DD 27 20 4E 8F 20 4B 4F 52 52 45 4B 54 55 52 |..' N. KORREKTUR|
00001FA0: 2D 52 4F 55 54 49 4E 45 20 2D 2D 2D 2D 2D 2D 2D |-ROUTINE -------|
00001FB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001FC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001FD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 FF 27 |-------------..'|
00001FE0: 21 4E 81 49 B2 30 A4 C3 28 42 45 24 29 3A 99 C7 |!N.I.0..(BE$):..|
00001FF0: 28 32 30 29 3B 3A 82 49 3A 42 45 24 B2 22 22 00 |(20);:.I:BE$."".|
00002000: 21 28 2A 4E 53 41 B2 53 41 AA 53 43 20 20 20 20 |!(*NSA.SA.SC |
00002010: 20 20 20 3A 20 8F 20 54 45 58 54 5A 45 49 47 45 | : . TEXTZEIGE|
00002020: 52 00 3B 28 2F 4E 8B 53 41 B3 30 A7 53 41 B2 30 |R.;(/N.SA.0.SA.0|
00002030: 20 3A 20 8F 20 53 50 45 52 52 45 00 5C 28 34 4E | : . SPERRE.\(4N|
00002040: 8D 20 39 30 30 30 20 20 20 20 20 3A 20 8F 20 50 |. 9000 : . P|
00002050: 4F 53 49 54 49 4F 4E 49 45 52 45 4E 00 76 28 39 |OSITIONIEREN.v(9|
00002060: 4E 8B 41 B2 35 30 A7 53 41 B2 53 41 AB 53 43 3A |N.A.50.SA.SA.SC:|
00002070: 89 32 30 30 32 30 00 80 28 48 4E 84 31 2C 41 24 |.20020..(HN.1,A$|
00002080: 00 86 28 5C 4E 8E 00 D3 28 30 75 8F 20 44 49 52 |..(\N...(0u. DIR|
00002090: 45 43 54 4F 52 59 20 45 49 4E 4C 45 53 45 4E 20 |ECTORY EINLESEN |
000020A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000020B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000020C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000020D0: 2D 2D 2D 00 F2 28 3A 75 99 22 93 12 49 4E 48 41 |---..(:u."..INHA|
000020E0: 4C 54 53 56 45 52 5A 45 49 43 48 4E 49 53 3A 11 |LTSVERZEICHNIS:.|
000020F0: 92 22 00 0A 29 9E 75 98 31 35 2C 22 49 4F 22 3A |."..).u.15,"IO":|
00002100: 9F 32 2C 38 2C 32 2C 22 23 22 00 17 29 A8 75 54 |.2,8,2,"#"..).uT|
00002110: B2 31 38 3A 53 B2 31 00 2C 29 B2 75 98 31 35 2C |.18:S.1.,).u.15,|
00002120: 22 55 31 22 3B 32 3B 30 3B 54 3B 53 00 3E 29 BC |"U1";2;0;T;S.>).|
00002130: 75 98 31 35 2C 22 42 2D 50 22 3B 32 3B 30 00 58 |u.15,"B-P";2;0.X|
00002140: 29 C6 75 A1 23 32 2C 58 24 3A 8B 58 24 B2 22 22 |).u.#2,X$:.X$.""|
00002150: A7 58 24 B2 C7 28 30 29 00 64 29 D0 75 54 B2 C6 |.X$..(0).d).uT..|
00002160: 28 58 24 29 00 7E 29 DA 75 A1 23 32 2C 58 24 3A |(X$).~).u.#2,X$:|
00002170: 8B 58 24 B2 22 22 A7 58 24 B2 C7 28 30 29 00 8A |.X$."".X$..(0)..|
00002180: 29 E4 75 53 B2 C6 28 58 24 29 00 95 29 EE 75 81 |).uS..(X$)..).u.|
00002190: 58 B2 30 A4 37 00 AC 29 F0 75 98 31 35 2C 22 42 |X.0.7..).u.15,"B|
000021A0: 2D 50 22 3B 32 3B 58 AC 33 32 AA 32 00 C6 29 F2 |-P";2;X.32.2..).|
000021B0: 75 A1 23 32 2C 58 24 3A 8B 58 24 B2 22 22 A7 58 |u.#2,X$:.X$."".X|
000021C0: 24 B2 C7 28 30 29 00 D9 29 F4 75 8B C6 28 58 24 |$..(0)..).u..(X$|
000021D0: 29 B2 30 A7 33 30 32 39 30 00 F0 29 F8 75 98 31 |).0.30290..).u.1|
000021E0: 35 2C 22 42 2D 50 22 3B 32 3B 58 AC 33 32 AA 35 |5,"B-P";2;X.32.5|
000021F0: 00 FB 29 02 76 46 46 24 B2 22 22 00 07 2A 0C 76 |..).vFF$.""..*.v|
00002200: 81 59 B2 30 A4 31 35 00 21 2A 16 76 A1 23 32 2C |.Y.0.15.!*.v.#2,|
00002210: 58 24 3A 8B 58 24 B2 22 22 A7 58 24 B2 C7 28 30 |X$:.X$."".X$..(0|
00002220: 29 00 36 2A 20 76 8B C6 28 58 24 29 B2 31 36 30 |).6* v..(X$).160|
00002230: A7 33 30 32 37 30 00 45 2A 2A 76 46 46 24 B2 46 |.30270.E**vFF$.F|
00002240: 46 24 AA 58 24 00 4C 2A 34 76 82 59 00 66 2A 3E |F$.X$.L*4v.Y.f*>|
00002250: 76 8B 41 B2 30 A7 41 B2 31 3A 99 46 46 24 3B 3A |v.A.0.A.1:.FF$;:|
00002260: 89 33 30 32 39 30 00 7D 2A 48 76 41 B2 30 3A 99 |.30290.}*HvA.0:.|
00002270: A3 31 39 29 3B 22 A7 20 22 3B 46 46 24 00 84 2A |.19);". ";FF$..*|
00002280: 52 76 82 58 00 94 2A 5C 76 8B 54 B3 B1 30 A7 33 |Rv.X..*\v.T..0.3|
00002290: 30 31 33 30 00 9D 2A 66 76 A0 32 3A 99 00 A5 2A |0130..*fv.2:...*|
000022A0: 7A 76 89 35 30 00 F2 2A 50 C3 8F 20 54 45 58 54 |zv.50..*P.. TEXT|
000022B0: 45 49 4E 47 41 42 45 20 2D 2D 2D 2D 2D 2D 2D 2D |EINGABE --------|
000022C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000022D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000022E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000022F0: 2D 2D 00 23 2B 52 C3 8B 41 52 B2 31 A7 41 52 B2 |--.#+R..AR.1.AR.|
00002300: 30 3A 41 24 B2 22 12 53 41 54 5A 4E 55 4D 4D 45 |0:A$.".SATZNUMME|
00002310: 52 20 5A 55 20 48 4F 43 48 21 92 22 3A 89 35 30 |R ZU HOCH!.":.50|
00002320: 30 30 37 00 33 2B 56 C3 8D 39 30 30 30 3A 8D 39 |007.3+V..9000:.9|
00002330: 31 30 30 00 76 2B 57 C3 99 22 13 20 20 20 20 20 |100.v+W..". |
00002340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002360: 20 20 20 22 3B 3A 99 22 13 12 53 41 54 5A 22 3B | ";:."..SATZ";|
00002370: 53 41 3B 22 92 22 00 AA 2B 58 C3 99 22 20 20 20 |SA;"."..+X.." |
00002380: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000023A0: 20 20 20 20 20 91 22 3B 41 24 00 DB 2B 59 C3 99 | .";A$..+Y..|
000023B0: 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |"...............|
000023C0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000023D0: A3 A3 A3 A3 A3 A3 A3 A3 A3 22 3B 00 E4 2B 5A C3 |.........";..+Z.|
000023E0: 99 22 11 22 00 13 2C 64 C3 42 45 24 B2 22 22 3A |."."..,d.BE$."":|
000023F0: 97 31 39 38 2C 30 3A 97 32 31 31 2C 30 3A 97 32 |.198,0:.211,0:.2|
00002400: 31 34 2C 32 32 3A 9E 35 38 37 33 32 3A 99 22 9E |14,22:.58732:.".|
00002410: A4 22 3B 00 2B 2C 6E C3 A1 58 24 3A 8B C2 28 32 |.";.+,n..X$:..(2|
00002420: 30 33 29 B2 31 A7 35 30 31 32 30 00 5E 2C 73 C3 |03).1.50120.^,s.|
00002430: 8B 20 C2 28 32 30 33 29 B2 37 AF C2 28 36 35 33 |. .(203).7..(653|
00002440: 29 B2 30 20 A7 20 53 43 B2 31 20 3A 20 8D 20 32 |).0 . SC.1 : . 2|
00002450: 30 30 30 30 20 3A 20 89 20 35 30 30 30 30 00 92 |0000 : . 50000..|
00002460: 2C 75 C3 8B 20 C2 28 32 30 33 29 B2 37 AF C2 28 |,u.. .(203).7..(|
00002470: 36 35 33 29 B2 31 20 A7 20 53 43 B2 AB 31 20 3A |653).1 . SC..1 :|
00002480: 20 8D 20 32 30 30 30 30 20 3A 20 89 20 35 30 30 | . 20000 : . 500|
00002490: 30 30 00 A3 2C 78 C3 8B 58 24 B2 22 22 A7 35 30 |00..,x..X$."".50|
000024A0: 30 33 30 00 C0 2C 82 C3 8B C3 28 42 45 24 29 B2 |030..,....(BE$).|
000024B0: 30 AF C6 28 58 24 29 B2 32 30 A7 35 30 30 33 30 |0..(X$).20.50030|
000024C0: 00 EB 2C 8C C3 49 B2 C6 28 58 24 29 3A 8B 49 B3 |..,..I..(X$):.I.|
000024D0: 33 32 B0 49 B1 31 33 33 AF 49 B3 31 35 39 A7 8B |32.I.133.I.159..|
000024E0: 49 B3 B1 32 30 A7 35 30 30 33 30 00 06 2D 96 C3 |I..20.50030..-..|
000024F0: 8B C3 28 42 45 24 29 B2 53 4C AF 49 B3 B1 32 30 |..(BE$).SL.I..20|
00002500: A7 35 30 30 33 30 00 19 2D 9B C3 8B 58 24 B2 22 |.50030..-...X$."|
00002510: 20 22 A7 58 24 B2 22 1D 22 00 28 2D A0 C3 42 45 | ".X$.".".(-..BE|
00002520: 24 B2 42 45 24 AA 58 24 00 3B 2D AA C3 99 C7 28 |$.BE$.X$.;-....(|
00002530: 32 30 29 3B 58 24 3B 22 A4 22 3B 00 60 2D B4 C3 |20);X$;".";.`-..|
00002540: 8B 49 B2 32 30 A7 42 45 24 B2 C8 28 42 45 24 2C |.I.20.BE$..(BE$,|
00002550: C3 28 42 45 24 29 AB 32 29 3A 89 35 30 30 33 30 |.(BE$).2):.50030|
00002560: 00 6B 2D BE C3 89 35 30 30 33 30 00 7B 2D C8 C3 |.k-...50030.{-..|
00002570: 99 22 9D 20 22 3A 8D 39 30 30 30 00 8F 2D D2 C3 |.". ":.9000..-..|
00002580: 8B 42 45 24 B2 22 22 A7 42 45 24 B2 22 3A 22 00 |.BE$."".BE$.":".|
00002590: B2 2D DC C3 99 22 13 11 11 11 11 11 11 11 11 11 |.-..."..........|
000025A0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |..............."|
000025B0: 3A 8E 00 FF 2D 60 EA 8F 20 4D 41 52 4B 49 45 52 |:...-`.. MARKIER|
000025C0: 45 4E 20 57 49 45 20 44 41 54 49 45 52 54 20 57 |EN WIE DATIERT W|
000025D0: 49 52 44 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |IRD ------------|
000025E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000025F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
00002600: 20 2E 6A EA 49 24 B2 41 24 3A 81 49 B2 31 A4 C3 | .j.I$.A$:.I.1..|
00002610: 28 49 24 29 3A 4D 24 28 49 29 B2 22 30 22 3A 82 |(I$):M$(I)."0":.|
00002620: 00 2B 2E 74 EA 49 4D B2 31 3A 99 00 4A 2E 79 EA |.+.t.IM.1:..J.y.|
00002630: 99 49 24 3A 81 49 B2 31 A4 C3 28 49 24 29 3A 99 |.I$:.I.1..(I$):.|
00002640: 4D 24 28 49 29 3B 3A 82 3A 99 00 74 2E 7E EA 99 |M$(I);:.:..t.~..|
00002650: 22 11 45 44 49 54 20 20 20 3E 22 3B CA 28 49 24 |".EDIT >";.(I$|
00002660: 2C 49 4D 2C 31 29 3B 22 3C 20 20 20 20 12 22 49 |,IM,1);"< ."I|
00002670: 4D 22 92 22 00 8D 2E 83 EA 49 B2 C2 28 32 30 33 |M".".....I..(203|
00002680: 29 3A 8B 49 B2 36 34 A7 36 30 30 33 35 00 B8 2E |):.I.64.60035...|
00002690: 88 EA 8B 49 B2 32 AF C2 28 36 35 33 29 B2 30 AF |...I.2..(653).0.|
000026A0: 49 4D B3 B1 C3 28 49 24 29 A7 49 4D B2 49 4D AA |IM...(I$).IM.IM.|
000026B0: 31 3A 89 36 30 30 37 30 00 DF 2E 8A EA 8B 49 B2 |1:.60070......I.|
000026C0: 32 AF C2 28 36 35 33 29 B2 31 AF 49 4D B3 B1 31 |2..(653).1.IM..1|
000026D0: A7 49 4D B2 49 4D AB 31 3A 89 36 30 30 37 30 00 |.IM.IM.1:.60070.|
000026E0: FB 2E 8D EA 8B 49 B2 35 36 A7 4D 24 28 49 4D 29 |.....I.56.M$(IM)|
000026F0: B2 22 31 22 3A 89 36 30 30 37 30 00 17 2F 97 EA |."1":.60070../..|
00002700: 8B 49 B2 33 35 A7 4D 24 28 49 4D 29 B2 22 30 22 |.I.35.M$(IM)."0"|
00002710: 3A 89 36 30 30 37 30 00 26 2F 98 EA 8B 49 B2 31 |:.60070.&/...I.1|
00002720: A7 36 30 31 30 30 00 31 2F 9C EA 89 36 30 30 33 |.60100.1/...6003|
00002730: 35 00 77 2F A6 EA 99 22 91 20 20 20 20 20 20 20 |5.w/...". |
00002740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002750: 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ..............|
00002760: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 91 91 91 22 3B |..............";|
00002770: 3A 89 36 30 30 32 35 00 87 2F C4 EA 8F 20 55 4D |:.60025../... UM|
00002780: 52 45 43 48 4E 45 4E 00 A5 2F C6 EA 81 49 B2 31 |RECHNEN../...I.1|
00002790: A4 33 3A 4D 41 28 49 29 B2 30 3A 4D 42 28 49 29 |.3:MA(I).0:MB(I)|
000027A0: B2 30 3A 82 49 00 B1 2F C9 EA 81 49 49 B2 31 A4 |.0:.I../...II.1.|
000027B0: 33 00 E5 2F CE EA 3A 81 49 B2 31 A4 C3 28 49 24 |3../..:.I.1..(I$|
000027C0: 29 3A 8B 4D 41 28 49 49 29 B2 30 AF 4D 24 28 49 |):.MA(II).0.M$(I|
000027D0: 29 B2 C9 28 C4 28 49 49 29 2C 31 29 A7 4D 41 28 |)..(.(II),1).MA(|
000027E0: 49 49 29 B2 49 00 EC 2F D1 EA 82 49 00 01 30 D3 |II).I../...I..0.|
000027F0: EA 3A 8B 4D 41 28 49 49 29 B2 30 A7 36 30 31 35 |.:.MA(II).0.6015|
00002800: 30 00 17 30 D8 EA 3A 20 20 20 4D 42 28 49 49 29 |0..0..: MB(II)|
00002810: B2 4D 41 28 49 49 29 00 3D 30 DD EA 3A 20 20 20 |.MA(II).=0..: |
00002820: 4D 42 28 49 49 29 B2 4D 42 28 49 49 29 AA 31 3A |MB(II).MB(II).1:|
00002830: 8F 50 52 49 4E 54 2C 4D 42 28 49 49 29 00 74 30 |.PRINT,MB(II).t0|
00002840: E2 EA 3A 20 20 20 8B 4D 24 28 4D 42 28 49 49 29 |..: .M$(MB(II)|
00002850: 29 B3 B1 C9 28 C4 28 49 49 29 2C 31 29 A7 4D 42 |)...(.(II),1).MB|
00002860: 28 49 49 29 B2 4D 42 28 49 49 29 AB 31 3A 89 36 |(II).MB(II).1:.6|
00002870: 30 31 35 30 00 90 30 E7 EA 3A 20 20 20 8B 4D 42 |0150..0..: .MB|
00002880: 28 49 49 29 B2 C3 28 49 24 29 A7 36 30 31 35 30 |(II)..(I$).60150|
00002890: 00 9F 30 EC EA 3A 20 20 20 89 36 30 31 32 35 00 |..0..: .60125.|
000028A0: A7 30 F6 EA 82 49 49 00 E5 30 0A EB 99 22 44 49 |.0...II..0..."DI|
000028B0: 45 20 53 4F 52 54 49 45 52 55 4E 47 20 45 52 46 |E SORTIERUNG ERF|
000028C0: 4F 4C 47 54 20 4E 41 43 48 20 46 4F 4C 47 45 4E |OLGT NACH FOLGEN|
000028D0: 44 45 4D 20 20 20 53 54 52 49 4E 47 42 45 52 45 |DEM STRINGBERE|
000028E0: 49 43 48 3A 22 00 0A 31 14 EB 99 22 12 22 CA 28 |ICH:"..1...".".(|
000028F0: 49 24 2C 4D 41 28 31 29 2C 4D 42 28 31 29 AB 4D |I$,MA(1),MB(1).M|
00002900: 41 28 31 29 AA 31 29 22 92 22 00 10 31 1E EB 8E |A(1).1)"."..1...|
00002910: 00 5D 31 48 EE 8F 20 46 4C 4F 50 50 59 2D 46 45 |.]1H.. FLOPPY-FE|
00002920: 48 4C 45 52 4B 41 4E 41 4C 20 4C 45 53 45 4E 20 |HLERKANAL LESEN |
00002930: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002940: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002950: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 81 31 |-------------..1|
00002960: 4D EE 99 22 93 12 46 4C 4F 50 50 59 2D 46 45 48 |M.."..FLOPPY-FEH|
00002970: 4C 45 52 4B 41 4E 41 4C 41 42 46 52 41 47 45 92 |LERKANALABFRAGE.|
00002980: 22 00 92 31 52 EE 84 31 35 2C 41 2C 42 24 2C 43 |"..1R..15,A,B$,C|
00002990: 2C 44 00 A0 31 5C EE 99 41 2C 42 24 2C 43 2C 44 |,D..1\..A,B$,C,D|
000029A0: 00 A8 31 70 EE 89 35 30 00 00 00 |..1p..50... |
..).... ********************************
*.Q.... * TEXTEDITOR V.III.4
*.Y.... * <C> 1985
*...... * VON MICHAEL NICKLES
*.I.... ********************************
*......IM.1..648,204:.53272,56:.56576,0:
.".":.20......53280,0:.53281,0:."..";.8.
..M%.300:. M$(M%),M(M%):. PUFFER.[....LG
(100),RG(100) :. Q.SORT...... ANFANG
SMENUE ---------------------------------
---------------------------......"..
TEXTEDITOR - VERSION 3 .";.
.....". <C> 1985 VON MICHAEL NICKLES
.";.<....".. ALTE DATEI EDITI
EREN - 'A'.D...." NEUE DATEI EROEF
FNEN - 'N'......". D.Z.SATZ LADEN
- 'D'......I$:.B(203).1.I$."A".F
....I$.."A".I$.."N".I$.."D".25......I$."
D".IM.1:."D.Z.SATZ",8,1......198,0:."..D
ATEINAME *...";D$:.198,0.O...."SATZLAEN
GE 40....";SL:.SL.1.SL.254.."GEHT NICHT
!":.30.^....I$."A".40......"SATZANZAHL
";SN:HB..(SN.255):LB.SN.HB.255.F. .."BIT
TE LEERE DISK EINLEGEN <RETURN>":.198,0:
.198,1.S.!..15,8,15...#..15,"I0":.1,8,3,
D$.",L,".G(SL)...$..15,"P";G(3);G(LB);G(
HB);G(1).&.%..1,G(255).1.&. 1: 15.?.(..
15,8,15.Y.)..15,"I0":. 1,8,3,D$:....2..
ZWISCHENMENUE --------------------------
---------------------------------...3.."
.S / L / V / O / D / I / Z / F / ENDE
.";...4..I$:.I$."".52...5..I$."E"..".";
:.9900...6..I$."V"..".";:.6000.7.7..I$."
O"..".";:.10000.O.8..I$."D"..".";:.7000.
H.9..I$."I"..".";:.30000...:..I$."Z"..".
";:.8000...;..I$."F"..".";:.61000...<..I
$.."S".I$.."L".52.X.=.."SATZNR";SA:. SA.
0 . SA.63000 .60...@..I$."L"..".";:.2000
...B..I$."S"..".";:MO.1:.3000...F.. 50.D
.P.. LESEN -----------------------------
------------------------------------...Q
.:."..";SA;".-";D(SA.20);" ."...U.IA.SA.
..W.. SA.IA . IA.20...Z.: .9000:.9100.P.
..: .A.50.SA.IA.21:.2045.....: .C(A$).40
..A$.....: .C(A$)..40..A$;......:..#....
A.50.."SATZNUMMER ZU HOCH!".,.... 50.Z..
.. SCHREIBEN ---------------------------
----------------------------------......
"EINGABESATZ //=KEINE EINGABE"...B..900
0 :. POSITIONIEREN...L..A.50.."SATZNUM
MER ZU HOCH!":.50 :. FEHLERK
ANALABFR..D.V..50000:A$.BE$
:. INPUT-ROUT..A..
..A$."//".MO.0:.50:. ENDE.}....9200 :.
A$ SCHREIBEN.....SA.SA.1 :. NAECHST
ER SATZ......3010 :. NEXT (LOOP)...P.
. VERSETZEN ----------------------------
---------------------------------...R.."
..VERSETZEN.".C.Z..".BITTE GEBEN SIE ANF
ANG UND ENDE DES BE- REICHES AN, DEN SIE
";.}..."VERSETZEN WOLLEN !"......198,0
:.".ANFANG";AN.M....198,0:."ENDE";EN:.AN
.EN.."DAS IST UNSINN !":.6020.....SA.AN:
.9000:.A.50.."ANFANGSSATZ EXISTIERT NICH
T!":.50.5...SA.EN:.9000:.A.50.."ENDSATZ
ZU HOCH!":.50.N....".QUELLDATEI = ";D$..
....198,0:."ZIELDATEI ";Z$:. Z$."". Z$.D
$:."..............";D$.M....".BITTE ANFA
NG DES NEUEN BEREICHS ANGEBEN!";:.198,0:
.NB:......SA.NB:.9000:.A.50.."NEUER ANFA
NGSSATZ ZU HOCH!":.50.:...SA.NB.EN.AN:.9
000:.A.50.."BEREICH ZU GROSS!":.50.O....
"BITTE WARTEN!".....SA.AN:IM.0:.AN.EN.."
*** FERTIG ***":.198,0:.198,1:.50......9
000:.9100:.A.50.6100.....M$(SA.AN).A$.E.
...SA.EN.6100......SA.AN.M%.IM.1:.6100:.
*.....SA.SA.1:.6038...T.. TRANSPORT.=..
.."BITTE DISK MIT ZIELDATEI EINLEGEN !":
.198,0:.198,1.W... 1:.15,"I0":.1,8,3,Z$.
P.8.SA.NB:.9000:.A.50.50...=.II.EN.AN:.I
M.1.II.M%:. *...G..I.0.II...L.A$.M$(I):.
A$."".A$.":".J.Q..9200:. SCHREIBEN...`.S
A.SA.1:.I:.IM..0.6260.#.J.."BITTE DISK M
IT QUELLDATEI EINLEGEN !":.198,0:.198,1:
.50.A.T.AN.AN.M%:NB.NB.M%:."BITTE DISK M
IT QUELLDATEI EINLEGEN !"...~..198,0:.19
8,1: 1:.15,"I0":.1,8,3,D$:.6036:. *...X.
. PRINTER-ROUTINE ----------------------
---------------------------------...Y.."
..PRINTER-ROUTINE MPS 801..+.Z..".ANFANG
";AN:."ENDE";EN:.AN.EN.7000.E.].SA.AN:.9
000:.A.50.."ANFANGSSATZ EXISTIERT NICHT!
":.50...^.SA.EN:.9000:.A.50.."ENDSATZ ZU
HOCH!":.50...A.:.".BITTE WAEHLEN SIE:..
J.B..,"NORMALE AUSGABE ..1...C..,"D.Z.S.
AUSGABE ...2...D..,"EIGENE ROUTINE ...3
...E..I$:.E(I$).1.E(I$).3.7013./.F..I$."
2".7100.@.G..I$."3".7500.E.L.. NORMALE A
USGABE --------------...M..3,4,7:SA.AN:.
9000:.SA.AN.EN:.9100...Q..A.50.."SATZNUM
MER ZU HOCH!":SA.EN.1:.7045...{..3,I("
".D(SA),3);" ";...|.I$."":.I.1.C(A$)
...}.:.J(A$,I,1).".".I$.I$." ":.7040.).~
.:I$.I$.J(A$,I,1).6....I:.3,I$.G....SA:
3:.:.50.L.... D.Z.SATZ AUSGABE ---------
----......3,4,7:SA.AN:.9000:.SA.AN.EN:.9
100.B....A.50.SA.EN.1:."SATZNUMMER ZU HO
CH!":.7170...F..3,I(" ".D(SA),4);"
";...P.I$."":.I.1.C(A$):.A$."".7160...U
.IM.F(J(A$,I,1)).;.V..IM.64.IM.91.IM.96.
IM.123.7160.X.Z..IM.64.I$.I$.G(34):.7170
.S....IM.29.I$.I$." ":.7170......IM.173.
I$.I$."AE":.7170......IM.174.I$.I$."SS":
.7170.J....IM.176.I$.I$."AE":.7170......
IM.181.I$.I$."UE":.7170......IM.182.I$.I
$."OE":.7170.!....IM.184.I$.I$."UE":.717
0.>....IM.185.I$.I$."OE":.7170.[....IM.9
4.I$.I$.":" :.7170.X....IM.95.I$.I$.","
:.7170.....I$.I$.G(IM)......I:.3,I$,G(
13);......SA: 3:.:.50.R.L.. EIGENE ROUTI
NE ---------------...V..".SIE HABEN NOCH
KEINE EIGENE PRINTER- ROUTINE DEFFIN
IERT!":.50.H.@.. TEXT ZENTRIEREN -------
----------------------------------------
--------...A.I$."":.I.1.10:I$.I$."......
..............":.I...B..SL=27...E..DIMM$
(300):GOTO8100.S.J..".ZENTRIEREN.."...O.
."BITTE GEBEN SIE ANFANG UND ENDE DES
BEREICHES AN, DER ZENTRIERT";.4.Q.." W
ERDEN SOLL!".Z.T.."ANFANG";AN:."ENDE";EN
:.AN.EN.50...Y.SA.AN:.9000:.A.50.."ANFAN
GSSATZ EXISTIERT NICHT!":.50.B.^.SA.EN:.
9000:.A.50.."ENDSATZ ZU HOCH!":.50...H..
".LINKS-RECHTS BUENDIG ZENTRIEREN - '1'
...M..".IN DIE MITTE ZENTRIEREN
- '2'.?.R..II$:.II$.."1".II$.."2".8050.
Q.|..II$."2".8600.V.... LINKS-RECHTS BUE
NDIG ---------......".BITTE WARTEN!"....
..SA.AN.EN.....: .9000:.9100:.A$:.C(A$).
....: .I(A$,1).G(29).A$.H(A$,C(A$).1):.8
120.....: .I(A$,1).G(32).A$.H(A$,C(A$).1
):.8122.<...: .I(A$,1).G(160).A$.H(A$,C(
A$).1):.8123.Q.B.: .C(A$).SL.8520.N.. :
LU.SL.C(A$):."LU=";LU.... : I.1:IC.0:.
BEGIN LOOP -------.... :.C.& : .J(A$,
I,1)."".J(A$,I.1,1)."".8530...' : IM.F
(J(A$,I,1))...( : IN.F(J(A$,I.1,1))...
0 : .IM..29.IM..32.IM..160.8500.:.: :
.IN.29.IN.32.IN.160.8500.`.D : A$.H
(A$,I)." ".I(A$,C(A$).I)...E : .J(A$,I
,1)." ".J(A$,I,1).".".I.I.1:.8261...I :
LU.LU.1:.LU.0.8510...J : IC.IC.1.J.N
: I.I.1.P.P :.Z.4!I.I.1...9!.I.C(A$).
8230.. >!.I.C(A$).LU.0.IC..0.8220.. H!.9
000:.9200.! R!.SA.) \!.50.N .!. IN DIE M
ITTE -----------------.D .!.".BITTE WART
EN!".R .!.SA.AN.EN.. .!:.9000:.9100.. .!
.I(A$,1).G(29).A$.H(A$,C(A$).1):.8635.W
.!.I(A$,1).G(32).A$.H(A$,C(A$).1):.8636.
.!.!.I(A$,1).G(160).A$.H(A$,C(A$).1):.86
37..!.!:.C(A$).SL.8680.8!J!:AS.SL.C(A$):
. ANZAHL SPACES.N!T!:A$.H(I$,AS.2).A$._
!.!:.9000:.9200.G!.!.SA.O!.!.50..!(#. PO
SITIONIEREN ****************..!2#HB%.SA.
256:LB%.SA.HB%.256.V!<#.15,"P";G(3);G(LB
%);G(HB%);G(1)..!F#.15,A..!P#...".#. SAT
Z EINLESEN ****************..".#.A.50...
!" #.1,A$.'".#..L".#. SATZ SCHREIBEN ***
************.X".#.A.50...".#.A$."".A$."
:":. ZUR SICHERHEIT !!!..".$.1,A$..".$..
.".&. BEENDEN **********************..".
& 1.E".& 15.X"J&. "++ ENDE ++".."T&..+
#.'. SORT-ALOGARITHMUS -----------------
-----------------------------------.E#.'
."..DATEI SORTIEREN."..#T'."BITTE GEBEN
SIE ANFANG UND ENDE DES ZU SORTIERENDEN
BEREICHS AN !..#~'."ANFANG";AN..#.'."EN
DE"; EN..#.'SA.AN:.9000:.A.50.."ANFANGS
SATZ EXISTIERT NICHT!":.50..$.'SA.EN:.90
00:.A.50.."ENDSATZ ZU HOCH!":.50.?$.'.EN
.AN.M%.."BEREICH ZU GROSS!":.50.M$.'.".B
ITTE MARKIEREN SIE DEN BEREICH INNER-..$
.'."HALB DER STRINGS NACH DEM DIE SORTIE
RUNG";..$.'."ERFOLGEN SOLL!"..$.'SA.AN:.
9000:.9100:.A.50.."SATZ EXISTIERT NICHT!
":.50..%.'IG..1:.60000:IG.0..%.'IC.0:.SA
.AN.EN:IC.IC.1.Z%.':.9000:.9100:.A.50.."
SATZNUMMER ZU HOCH!":SA.EN.1:.1015.I%.':
M$(IC).A$.Q%.'.SA..%D'Z.0:LG(1).1:RG(1).
EN.AN.1..%N'.10200:.10400.D%X'. QUICKSO
RT -----------------..%.'Z.Z.1:.LG(Z)..R
G(Z).10350..%.'X.LG(Z):Y.RG(Z).$&.'VG$.J
(M$(.((X.Y).2)),MA(1),MB(1).MA(1).1).5&.
(. X.Y .10330.I&.(. J(M$(X),MA(1),MB(1).
MA(1).1).VG$.X.X.1:.10250..&.(. J(M$(Y),
MA(1),MB(1).MA(1).1).VG$.Y.Y.1:.10260..&
.(. X.Y.10330.O&((S$.M$(X):M$(X).M$(Y):M
$(Y).S$..&2(X.X.1:Y.Y.1:.10240..'Z(RG(Z.
1).Y:LG(Z.1).LG(Z):.10210.,'D(LG(Z.1).X:
RG(Z.1).RG(Z):.10210.8'N(Z.Z.1:..J' (. A
BSPEICHERN.E'.(IC.0:.SA.AN.EN:IC.IC.1..'
.(:.9000:A$.M$(IC):.9200..'.(.SA..'.).50
..' N. KORREKTUR-ROUTINE ---------------
-------------------------------------..'
!N.I.0.C(BE$):.G(20);:.I:BE$."".!(*NSA.S
A.SC : . TEXTZEIGER.;(/N.SA.0.SA.0
: . SPERRE.\(4N. 9000 : . POSITIONI
EREN.V(9N.A.50.SA.SA.SC:.20020..(HN.1,A$
..(\N..S(0U. DIRECTORY EINLESEN --------
----------------------------------------
---..(:U."..INHALTSVERZEICHNIS:.."..).U.
15,"IO":.2,8,2,"#"..).UT.18:S.1.,).U.15,
"U1";2;0;T;S.>).U.15,"B-P";2;0.X)FU.#2,X
$:.X$."".X$.G(0).D)PUT.F(X$).~)ZU.#2,X$:
.X$."".X$.G(0)..).US.F(X$)..).U.X.0.7..)
.U.15,"B-P";2;X.32.2.F).U.#2,X$:.X$."".X
$.G(0).Y).U.F(X$).0.30290..).U.15,"B-P";
2;X.32.5..).VFF$.""..*.V.Y.0.15.!*.V.#2,
X$:.X$."".X$.G(0).6* V.F(X$).160.30270.E
**VFF$.FF$.X$.L*4V.Y.F*>V.A.0.A.1:.FF$;:
.30290.}*HVA.0:..19);". ";FF$..*RV.X..*\
V.T..0.30130..*FV 2:...*ZV.50..*PC. TEXT
EINGABE --------------------------------
--------------------------.#+RC.AR.1.AR.
0:A$.".SATZNUMMER ZU HOCH!.":.50007.3+VC
.9000:.9100.V+WC.".
";:."..SATZ";SA;"."..
+XC."
.";A$..+YC.".......................
.................";..+ZC."."..,DCBE$."":
.198,0:.211,0:.214,22:.58732:."..";.+,NC
.X$:.B(203).1.50120.^,SC. B(203).7.B(653
).0 . SC.1 : . 20000 : . 50000..,UC. B(2
03).7.B(653).1 . SC..1 : . 20000 : . 500
00..,XC.X$."".50030..,.C.C(BE$).0.F(X$).
20.50030..,.CI.F(X$):.I.32.I.133.I.159..
I..20.50030..-.C.C(BE$).SL.I..20.50030..
-.C.X$." ".X$.".".(- CBE$.BE$.X$.;-.C.G(
20);X$;".";.`-.C.I.20.BE$.H(BE$,C(BE$).2
):.50030.K-.C.50030.{-HC.". ":.9000..-RC
.BE$."".BE$.":"..-.C."..................
.......":...-`.. MARKIEREN WIE DATIERT W
IRD ------------------------------------
-------. .J.I$.A$:.I.1.C(I$):M$(I)."0":.
.+.T.IM.1:..J.Y..I$:.I.1.C(I$):.M$(I);:.
:..T.~..".EDIT >";J(I$,IM,1);"< ."I
M".".....I.B(203):.I.64.60035......I.2.B
(653).0.IM..C(I$).IM.IM.1:.60070......I.
2.B(653).1.IM..1.IM.IM.1:.60070......I.5
6.M$(IM)."1":.60070../...I.35.M$(IM)."0"
:.60070.&/...I.1.60100.1/...60035.W/..."
. ..............
..............";:.60025../D.. UMRECHNEN.
./F..I.1.3:MA(I).0:MB(I).0:.I../I..II.1.
3../N.:.I.1.C(I$):.MA(II).0.M$(I).I(D(II
),1).MA(II).I../Q..I..0S.:.MA(II).0.6015
0..0X.: MB(II).MA(II).=0..: MB(II).M
B(II).1:.PRINT,MB(II).T0..: .M$(MB(II)
)..I(D(II),1).MB(II).MB(II).1:.60150..0.
.: .MB(II).C(I$).60150..0..: .60125.
.0...II..0..."DIE SORTIERUNG ERFOLGT NAC
H FOLGENDEM STRINGBEREICH:"..1..."."J(
I$,MA(1),MB(1).MA(1).1)"."..1....]1H.. F
LOPPY-FEHLERKANAL LESEN ----------------
-----------------------------..1M.."..FL
OPPY-FEHLERKANALABFRAGE."..1R..15,A,B$,C
,D. 1\..A,B$,C,D..1P..50...
> CLICK IMAGE PREVIEW FOR FULL MODAL