3.TRACK 18
FILE INFORMATION
FILENAME(S): 3.TRACK 18
FILE TYPE(S): PRG
FILE SIZE: 7.6K
FIRST SEEN: 2025-11-30 01:07:55
APPEARS ON: 2 disk(s)
FILE HASH
0cbea93ba716dc9c17b83fb4cc28ddf89883ede14d1a9d2f67fba687eebd7d1d
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| U TILITIE | 3.TRACK 18 | PRG | Treasure Chest - Wolfgang Rauprich | 20 | 5 | DOWNLOAD FILE |
| FREEWARE DISK NR | 3.TRACK 18 | PRG | Treasure Chest - Wolfgang Rauprich | 20 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 01 00 8F 20 3A 3A 3A 3A 3A 3A 3A 3A |..).... ::::::::|
00000010: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00000020: 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 51 08 02 00 8F 20 |:::::::::.Q.... |
00000030: 3A 3A 20 20 54 52 41 43 4B 20 31 38 20 20 4D 41 |:: TRACK 18 MA|
00000040: 4E 49 50 55 4C 41 54 49 4F 4E 45 4E 20 20 20 3A |NIPULATIONEN :|
00000050: 3A 00 79 08 06 00 8F 20 3A 3A 3A 3A 3A 3A 3A 3A |:.y.... ::::::::|
00000060: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00000070: 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 7F 08 07 00 8F 00 |:::::::::.......|
00000080: CD 08 09 00 83 33 32 2C 32 35 33 2C 31 37 34 2C |.....32,253,174,|
00000090: 33 32 2C 31 35 38 2C 31 38 33 2C 31 33 38 2C 37 |32,158,183,138,7|
000000A0: 32 2C 33 32 2C 32 35 33 2C 31 37 34 2C 33 32 2C |2,32,253,174,32,|
000000B0: 31 35 38 2C 31 38 33 2C 31 30 34 2C 31 36 38 2C |158,183,104,168,|
000000C0: 32 34 2C 37 36 2C 32 34 30 2C 32 35 35 00 08 09 |24,76,240,255...|
000000D0: 0A 00 83 2C 22 53 45 51 22 2C 22 50 52 47 22 2C |...,"SEQ","PRG",|
000000E0: 22 55 53 52 22 2C 22 52 45 4C 22 2C 2C 22 53 45 |"USR","REL",,"SE|
000000F0: 51 3C 22 2C 22 50 52 47 3C 22 2C 22 55 53 52 3C |Q<","PRG<","USR<|
00000100: 22 2C 22 52 45 4C 3C 22 00 25 09 0B 00 97 35 33 |","REL<".%....53|
00000110: 32 38 30 2C 36 3A 97 35 33 32 38 31 2C 36 3A 97 |280,6:.53281,6:.|
00000120: 36 34 36 2C 31 00 44 09 0C 00 86 46 24 28 31 34 |646,1.D....F$(14|
00000130: 34 29 2C 4E 24 28 31 34 34 29 3A 55 B2 31 3A 50 |4),N$(144):U.1:P|
00000140: B2 38 32 38 00 6E 09 0F 00 46 52 24 B2 C7 28 30 |.828.n...FR$..(0|
00000150: 29 AA C7 28 30 29 AA C7 28 30 29 AA 22 2D 2D 2D |)..(0)..(0)."---|
00000160: 2D 2D 20 46 52 45 49 20 2D 2D 2D 2D 2D 22 00 8A |-- FREI -----"..|
00000170: 09 10 00 81 49 B2 30 A4 31 30 3A 46 52 24 B2 46 |....I.0.10:FR$.F|
00000180: 52 24 AA C7 28 30 29 3A 82 49 00 C9 09 11 00 81 |R$..(0):.I......|
00000190: 49 B2 38 32 38 A4 38 34 37 3A 87 58 3A 97 49 2C |I.828.847:.X:.I,|
000001A0: 58 3A 82 3A 8F 20 50 52 49 4E 54 20 41 54 20 52 |X:.:. PRINT AT R|
000001B0: 4F 55 54 49 4E 45 20 49 4E 20 4B 41 53 53 45 54 |OUTINE IN KASSET|
000001C0: 54 45 4E 50 55 46 46 45 52 00 DE 09 12 00 81 49 |TENPUFFER......I|
000001D0: B2 30 A4 39 3A 87 54 59 24 28 49 29 3A 82 00 E9 |.0.9:.TY$(I):...|
000001E0: 09 1C 00 89 35 30 30 30 30 00 10 0A 22 00 8F 20 |....50000...".. |
000001F0: 2A 2A 2A 2A 2A 20 45 49 4E 46 41 43 48 45 53 20 |***** EINFACHES |
00000200: 47 45 54 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |GET ************|
00000210: 00 30 0A 23 00 97 31 39 38 2C 30 3A 92 31 39 38 |.0.#..198,0:.198|
00000220: 2C 31 3A A1 41 24 3A 41 B2 C6 28 41 24 29 3A 8E |,1:.A$:A..(A$):.|
00000230: 00 57 0A 27 00 8F 20 2A 2A 2A 2A 2A 20 47 45 54 |.W.'.. ***** GET|
00000240: 20 4D 49 54 20 43 55 52 53 4F 52 20 2A 2A 2A 2A | MIT CURSOR ****|
00000250: 2A 2A 2A 2A 2A 2A 2A 00 73 0A 28 00 97 32 30 37 |*******.s.(..207|
00000260: 2C 30 3A 8F 20 42 4C 49 4E 4B 50 48 41 53 45 20 |,0:. BLINKPHASE |
00000270: 41 55 53 00 8B 0A 29 00 97 32 30 34 2C 30 3A 8F |AUS...)..204,0:.|
00000280: 20 43 55 52 53 4F 52 20 45 49 4E 00 A9 0A 2A 00 | CURSOR EIN...*.|
00000290: 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 41 |.198,0:.198,1:.A|
000002A0: 24 3A 41 B2 C6 28 41 24 29 00 C1 0A 2C 00 97 32 |$:A..(A$)...,..2|
000002B0: 30 34 2C 31 3A 8F 20 43 55 52 53 4F 52 20 41 55 |04,1:. CURSOR AU|
000002C0: 53 00 EB 0A 2E 00 42 B2 31 30 32 34 AA C2 28 32 |S.....B.1024..(2|
000002D0: 31 31 29 AA C2 28 32 31 34 29 AC 34 30 3A 97 42 |11)..(214).40:.B|
000002E0: 2C C2 28 42 29 AF 31 32 37 3A 8E 00 12 0B 31 00 |,.(B).127:....1.|
000002F0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 20 47 45 54 42 49 |. ******** GETBI|
00000300: 4C 44 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |LD *************|
00000310: 2A 2A 00 20 0B 32 00 42 24 B2 22 22 3A 58 B2 30 |**. .2.B$."":X.0|
00000320: 00 2D 0B 33 00 9E 50 2C 43 58 2C 43 59 00 35 0B |.-.3..P,CX,CY.5.|
00000330: 34 00 8D 34 30 00 70 0B 36 00 8B 41 B2 32 30 AF |4..40.p.6..A.20.|
00000340: 58 B1 30 A7 43 58 B2 43 58 AA 28 58 B3 4C 29 3A |X.0.CX.CX.(X.L):|
00000350: 97 42 AA 28 58 B3 4C 29 2C 42 43 3A 58 B2 58 AB |.B.(X.L),BC:X.X.|
00000360: 31 3A 42 24 B2 C8 28 42 24 2C 58 29 3A 89 35 31 |1:B$..(B$,X):.51|
00000370: 00 80 0B 38 00 8B 41 B2 31 33 A7 41 B2 31 3A 8E |...8..A.13.A.1:.|
00000380: 00 91 0B 3A 00 8B 41 B2 31 33 33 A7 41 B2 32 3A |...:..A.133.A.2:|
00000390: 8E 00 A1 0B 3C 00 8B 41 B3 47 B0 41 B1 48 A7 35 |....<..A.G.A.H.5|
000003A0: 32 00 B7 0B 3E 00 8B 58 B2 4C A7 42 24 B2 C8 28 |2...>..X.L.B$..(|
000003B0: 42 24 2C 4C AB 31 29 00 D0 0B 40 00 99 41 24 3A |B$,L.1)...@..A$:|
000003C0: 42 24 B2 42 24 AA 41 24 3A 58 B2 C3 28 42 24 29 |B$.B$.A$:X..(B$)|
000003D0: 00 E4 0B 42 00 43 58 B2 43 58 AB 28 58 B3 4C 29 |...B.CX.CX.(X.L)|
000003E0: 3A 89 35 31 00 0A 0C C7 00 8F 20 2A 2A 2A 2A 20 |:.51...... **** |
000003F0: 44 49 53 4B 4E 41 4D 45 4E 20 45 49 4E 4C 45 53 |DISKNAMEN EINLES|
00000400: 45 4E 20 2A 2A 2A 2A 2A 2A 2A 00 1A 0C C8 00 9F |EN *******......|
00000410: 31 2C 38 2C 31 35 2C 22 49 22 00 29 0C D2 00 9F |1,8,15,"I".)....|
00000420: 32 2C 38 2C 32 2C 22 23 22 00 3E 0C D7 00 98 31 |2,8,2,"#".>....1|
00000430: 2C 22 55 31 20 32 20 30 20 31 38 20 30 22 00 51 |,"U1 2 0 18 0".Q|
00000440: 0C DC 00 98 31 2C 22 42 2D 50 20 32 20 31 34 34 |....1,"B-P 2 144|
00000450: 22 00 5C 0C E1 00 44 4E 24 B2 22 22 00 7D 0C E6 |".\...DN$."".}..|
00000460: 00 81 49 B2 31 A4 32 33 3A A1 23 32 2C 41 24 3A |..I.1.23:.#2,A$:|
00000470: 44 4E 24 B2 44 4E 24 AA 41 24 3A 82 49 00 83 0C |DN$.DN$.A$:.I...|
00000480: F0 00 8E 00 A9 0C F9 00 8F 20 2A 2A 2A 2A 20 44 |......... **** D|
00000490: 49 52 45 43 54 4F 52 59 20 45 49 4E 4C 45 53 45 |IRECTORY EINLESE|
000004A0: 4E 20 2A 2A 2A 2A 2A 2A 2A 00 CF 0C FA 00 99 22 |N *******......"|
000004B0: 93 20 20 20 20 20 20 20 20 20 20 44 49 52 45 43 |. DIREC|
000004C0: 54 4F 52 59 20 20 45 49 4E 4C 45 53 45 4E 22 00 |TORY EINLESEN".|
000004D0: F4 0C 04 01 99 22 20 20 20 20 20 20 20 20 20 20 |....." |
000004E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000004F0: 2D 2D 2D 22 00 0F 0D 18 01 8D 32 30 30 3A 9E 50 |---"......200:.P|
00000500: 2C 38 2C 34 3A 99 22 12 22 44 4E 24 22 92 22 00 |,8,4:."."DN$".".|
00000510: 1B 0D 22 01 53 B2 31 3A 43 B2 30 00 30 0D 2C 01 |..".S.1:C.0.0.,.|
00000520: 98 31 2C 22 55 31 20 32 20 30 20 31 38 22 3B 53 |.1,"U1 2 0 18";S|
00000530: 00 42 0D 36 01 A1 23 32 2C 54 24 3A A1 23 32 2C |.B.6..#2,T$:.#2,|
00000540: 53 24 00 5B 0D 40 01 54 B2 C6 28 54 24 AA C7 28 |S$.[.@.T..(T$..(|
00000550: 30 29 29 3A 53 B2 C6 28 53 24 29 00 75 0D 4A 01 |0)):S..(S$).u.J.|
00000560: 81 49 B2 30 A4 37 3A 43 B2 43 AA 31 3A 46 24 28 |.I.0.7:C.C.1:F$(|
00000570: 43 29 B2 22 22 00 81 0D 5E 01 81 4A B2 30 A4 32 |C).""...^..J.0.2|
00000580: 39 00 A5 0D 68 01 A1 23 32 2C 41 24 3A 46 24 28 |9...h..#2,A$:F$(|
00000590: 43 29 B2 46 24 28 43 29 AA C8 28 41 24 AA C7 28 |C).F$(C)..(A$..(|
000005A0: 30 29 2C 31 29 00 AC 0D 72 01 82 4A 00 BE 0D 73 |0),1)...r..J...s|
000005B0: 01 A1 23 32 2C 41 24 3A A1 23 32 2C 41 24 00 DD |..#2,A$:.#2,A$..|
000005C0: 0D 74 01 8B C6 28 C8 28 46 24 28 43 29 2C 31 29 |.t...(.(F$(C),1)|
000005D0: 29 B2 30 A7 46 24 28 43 29 B2 46 52 24 00 ED 0D |).0.F$(C).FR$...|
000005E0: 75 01 4E 24 28 43 29 B2 46 24 28 43 29 00 01 0E |u.N$(C).F$(C)...|
000005F0: 77 01 9E 50 2C 30 2C 38 3A 99 22 4E 52 2E 22 43 |w..P,0,8:."NR."C|
00000600: 3B 00 18 0E 7A 01 99 A3 39 29 3B CA 28 46 24 28 |;...z...9);.(F$(|
00000610: 43 29 2C 34 2C 31 36 29 00 1F 0E 7C 01 82 49 00 |C),4,16)...|..I.|
00000620: 2A 0E 86 01 8B 54 A7 33 30 30 00 42 0E 90 01 52 |*....T.300.B...R|
00000630: 28 30 29 B2 43 3A A0 32 3A A0 31 3A 89 35 30 30 |(0).C:.2:.1:.500|
00000640: 30 30 00 68 0E F3 01 8F 20 2A 2A 2A 2A 2A 20 46 |00.h.... ***** F|
00000650: 49 4C 45 20 53 43 48 55 45 54 5A 45 4E 20 2A 2A |ILE SCHUETZEN **|
00000660: 2A 2A 2A 2A 2A 2A 2A 2A 00 8B 0E F4 01 99 22 93 |********......".|
00000670: 20 20 20 20 20 20 20 20 20 20 46 49 4C 45 53 20 | FILES |
00000680: 20 53 43 48 55 45 54 5A 45 4E 22 00 AD 0E F5 01 | SCHUETZEN".....|
00000690: 99 22 20 20 20 20 20 20 20 20 20 20 2D 2D 2D 2D |." ----|
000006A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 B5 0E |------------"...|
000006B0: FE 01 46 B2 31 00 CB 0E 08 02 9E 50 2C 31 31 2C |..F.1......P,11,|
000006C0: 35 3A 43 24 28 46 29 B2 22 12 22 00 F0 0E 12 02 |5:C$(F).".".....|
000006D0: 99 43 24 28 31 29 22 46 49 4C 45 20 53 43 48 55 |.C$(1)"FILE SCHU|
000006E0: 45 54 5A 45 4E 92 22 3A 43 24 28 31 29 B2 22 22 |ETZEN.":C$(1).""|
000006F0: 00 FC 0E 14 02 9E 50 2C 31 31 2C 37 00 21 0F 16 |......P,11,7.!..|
00000700: 02 99 43 24 28 32 29 22 46 49 4C 45 20 46 52 45 |..C$(2)"FILE FRE|
00000710: 49 47 45 42 45 4E 92 22 3A 43 24 28 32 29 B2 22 |IGEBEN.":C$(2)."|
00000720: 22 00 29 0F 1A 02 8D 33 35 00 3C 0F 1C 02 8B 41 |".)....35.<....A|
00000730: B2 31 37 A7 46 B2 32 3A 89 35 32 30 00 50 0F 1E |.17.F.2:.520.P..|
00000740: 02 8B 41 B2 31 34 35 A7 46 B2 31 3A 89 35 32 30 |..A.145.F.1:.520|
00000750: 00 61 0F 20 02 8B 41 B2 31 33 33 A7 35 30 30 30 |.a. ..A.133.5000|
00000760: 30 00 70 0F 22 02 8B 41 B3 B1 31 33 A7 35 33 38 |0.p."..A..13.538|
00000770: 00 88 0F 3A 02 43 58 B2 30 3A 43 59 B2 31 35 3A |...:.CX.0:CY.15:|
00000780: 9E 50 2C 43 58 2C 43 59 00 B1 0F 44 02 99 22 4E |.P,CX,CY...D.."N|
00000790: 41 4D 45 20 44 45 53 20 46 49 4C 45 53 20 3A 20 |AME DES FILES : |
000007A0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
000007B0: 22 00 D5 0F 58 02 43 58 B2 31 37 3A 4C B2 31 36 |"...X.CX.17:L.16|
000007C0: 3A 47 B2 33 32 3A 48 B2 31 32 37 3A 42 43 B2 34 |:G.32:H.127:BC.4|
000007D0: 36 3A 8D 35 30 00 E6 0F 62 02 91 41 89 36 32 30 |6:.50...b..A.620|
000007E0: 2C 35 30 30 30 30 00 07 10 6C 02 81 49 B2 31 A4 |,50000...l..I.1.|
000007F0: 31 36 AB C3 28 42 24 29 3A 42 24 B2 42 24 AA C7 |16..(B$):B$.B$..|
00000800: 28 31 36 30 29 3A 82 00 2C 10 76 02 8F 20 2D 2D |(160):..,.v.. --|
00000810: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000820: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 3D 10 80 |------------.=..|
00000830: 02 54 B2 31 38 3A 53 B2 31 3A 58 B2 30 00 54 10 |.T.18:S.1:X.0.T.|
00000840: 8A 02 9F 31 2C 38 2C 31 35 3A 9F 32 2C 38 2C 32 |...1,8,15:.2,8,2|
00000850: 2C 22 23 22 00 62 10 94 02 54 31 B2 54 3A 53 31 |,"#".b...T1.T:S1|
00000860: B2 53 00 78 10 99 02 98 31 2C 22 55 31 20 32 20 |.S.x....1,"U1 2 |
00000870: 30 20 31 38 22 3B 53 31 00 9F 10 9E 02 A1 23 32 |0 18";S1......#2|
00000880: 2C 54 24 3A A1 23 32 2C 53 24 3A 54 B2 C6 28 54 |,T$:.#2,S$:T..(T|
00000890: 24 AA C7 28 30 29 29 3A 53 B2 C6 28 53 24 29 00 |$..(0)):S..(S$).|
000008A0: B0 10 B2 02 81 49 B2 30 A4 37 3A 43 24 B2 22 22 |.....I.0.7:C$.""|
000008B0: 00 C6 10 B4 02 98 31 2C 22 42 2D 50 20 32 22 3B |......1,"B-P 2";|
000008C0: 32 AA 33 32 AC 49 00 DC 10 B6 02 A1 23 32 2C 41 |2.32.I......#2,A|
000008D0: 24 3A 8B 41 24 B2 22 22 A7 37 32 30 00 0D 11 BC |$:.A$."".720....|
000008E0: 02 98 31 2C 22 42 2D 50 20 32 22 3B 35 AA 33 32 |..1,"B-P 2";5.32|
000008F0: AC 49 3A 81 4A B2 31 A4 31 36 3A A1 23 32 2C 41 |.I:.J.1.16:.#2,A|
00000900: 24 3A 43 24 B2 43 24 AA 41 24 3A 82 4A 00 20 11 |$:C$.C$.A$:.J. .|
00000910: C6 02 8B 43 24 B2 42 24 A7 58 B2 49 3A 49 B2 37 |...C$.B$.X.I:I.7|
00000920: 00 27 11 D0 02 82 49 00 38 11 D5 02 8B 54 B2 30 |.'....I.8....T.0|
00000930: AF 58 B2 30 A7 37 39 30 00 45 11 DA 02 8B 58 B2 |.X.0.790.E....X.|
00000940: 30 A7 36 36 30 00 55 11 E0 02 50 24 B2 22 2D 20 |0.660.U...P$."- |
00000950: 4F 4B 20 2D 22 00 6B 11 E2 02 98 31 2C 22 55 31 |OK -".k....1,"U1|
00000960: 20 32 20 30 20 31 38 22 3B 53 31 00 81 11 E4 02 | 2 0 18";S1.....|
00000970: 98 31 2C 22 42 2D 50 20 32 22 3B 58 AC 33 32 AA |.1,"B-P 2";X.32.|
00000980: 32 00 94 11 E9 02 A1 23 32 2C 41 24 3A 41 B2 C6 |2......#2,A$:A..|
00000990: 28 41 24 29 00 A4 11 F3 02 8B 46 B2 31 A7 41 B2 |(A$)......F.1.A.|
000009A0: 41 B0 36 34 00 B5 11 F8 02 8B 46 B2 32 A7 41 B2 |A.64......F.2.A.|
000009B0: 41 AF 31 39 31 00 C6 11 FD 02 8F 20 41 24 3D 43 |A.191...... A$=C|
000009C0: 48 52 24 28 41 29 00 DC 11 02 03 98 31 2C 22 42 |HR$(A)......1,"B|
000009D0: 2D 50 20 32 22 3B 58 AC 33 32 AA 32 00 E9 11 04 |-P 2";X.32.2....|
000009E0: 03 98 32 2C C7 28 41 29 3B 00 FF 11 07 03 98 31 |..2,.(A);......1|
000009F0: 2C 22 55 32 20 32 20 30 20 31 38 22 3B 53 31 00 |,"U2 2 0 18";S1.|
00000A00: 20 12 0C 03 9E 50 2C 30 2C 31 38 3A 99 50 24 3A | ....P,0,18:.P$:|
00000A10: A0 32 3A A0 31 3A 8D 33 35 3A 89 35 30 30 30 30 |.2:.1:.35:.50000|
00000A20: 00 45 12 16 03 50 24 B2 22 46 49 4C 45 20 4E 49 |.E...P$."FILE NI|
00000A30: 43 48 54 20 47 45 46 55 4E 44 45 4E 20 21 21 22 |CHT GEFUNDEN !!"|
00000A40: 3A 89 37 38 30 00 6B 12 E7 03 8F 20 2A 2A 2A 2A |:.780.k.... ****|
00000A50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 90 12 E8 03 |***********.....|
00000A70: 99 22 93 20 20 20 20 20 20 20 20 20 44 49 52 45 |.". DIRE|
00000A80: 43 54 4F 52 59 20 53 43 48 52 45 49 42 45 4E 22 |CTORY SCHREIBEN"|
00000A90: 00 B4 12 E9 03 99 22 20 20 20 20 20 20 20 20 20 |......" |
00000AA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000AB0: 2D 2D 2D 22 00 F1 12 ED 03 8B 52 28 30 29 B2 30 |---"......R(0).0|
00000AC0: A7 99 22 11 11 11 11 20 20 12 4B 45 49 4E 45 20 |..".... .KEINE |
00000AD0: 46 49 4C 45 53 20 45 49 4E 47 45 4C 45 53 45 4E |FILES EINGELESEN|
00000AE0: 20 21 21 21 92 22 3A 8D 33 35 3A 89 35 30 30 30 | !!!.":.35:.5000|
00000AF0: 30 00 18 13 FC 03 43 B2 30 3A 54 B2 31 38 3A 53 |0.....C.0:T.18:S|
00000B00: B2 31 3A 41 B2 54 3A 42 B2 53 AA 33 3A 41 24 B2 |.1:A.T:B.S.3:A$.|
00000B10: C8 28 46 52 24 2C 32 29 00 24 13 1A 04 9F 31 2C |.(FR$,2).$....1,|
00000B20: 38 2C 31 35 00 33 13 1F 04 9F 32 2C 38 2C 32 2C |8,15.3....2,8,2,|
00000B30: 22 23 22 00 48 13 24 04 8B 53 B2 31 39 A7 53 B2 |"#".H.$..S.19.S.|
00000B40: 32 3A 8F 20 31 39 5E 32 00 5D 13 25 04 8B 53 B2 |2:. 19^2.].%..S.|
00000B50: 32 30 A7 53 B2 33 3A 8F 20 32 30 5E 33 00 6C 13 |20.S.3:. 20^3.l.|
00000B60: 26 04 8B 53 B2 32 31 A7 31 32 30 30 00 7D 13 27 |&..S.21.1200.}.'|
00000B70: 04 98 31 2C 22 42 2D 50 20 32 20 30 22 00 9A 13 |..1,"B-P 2 0"...|
00000B80: 28 04 8B 28 43 AA 31 29 AC 38 B1 B2 52 28 30 29 |(..(C.1).8..R(0)|
00000B90: A7 41 B2 30 3A 42 B2 32 35 35 00 AC 13 29 04 98 |.A.0:B.255...)..|
00000BA0: 32 2C C7 28 41 29 3B C7 28 42 29 3B 00 BF 13 2E |2,.(A);.(B);....|
00000BB0: 04 81 49 B2 31 A4 37 3A 4A B2 43 AC 38 AA 49 00 |..I.1.7:J.C.8.I.|
00000BC0: D0 13 2F 04 98 32 2C 4E 24 28 4A 29 3B 41 24 3B |../..2,N$(J);A$;|
00000BD0: 00 E0 13 30 04 46 24 28 4A 29 B2 4E 24 28 4A 29 |...0.F$(J).N$(J)|
00000BE0: 00 E7 13 32 04 82 49 00 F7 13 34 04 98 32 2C 4E |...2..I...4..2,N|
00000BF0: 24 28 4A AA 31 29 3B 00 0B 14 38 04 98 31 2C 22 |$(J.1);...8..1,"|
00000C00: 55 32 20 32 20 30 22 3B 54 3B 53 00 25 14 4C 04 |U2 2 0";T;S.%.L.|
00000C10: 43 B2 43 AA 31 3A 53 B2 53 AA 33 3A 41 B2 54 3A |C.C.1:S.S.3:A.T:|
00000C20: 42 B2 53 AA 33 00 38 14 74 04 8B 43 AC 38 B3 52 |B.S.3.8.t..C.8.R|
00000C30: 28 30 29 A7 31 30 36 30 00 49 14 B0 04 A0 32 3A |(0).1060.I....2:|
00000C40: A0 31 3A 89 35 30 30 30 30 00 6E 14 13 05 8F 20 |.1:.50000.n.... |
00000C50: 2A 2A 2A 2A 2A 20 44 49 53 4B 4E 41 4D 45 4E 20 |***** DISKNAMEN |
00000C60: 41 45 4E 44 45 52 4E 20 2A 2A 2A 2A 2A 2A 00 94 |AENDERN ******..|
00000C70: 14 14 05 99 22 93 20 20 20 20 20 20 44 49 53 4B |....". DISK|
00000C80: 45 54 54 45 4E 4E 41 4D 45 4E 20 20 41 45 4E 44 |ETTENNAMEN AEND|
00000C90: 45 52 4E 22 00 B9 14 16 05 99 22 20 20 20 20 20 |ERN"......" |
00000CA0: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00000CB0: 2D 2D 2D 2D 2D 2D 2D 2D 22 00 D4 14 1E 05 8D 32 |--------"......2|
00000CC0: 30 30 3A 9E 50 2C 36 2C 35 3A 99 22 12 22 44 4E |00:.P,6,5:."."DN|
00000CD0: 24 22 92 22 00 FA 14 20 05 9E 50 2C 30 2C 31 30 |$"."... ..P,0,10|
00000CE0: 3A 99 22 4E 41 4D 45 3A 20 2E 2E 2E 2E 2E 2E 2E |:."NAME: .......|
00000CF0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 22 00 0B 15 23 05 99 |........."...#..|
00000D00: 22 11 20 20 49 44 3A 20 2E 2E 22 00 30 15 27 05 |". ID: ..".0.'.|
00000D10: 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |. --------------|
00000D20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000D30: 00 66 15 28 05 43 58 B2 36 3A 43 59 B2 31 30 3A |.f.(.CX.6:CY.10:|
00000D40: 4C B2 31 36 3A 42 43 B2 34 36 3A 47 B2 33 32 3A |L.16:BC.46:G.32:|
00000D50: 48 B2 31 32 37 3A 8D 35 30 3A 91 41 89 31 33 34 |H.127:.50:.A.134|
00000D60: 30 2C 31 33 39 30 00 91 15 3C 05 44 4E 24 B2 42 |0,1390...<.DN$.B|
00000D70: 24 3A 81 49 B2 31 A4 31 38 AB C3 28 44 4E 24 29 |$:.I.1.18..(DN$)|
00000D80: 3A 44 4E 24 B2 44 4E 24 AA C7 28 31 36 30 29 3A |:DN$.DN$..(160):|
00000D90: 82 00 A8 15 46 05 43 58 B2 36 3A 43 59 B2 31 32 |....F.CX.6:CY.12|
00000DA0: 3A 4C B2 32 3A 8D 35 30 00 B9 15 4B 05 91 41 89 |:L.2:.50...K..A.|
00000DB0: 31 33 36 30 2C 31 33 39 30 00 C8 15 50 05 44 4E |1360,1390...P.DN|
00000DC0: 24 B2 44 4E 24 AA 42 24 00 ED 15 5A 05 8F 20 2D |$.DN$.B$...Z.. -|
00000DD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000DE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 02 16 |-------------...|
00000DF0: 64 05 98 31 2C 22 55 31 20 32 20 30 20 31 38 20 |d..1,"U1 2 0 18 |
00000E00: 30 22 00 15 16 66 05 98 31 2C 22 42 2D 50 20 32 |0"...f..1,"B-P 2|
00000E10: 20 31 34 34 22 00 21 16 68 05 98 32 2C 44 4E 24 | 144".!.h..2,DN$|
00000E20: 3B 00 36 16 6A 05 98 31 2C 22 55 32 20 32 20 30 |;.6.j..1,"U2 2 0|
00000E30: 20 31 38 20 30 22 00 47 16 6E 05 A0 32 3A A0 31 | 18 0".G.n..2:.1|
00000E40: 3A 89 35 30 30 30 30 00 6C 16 77 05 8F 20 2A 2A |:.50000.l.w.. **|
00000E50: 2A 2A 2A 20 4B 4F 4D 4D 45 4E 54 41 52 20 41 55 |*** KOMMENTAR AU|
00000E60: 46 20 44 49 53 4B 20 2A 2A 2A 2A 2A 00 92 16 78 |F DISK *****...x|
00000E70: 05 99 22 93 20 20 20 20 20 20 20 4B 4F 4D 4D 45 |..". KOMME|
00000E80: 4E 54 41 52 20 41 55 46 20 44 49 53 4B 45 54 54 |NTAR AUF DISKETT|
00000E90: 45 22 00 B7 16 7A 05 99 22 20 20 20 20 20 20 20 |E"...z.." |
00000EA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000EB0: 2D 2D 2D 2D 2D 2D 22 00 BF 16 82 05 46 B2 31 00 |------".....F.1.|
00000EC0: D5 16 8C 05 9E 50 2C 31 35 2C 34 3A 43 24 28 46 |.....P,15,4:C$(F|
00000ED0: 29 B2 22 12 22 00 F1 16 96 05 99 43 24 28 31 29 |)."."......C$(1)|
00000EE0: 22 4C 45 53 45 4E 92 22 3A 43 24 28 31 29 B2 22 |"LESEN.":C$(1)."|
00000EF0: 22 00 FD 16 98 05 9E 50 2C 31 33 2C 36 00 1D 17 |"......P,13,6...|
00000F00: 9A 05 99 43 24 28 32 29 22 53 43 48 52 45 49 42 |...C$(2)"SCHREIB|
00000F10: 45 4E 92 22 3A 43 24 28 32 29 B2 22 22 00 25 17 |EN.":C$(2)."".%.|
00000F20: 9E 05 8D 33 35 00 39 17 A0 05 8B 41 B2 31 37 A7 |...35.9....A.17.|
00000F30: 46 B2 32 3A 89 31 34 32 30 00 4E 17 A2 05 8B 41 |F.2:.1420.N....A|
00000F40: B2 31 34 35 A7 46 B2 31 3A 89 31 34 32 30 00 5F |.145.F.1:.1420._|
00000F50: 17 A4 05 8B 41 B2 31 33 33 A7 35 30 30 30 30 00 |....A.133.50000.|
00000F60: 6F 17 A6 05 8B 41 B3 B1 31 33 A7 31 34 33 38 00 |o....A..13.1438.|
00000F70: 80 17 A8 05 91 46 89 31 37 30 30 2C 31 34 35 30 |.....F.1700,1450|
00000F80: 00 8F 17 AA 05 43 58 B2 38 3A 43 24 B2 22 22 00 |.....CX.8:C$."".|
00000F90: 9F 17 B4 05 81 43 59 B2 31 30 A4 31 36 A9 32 00 |.....CY.10.16.2.|
00000FA0: C4 17 BE 05 9E 50 2C 43 58 2C 43 59 3A 99 22 2E |.....P,CX,CY:.".|
00000FB0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
00000FC0: 2E 2E 2E 22 00 D0 17 C8 05 82 3A 43 59 B2 31 30 |..."......:CY.10|
00000FD0: 00 EE 17 D2 05 4C B2 32 30 3A 42 43 B2 34 36 3A |.....L.20:BC.46:|
00000FE0: 47 B2 33 32 3A 48 B2 31 32 37 3A 8D 35 30 00 00 |G.32:H.127:.50..|
00000FF0: 18 DC 05 91 41 89 31 35 31 30 2C 35 30 30 30 30 |....A.1510,50000|
00001000: 00 28 18 E6 05 8B C3 28 42 24 29 B3 32 30 A7 81 |.(.....(B$).20..|
00001010: 49 B2 31 A4 32 30 AB C3 28 42 24 29 3A 42 24 B2 |I.1.20..(B$):B$.|
00001020: 42 24 AA 22 2E 22 3A 82 00 42 18 F0 05 43 58 B2 |B$.".":..B...CX.|
00001030: 38 3A 43 59 B2 43 59 AA 32 3A 43 24 B2 43 24 AA |8:CY.CY.2:C$.C$.|
00001040: 42 24 00 52 18 FA 05 8B 43 59 B3 31 38 A7 31 34 |B$.R....CY.18.14|
00001050: 39 30 00 7B 18 FF 05 8F 53 59 53 50 2C 30 2C 32 |90.{....SYSP,0,2|
00001060: 30 3A 50 52 49 4E 54 43 24 3A 47 4F 53 55 42 33 |0:PRINTC$:GOSUB3|
00001070: 35 3A 47 4F 54 4F 35 30 30 30 30 00 92 18 04 06 |5:GOTO50000.....|
00001080: 9F 31 2C 38 2C 31 35 3A 9F 32 2C 38 2C 32 2C 22 |.1,8,15:.2,8,2,"|
00001090: 23 22 00 A7 18 0E 06 98 31 2C 22 55 31 20 32 20 |#"......1,"U1 2 |
000010A0: 30 20 31 38 20 30 22 00 BA 18 13 06 98 31 2C 22 |0 18 0"......1,"|
000010B0: 42 2D 50 20 32 20 31 37 35 22 00 C5 18 18 06 98 |B-P 2 175"......|
000010C0: 32 2C 43 24 3B 00 DA 18 1D 06 98 31 2C 22 55 32 |2,C$;......1,"U2|
000010D0: 20 32 20 30 20 31 38 20 30 22 00 E4 18 22 06 A0 | 2 0 18 0"..."..|
000010E0: 32 3A A0 31 00 F3 18 2C 06 8D 33 35 3A 89 35 30 |2:.1...,..35:.50|
000010F0: 30 30 30 00 16 19 A3 06 8F 20 2D 2D 2D 2D 2D 2D |000...... ------|
00001100: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001110: 2D 2D 2D 2D 2D 2D 00 35 19 A4 06 9F 31 2C 38 2C |------.5....1,8,|
00001120: 31 35 3A 9F 32 2C 38 2C 32 2C 22 23 22 3A 8F 20 |15:.2,8,2,"#":. |
00001130: 4C 45 53 45 4E 00 4A 19 AE 06 98 31 2C 22 55 31 |LESEN.J....1,"U1|
00001140: 20 32 20 30 20 31 38 20 30 22 00 5D 19 B8 06 98 | 2 0 18 0".]....|
00001150: 31 2C 22 42 2D 50 20 32 20 31 37 35 22 00 8A 19 |1,"B-P 2 175"...|
00001160: C2 06 43 24 B2 22 22 3A 81 49 B2 31 A4 38 30 3A |..C$."":.I.1.80:|
00001170: A1 23 32 2C 41 24 3A 43 24 B2 43 24 AA C8 28 41 |.#2,A$:C$.C$..(A|
00001180: 24 AA 22 2E 22 2C 31 29 3A 82 00 94 19 CC 06 A0 |$.".",1):.......|
00001190: 32 3A A0 31 00 9E 19 D6 06 43 59 B2 31 30 00 CB |2:.1.....CY.10..|
000011A0: 19 E0 06 81 49 B2 31 A4 38 30 A9 32 30 3A 9E 50 |....I.1.80.20:.P|
000011B0: 2C 38 2C 43 59 3A 99 CA 28 43 24 2C 49 2C 32 30 |,8,CY:..(C$,I,20|
000011C0: 29 3A 43 59 B2 43 59 AA 32 3A 82 00 DA 19 EA 06 |):CY.CY.2:......|
000011D0: 8D 33 35 3A 89 35 30 30 30 30 00 FF 19 CF 07 8F |.35:.50000......|
000011E0: 20 2A 2A 2A 2A 2A 2A 2A 20 5A 45 49 47 45 20 41 | ******* ZEIGE A|
000011F0: 4C 54 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |LT ************.|
00001200: 0F 1A D0 07 53 B2 30 3A 58 B2 30 3A 43 B2 30 00 |....S.0:X.0:C.0.|
00001210: 43 1A D5 07 50 24 B2 22 20 4E 52 2E 20 20 20 20 |C...P$." NR. |
00001220: 12 20 20 41 4C 54 45 20 52 45 49 48 45 4E 46 4F |. ALTE REIHENFO|
00001230: 4C 47 45 20 20 92 11 22 3A 41 B2 31 3A 8D 32 31 |LGE ..":A.1:.21|
00001240: 30 35 30 00 52 1A D7 07 43 B2 53 AC 31 36 3A 58 |050.R...C.S.16:X|
00001250: B2 30 00 6B 1A DA 07 43 B2 43 AA 31 3A 8B 46 24 |.0.k...C.C.1:.F$|
00001260: 28 43 29 B2 22 22 A7 32 30 33 30 00 75 1A DC 07 |(C)."".2030.u...|
00001270: 58 B2 58 AA 31 00 9C 1A DF 07 42 4C B2 C6 28 C9 |X.X.1.....BL..(.|
00001280: 28 46 24 28 43 29 2C 32 29 29 AA C6 28 C9 28 46 |(F$(C),2))..(.(F|
00001290: 24 28 43 29 2C 31 29 29 AC 32 35 36 00 CB 1A E4 |$(C),1)).256....|
000012A0: 07 41 B2 C6 28 C8 28 46 24 28 43 29 2C 31 29 29 |.A..(.(F$(C),1))|
000012B0: 3A 41 24 B2 54 59 24 28 28 41 AF 37 29 AB 35 AC |:A$.TY$((A.7).5.|
000012C0: 28 28 41 AF 36 34 29 B1 30 29 29 00 F9 1A E9 07 |((A.64).0)).....|
000012D0: 99 43 3B A3 34 29 22 3A 20 20 22 3B 42 4C 3B A3 |.C;.4)": ";BL;.|
000012E0: 31 32 29 3B CA 28 46 24 28 43 29 2C 34 2C 31 36 |12);.(F$(C),4,16|
000012F0: 29 3B A3 33 30 29 3B 41 24 00 08 1B EE 07 8B 58 |);.30);A$......X|
00001300: B2 31 36 A7 32 30 35 30 00 19 1B F8 07 8B 43 B3 |.16.2050......C.|
00001310: 52 28 30 29 A7 32 30 31 30 00 3B 1B FA 07 8B 43 |R(0).2010.;....C|
00001320: B2 52 28 30 29 A7 43 B2 43 AB 28 43 AD 31 36 AB |.R(0).C.C.(C.16.|
00001330: B5 28 43 AD 31 36 29 29 AC 31 36 00 43 1B FD 07 |.(C.16)).16.C...|
00001340: 58 B2 30 00 4B 1B 02 08 8D 33 35 00 5C 1B 20 08 |X.0.K....35.\. .|
00001350: 8B 41 B2 31 33 33 A7 35 30 30 30 30 00 7E 1B 2A |.A.133.50000.~.*|
00001360: 08 8B 41 B2 31 37 A7 53 B2 53 AA 31 AA 28 53 AC |..A.17.S.S.1.(S.|
00001370: 31 36 B1 52 28 30 29 29 3A 89 32 30 30 35 00 9B |16.R(0)):.2005..|
00001380: 1B 34 08 8B 41 B2 31 34 35 A7 53 B2 53 AB 31 AB |.4..A.145.S.S.1.|
00001390: 28 53 B2 30 29 3A 89 32 30 30 35 00 A5 1B 48 08 |(S.0):.2005...H.|
000013A0: 89 32 30 35 30 00 C6 1B C3 09 8F 2A 2A 2A 2A 2A |.2050......*****|
000013B0: 2A 2A 20 5A 45 49 47 45 20 4E 45 55 20 2A 2A 2A |** ZEIGE NEU ***|
000013C0: 2A 2A 2A 2A 2A 2A 00 CE 1B C4 09 53 B2 30 00 FE |******.....S.0..|
000013D0: 1B C9 09 58 B2 30 3A 43 B2 30 3A 50 24 B2 22 13 |...X.0:C.0:P$.".|
000013E0: 20 4E 52 2E 20 20 12 20 20 4E 45 55 45 20 52 45 | NR. . NEUE RE|
000013F0: 49 48 45 4E 46 4F 4C 47 45 20 20 92 11 22 00 0D |IHENFOLGE .."..|
00001400: 1C CA 09 41 B2 30 3A 8D 32 31 30 35 30 00 1C 1C |...A.0:.21050...|
00001410: CB 09 43 B2 53 AC 31 36 3A 58 B2 30 00 35 1C CE |..C.S.16:X.0.5..|
00001420: 09 43 B2 43 AA 31 3A 8B 4E 24 28 43 29 B2 22 22 |.C.C.1:.N$(C).""|
00001430: A7 32 35 33 30 00 3F 1C D0 09 58 B2 58 AA 31 00 |.2530.?...X.X.1.|
00001440: 66 1C D3 09 42 4C B2 C6 28 C9 28 4E 24 28 43 29 |f...BL..(.(N$(C)|
00001450: 2C 32 29 29 AA C6 28 C9 28 4E 24 28 43 29 2C 31 |,2))..(.(N$(C),1|
00001460: 29 29 AC 32 35 36 00 95 1C D4 09 41 B2 C6 28 C8 |)).256.....A..(.|
00001470: 28 4E 24 28 43 29 2C 31 29 29 3A 41 24 B2 54 59 |(N$(C),1)):A$.TY|
00001480: 24 28 28 41 AF 37 29 AB 35 AC 28 28 41 AF 36 34 |$((A.7).5.((A.64|
00001490: 29 B1 30 29 29 00 C1 1C D8 09 99 43 3B A3 34 29 |).0))......C;.4)|
000014A0: 22 3A 22 3B 42 4C 3B A3 31 30 29 3B CA 28 4E 24 |":";BL;.10);.(N$|
000014B0: 28 43 29 2C 34 2C 31 36 29 3B A3 32 38 29 3B 41 |(C),4,16);.28);A|
000014C0: 24 00 D0 1C E2 09 8B 58 B2 31 36 A7 32 35 35 30 |$......X.16.2550|
000014D0: 00 E1 1C EC 09 8B 43 B3 52 28 30 29 A7 32 35 31 |......C.R(0).251|
000014E0: 30 00 E9 1C F6 09 8D 33 35 00 FA 1C 14 0A 8B 41 |0......35......A|
000014F0: B2 31 33 33 A7 35 30 30 30 30 00 1C 1D 1E 0A 8B |.133.50000......|
00001500: 41 B2 31 37 A7 53 B2 53 AA 31 AA 28 53 AC 31 36 |A.17.S.S.1.(S.16|
00001510: B1 52 28 30 29 29 3A 89 32 35 30 36 00 39 1D 28 |.R(0)):.2506.9.(|
00001520: 0A 8B 41 B2 31 34 35 A7 53 B2 53 AB 31 AB 28 53 |..A.145.S.S.1.(S|
00001530: B2 30 29 3A 89 32 35 30 36 00 54 1D 32 0A 8B 41 |.0):.2506.T.2..A|
00001540: B2 31 33 A7 32 38 30 30 3A 8F 20 53 4F 52 54 49 |.13.2800:. SORTI|
00001550: 45 52 45 4E 00 5E 1D 3C 0A 89 32 35 35 30 00 82 |EREN.^.<..2550..|
00001560: 1D EF 0A 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....************|
00001570: 20 53 4F 52 54 49 45 52 45 4E 20 2A 2A 2A 2A 2A | SORTIEREN *****|
00001580: 2A 2A 00 8D 1D F0 0A 8D 32 31 30 30 30 00 C1 1D |**......21000...|
00001590: FB 0A 43 58 B2 33 34 3A 43 59 B2 34 3A 4C B2 33 |..CX.34:CY.4:L.3|
000015A0: 3A 47 B2 34 38 3A 48 B2 35 37 3A 42 43 B2 34 36 |:G.48:H.57:BC.46|
000015B0: 3A 8D 35 30 3A 91 41 89 32 38 37 30 2C 32 35 30 |:.50:.A.2870,250|
000015C0: 30 00 CD 1D 36 0B 46 B2 C5 28 42 24 29 00 E0 1D |0...6.F..(B$)...|
000015D0: 37 0B 8B 46 B1 52 28 30 29 A7 46 B2 52 28 30 29 |7..F.R(0).F.R(0)|
000015E0: 00 ED 1D 38 0B 8B 46 B3 31 A7 46 B2 31 00 0D 1E |...8..F.1.F.1...|
000015F0: 3B 0B 43 58 B2 33 34 3A 43 59 B2 36 3A 8D 35 30 |;.CX.34:CY.6:.50|
00001600: 3A 91 41 89 32 38 38 30 2C 32 35 30 30 00 19 1E |:.A.2880,2500...|
00001610: 40 0B 52 B2 C5 28 42 24 29 00 2C 1E 41 0B 8B 52 |@.R..(B$).,.A..R|
00001620: B1 52 28 30 29 A7 52 B2 52 28 30 29 00 39 1E 42 |.R(0).R.R(0).9.B|
00001630: 0B 8B 52 B3 31 A7 52 B2 31 00 58 1E 4A 0B 8F 20 |..R.1.R.1.X.J.. |
00001640: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001650: 2D 2D 2D 2D 2D 2D 2D 2D 00 65 1E 54 0B 41 24 B2 |--------.e.T.A$.|
00001660: 4E 24 28 46 29 00 73 1E 5E 0B 8B 46 B1 52 A7 32 |N$(F).s.^..F.R.2|
00001670: 39 35 30 00 86 1E 68 0B 81 49 B2 46 A4 52 AB 31 |950...h..I.F.R.1|
00001680: 3A 8F 20 46 3C 52 00 98 1E 72 0B 4E 24 28 49 29 |:. F<R...r.N$(I)|
00001690: B2 4E 24 28 49 AA 31 29 00 AE 1E 7C 0B 82 49 3A |.N$(I.1)...|..I:|
000016A0: 4E 24 28 52 29 B2 41 24 3A 89 32 35 30 35 00 C4 |N$(R).A$:.2505..|
000016B0: 1E 86 0B 81 49 B2 46 A4 52 AA 31 A9 AB 31 3A 8F |....I.F.R.1..1:.|
000016C0: 20 46 3E 52 00 D6 1E 90 0B 4E 24 28 49 29 B2 4E | F>R.....N$(I).N|
000016D0: 24 28 49 AB 31 29 00 EC 1E 9A 0B 82 49 3A 4E 24 |$(I.1)......I:N$|
000016E0: 28 52 29 B2 41 24 3A 89 32 35 30 35 00 0B 1F A4 |(R).A$:.2505....|
000016F0: 0B 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. -------------|
00001700: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 2E 1F AB 0D |-----------.....|
00001710: 8F 2A 2A 2A 2A 20 44 49 53 4B 20 43 4F 4D 4D 41 |.**** DISK COMMA|
00001720: 4E 44 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3A |ND ***********.:|
00001730: 1F AC 0D 9F 31 2C 38 2C 31 35 00 64 1F B1 0D 99 |....1,8,15.d....|
00001740: 22 93 20 20 20 20 20 20 20 20 20 20 44 49 53 4B |". DISK|
00001750: 20 43 4F 4D 4D 41 4E 44 20 53 45 4E 44 45 4E 22 | COMMAND SENDEN"|
00001760: 3A 43 B2 30 00 89 1F B2 0D 99 22 20 20 20 20 20 |:C.0......" |
00001770: 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | -----------|
00001780: 2D 2D 2D 2D 2D 2D 2D 2D 22 00 9B 1F B6 0D 99 22 |--------"......"|
00001790: 11 3E 20 22 3B 3A 59 B2 59 AA 31 00 D5 1F C0 0D |.> ";:Y.Y.1.....|
000017A0: 43 58 B2 32 3A 43 59 B2 C2 28 32 31 34 29 3A 42 |CX.2:CY..(214):B|
000017B0: 43 B2 33 32 3A 47 B2 33 32 3A 48 B2 31 32 37 3A |C.32:G.32:H.127:|
000017C0: 4C B2 37 36 3A 8D 35 30 3A 91 41 89 33 35 37 30 |L.76:.50:.A.3570|
000017D0: 2C 33 35 34 30 00 E3 1F D4 0D A0 31 3A 89 35 30 |,3540......1:.50|
000017E0: 30 30 30 00 EE 1F F2 0D 98 31 2C 42 24 3B 00 FE |000......1,B$;..|
000017F0: 1F FC 0D 84 31 2C 41 2C 42 24 2C 42 2C 43 00 11 |....1,A,B$,B,C..|
00001800: 20 10 0E 99 3A 99 22 11 22 41 3B 42 24 3B 42 3B | ...:."."A;B$;B;|
00001810: 43 00 1F 20 1A 0E 8B 59 B3 35 A7 33 35 31 30 00 |C.. ...Y.5.3510.|
00001820: 2D 20 24 0E 8D 33 35 3A 89 33 35 30 35 00 4F 20 |- $..35:.3505.O |
00001830: 07 52 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.R.*************|
00001840: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00001850: 69 20 08 52 99 22 13 22 3B A3 32 38 29 3B 22 42 |i .R.".";.28);"B|
00001860: 49 54 54 45 20 4E 52 2E 22 00 7E 20 12 52 99 A3 |ITTE NR.".~ .R..|
00001870: 32 38 29 3B 22 45 49 4E 47 45 42 45 4E 22 00 94 |28);"EINGEBEN"..|
00001880: 20 14 52 99 A3 32 38 29 3B 22 20 20 20 20 20 20 | .R..28);" |
00001890: 20 20 20 22 00 A5 20 17 52 99 A3 32 38 29 3B 22 | ".. .R..28);"|
000018A0: 46 49 4C 45 22 00 BB 20 1C 52 99 A3 32 38 29 3B |FILE".. .R..28);|
000018B0: 22 4E 52 2E 3A 20 20 2E 2E 2E 22 00 D1 20 21 52 |"NR.: ...".. !R|
000018C0: 99 A3 32 38 29 3B 22 20 20 20 20 20 20 20 20 20 |..28);" |
000018D0: 22 00 E7 20 26 52 99 A3 32 38 29 3B 22 4E 41 43 |".. &R..28);"NAC|
000018E0: 48 3A 20 2E 2E 2E 22 00 FD 20 2B 52 99 A3 32 38 |H: ...".. +R..28|
000018F0: 29 3B 22 20 20 20 20 20 20 20 20 20 22 00 13 21 |);" "..!|
00001900: 30 52 99 A3 32 38 29 3B 22 53 4F 52 54 49 45 52 |0R..28);"SORTIER|
00001910: 45 4E 22 00 36 21 32 52 81 49 B2 31 A4 39 3A 99 |EN".6!2R.I.1.9:.|
00001920: A3 32 38 29 3B 22 20 20 20 20 20 20 20 20 20 20 |.28);" |
00001930: 20 22 3A 82 3A 8E 00 58 21 35 52 8F 2A 2A 2A 2A | ":.:..X!5R.****|
00001940: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001950: 2A 2A 2A 2A 2A 2A 2A 2A 00 61 21 3A 52 99 22 93 |********.a!:R.".|
00001960: 22 00 6D 21 3F 52 9E 50 2C 30 2C 32 32 00 80 21 |".m!?R.P,0,22..!|
00001970: 44 52 99 22 20 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 |DR." .........."|
00001980: 00 95 21 4E 52 99 22 20 12 42 4C 41 45 54 54 45 |..!NR." .BLAETTE|
00001990: 52 4E 20 92 22 00 AB 21 58 52 99 22 20 12 4D 49 |RN ."..!XR." .MI|
000019A0: 54 20 43 55 52 53 4F 52 92 22 3B 00 C7 21 62 52 |T CURSOR.";..!bR|
000019B0: 9E 50 2C 31 34 2C 32 34 3A 99 22 46 31 20 3D 20 |.P,14,24:."F1 = |
000019C0: 4D 45 4E 55 45 22 3B 00 D7 21 6C 52 8B 41 A7 99 |MENUE";..!lR.A..|
000019D0: 22 13 22 50 24 3A 8E 00 F3 21 76 52 9E 50 2C 32 |"."P$:...!vR.P,2|
000019E0: 36 2C 32 32 3A 99 22 20 A4 A4 A4 A4 A4 A4 A4 A4 |6,22:." ........|
000019F0: A4 A4 22 00 11 22 80 52 9E 50 2C 32 36 2C 32 33 |.."..".R.P,26,23|
00001A00: 3A 99 22 20 12 53 4F 52 54 49 45 52 45 4E 20 92 |:." .SORTIEREN .|
00001A10: 22 00 30 22 8A 52 9E 50 2C 32 36 2C 32 34 3A 99 |".0".R.P,26,24:.|
00001A20: 22 20 12 4D 49 54 20 52 45 54 55 52 4E 92 22 3B |" .MIT RETURN.";|
00001A30: 00 3D 22 94 52 99 22 13 22 50 24 3A 8E 00 5F 22 |.=".R."."P$:.._"|
00001A40: EF 55 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.U.*************|
00001A50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00001A60: 87 22 50 C3 99 22 93 20 20 20 20 20 20 20 20 B0 |."P..". .|
00001A70: C0 C0 C0 AE 20 20 20 20 D5 C0 C0 C0 C0 C0 C0 C0 |.... ........|
00001A80: C0 C0 C0 C0 C0 C9 22 00 AF 22 52 C3 99 20 22 20 |......".."R.. " |
00001A90: 20 20 20 20 20 20 20 C2 20 4F 20 C2 20 20 20 20 | . O . |
00001AA0: C2 20 20 54 52 41 43 4B 20 31 38 20 20 C2 22 00 |. TRACK 18 .".|
00001AB0: D7 22 54 C3 99 20 22 20 20 20 20 20 20 20 20 C2 |."T.. " .|
00001AC0: 2E D7 20 C2 20 20 20 20 CA C0 C0 C0 C0 C0 C0 C0 |.. . ........|
00001AD0: C0 C0 C0 C0 C0 CB 22 00 ED 22 55 C3 99 20 22 20 |......".."U.. " |
00001AE0: 20 20 20 20 20 20 20 C2 A2 20 A2 C2 22 00 03 23 | .. .."..#|
00001AF0: 56 C3 99 20 22 20 20 20 20 20 20 20 20 AD C0 C0 |V.. " ...|
00001B00: C0 BD 22 00 1B 23 5A C3 9E 50 2C 31 33 2C 36 3A |.."..#Z..P,13,6:|
00001B10: 43 24 28 55 29 B2 22 12 22 3A 99 00 46 23 5E C3 |C$(U).".":..F#^.|
00001B20: 99 22 20 20 20 20 20 20 C0 C0 C0 C0 C0 C0 C0 C0 |." ........|
00001B30: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001B40: C0 C0 C0 22 3A 99 00 6F 23 6E C3 99 22 20 20 20 |...":..o#n.." |
00001B50: 20 20 20 20 22 43 24 28 31 29 22 44 49 52 45 43 | "C$(1)"DIREC|
00001B60: 54 4F 52 59 20 45 49 4E 4C 45 53 45 4E 92 22 00 |TORY EINLESEN.".|
00001B70: 9A 23 82 C3 99 22 20 20 20 20 20 20 20 22 43 24 |.#..." "C$|
00001B80: 28 32 29 22 4C 49 53 54 20 41 4C 54 45 53 20 44 |(2)"LIST ALTES D|
00001B90: 49 52 45 43 54 4F 52 59 92 22 00 C5 23 8C C3 99 |IRECTORY."..#...|
00001BA0: 22 20 20 20 20 20 20 20 22 43 24 28 33 29 22 4C |" "C$(3)"L|
00001BB0: 49 53 54 20 4E 45 55 45 53 20 44 49 52 45 43 54 |IST NEUES DIRECT|
00001BC0: 4F 52 59 92 22 00 F5 23 92 C3 99 22 20 20 20 20 |ORY."..#..." |
00001BD0: 20 20 20 22 43 24 28 34 29 22 4E 45 55 45 53 20 | "C$(4)"NEUES |
00001BE0: 44 49 52 45 43 54 4F 52 59 20 53 43 48 52 45 49 |DIRECTORY SCHREI|
00001BF0: 42 45 4E 92 22 00 FB 23 94 C3 99 00 2F 24 96 C3 |BEN."..#..../$..|
00001C00: 8F 50 52 49 4E 54 22 20 20 20 20 20 20 C0 C0 C0 |.PRINT" ...|
00001C10: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001C20: C0 C0 C0 C0 C0 C0 C0 C0 22 3A 50 52 49 4E 54 00 |........":PRINT.|
00001C30: 59 24 A0 C3 99 22 20 20 20 20 20 20 20 22 43 24 |Y$..." "C$|
00001C40: 28 35 29 22 44 49 53 4B 20 43 4F 4D 4D 41 4E 44 |(5)"DISK COMMAND|
00001C50: 20 53 45 4E 44 45 4E 92 22 00 86 24 B4 C3 99 22 | SENDEN."..$..."|
00001C60: 20 20 20 20 20 20 20 22 43 24 28 36 29 22 44 49 | "C$(6)"DI|
00001C70: 53 4B 45 54 54 45 4E 4E 41 4D 45 4E 20 41 45 4E |SKETTENNAMEN AEN|
00001C80: 44 45 52 4E 92 22 00 AB 24 C8 C3 99 22 20 20 20 |DERN."..$..." |
00001C90: 20 20 20 20 22 43 24 28 37 29 22 44 49 53 4B 2D | "C$(7)"DISK-|
00001CA0: 4B 4F 4D 4D 45 4E 54 41 52 92 22 00 DB 24 DC C3 |KOMMENTAR."..$..|
00001CB0: 99 22 20 20 20 20 20 20 20 22 43 24 28 38 29 22 |." "C$(8)"|
00001CC0: 46 49 4C 45 53 20 53 43 48 55 45 54 5A 45 4E 2F |FILES SCHUETZEN/|
00001CD0: 46 52 45 49 47 45 42 45 4E 92 22 00 E1 24 E6 C3 |FREIGEBEN."..$..|
00001CE0: 99 00 0A 25 F0 C3 99 22 20 20 20 20 20 20 C0 C0 |...%..." ..|
00001CF0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00001D00: C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 2B 25 FA C3 99 |.........".+%...|
00001D10: 22 20 20 20 20 20 20 20 22 43 24 28 39 29 22 20 |" "C$(9)" |
00001D20: 2A 20 45 4E 44 45 20 2A 20 92 22 00 3C 25 38 C7 |* ENDE * .".<%8.|
00001D30: 8D 33 35 3A 43 24 28 55 29 B2 22 22 00 5D 25 3A |.35:C$(U)."".]%:|
00001D40: C7 8B 41 B2 31 37 A7 55 B2 AB 28 55 B3 39 29 AC |..A.17.U..(U.9).|
00001D50: 55 AA 31 3A 43 24 28 55 29 B2 22 12 22 00 80 25 |U.1:C$(U)."."..%|
00001D60: 3C C7 8B 41 B2 31 34 35 A7 55 B2 55 AB 31 AB 39 |<..A.145.U.U.1.9|
00001D70: AC 28 55 B2 31 29 3A 43 24 28 55 29 B2 22 12 22 |.(U.1):C$(U)."."|
00001D80: 00 90 25 3E C7 8B 41 B2 31 33 A7 35 31 30 31 30 |..%>..A.13.51010|
00001D90: 00 9B 25 40 C7 89 35 30 30 31 30 00 B8 25 42 C7 |..%@..50010..%B.|
00001DA0: 8B 55 B2 31 A7 32 35 30 20 3A 8F 20 44 49 52 20 |.U.1.250 :. DIR |
00001DB0: 45 49 4E 4C 45 53 45 4E 00 D0 25 4C C7 8B 55 B2 |EINLESEN..%L..U.|
00001DC0: 32 A7 32 30 30 30 3A 8F 20 44 49 52 20 41 4C 54 |2.2000:. DIR ALT|
00001DD0: 00 E8 25 56 C7 8B 55 B2 33 A7 32 35 30 30 3A 8F |..%V..U.3.2500:.|
00001DE0: 20 44 49 52 20 4E 45 55 00 02 26 60 C7 8B 55 B2 | DIR NEU..&`..U.|
00001DF0: 34 A7 31 30 30 30 3A 8F 20 53 43 48 52 45 49 42 |4.1000:. SCHREIB|
00001E00: 45 4E 00 14 26 6A C7 8B 55 B2 35 A7 33 35 30 30 |EN..&j..U.5.3500|
00001E10: 3A 8F 20 40 00 2E 26 74 C7 8B 55 B2 36 A7 31 33 |:. @..&t..U.6.13|
00001E20: 30 30 3A 8F 20 44 49 53 4B 20 4E 41 4D 45 00 4D |00:. DISK NAME.M|
00001E30: 26 7E C7 8B 55 B2 37 A7 31 34 30 30 3A 8F 20 44 |&~..U.7.1400:. D|
00001E40: 49 53 4B 2D 4B 4F 4D 4D 45 4E 54 41 52 00 67 26 |ISK-KOMMENTAR.g&|
00001E50: 88 C7 8B 55 B2 38 A7 35 30 30 3A 8F 20 20 53 43 |...U.8.500:. SC|
00001E60: 48 55 45 54 5A 45 4E 00 72 26 92 C7 8B 55 B2 39 |HUETZEN.r&...U.9|
00001E70: A7 80 00 7D 26 9C C7 89 35 31 30 30 30 00 00 00 |...}&...51000...|
..).... ::::::::::::::::::::::::::::::::
:.Q.... :: TRACK 18 MANIPULATIONEN :
:.Y.... ::::::::::::::::::::::::::::::::
:......M....32,253,174,32,158,183,138,7
2,32,253,174,32,158,183,104,168,24,76,24
0,255......,"SEQ","PRG","USR","REL",,"SE
Q<","PRG<","USR<","REL<".%....53280,6:.5
3281,6:.646,1.D....F$(144),N$(144):U.1:P
.828.N...FR$.G(0).G(0).G(0)."----- FREI
-----"......I.0.10:FR$.FR$.G(0):.I.I....
I.828.847:.X:.I,X:.:. PRINT AT ROUTINE I
N KASSETTENPUFFER......I.0.9:.TY$(I):...
....50000...".. ***** EINFACHES GET ****
********.0.#..198,0:.198,1:.A$:A.F(A$):.
.W.'.. ***** GET MIT CURSOR ***********.
S.(..207,0:. BLINKPHASE AUS...)..204,0:.
CURSOR EIN...*..198,0:.198,1:.A$:A.F(A$
).A.,..204,1:. CURSOR AUS.....B.1024.B(2
11).B(214).40:.B,B(B).127:....1.. ******
** GETBILD ***************. .2.B$."":X.0
.-.3..P,CX,CY.5.4..40.P.6..A.20.X.0.CX.C
X.(X.L):.B.(X.L),BC:X.X.1:B$.H(B$,X):.51
...8..A.13.A.1:....:..A.133.A.2:....<..A
.G.A.H.52...>..X.L.B$.H(B$,L.1).P.@..A$:
B$.B$.A$:X.C(B$)...B.CX.CX.(X.L):.51...G
.. **** DISKNAMEN EINLESEN *******...H..
1,8,15,"I".).R..2,8,2,"#".>.W..1,"U1 2 0
18 0".Q....1,"B-P 2 144".\...DN$."".}..
..I.1.23:.#2,A$:DN$.DN$.A$:.I...........
. **** DIRECTORY EINLESEN *******.O...."
. DIRECTORY EINLESEN"......"
-------------------"......200:.P
,8,4:."."DN$"."...".S.1:C.0.0.,..1,"U1 2
0 18";S.B.6..#2,T$:.#2,S$.[.@.T.F(T$.G(
0)):S.F(S$).U.J..I.0.7:C.C.1:F$(C).""...
^..J.0.29...H..#2,A$:F$(C).F$(C).H(A$.G(
0),1)...R..J...S..#2,A$:.#2,A$...T..F(H(
F$(C),1)).0.F$(C).FR$...U.N$(C).F$(C)...
W..P,0,8:."NR."C;...Z...9);J(F$(C),4,16)
...|..I.*....T.300.B...R(0).C: 2: 1:.500
00.H.... ***** FILE SCHUETZEN **********
......". FILES SCHUETZEN".....
." ----------------".....F.1.K.
...P,11,5:C$(F)."."......C$(1)"FILE SCHU
ETZEN.":C$(1).""......P,11,7.!....C$(2)"
FILE FREIGEBEN.":C$(2)."".)....35.<....A
.17.F.2:.520.P....A.145.F.1:.520.A. ..A.
133.50000.P."..A..13.538...:.CX.0:CY.15:
.P,CX,CY...D.."NAME DES FILES : ........
........".U.X.CX.17:L.16:G.32:H.127:BC.4
6:.50...B..A.620,50000...L..I.1.16.C(B$)
:B$.B$.G(160):..,.V.. ------------------
------------.=...T.18:S.1:X.0.T....1,8,1
5:.2,8,2,"#".B...T1.T:S1.S.X....1,"U1 2
0 18";S1......#2,T$:.#2,S$:T.F(T$.G(0)):
S.F(S$)......I.0.7:C$."".F....1,"B-P 2";
2.32.I......#2,A$:.A$."".720......1,"B-P
2";5.32.I:.J.1.16:.#2,A$:C$.C$.A$:.J. .
F..C$.B$.X.I:I.7.'.P..I.8.U..T.0.X.0.790
.E.Z..X.0.660.U...P$."- OK -".K....1,"U1
2 0 18";S1......1,"B-P 2";X.32.2......#
2,A$:A.F(A$)......F.1.A.A.64......F.2.A.
A.191.F.... A$=CHR$(A)......1,"B-P 2";X.
32.2......2,G(A);......1,"U2 2 0 18";S1.
....P,0,18:.P$: 2: 1:.35:.50000.E...P$.
"FILE NICHT GEFUNDEN !!":.780.K.... ****
***************************......".
DIRECTORY SCHREIBEN"......"
-------------------"......R(0).0.."....
.KEINE FILES EINGELESEN !!!.":.35:.5000
0.....C.0:T.18:S.1:A.T:B.S.3:A$.H(FR$,2)
.$....1,8,15.3....2,8,2,"#".H.$..S.19.S.
2:. 19^2.].%..S.20.S.3:. 20^3.L.&..S.21.
1200.}.'..1,"B-P 2 0"...(..(C.1).8..R(0)
.A.0:B.255...)..2,G(A);G(B);......I.1.7:
J.C.8.I.P./..2,N$(J);A$;...0.F$(J).N$(J)
...2..I...4..2,N$(J.1);...8..1,"U2 2 0";
T;S.%.L.C.C.1:S.S.3:A.T:B.S.3.8.T..C.8.R
(0).1060.I... 2: 1:.50000.N.... ***** DI
SKNAMEN AENDERN ******......". DISK
ETTENNAMEN AENDERN"......" -------
----------------".T....200:.P,6,5:."."DN
$"."... ..P,0,10:."NAME: ...............
."...#..". ID: ..".0.'.. --------------
----------------.F.(.CX.6:CY.10:L.16:BC.
46:G.32:H.127:.50:.A.1340,1390...<.DN$.B
$:.I.1.18.C(DN$):DN$.DN$.G(160):....F.CX
.6:CY.12:L.2:.50...K..A.1360,1390.H.P.DN
$.DN$.B$...Z.. -------------------------
-----...D..1,"U1 2 0 18 0"...F..1,"B-P 2
144".!.H..2,DN$;.6.J..1,"U2 2 0 18 0".G
.N. 2: 1:.50000.L.W.. ***** KOMMENTAR AU
F DISK *****...X..". KOMMENTAR AUF
DISKETTE"...Z.." ----------------
------".....F.1.U....P,15,4:C$(F)."."...
...C$(1)"LESEN.":C$(1).""......P,13,6...
...C$(2)"SCHREIBEN.":C$(2)."".%....35.9.
..A.17.F.2:.1420.N....A.145.F.1:.1420._
....A.133.50000.O....A..13.1438......F.1
700,1450.....CX.8:C$.""......CY.10.16.2.
D....P,CX,CY:."....................".P.H
..:CY.10...R.L.20:BC.46:G.32:H.127:.50..
....A.1510,50000.(....C(B$).20..I.1.20.C
(B$):B$.B$.".":..B...CX.8:CY.CY.2:C$.C$.
B$.R....CY.18.1490.{....SYSP,0,20:PRINTC
$:GOSUB35:GOTO50000......1,8,15:.2,8,2,"
#"......1,"U1 2 0 18 0"......1,"B-P 2 17
5".E....2,C$;.Z....1,"U2 2 0 18 0"...".
2: 1...,..35:.50000...... --------------
--------------.5....1,8,15:.2,8,2,"#":.
LESEN.J....1,"U1 2 0 18 0".]....1,"B-P 2
175"...B.C$."":.I.1.80:.#2,A$:C$.C$.H(A
$.".",1):....L. 2: 1...V.CY.10.K....I.1.
80.20:.P,8,CY:.J(C$,I,20):CY.CY.2:..Z...
.35:.50000...O.. ******* ZEIGE ALT *****
*******...P.S.0:X.0:C.0.C.U.P$." NR.
. ALTE REIHENFOLGE ..":A.1:.21050.R.W.
C.S.16:X.0.K.Z.C.C.1:.F$(C)."".2030.U...
X.X.1.....BL.F(I(F$(C),2)).F(I(F$(C),1))
.256.K...A.F(H(F$(C),1)):A$.TY$((A.7).5.
((A.64).0))......C;.4)": ";BL;.12);J(F$
(C),4,16);.30);A$......X.16.2050......C.
R(0).2010.;....C.R(0).C.C.(C.16..(C.16))
.16.C...X.0.K....35.\. ..A.133.50000.~.*
..A.17.S.S.1.(S.16.R(0)):.2005...4..A.14
5.S.S.1.(S.0):.2005...H..2050.F.C..*****
** ZEIGE NEU *********.N.D.S.0...I.X.0:C
.0:P$.". NR. . NEUE REIHENFOLGE .."..
.J.A.0:.21050...K.C.S.16:X.0.5.N.C.C.1:.
N$(C)."".2530.?.P.X.X.1.F.S.BL.F(I(N$(C)
,2)).F(I(N$(C),1)).256...T.A.F(H(N$(C),1
)):A$.TY$((A.7).5.((A.64).0)).A.X..C;.4)
":";BL;.10);J(N$(C),4,16);.28);A$.P....X
.16.2550......C.R(0).2510......35......A
.133.50000......A.17.S.S.1.(S.16.R(0)):.
2506.9.(..A.145.S.S.1.(S.0):.2506.T.2..A
.13.2800:. SORTIEREN.^.<..2550......****
******** SORTIEREN *******......21000.A.
..CX.34:CY.4:L.3:G.48:H.57:BC.46:.50:.A.
2870,2500.M.6.F.E(B$)...7..F.R(0).F.R(0)
...8..F.1.F.1...;.CX.34:CY.6:.50:.A.2880
,2500...@.R.E(B$).,.A..R.R(0).R.R(0).9.B
..R.1.R.1.X.J.. ------------------------
.E.T.A$.N$(F).S.^..F.R.2950...H..I.F.R.1
:. F<R...R.N$(I).N$(I.1)...|..I:N$(R).A$
:.2505.D....I.F.R.1..1:. F>R.V...N$(I).N
$(I.1)......I:N$(R).A$:.2505...... -----
-------------------......**** DISK COMMA
ND ***********.:....1,8,15.D....".
DISK COMMAND SENDEN":C.0......"
-------------------"......".> ";:Y.
Y.1.U...CX.2:CY.B(214):BC.32:G.32:H.127:
L.76:.50:.A.3570,3540...T. 1:.50000.....
.1,B$;......1,A,B$,B,C.. ...:."."A;B$;B;
C.. ...Y.5.3510.- $..35:.3505.O .R.*****
***********************.I .R.".";.28);"B
ITTE NR.".~ .R..28);"EINGEBEN".. .R..28)
;" ".. .R..28);"FILE".. .R..28);
"NR.: ...".Q !R..28);" ".. &R..
28);"NACH: ...".. +R..28);" "..!
0R..28);"SORTIEREN".6!2R.I.1.9:..28);"
":.:..X!5R.********************
********.A!:R.".".M!?R.P,0,22..!DR." ...
......."..!NR." .BLAETTERN ."..!XR." .MI
T CURSOR.";.G!BR.P,14,24:."F1 = MENUE";.
W!LR.A.."."P$:...!VR.P,26,22:." ........
.."..".R.P,26,23:." .SORTIEREN .".0".R.P
,26,24:." .MIT RETURN.";.=".R."."P$:.._"
.U.****************************.."PC.".
..... U............I".."RC. "
B O B B TRACK 18 B".W"TC. "
B.W B J............K".."UC. "
B. .B"..#VC. " ....."..#ZC
.P,13,6:C$(U).".":..F#^C." ........
...................":..O#NC." "C$(
1)"DIRECTORY EINLESEN."..#.C." "C$
(2)"LIST ALTES DIRECTORY.".E#.C."
"C$(3)"LIST NEUES DIRECTORY."..#.C."
"C$(4)"NEUES DIRECTORY SCHREIBEN."..#
.C../$.C.PRINT" ...................
........":PRINT.Y$ C." "C$(5)"DISK
COMMAND SENDEN."..$.C." "C$(6)"DI
SKETTENNAMEN AENDERN."..$HC." "C$(
7)"DISK-KOMMENTAR."..$.C." "C$(8)"
FILES SCHUETZEN/FREIGEBEN."..$.C...%.C."
...........................".+%.C.
" "C$(9)" * ENDE * .".<%8G.35:C$(U
)."".]%:G.A.17.U..(U.9).U.1:C$(U)."."..%
<G.A.145.U.U.1.9.(U.1):C$(U)."."..%>G.A.
13.51010..%@G.50010..%BG.U.1.250 :. DIR
EINLESEN.P%LG.U.2.2000:. DIR ALT..%VG.U.
3.2500:. DIR NEU..&`G.U.4.1000:. SCHREIB
EN..&JG.U.5.3500:. @..&TG.U.6.1300:. DIS
K NAME.M&~G.U.7.1400:. DISK-KOMMENTAR.G&
.G.U.8.500:. SCHUETZEN.R&.G.U.9...}&.G.
51000...
> CLICK IMAGE PREVIEW FOR FULL MODAL