REL.DAT.EDITOR
FILE INFORMATION
FILENAME(S): REL.DAT.EDITOR
FILE TYPE(S): PRG
FILE SIZE: 10.3K
FIRST SEEN: 2025-11-30 01:12:32
APPEARS ON: 1 disk(s)
FILE HASH
57d1702663fb2f05e48a408fecdcfb15a289630299e76aa82097b0053a82383e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SH 4 86 SEITE 1 | REL.DAT.EDITOR | PRG | C64er, DuncanTwain | 16 | 9 | 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 93 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 05 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 B6 16 61 1B 41 4E B2 41 4E AB 31 3A |.50...a.AN.AN.1:|
00000EA0: 99 22 11 42 49 54 54 45 20 57 41 45 48 4C 45 4E |.".BITTE WAEHLEN|
00000EB0: 20 53 49 45 3A 11 00 D1 16 62 1B 99 2C 22 4E 4F | SIE:....b..,"NO|
00000EC0: 52 4D 41 4C 45 20 41 55 53 47 41 42 45 20 2E 2E |RMALE AUSGABE ..|
00000ED0: 31 00 EC 16 63 1B 99 2C 22 44 2E 5A 2E 53 2E 20 |1...c..,"D.Z.S. |
00000EE0: 41 55 53 47 41 42 45 20 2E 2E 2E 32 00 07 17 64 |AUSGABE ...2...d|
00000EF0: 1B 99 2C 22 45 49 47 45 4E 45 20 52 4F 55 54 49 |..,"EIGENE ROUTI|
00000F00: 4E 45 20 2E 2E 2E 33 00 25 17 65 1B A1 49 24 3A |NE ...3.%.e..I$:|
00000F10: 8B C5 28 49 24 29 B3 31 B0 C5 28 49 24 29 B1 33 |..(I$).1..(I$).3|
00000F20: A7 37 30 31 33 00 36 17 66 1B 8B 49 24 B2 22 32 |.7013.6.f..I$."2|
00000F30: 22 A7 37 31 30 30 00 47 17 67 1B 8B 49 24 B2 22 |".7100.G.g..I$."|
00000F40: 33 22 A7 37 35 30 30 00 6C 17 6C 1B 8F 20 4E 4F |3".7500.l.l.. NO|
00000F50: 52 4D 41 4C 45 20 41 55 53 47 41 42 45 20 2D 2D |RMALE AUSGABE --|
00000F60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 8D 17 6D |------------...m|
00000F70: 1B 9F 33 2C 34 2C 37 3A 81 53 41 B2 41 4E A4 45 |..3,4,7:.SA.AN.E|
00000F80: 4E 3A 8D 39 30 30 30 3A 8D 39 31 30 30 00 BC 17 |N:.9000:.9100...|
00000F90: 71 1B 8B 41 B2 35 30 A7 99 22 53 41 54 5A 4E 55 |q..A.50.."SATZNU|
00000FA0: 4D 4D 45 52 20 5A 55 20 48 4F 43 48 21 22 3A 53 |MMER ZU HOCH!":S|
00000FB0: 41 B2 45 4E AA 31 3A 89 37 30 34 35 00 DC 17 7B |A.EN.1:.7045...{|
00000FC0: 1B 98 33 2C C9 28 22 20 20 20 22 AA C4 28 53 41 |..3,.(" "..(SA|
00000FD0: 29 2C 33 29 3B 22 20 20 20 20 22 3B 00 EB 17 7C |),3);" ";...||
00000FE0: 1B 81 49 B2 31 A4 C3 28 41 24 29 00 0D 18 7D 1B |..I.1..(A$)...}.|
00000FF0: 3A 8B CA 28 41 24 2C 49 2C 31 29 B2 22 1D 22 A7 |:..(A$,I,1).".".|
00001000: 98 33 2C 22 20 22 3B 3A 89 37 30 34 30 00 20 18 |.3," ";:.7040. .|
00001010: 7E 1B 3A 98 33 2C CA 28 41 24 2C 49 2C 31 29 3B |~.:.3,.(A$,I,1);|
00001020: 00 2A 18 80 1B 82 49 3A 98 33 00 3B 18 85 1B 82 |.*....I:.3.;....|
00001030: 53 41 3A A0 33 3A 99 3A 89 35 30 00 60 18 BC 1B |SA:.3:.:.50.`...|
00001040: 8F 20 44 2E 5A 2E 53 41 54 5A 20 41 55 53 47 41 |. D.Z.SATZ AUSGA|
00001050: 42 45 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |BE -------------|
00001060: 00 81 18 BD 1B 9F 33 2C 34 2C 37 3A 81 53 41 B2 |......3,4,7:.SA.|
00001070: 41 4E A4 45 4E 3A 8D 39 30 30 30 3A 8D 39 31 30 |AN.EN:.9000:.910|
00001080: 30 00 B0 18 BE 1B 8B 41 B2 35 30 A7 53 41 B2 45 |0......A.50.SA.E|
00001090: 4E AA 31 3A 99 22 53 41 54 5A 4E 55 4D 4D 45 52 |N.1:."SATZNUMMER|
000010A0: 20 5A 55 20 48 4F 43 48 21 22 3A 89 37 31 37 30 | ZU HOCH!":.7170|
000010B0: 00 D1 18 C6 1B 98 33 2C C9 28 22 20 20 20 20 22 |......3,.(" "|
000010C0: AA C4 28 53 41 29 2C 34 29 3B 22 20 20 20 20 22 |..(SA),4);" "|
000010D0: 3B 00 EC 18 D0 1B 81 49 B2 31 A4 C3 28 41 24 29 |;......I.1..(A$)|
000010E0: 3A 8B 41 24 B2 22 22 A7 37 31 36 30 00 00 19 D5 |:.A$."".7160....|
000010F0: 1B 49 4D B2 C6 28 CA 28 41 24 2C 49 2C 31 29 29 |.IM..(.(A$,I,1))|
00001100: 00 23 19 D6 1B 8B 49 4D B1 36 34 AF 49 4D B3 39 |.#....IM.64.IM.9|
00001110: 31 B0 49 4D B1 39 36 AF 49 4D B3 31 32 33 A7 37 |1.IM.96.IM.123.7|
00001120: 31 36 30 00 3E 19 DA 1B 8B 49 4D B2 36 34 A7 98 |160.>....IM.64..|
00001130: 33 2C C7 28 33 34 29 3B 3A 89 37 31 37 30 00 59 |3,.(34);:.7170.Y|
00001140: 19 DF 1B 8B 49 4D B2 31 37 33 A7 98 33 2C 22 C1 |....IM.173..3,".|
00001150: 45 22 3B 3A 89 37 31 37 30 00 74 19 E4 1B 8B 49 |E";:.7170.t....I|
00001160: 4D B2 31 37 34 A7 98 33 2C 22 53 53 22 3B 3A 89 |M.174..3,"SS";:.|
00001170: 37 31 37 30 00 8F 19 E9 1B 8B 49 4D B2 31 37 36 |7170......IM.176|
00001180: A7 98 33 2C 22 41 45 22 3B 3A 89 37 31 37 30 00 |..3,"AE";:.7170.|
00001190: AA 19 EE 1B 8B 49 4D B2 31 38 31 A7 98 33 2C 22 |.....IM.181..3,"|
000011A0: D5 45 22 3B 3A 89 37 31 37 30 00 C5 19 F0 1B 8B |.E";:.7170......|
000011B0: 49 4D B2 31 38 32 A7 98 33 2C 22 CF 45 22 3B 3A |IM.182..3,".E";:|
000011C0: 89 37 31 37 30 00 E0 19 F2 1B 8B 49 4D B2 31 38 |.7170......IM.18|
000011D0: 34 A7 98 33 2C 22 55 45 22 3B 3A 89 37 31 37 30 |4..3,"UE";:.7170|
000011E0: 00 FB 19 F4 1B 8B 49 4D B2 31 38 35 A7 98 33 2C |......IM.185..3,|
000011F0: 22 4F 45 22 3B 3A 89 37 31 37 30 00 16 1A F6 1B |"OE";:.7170.....|
00001200: 8B 49 4D B2 39 34 A7 98 33 2C 22 3A 22 3B 20 20 |.IM.94..3,":"; |
00001210: 3A 89 37 31 37 30 00 31 1A F7 1B 8B 49 4D B2 39 |:.7170.1....IM.9|
00001220: 35 A7 98 33 2C 22 2C 22 3B 20 20 3A 89 37 31 37 |5..3,","; :.717|
00001230: 30 00 3F 1A F8 1B 98 33 2C C7 28 49 4D 29 3B 00 |0.?....3,.(IM);.|
00001240: 50 1A 02 1C 82 49 3A 98 33 2C C7 28 31 33 29 3B |P....I:.3,.(13);|
00001250: 00 61 1A 07 1C 82 53 41 3A A0 33 3A 99 3A 89 35 |.a....SA:.3:.:.5|
00001260: 30 00 86 1A 4C 1D 8F 20 45 49 47 45 4E 45 20 52 |0...L.. EIGENE R|
00001270: 4F 55 54 49 4E 45 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |OUTINE ---------|
00001280: 2D 2D 2D 2D 2D 2D 00 CE 1A 56 1D 99 22 11 53 49 |------...V..".SI|
00001290: 45 20 48 41 42 45 4E 20 4E 4F 43 48 20 4B 45 49 |E HABEN NOCH KEI|
000012A0: 4E 45 20 45 49 47 45 4E 45 20 50 52 49 4E 54 45 |NE EIGENE PRINTE|
000012B0: 52 2D 20 20 20 20 52 4F 55 54 49 4E 45 20 44 45 |R- ROUTINE DE|
000012C0: 46 46 49 4E 49 45 52 54 21 22 3A 89 35 30 00 1C |FFINIERT!":.50..|
000012D0: 1B 40 1F 8F 20 54 45 58 54 20 5A 45 4E 54 52 49 |.@.. TEXT ZENTRI|
000012E0: 45 52 45 4E 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |EREN -----------|
000012F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001300: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001310: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 4E 1B 41 |------------.N.A|
00001320: 1F 49 24 B2 22 22 3A 81 49 B2 31 A4 31 30 3A 49 |.I$."":.I.1.10:I|
00001330: 24 B2 49 24 AA 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |$.I$."..........|
00001340: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3A 82 49 00 59 |..........":.I.Y|
00001350: 1B 42 1F 8F 53 4C 3D 32 37 00 72 1B 45 1F 8F 44 |.B..SL=27.r.E..D|
00001360: 49 4D 4D 24 28 33 30 30 29 3A 47 4F 54 4F 38 31 |IMM$(300):GOTO81|
00001370: 30 30 00 87 1B 4A 1F 99 22 12 5A 45 4E 54 52 49 |00...J..".ZENTRI|
00001380: 45 52 45 4E 92 11 22 00 D3 1B 4F 1F 99 22 42 49 |EREN.."...O.."BI|
00001390: 54 54 45 20 47 45 42 45 4E 20 53 49 45 20 41 4E |TTE GEBEN SIE AN|
000013A0: 46 41 4E 47 20 55 4E 44 20 45 4E 44 45 20 44 45 |FANG UND ENDE DE|
000013B0: 53 20 20 20 20 20 42 45 52 45 49 43 48 45 53 20 |S BEREICHES |
000013C0: 41 4E 2C 20 44 45 52 20 5A 45 4E 54 52 49 45 52 |AN, DER ZENTRIER|
000013D0: 54 22 3B 00 E8 1B 51 1F 99 22 20 57 45 52 44 45 |T";...Q.." WERDE|
000013E0: 4E 20 53 4F 4C 4C 21 22 00 0E 1C 54 1F 85 22 41 |N SOLL!"...T.."A|
000013F0: 4E 46 41 4E 47 22 3B 41 4E 3A 85 22 45 4E 44 45 |NFANG";AN:."ENDE|
00001400: 22 3B 45 4E 3A 8B 41 4E B1 45 4E A7 35 30 00 48 |";EN:.AN.EN.50.H|
00001410: 1C 59 1F 53 41 B2 41 4E 3A 8D 39 30 30 30 3A 8B |.Y.SA.AN:.9000:.|
00001420: 41 B2 35 30 A7 99 22 41 4E 46 41 4E 47 53 53 41 |A.50.."ANFANGSSA|
00001430: 54 5A 20 45 58 49 53 54 49 45 52 54 20 4E 49 43 |TZ EXISTIERT NIC|
00001440: 48 54 21 22 3A 89 35 30 00 76 1C 5E 1F 53 41 B2 |HT!":.50.v.^.SA.|
00001450: 45 4E 3A 8D 39 30 30 30 3A 8B 41 B2 35 30 A7 99 |EN:.9000:.A.50..|
00001460: 22 45 4E 44 53 41 54 5A 20 5A 55 20 48 4F 43 48 |"ENDSATZ ZU HOCH|
00001470: 21 22 3A 89 35 30 00 A4 1C 68 1F 99 22 11 4C 49 |!":.50...h..".LI|
00001480: 4E 4B 53 2D 52 45 43 48 54 53 20 42 55 45 4E 44 |NKS-RECHTS BUEND|
00001490: 49 47 20 5A 45 4E 54 52 49 45 52 45 4E 20 20 2D |IG ZENTRIEREN -|
000014A0: 20 27 31 27 00 D2 1C 6D 1F 99 22 11 49 4E 20 44 | '1'...m..".IN D|
000014B0: 49 45 20 4D 49 54 54 45 20 5A 45 4E 54 52 49 45 |IE MITTE ZENTRIE|
000014C0: 52 45 4E 20 20 20 20 20 20 20 20 20 20 2D 20 27 |REN - '|
000014D0: 32 27 00 F3 1C 72 1F A1 49 49 24 3A 8B 49 49 24 |2'...r..II$:.II$|
000014E0: B3 B1 22 31 22 AF 49 49 24 B3 B1 22 32 22 A7 38 |.."1".II$.."2".8|
000014F0: 30 35 30 00 05 1D 7C 1F 8B 49 49 24 B2 22 32 22 |050...|..II$."2"|
00001500: A7 38 36 30 30 00 2A 1D A3 1F 8F 20 4C 49 4E 4B |.8600.*.... LINK|
00001510: 53 2D 52 45 43 48 54 53 20 42 55 45 4E 44 49 47 |S-RECHTS BUENDIG|
00001520: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 40 1D A4 1F 99 | ---------.@....|
00001530: 22 11 42 49 54 54 45 20 57 41 52 54 45 4E 21 22 |".BITTE WARTEN!"|
00001540: 00 4E 1D A9 1F 81 53 41 B2 41 4E A4 45 4E 00 6B |.N....SA.AN.EN.k|
00001550: 1D AE 1F 3A 20 8D 39 30 30 30 3A 8D 39 31 30 30 |...: .9000:.9100|
00001560: 3A 99 41 24 3A 99 C3 28 41 24 29 00 97 1D B8 1F |:.A$:..(A$).....|
00001570: 3A 20 8B C9 28 41 24 2C 31 29 B2 C7 28 32 39 29 |: ..(A$,1)..(29)|
00001580: A7 41 24 B2 C8 28 41 24 2C C3 28 41 24 29 AB 31 |.A$..(A$,.(A$).1|
00001590: 29 3A 89 38 31 32 30 00 C3 1D BA 1F 3A 20 8B C9 |):.8120.....: ..|
000015A0: 28 41 24 2C 31 29 B2 C7 28 33 32 29 A7 41 24 B2 |(A$,1)..(32).A$.|
000015B0: C8 28 41 24 2C C3 28 41 24 29 AB 31 29 3A 89 38 |.(A$,.(A$).1):.8|
000015C0: 31 32 32 00 F0 1D BB 1F 3A 20 8B C9 28 41 24 2C |122.....: ..(A$,|
000015D0: 31 29 B2 C7 28 31 36 30 29 A7 41 24 B2 C8 28 41 |1)..(160).A$..(A|
000015E0: 24 2C C3 28 41 24 29 AB 31 29 3A 89 38 31 32 33 |$,.(A$).1):.8123|
000015F0: 00 05 1E C2 1F 3A 20 8B C3 28 41 24 29 B2 53 4C |.....: ..(A$).SL|
00001600: A7 38 35 32 30 00 22 1E 08 20 3A 20 20 4C 55 B2 |.8520.".. : LU.|
00001610: 53 4C AB C3 28 41 24 29 3A 99 22 4C 55 3D 22 3B |SL..(A$):."LU=";|
00001620: 4C 55 00 47 1E 1C 20 3A 20 20 49 B2 31 3A 49 43 |LU.G.. : I.1:IC|
00001630: B2 30 3A 8F 20 42 45 47 49 4E 20 4C 4F 4F 50 20 |.0:. BEGIN LOOP |
00001640: 2D 2D 2D 2D 2D 2D 2D 00 4D 1E 1E 20 3A 00 77 1E |-------.M.. :.w.|
00001650: 26 20 3A 20 20 20 8B CA 28 41 24 2C 49 2C 31 29 |& : ..(A$,I,1)|
00001660: B2 22 22 B0 CA 28 41 24 2C 49 AA 31 2C 31 29 B2 |.""..(A$,I.1,1).|
00001670: 22 22 A7 38 35 33 30 00 8F 1E 27 20 3A 20 20 20 |"".8530...' : |
00001680: 49 4D B2 C6 28 CA 28 41 24 2C 49 2C 31 29 29 00 |IM..(.(A$,I,1)).|
00001690: A9 1E 28 20 3A 20 20 20 49 4E B2 C6 28 CA 28 41 |..( : IN..(.(A|
000016A0: 24 2C 49 AA 31 2C 31 29 29 00 CD 1E 30 20 3A 20 |$,I.1,1))...0 : |
000016B0: 20 20 8B 49 4D B3 B1 32 39 AF 49 4D B3 B1 33 32 | .IM..29.IM..32|
000016C0: AF 49 4D B3 B1 31 36 30 A7 38 35 30 30 00 EE 1E |.IM..160.8500...|
000016D0: 3A 20 3A 20 20 20 8B 49 4E B2 32 39 B0 49 4E B2 |: : .IN.29.IN.|
000016E0: 33 32 B0 49 4E B2 31 36 30 A7 38 35 30 30 00 14 |32.IN.160.8500..|
000016F0: 1F 44 20 3A 20 20 20 20 41 24 B2 C8 28 41 24 2C |.D : A$..(A$,|
00001700: 49 29 AA 22 20 22 AA C9 28 41 24 2C C3 28 41 24 |I)." "..(A$,.(A$|
00001710: 29 AB 49 29 00 45 1F 45 20 3A 20 20 20 8B CA 28 |).I).E.E : ..(|
00001720: 41 24 2C 49 2C 31 29 B2 22 20 22 B0 CA 28 41 24 |A$,I,1)." "..(A$|
00001730: 2C 49 2C 31 29 B2 22 1D 22 A7 49 B2 49 AA 31 3A |,I,1).".".I.I.1:|
00001740: 89 38 32 36 31 00 60 1F 49 20 3A 20 20 20 4C 55 |.8261.`.I : LU|
00001750: B2 4C 55 AB 31 3A 8B 4C 55 B2 30 A7 38 35 31 30 |.LU.1:.LU.0.8510|
00001760: 00 70 1F 4A 20 3A 20 20 20 49 43 B2 49 43 AA 31 |.p.J : IC.IC.1|
00001770: 00 7E 1F 4E 20 3A 20 20 20 49 B2 49 AA 31 00 84 |.~.N : I.I.1..|
00001780: 1F D0 20 3A 00 8E 1F 34 21 49 B2 49 AA 31 00 A0 |.. :...4!I.I.1..|
00001790: 1F 39 21 8B 49 B3 C3 28 41 24 29 A7 38 32 33 30 |.9!.I..(A$).8230|
000017A0: 00 BD 1F 3E 21 8B 49 B2 C3 28 41 24 29 AF 4C 55 |...>!.I..(A$).LU|
000017B0: B1 30 AF 49 43 B3 B1 30 A7 38 32 32 30 00 CD 1F |.0.IC..0.8220...|
000017C0: 48 21 8D 39 30 30 30 3A 8D 39 32 30 30 00 D5 1F |H!.9000:.9200...|
000017D0: 52 21 82 53 41 00 DD 1F 5C 21 89 35 30 00 02 20 |R!.SA...\!.50.. |
000017E0: 98 21 8F 20 49 4E 20 44 49 45 20 4D 49 54 54 45 |.!. IN DIE MITTE|
000017F0: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00001800: 2D 2D 00 18 20 A2 21 99 22 11 42 49 54 54 45 20 |--.. .!.".BITTE |
00001810: 57 41 52 54 45 4E 21 22 00 26 20 AC 21 81 53 41 |WARTEN!".& .!.SA|
00001820: B2 41 4E A4 45 4E 00 37 20 B6 21 3A 8D 39 30 30 |.AN.EN.7 .!:.900|
00001830: 30 3A 8D 39 31 30 30 00 61 20 BB 21 8B C9 28 41 |0:.9100.a .!..(A|
00001840: 24 2C 31 29 B2 C7 28 32 39 29 A7 41 24 B2 C8 28 |$,1)..(29).A$..(|
00001850: 41 24 2C C3 28 41 24 29 AB 31 29 3A 89 38 36 33 |A$,.(A$).1):.863|
00001860: 35 00 8B 20 BC 21 8B C9 28 41 24 2C 31 29 B2 C7 |5.. .!..(A$,1)..|
00001870: 28 33 32 29 A7 41 24 B2 C8 28 41 24 2C C3 28 41 |(32).A$..(A$,.(A|
00001880: 24 29 AB 31 29 3A 89 38 36 33 36 00 B6 20 BD 21 |$).1):.8636.. .!|
00001890: 8B C9 28 41 24 2C 31 29 B2 C7 28 31 36 30 29 A7 |..(A$,1)..(160).|
000018A0: 41 24 B2 C8 28 41 24 2C C3 28 41 24 29 AB 31 29 |A$..(A$,.(A$).1)|
000018B0: 3A 89 38 36 33 37 00 CA 20 C0 21 3A 8B C3 28 41 |:.8637.. .!:..(A|
000018C0: 24 29 B2 53 4C A7 38 36 38 30 00 EC 20 CA 21 3A |$).SL.8680.. .!:|
000018D0: 41 53 B2 53 4C AB C3 28 41 24 29 3A 20 8F 20 41 |AS.SL..(A$): . A|
000018E0: 4E 5A 41 48 4C 20 53 50 41 43 45 53 00 02 21 D4 |NZAHL SPACES..!.|
000018F0: 21 3A 41 24 B2 C8 28 49 24 2C 41 53 AD 32 29 AA |!:A$..(I$,AS.2).|
00001900: 41 24 00 13 21 DE 21 3A 8D 39 30 30 30 3A 8D 39 |A$..!.!:.9000:.9|
00001910: 32 30 30 00 1B 21 E8 21 82 53 41 00 23 21 F2 21 |200..!.!.SA.#!.!|
00001920: 89 35 30 00 48 21 28 23 8F 20 50 4F 53 49 54 49 |.50.H!(#. POSITI|
00001930: 4F 4E 49 45 52 45 4E 20 2A 2A 2A 2A 2A 2A 2A 2A |ONIEREN ********|
00001940: 2A 2A 2A 2A 2A 2A 2A 2A 00 66 21 32 23 48 42 25 |********.f!2#HB%|
00001950: B2 53 41 AD 32 35 36 3A 4C 42 25 B2 53 41 AB 48 |.SA.256:LB%.SA.H|
00001960: 42 25 AC 32 35 36 00 8A 21 3C 23 98 31 35 2C 22 |B%.256..!<#.15,"|
00001970: 50 22 3B C7 28 33 29 3B C7 28 4C 42 25 29 3B C7 |P";.(3);.(LB%);.|
00001980: 28 48 42 25 29 3B C7 28 31 29 00 94 21 46 23 84 |(HB%);.(1)..!F#.|
00001990: 31 35 2C 41 00 9A 21 50 23 8E 00 BF 21 8C 23 8F |15,A..!P#...!.#.|
000019A0: 20 53 41 54 5A 20 45 49 4E 4C 45 53 45 4E 20 2A | SATZ EINLESEN *|
000019B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000019C0: CB 21 96 23 8B 41 B2 35 30 A7 8E 00 D5 21 A0 23 |.!.#.A.50....!.#|
000019D0: 84 31 2C 41 24 00 DB 21 B4 23 8E 00 00 22 F0 23 |.1,A$..!.#...".#|
000019E0: 8F 20 53 41 54 5A 20 53 43 48 52 45 49 42 45 4E |. SATZ SCHREIBEN|
000019F0: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00001A00: 00 0C 22 FA 23 8B 41 B2 35 30 A7 8E 00 33 22 FB |..".#.A.50...3".|
00001A10: 23 8B 41 24 B2 22 22 A7 41 24 B2 22 3A 22 3A 8F |#.A$."".A$.":":.|
00001A20: 20 5A 55 52 20 53 49 43 48 45 52 48 45 49 54 20 | ZUR SICHERHEIT |
00001A30: 21 21 21 00 3D 22 04 24 98 31 2C 41 24 00 43 22 |!!!.=".$.1,A$.C"|
00001A40: 18 24 8E 00 68 22 AC 26 8F 20 42 45 45 4E 44 45 |.$..h".&. BEENDE|
00001A50: 4E 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |N **************|
00001A60: 2A 2A 2A 2A 2A 2A 2A 2A 00 70 22 B6 26 A0 20 31 |********.p".&. 1|
00001A70: 00 79 22 C0 26 A0 20 31 35 00 8C 22 CA 26 99 20 |.y".&. 15..".&. |
00001A80: 22 2B 2B 20 45 4E 44 45 20 2B 2B 22 00 92 22 D4 |"++ ENDE ++"..".|
00001A90: 26 80 00 DF 22 10 27 8F 20 53 4F 52 54 2D 41 4C |&...".'. SORT-AL|
00001AA0: 4F 47 41 52 49 54 48 4D 55 53 20 2D 2D 2D 2D 2D |OGARITHMUS -----|
00001AB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001AC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001AD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
00001AE0: F9 22 1A 27 99 22 93 12 44 41 54 45 49 20 53 4F |.".'."..DATEI SO|
00001AF0: 52 54 49 45 52 45 4E 92 22 00 42 23 74 27 99 22 |RTIEREN.".B#t'."|
00001B00: 42 49 54 54 45 20 47 45 42 45 4E 20 53 49 45 20 |BITTE GEBEN SIE |
00001B10: 41 4E 46 41 4E 47 20 55 4E 44 20 45 4E 44 45 20 |ANFANG UND ENDE |
00001B20: 44 45 53 20 5A 55 20 20 53 4F 52 54 49 45 52 45 |DES ZU SORTIERE|
00001B30: 4E 44 45 4E 20 42 45 52 45 49 43 48 53 20 41 4E |NDEN BEREICHS AN|
00001B40: 20 21 00 53 23 7E 27 85 22 41 4E 46 41 4E 47 22 | !.S#~'."ANFANG"|
00001B50: 3B 41 4E 00 64 23 88 27 85 22 45 4E 44 45 22 3B |;AN.d#.'."ENDE";|
00001B60: 20 20 45 4E 00 9E 23 8A 27 53 41 B2 41 4E 3A 8D | EN..#.'SA.AN:.|
00001B70: 39 30 30 30 3A 8B 41 B2 35 30 A7 99 22 41 4E 46 |9000:.A.50.."ANF|
00001B80: 41 4E 47 53 53 41 54 5A 20 45 58 49 53 54 49 45 |ANGSSATZ EXISTIE|
00001B90: 52 54 20 4E 49 43 48 54 21 22 3A 89 35 30 00 CC |RT NICHT!":.50..|
00001BA0: 23 8C 27 53 41 B2 45 4E 3A 8D 39 30 30 30 3A 8B |#.'SA.EN:.9000:.|
00001BB0: 41 B2 35 30 A7 99 22 45 4E 44 53 41 54 5A 20 5A |A.50.."ENDSATZ Z|
00001BC0: 55 20 48 4F 43 48 21 22 3A 89 35 30 00 F3 23 92 |U HOCH!":.50..#.|
00001BD0: 27 8B 45 4E AB 41 4E B1 4D 25 A7 99 22 42 45 52 |'.EN.AN.M%.."BER|
00001BE0: 45 49 43 48 20 5A 55 20 47 52 4F 53 53 21 22 3A |EICH ZU GROSS!":|
00001BF0: 89 35 30 00 21 24 97 27 99 22 11 42 49 54 54 45 |.50.!$.'.".BITTE|
00001C00: 20 4D 41 52 4B 49 45 52 45 4E 20 53 49 45 20 44 | MARKIEREN SIE D|
00001C10: 45 4E 20 42 45 52 45 49 43 48 20 49 4E 4E 45 52 |EN BEREICH INNER|
00001C20: 2D 00 52 24 98 27 99 22 48 41 4C 42 20 44 45 52 |-.R$.'."HALB DER|
00001C30: 20 53 54 52 49 4E 47 53 20 4E 41 43 48 20 44 45 | STRINGS NACH DE|
00001C40: 4D 20 44 49 45 20 53 4F 52 54 49 45 52 55 4E 47 |M DIE SORTIERUNG|
00001C50: 22 3B 00 68 24 99 27 99 22 45 52 46 4F 4C 47 45 |";.h$.'."ERFOLGE|
00001C60: 4E 20 53 4F 4C 4C 21 22 00 A1 24 9A 27 53 41 B2 |N SOLL!"..$.'SA.|
00001C70: 41 4E 3A 8D 39 30 30 30 3A 8D 39 31 30 30 3A 8B |AN:.9000:.9100:.|
00001C80: 41 B2 35 30 A7 99 22 53 41 54 5A 20 45 58 49 53 |A.50.."SATZ EXIS|
00001C90: 54 49 45 52 54 20 4E 49 43 48 54 21 22 3A 89 35 |TIERT NICHT!":.5|
00001CA0: 30 00 B7 24 9B 27 49 47 B2 AB 31 3A 8D 36 30 30 |0..$.'IG..1:.600|
00001CB0: 30 30 3A 49 47 B2 30 00 D2 24 9C 27 49 43 B2 30 |00:IG.0..$.'IC.0|
00001CC0: 3A 81 53 41 B2 41 4E A4 45 4E 3A 49 43 B2 49 43 |:.SA.AN.EN:IC.IC|
00001CD0: AA 31 00 0E 25 A1 27 3A 8D 39 30 30 30 3A 8D 39 |.1..%.':.9000:.9|
00001CE0: 31 30 30 3A 8B 41 B2 35 30 A7 99 22 53 41 54 5A |100:.A.50.."SATZ|
00001CF0: 4E 55 4D 4D 45 52 20 5A 55 20 48 4F 43 48 21 22 |NUMMER ZU HOCH!"|
00001D00: 3A 53 41 B2 45 4E AA 31 3A 89 31 30 31 35 00 1D |:SA.EN.1:.1015..|
00001D10: 25 A2 27 3A 4D 24 28 49 43 29 B2 41 24 00 25 25 |%.':M$(IC).A$.%%|
00001D20: A6 27 82 53 41 00 43 25 C4 27 5A B2 30 3A 4C 47 |.'.SA.C%.'Z.0:LG|
00001D30: 28 31 29 B2 31 3A 52 47 28 31 29 B2 45 4E AB 41 |(1).1:RG(1).EN.A|
00001D40: 4E AA 31 00 55 25 CE 27 8D 31 30 32 30 30 3A 89 |N.1.U%.'.10200:.|
00001D50: 31 30 34 30 30 00 78 25 D8 27 8F 20 20 51 55 49 |10400.x%.'. QUI|
00001D60: 43 4B 53 4F 52 54 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |CKSORT ---------|
00001D70: 2D 2D 2D 2D 2D 2D 2D 2D 00 96 25 E2 27 5A B2 5A |--------..%.'Z.Z|
00001D80: AA 31 3A 8B 4C 47 28 5A 29 B1 B2 52 47 28 5A 29 |.1:.LG(Z)..RG(Z)|
00001D90: A7 31 30 33 35 30 00 AA 25 EC 27 58 B2 4C 47 28 |.10350..%.'X.LG(|
00001DA0: 5A 29 3A 59 B2 52 47 28 5A 29 00 D8 25 F6 27 56 |Z):Y.RG(Z)..%.'V|
00001DB0: 47 24 B2 CA 28 4D 24 28 B5 28 28 58 AA 59 29 AD |G$..(M$(.((X.Y).|
00001DC0: 32 29 29 2C 4D 41 28 31 29 2C 4D 42 28 31 29 AB |2)),MA(1),MB(1).|
00001DD0: 4D 41 28 31 29 AA 31 29 00 E9 25 00 28 8B 20 58 |MA(1).1)..%.(. X|
00001DE0: B1 59 20 A7 31 30 33 33 30 00 1D 26 0A 28 8B 20 |.Y .10330..&.(. |
00001DF0: CA 28 4D 24 28 58 29 2C 4D 41 28 31 29 2C 4D 42 |.(M$(X),MA(1),MB|
00001E00: 28 31 29 AB 4D 41 28 31 29 AA 31 29 B3 56 47 24 |(1).MA(1).1).VG$|
00001E10: A7 58 B2 58 AA 31 3A 89 31 30 32 35 30 00 51 26 |.X.X.1:.10250.Q&|
00001E20: 14 28 8B 20 CA 28 4D 24 28 59 29 2C 4D 41 28 31 |.(. .(M$(Y),MA(1|
00001E30: 29 2C 4D 42 28 31 29 AB 4D 41 28 31 29 AA 31 29 |),MB(1).MA(1).1)|
00001E40: B1 56 47 24 A7 59 B2 59 AB 31 3A 89 31 30 32 36 |.VG$.Y.Y.1:.1026|
00001E50: 30 00 61 26 1E 28 8B 20 58 B1 59 A7 31 30 33 33 |0.a&.(. X.Y.1033|
00001E60: 30 00 83 26 28 28 53 24 B2 4D 24 28 58 29 3A 4D |0..&((S$.M$(X):M|
00001E70: 24 28 58 29 B2 4D 24 28 59 29 3A 4D 24 28 59 29 |$(X).M$(Y):M$(Y)|
00001E80: B2 53 24 00 9A 26 32 28 58 B2 58 AA 31 3A 59 B2 |.S$..&2(X.X.1:Y.|
00001E90: 59 AB 31 3A 89 31 30 32 34 30 00 BD 26 5A 28 52 |Y.1:.10240..&Z(R|
00001EA0: 47 28 5A AA 31 29 B2 59 3A 4C 47 28 5A AA 31 29 |G(Z.1).Y:LG(Z.1)|
00001EB0: B2 4C 47 28 5A 29 3A 8D 31 30 32 31 30 00 E0 26 |.LG(Z):.10210..&|
00001EC0: 64 28 4C 47 28 5A AA 31 29 B2 58 3A 52 47 28 5A |d(LG(Z.1).X:RG(Z|
00001ED0: AA 31 29 B2 52 47 28 5A 29 3A 8D 31 30 32 31 30 |.1).RG(Z):.10210|
00001EE0: 00 EC 26 6E 28 5A B2 5A AB 31 3A 8E 00 FE 26 A0 |..&n(Z.Z.1:...&.|
00001EF0: 28 8F 20 41 42 53 50 45 49 43 48 45 52 4E 00 19 |(. ABSPEICHERN..|
00001F00: 27 AA 28 49 43 B2 30 3A 81 53 41 B2 41 4E A4 45 |'.(IC.0:.SA.AN.E|
00001F10: 4E 3A 49 43 B2 49 43 AA 31 00 34 27 B4 28 3A 8D |N:IC.IC.1.4'.(:.|
00001F20: 39 30 30 30 3A 41 24 B2 4D 24 28 49 43 29 3A 8D |9000:A$.M$(IC):.|
00001F30: 39 32 30 30 00 3C 27 BE 28 82 53 41 00 44 27 04 |9200.<'.(.SA.D'.|
00001F40: 29 89 35 30 00 91 27 20 4E 8F 20 4B 4F 52 52 45 |).50..' N. KORRE|
00001F50: 4B 54 55 52 2D 52 4F 55 54 49 4E 45 20 2D 2D 2D |KTUR-ROUTINE ---|
00001F60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001F70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001F80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001F90: 2D 00 B3 27 21 4E 81 49 B2 30 A4 C3 28 42 45 24 |-..'!N.I.0..(BE$|
00001FA0: 29 3A 99 C7 28 32 30 29 3B 3A 82 49 3A 42 45 24 |):..(20);:.I:BE$|
00001FB0: B2 22 22 00 D5 27 2A 4E 53 41 B2 53 41 AA 53 43 |.""..'*NSA.SA.SC|
00001FC0: 20 20 20 20 20 20 20 3A 20 8F 20 54 45 58 54 5A | : . TEXTZ|
00001FD0: 45 49 47 45 52 00 EF 27 2F 4E 8B 53 41 B3 30 A7 |EIGER..'/N.SA.0.|
00001FE0: 53 41 B2 30 20 3A 20 8F 20 53 50 45 52 52 45 00 |SA.0 : . SPERRE.|
00001FF0: 10 28 34 4E 8D 20 39 30 30 30 20 20 20 20 20 3A |.(4N. 9000 :|
00002000: 20 8F 20 50 4F 53 49 54 49 4F 4E 49 45 52 45 4E | . POSITIONIEREN|
00002010: 00 2A 28 39 4E 8B 41 B2 35 30 A7 53 41 B2 53 41 |.*(9N.A.50.SA.SA|
00002020: AB 53 43 3A 89 32 30 30 32 30 00 34 28 48 4E 84 |.SC:.20020.4(HN.|
00002030: 31 2C 41 24 00 3A 28 5C 4E 8E 00 87 28 30 75 8F |1,A$.:(\N...(0u.|
00002040: 20 44 49 52 45 43 54 4F 52 59 20 45 49 4E 4C 45 | DIRECTORY EINLE|
00002050: 53 45 4E 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |SEN ------------|
00002060: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002070: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002080: 2D 2D 2D 2D 2D 2D 2D 00 A6 28 3A 75 99 22 93 12 |-------..(:u."..|
00002090: 49 4E 48 41 4C 54 53 56 45 52 5A 45 49 43 48 4E |INHALTSVERZEICHN|
000020A0: 49 53 3A 11 92 22 00 BE 28 9E 75 98 31 35 2C 22 |IS:.."..(.u.15,"|
000020B0: 49 4F 22 3A 9F 32 2C 38 2C 32 2C 22 23 22 00 CB |IO":.2,8,2,"#"..|
000020C0: 28 A8 75 54 B2 31 38 3A 53 B2 31 00 E0 28 B2 75 |(.uT.18:S.1..(.u|
000020D0: 98 31 35 2C 22 55 31 22 3B 32 3B 30 3B 54 3B 53 |.15,"U1";2;0;T;S|
000020E0: 00 F2 28 BC 75 98 31 35 2C 22 42 2D 50 22 3B 32 |..(.u.15,"B-P";2|
000020F0: 3B 30 00 0C 29 C6 75 A1 23 32 2C 58 24 3A 8B 58 |;0..).u.#2,X$:.X|
00002100: 24 B2 22 22 A7 58 24 B2 C7 28 30 29 00 18 29 D0 |$."".X$..(0)..).|
00002110: 75 54 B2 C6 28 58 24 29 00 32 29 DA 75 A1 23 32 |uT..(X$).2).u.#2|
00002120: 2C 58 24 3A 8B 58 24 B2 22 22 A7 58 24 B2 C7 28 |,X$:.X$."".X$..(|
00002130: 30 29 00 3E 29 E4 75 53 B2 C6 28 58 24 29 00 49 |0).>).uS..(X$).I|
00002140: 29 EE 75 81 58 B2 30 A4 37 00 60 29 F0 75 98 31 |).u.X.0.7.`).u.1|
00002150: 35 2C 22 42 2D 50 22 3B 32 3B 58 AC 33 32 AA 32 |5,"B-P";2;X.32.2|
00002160: 00 7A 29 F2 75 A1 23 32 2C 58 24 3A 8B 58 24 B2 |.z).u.#2,X$:.X$.|
00002170: 22 22 A7 58 24 B2 C7 28 30 29 00 8D 29 F4 75 8B |"".X$..(0)..).u.|
00002180: C6 28 58 24 29 B2 30 A7 33 30 32 39 30 00 A4 29 |.(X$).0.30290..)|
00002190: F8 75 98 31 35 2C 22 42 2D 50 22 3B 32 3B 58 AC |.u.15,"B-P";2;X.|
000021A0: 33 32 AA 35 00 AF 29 02 76 46 46 24 B2 22 22 00 |32.5..).vFF$."".|
000021B0: BB 29 0C 76 81 59 B2 30 A4 31 35 00 D5 29 16 76 |.).v.Y.0.15..).v|
000021C0: A1 23 32 2C 58 24 3A 8B 58 24 B2 22 22 A7 58 24 |.#2,X$:.X$."".X$|
000021D0: B2 C7 28 30 29 00 EA 29 20 76 8B C6 28 58 24 29 |..(0)..) v..(X$)|
000021E0: B2 31 36 30 A7 33 30 32 37 30 00 F9 29 2A 76 46 |.160.30270..)*vF|
000021F0: 46 24 B2 46 46 24 AA 58 24 00 00 2A 34 76 82 59 |F$.FF$.X$..*4v.Y|
00002200: 00 1A 2A 3E 76 8B 41 B2 30 A7 41 B2 31 3A 99 46 |..*>v.A.0.A.1:.F|
00002210: 46 24 3B 3A 89 33 30 32 39 30 00 31 2A 48 76 41 |F$;:.30290.1*HvA|
00002220: B2 30 3A 99 A3 31 39 29 3B 22 A7 20 22 3B 46 46 |.0:..19);". ";FF|
00002230: 24 00 38 2A 52 76 82 58 00 48 2A 5C 76 8B 54 B3 |$.8*Rv.X.H*\v.T.|
00002240: B1 30 A7 33 30 31 33 30 00 51 2A 66 76 A0 32 3A |.0.30130.Q*fv.2:|
00002250: 99 00 59 2A 7A 76 89 35 30 00 A6 2A 50 C3 8F 20 |..Y*zv.50..*P.. |
00002260: 54 45 58 54 45 49 4E 47 41 42 45 20 2D 2D 2D 2D |TEXTEINGABE ----|
00002270: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002280: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002290: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000022A0: 2D 2D 2D 2D 2D 2D 00 D7 2A 52 C3 8B 41 52 B2 31 |------..*R..AR.1|
000022B0: A7 41 52 B2 30 3A 41 24 B2 22 12 53 41 54 5A 4E |.AR.0:A$.".SATZN|
000022C0: 55 4D 4D 45 52 20 5A 55 20 48 4F 43 48 21 92 22 |UMMER ZU HOCH!."|
000022D0: 3A 89 35 30 30 30 37 00 E7 2A 56 C3 8D 39 30 30 |:.50007..*V..900|
000022E0: 30 3A 8D 39 31 30 30 00 2A 2B 57 C3 99 22 13 20 |0:.9100.*+W..". |
000022F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002310: 20 20 20 20 20 20 20 22 3B 3A 99 22 13 12 53 41 | ";:."..SA|
00002320: 54 5A 22 3B 53 41 3B 22 92 22 00 5E 2B 58 C3 99 |TZ";SA;".".^+X..|
00002330: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
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 91 22 3B 41 24 00 8F | .";A$..|
00002360: 2B 59 C3 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |+Y.."...........|
00002370: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00002380: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 3B 00 |.............";.|
00002390: 98 2B 5A C3 99 22 11 22 00 C7 2B 64 C3 42 45 24 |.+Z.."."..+d.BE$|
000023A0: B2 22 22 3A 97 31 39 38 2C 30 3A 97 32 31 31 2C |."":.198,0:.211,|
000023B0: 30 3A 97 32 31 34 2C 32 32 3A 9E 35 38 37 33 32 |0:.214,22:.58732|
000023C0: 3A 99 22 9E A4 22 3B 00 DF 2B 6E C3 A1 58 24 3A |:."..";..+n..X$:|
000023D0: 8B C2 28 32 30 33 29 B2 31 A7 35 30 31 32 30 00 |..(203).1.50120.|
000023E0: 12 2C 73 C3 8B 20 C2 28 32 30 33 29 B2 37 AF C2 |.,s.. .(203).7..|
000023F0: 28 36 35 33 29 B2 30 20 A7 20 53 43 B2 31 20 3A |(653).0 . SC.1 :|
00002400: 20 8D 20 32 30 30 30 30 20 3A 20 89 20 35 30 30 | . 20000 : . 500|
00002410: 30 30 00 46 2C 75 C3 8B 20 C2 28 32 30 33 29 B2 |00.F,u.. .(203).|
00002420: 37 AF C2 28 36 35 33 29 B2 31 20 A7 20 53 43 B2 |7..(653).1 . SC.|
00002430: AB 31 20 3A 20 8D 20 32 30 30 30 30 20 3A 20 89 |.1 : . 20000 : .|
00002440: 20 35 30 30 30 30 00 57 2C 78 C3 8B 58 24 B2 22 | 50000.W,x..X$."|
00002450: 22 A7 35 30 30 33 30 00 74 2C 82 C3 8B C3 28 42 |".50030.t,....(B|
00002460: 45 24 29 B2 30 AF C6 28 58 24 29 B2 32 30 A7 35 |E$).0..(X$).20.5|
00002470: 30 30 33 30 00 9F 2C 8C C3 49 B2 C6 28 58 24 29 |0030..,..I..(X$)|
00002480: 3A 8B 49 B3 33 32 B0 49 B1 31 33 33 AF 49 B3 31 |:.I.32.I.133.I.1|
00002490: 35 39 A7 8B 49 B3 B1 32 30 A7 35 30 30 33 30 00 |59..I..20.50030.|
000024A0: BA 2C 96 C3 8B C3 28 42 45 24 29 B2 53 4C AF 49 |.,....(BE$).SL.I|
000024B0: B3 B1 32 30 A7 35 30 30 33 30 00 CD 2C 9B C3 8B |..20.50030..,...|
000024C0: 58 24 B2 22 20 22 A7 58 24 B2 22 1D 22 00 DC 2C |X$." ".X$."."..,|
000024D0: A0 C3 42 45 24 B2 42 45 24 AA 58 24 00 EF 2C AA |..BE$.BE$.X$..,.|
000024E0: C3 99 C7 28 32 30 29 3B 58 24 3B 22 A4 22 3B 00 |...(20);X$;".";.|
000024F0: 14 2D B4 C3 8B 49 B2 32 30 A7 42 45 24 B2 C8 28 |.-...I.20.BE$..(|
00002500: 42 45 24 2C C3 28 42 45 24 29 AB 32 29 3A 89 35 |BE$,.(BE$).2):.5|
00002510: 30 30 33 30 00 1F 2D BE C3 89 35 30 30 33 30 00 |0030..-...50030.|
00002520: 2F 2D C8 C3 99 22 9D 20 22 3A 8D 39 30 30 30 00 |/-...". ":.9000.|
00002530: 43 2D D2 C3 8B 42 45 24 B2 22 22 A7 42 45 24 B2 |C-...BE$."".BE$.|
00002540: 22 3A 22 00 66 2D DC C3 99 22 13 11 11 11 11 11 |":".f-..."......|
00002550: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00002560: 11 11 11 22 3A 8E 00 B3 2D 60 EA 8F 20 4D 41 52 |...":...-`.. MAR|
00002570: 4B 49 45 52 45 4E 20 57 49 45 20 44 41 54 49 45 |KIEREN WIE DATIE|
00002580: 52 54 20 57 49 52 44 20 2D 2D 2D 2D 2D 2D 2D 2D |RT WIRD --------|
00002590: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000025A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000025B0: 2D 2D 2D 00 D4 2D 6A EA 49 24 B2 41 24 3A 81 49 |---..-j.I$.A$:.I|
000025C0: B2 31 A4 C3 28 49 24 29 3A 4D 24 28 49 29 B2 22 |.1..(I$):M$(I)."|
000025D0: 30 22 3A 82 00 DF 2D 74 EA 49 4D B2 31 3A 99 00 |0":...-t.IM.1:..|
000025E0: FE 2D 79 EA 99 49 24 3A 81 49 B2 31 A4 C3 28 49 |.-y..I$:.I.1..(I|
000025F0: 24 29 3A 99 4D 24 28 49 29 3B 3A 82 3A 99 00 28 |$):.M$(I);:.:..(|
00002600: 2E 7E EA 99 22 11 45 44 49 54 20 20 20 3E 22 3B |.~..".EDIT >";|
00002610: CA 28 49 24 2C 49 4D 2C 31 29 3B 22 3C 20 20 20 |.(I$,IM,1);"< |
00002620: 20 12 22 49 4D 22 92 22 00 41 2E 83 EA 49 B2 C2 | ."IM".".A...I..|
00002630: 28 32 30 33 29 3A 8B 49 B2 36 34 A7 36 30 30 33 |(203):.I.64.6003|
00002640: 35 00 6C 2E 88 EA 8B 49 B2 32 AF C2 28 36 35 33 |5.l....I.2..(653|
00002650: 29 B2 30 AF 49 4D B3 B1 C3 28 49 24 29 A7 49 4D |).0.IM...(I$).IM|
00002660: B2 49 4D AA 31 3A 89 36 30 30 37 30 00 93 2E 8A |.IM.1:.60070....|
00002670: EA 8B 49 B2 32 AF C2 28 36 35 33 29 B2 31 AF 49 |..I.2..(653).1.I|
00002680: 4D B3 B1 31 A7 49 4D B2 49 4D AB 31 3A 89 36 30 |M..1.IM.IM.1:.60|
00002690: 30 37 30 00 AF 2E 8D EA 8B 49 B2 35 36 A7 4D 24 |070......I.56.M$|
000026A0: 28 49 4D 29 B2 22 31 22 3A 89 36 30 30 37 30 00 |(IM)."1":.60070.|
000026B0: CB 2E 97 EA 8B 49 B2 33 35 A7 4D 24 28 49 4D 29 |.....I.35.M$(IM)|
000026C0: B2 22 30 22 3A 89 36 30 30 37 30 00 DA 2E 98 EA |."0":.60070.....|
000026D0: 8B 49 B2 31 A7 36 30 31 30 30 00 E5 2E 9C EA 89 |.I.1.60100......|
000026E0: 36 30 30 33 35 00 2B 2F A6 EA 99 22 91 20 20 20 |60035.+/...". |
000026F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002700: 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ..........|
00002710: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 91 |................|
00002720: 91 91 22 3B 3A 89 36 30 30 32 35 00 3B 2F C4 EA |..";:.60025.;/..|
00002730: 8F 20 55 4D 52 45 43 48 4E 45 4E 00 59 2F C6 EA |. UMRECHNEN.Y/..|
00002740: 81 49 B2 31 A4 33 3A 4D 41 28 49 29 B2 30 3A 4D |.I.1.3:MA(I).0:M|
00002750: 42 28 49 29 B2 30 3A 82 49 00 65 2F C9 EA 81 49 |B(I).0:.I.e/...I|
00002760: 49 B2 31 A4 33 00 99 2F CE EA 3A 81 49 B2 31 A4 |I.1.3../..:.I.1.|
00002770: C3 28 49 24 29 3A 8B 4D 41 28 49 49 29 B2 30 AF |.(I$):.MA(II).0.|
00002780: 4D 24 28 49 29 B2 C9 28 C4 28 49 49 29 2C 31 29 |M$(I)..(.(II),1)|
00002790: A7 4D 41 28 49 49 29 B2 49 00 A0 2F D1 EA 82 49 |.MA(II).I../...I|
000027A0: 00 B5 2F D3 EA 3A 8B 4D 41 28 49 49 29 B2 30 A7 |../..:.MA(II).0.|
000027B0: 36 30 31 35 30 00 CB 2F D8 EA 3A 20 20 20 4D 42 |60150../..: MB|
000027C0: 28 49 49 29 B2 4D 41 28 49 49 29 00 F1 2F DD EA |(II).MA(II)../..|
000027D0: 3A 20 20 20 4D 42 28 49 49 29 B2 4D 42 28 49 49 |: MB(II).MB(II|
000027E0: 29 AA 31 3A 8F 50 52 49 4E 54 2C 4D 42 28 49 49 |).1:.PRINT,MB(II|
000027F0: 29 00 28 30 E2 EA 3A 20 20 20 8B 4D 24 28 4D 42 |).(0..: .M$(MB|
00002800: 28 49 49 29 29 B3 B1 C9 28 C4 28 49 49 29 2C 31 |(II))...(.(II),1|
00002810: 29 A7 4D 42 28 49 49 29 B2 4D 42 28 49 49 29 AB |).MB(II).MB(II).|
00002820: 31 3A 89 36 30 31 35 30 00 44 30 E7 EA 3A 20 20 |1:.60150.D0..: |
00002830: 20 8B 4D 42 28 49 49 29 B2 C3 28 49 24 29 A7 36 | .MB(II)..(I$).6|
00002840: 30 31 35 30 00 53 30 EC EA 3A 20 20 20 89 36 30 |0150.S0..: .60|
00002850: 31 32 35 00 5B 30 F6 EA 82 49 49 00 99 30 0A EB |125.[0...II..0..|
00002860: 99 22 44 49 45 20 53 4F 52 54 49 45 52 55 4E 47 |."DIE SORTIERUNG|
00002870: 20 45 52 46 4F 4C 47 54 20 4E 41 43 48 20 46 4F | ERFOLGT NACH FO|
00002880: 4C 47 45 4E 44 45 4D 20 20 20 53 54 52 49 4E 47 |LGENDEM STRING|
00002890: 42 45 52 45 49 43 48 3A 22 00 BE 30 14 EB 99 22 |BEREICH:"..0..."|
000028A0: 12 22 CA 28 49 24 2C 4D 41 28 31 29 2C 4D 42 28 |.".(I$,MA(1),MB(|
000028B0: 31 29 AB 4D 41 28 31 29 AA 31 29 22 92 22 00 C4 |1).MA(1).1)"."..|
000028C0: 30 1E EB 8E 00 11 31 48 EE 8F 20 46 4C 4F 50 50 |0.....1H.. FLOPP|
000028D0: 59 2D 46 45 48 4C 45 52 4B 41 4E 41 4C 20 4C 45 |Y-FEHLERKANAL LE|
000028E0: 53 45 4E 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |SEN ------------|
000028F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002900: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00002910: 2D 00 35 31 4D EE 99 22 93 12 46 4C 4F 50 50 59 |-.51M.."..FLOPPY|
00002920: 2D 46 45 48 4C 45 52 4B 41 4E 41 4C 41 42 46 52 |-FEHLERKANALABFR|
00002930: 41 47 45 92 22 00 46 31 52 EE 84 31 35 2C 41 2C |AGE.".F1R..15,A,|
00002940: 42 24 2C 43 2C 44 00 54 31 5C EE 99 41 2C 42 24 |B$,C,D.T1\..A,B$|
00002950: 2C 43 2C 44 00 5C 31 70 EE 89 35 30 00 00 00 |,C,D.\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.AN.AN.1:.".BITTE WAEHLEN
SIE:..Q.B..,"NORMALE AUSGABE ..1...C..,
"D.Z.S. AUSGABE ...2...D..,"EIGENE ROUTI
NE ...3.%.E..I$:.E(I$).1.E(I$).3.7013.6.
F..I$."2".7100.G.G..I$."3".7500.L.L.. NO
RMALE AUSGABE --------------...M..3,4,7:
.SA.AN.EN:.9000:.9100...Q..A.50.."SATZNU
MMER ZU HOCH!":SA.EN.1:.7045...{..3,I("
".D(SA),3);" ";...|..I.1.C(A$)...}.
:.J(A$,I,1)."."..3," ";:.7040. .~.:.3,J(
A$,I,1);.*....I:.3.;....SA: 3:.:.50.`...
. D.Z.SATZ AUSGABE -------------......3,
4,7:.SA.AN.EN:.9000:.9100......A.50.SA.E
N.1:."SATZNUMMER ZU HOCH!":.7170.Q.F..3,
I(" ".D(SA),4);" ";...P..I.1.C(A$)
:.A$."".7160...U.IM.F(J(A$,I,1)).#.V..IM
.64.IM.91.IM.96.IM.123.7160.>.Z..IM.64..
3,G(34);:.7170.Y....IM.173..3,"AE";:.717
0.T....IM.174..3,"SS";:.7170......IM.176
..3,"AE";:.7170......IM.181..3,"UE";:.71
70.E....IM.182..3,"OE";:.7170......IM.18
4..3,"UE";:.7170......IM.185..3,"OE";:.7
170......IM.94..3,":"; :.7170.1....IM.9
5..3,","; :.7170.?....3,G(IM);.P....I:.
3,G(13);.A....SA: 3:.:.50...L.. EIGENE R
OUTINE ---------------.N.V..".SIE HABEN
NOCH KEINE EIGENE PRINTER- ROUTINE DE
FFINIERT!":.50...@.. TEXT ZENTRIEREN ---
----------------------------------------
------------.N.A.I$."":.I.1.10:I$.I$."..
..................":.I.Y.B..SL=27.R.E..D
IMM$(300):GOTO8100...J..".ZENTRIEREN..".
S.O.."BITTE GEBEN SIE ANFANG UND ENDE DE
S BEREICHES AN, DER ZENTRIERT";...Q.
." WERDEN SOLL!"...T.."ANFANG";AN:."ENDE
";EN:.AN.EN.50.H.Y.SA.AN:.9000:.A.50.."A
NFANGSSATZ EXISTIERT NICHT!":.50.V.^.SA.
EN:.9000:.A.50.."ENDSATZ ZU HOCH!":.50..
.H..".LINKS-RECHTS BUENDIG ZENTRIEREN -
'1'.R.M..".IN DIE MITTE ZENTRIEREN
- '2'...R..II$:.II$.."1".II$.."2".8
050...|..II$."2".8600.*.... LINKS-RECHTS
BUENDIG ---------.@....".BITTE WARTEN!"
.N....SA.AN.EN.K...: .9000:.9100:.A$:.C(
A$).....: .I(A$,1).G(29).A$.H(A$,C(A$).1
):.8120.C...: .I(A$,1).G(32).A$.H(A$,C(A
$).1):.8122.....: .I(A$,1).G(160).A$.H(A
$,C(A$).1):.8123...B.: .C(A$).SL.8520.".
. : LU.SL.C(A$):."LU=";LU.G.. : I.1:IC
.0:. BEGIN LOOP -------.M.. :.W.& : .J
(A$,I,1)."".J(A$,I.1,1)."".8530...' :
IM.F(J(A$,I,1))...( : IN.F(J(A$,I.1,1)
).M.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.E : .J(
A$,I,1)." ".J(A$,I,1).".".I.I.1:.8261.`.
I : LU.LU.1:.LU.0.8510.P.J : IC.IC.1
.~.N : I.I.1...P :...4!I.I.1. .9!.I.C(
A$).8230...>!.I.C(A$).LU.0.IC..0.8220.M.
H!.9000:.9200.U.R!.SA...\!.50.. .!. IN D
IE MITTE -----------------.. .!.".BITTE
WARTEN!".& .!.SA.AN.EN.7 .!:.9000:.9100.
A .!.I(A$,1).G(29).A$.H(A$,C(A$).1):.863
5.. .!.I(A$,1).G(32).A$.H(A$,C(A$).1):.8
636.. .!.I(A$,1).G(160).A$.H(A$,C(A$).1)
:.8637.J .!:.C(A$).SL.8680.. J!:AS.SL.C(
A$): . ANZAHL SPACES..!T!:A$.H(I$,AS.2).
A$..!.!:.9000:.9200..!.!.SA.#!.!.50.H!(#
. POSITIONIEREN ****************.F!2#HB%
.SA.256:LB%.SA.HB%.256..!<#.15,"P";G(3);
G(LB%);G(HB%);G(1)..!F#.15,A..!P#...!.#.
SATZ EINLESEN ****************.K!.#.A.5
0...U! #.1,A$..!.#...".#. SATZ SCHREIBEN
***************..".#.A.50...3".#.A$."".
A$.":":. ZUR SICHERHEIT !!!.=".$.1,A$.C"
.$..H".&. BEENDEN **********************
.P".& 1.Y".& 15.."J&. "++ ENDE ++".."T
&...".'. SORT-ALOGARITHMUS -------------
---------------------------------------.
.".'."..DATEI SORTIEREN.".B#T'."BITTE GE
BEN SIE ANFANG UND ENDE DES ZU SORTIERE
NDEN BEREICHS AN !.S#~'."ANFANG";AN.D#.'
."ENDE"; EN..#.'SA.AN:.9000:.A.50.."ANF
ANGSSATZ EXISTIERT NICHT!":.50.L#.'SA.EN
:.9000:.A.50.."ENDSATZ ZU HOCH!":.50..#.
'.EN.AN.M%.."BEREICH ZU GROSS!":.50.!$.'
.".BITTE MARKIEREN SIE DEN BEREICH INNER
-.R$.'."HALB DER STRINGS NACH DEM DIE SO
RTIERUNG";.H$.'."ERFOLGEN SOLL!"..$.'SA.
AN:.9000:.9100:.A.50.."SATZ EXISTIERT NI
CHT!":.50..$.'IG..1:.60000:IG.0.R$.'IC.0
:.SA.AN.EN:IC.IC.1..%.':.9000:.9100:.A.5
0.."SATZNUMMER ZU HOCH!":SA.EN.1:.1015..
%.':M$(IC).A$.%%.'.SA.C%D'Z.0:LG(1).1:RG
(1).EN.AN.1.U%N'.10200:.10400.X%X'. QUI
CKSORT -----------------..%.'Z.Z.1:.LG(Z
)..RG(Z).10350..%.'X.LG(Z):Y.RG(Z).X%.'V
G$.J(M$(.((X.Y).2)),MA(1),MB(1).MA(1).1)
..%.(. X.Y .10330..&.(. J(M$(X),MA(1),MB
(1).MA(1).1).VG$.X.X.1:.10250.Q&.(. J(M$
(Y),MA(1),MB(1).MA(1).1).VG$.Y.Y.1:.1026
0.A&.(. X.Y.10330..&((S$.M$(X):M$(X).M$(
Y):M$(Y).S$..&2(X.X.1:Y.Y.1:.10240..&Z(R
G(Z.1).Y:LG(Z.1).LG(Z):.10210..&D(LG(Z.1
).X:RG(Z.1).RG(Z):.10210..&N(Z.Z.1:...&
(. ABSPEICHERN..'.(IC.0:.SA.AN.EN:IC.IC.
1.4'.(:.9000:A$.M$(IC):.9200.<'.(.SA.D'.
).50..' N. KORREKTUR-ROUTINE -----------
----------------------------------------
-..'!N.I.0.C(BE$):.G(20);:.I:BE$."".U'*N
SA.SA.SC : . TEXTZEIGER..'/N.SA.0.
SA.0 : . SPERRE..(4N. 9000 : . POSIT
IONIEREN.*(9N.A.50.SA.SA.SC:.20020.4(HN.
1,A$.:(\N...(0U. DIRECTORY EINLESEN ----
----------------------------------------
-------..(:U."..INHALTSVERZEICHNIS:.."..
(.U.15,"IO":.2,8,2,"#".K(.UT.18:S.1..(.U
.15,"U1";2;0;T;S..(.U.15,"B-P";2;0..)FU.
#2,X$:.X$."".X$.G(0)..)PUT.F(X$).2)ZU.#2
,X$:.X$."".X$.G(0).>).US.F(X$).I).U.X.0.
7.`).U.15,"B-P";2;X.32.2.Z).U.#2,X$:.X$.
"".X$.G(0)..).U.F(X$).0.30290..).U.15,"B
-P";2;X.32.5..).VFF$.""..).V.Y.0.15.U).V
.#2,X$:.X$."".X$.G(0)..) V.F(X$).160.302
70..)*VFF$.FF$.X$..*4V.Y..*>V.A.0.A.1:.F
F$;:.30290.1*HVA.0:..19);". ";FF$.8*RV.X
.H*\V.T..0.30130.Q*FV 2:..Y*ZV.50..*PC.
TEXTEINGABE ----------------------------
------------------------------.W*RC.AR.1
.AR.0:A$.".SATZNUMMER ZU HOCH!.":.50007.
.*VC.9000:.9100.*+WC.".
";:."..SATZ";SA;"
.".^+XC."
.";A$..+YC."...................
.....................";..+ZC.".".G+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.F,UC.
B(203).7.B(653).1 . SC..1 : . 20000 : .
50000.W,XC.X$."".50030.T,.C.C(BE$).0.F(
X$).20.50030..,.CI.F(X$):.I.32.I.133.I.1
59..I..20.50030..,.C.C(BE$).SL.I..20.500
30.M,.C.X$." ".X$.".".., CBE$.BE$.X$..,.
C.G(20);X$;".";..-.C.I.20.BE$.H(BE$,C(BE
$).2):.50030..-.C.50030./-HC.". ":.9000.
C-RC.BE$."".BE$.":".F-.C."..............
...........":...-`.. MARKIEREN WIE DATIE
RT WIRD --------------------------------
-----------.T-J.I$.A$:.I.1.C(I$):M$(I)."
0":...-T.IM.1:...-Y..I$:.I.1.C(I$):.M$(I
);:.:..(.~..".EDIT >";J(I$,IM,1);"<
."IM".".A...I.B(203):.I.64.60035.L....I
.2.B(653).0.IM..C(I$).IM.IM.1:.60070....
..I.2.B(653).1.IM..1.IM.IM.1:.60070.....
.I.56.M$(IM)."1":.60070.K....I.35.M$(IM)
."0":.60070.Z....I.1.60100......60035.+/
...". ..........
..................";:.60025.;/D.. UMRECH
NEN.Y/F..I.1.3:MA(I).0:MB(I).0:.I.E/I..I
I.1.3../N.:.I.1.C(I$):.MA(II).0.M$(I).I(
D(II),1).MA(II).I. /Q..I../S.:.MA(II).0.
60150.K/X.: MB(II).MA(II)../..: MB(I
I).MB(II).1:.PRINT,MB(II).(0..: .M$(MB
(II))..I(D(II),1).MB(II).MB(II).1:.60150
.D0..: .MB(II).C(I$).60150.S0..: .60
125.[0...II..0..."DIE SORTIERUNG ERFOLGT
NACH FOLGENDEM STRINGBEREICH:"..0..."
."J(I$,MA(1),MB(1).MA(1).1)".".D0.....1H
.. FLOPPY-FEHLERKANAL LESEN ------------
---------------------------------.51M.."
..FLOPPY-FEHLERKANALABFRAGE.".F1R..15,A,
B$,C,D.T1\..A,B$,C,D.\1P..50...
> CLICK IMAGE PREVIEW FOR FULL MODAL