ARRANGER V8.2
FILE INFORMATION
FILENAME(S): ARRANGER V8.2
FILE TYPE(S): PRG
FILE SIZE: 4.4K
FIRST SEEN: 2025-12-02 00:02:03
APPEARS ON: 1 disk(s)
FILE HASH
fc7eae2fe5f8b50f32247253415364636eeae901fa2f626f2cd47ddc783ce6c6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | ARRANGER V8.2 | PRG | earthshaker | 13 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 46 08 0A 00 86 46 54 24 28 31 34 34 29 2C |..F....FT$(144),|
00000010: 46 46 24 28 31 34 34 29 2C 4E 42 24 28 31 34 34 |FF$(144),NB$(144|
00000020: 29 2C 50 53 24 28 31 34 34 29 3A 58 B2 30 3A 97 |),PS$(144):X.0:.|
00000030: 35 33 32 38 30 2C 35 3A 97 35 33 32 38 31 2C 31 |53280,5:.53281,1|
00000040: 3A 99 22 0E 08 22 00 59 08 14 00 99 22 93 22 3A |:."..".Y....".":|
00000050: 8D 32 36 30 3A 89 35 30 30 00 7F 08 1E 00 81 49 |.260:.500......I|
00000060: B2 30 A4 58 3A 46 54 24 28 49 29 B2 22 22 3A 4E |.0.X:FT$(I)."":N|
00000070: 42 24 28 49 29 B2 22 22 3A 82 49 3A 58 B2 30 00 |B$(I)."":.I:X.0.|
00000080: 99 08 23 00 8D 37 35 30 3A 8D 32 36 30 3A 9F 31 |..#..750:.260:.1|
00000090: 2C 38 2C 30 2C 22 24 30 22 00 A5 08 28 00 4E 24 |,8,0,"$0"...(.N$|
000000A0: B2 C7 28 30 29 00 B3 08 32 00 A1 23 31 2C 41 24 |..(0)...2..#1,A$|
000000B0: 2C 41 24 00 C7 08 3C 00 8B C2 28 32 31 34 29 B2 |,A$...<...(214).|
000000C0: 32 33 A7 8D 37 35 30 00 D5 08 46 00 A1 23 31 2C |23..750...F..#1,|
000000D0: 41 24 2C 41 24 00 E4 08 50 00 8B 41 24 B2 22 22 |A$,A$...P..A$.""|
000000E0: A7 31 37 30 00 F2 08 5A 00 A1 23 31 2C 41 24 2C |.170...Z..#1,A$,|
000000F0: 42 24 00 23 09 64 00 4E 42 24 28 58 29 B2 C4 28 |B$.#.d.NB$(X)..(|
00000100: C6 28 41 24 AA 4E 24 29 AA 32 35 36 AC C6 28 42 |.(A$.N$).256..(B|
00000110: 24 AA 4E 24 29 29 3A 99 4E 42 24 28 58 29 3B 22 |$.N$)):.NB$(X);"|
00000120: 1D 22 3B 00 2E 09 6E 00 A1 23 31 2C 41 24 00 45 |.";...n..#1,A$.E|
00000130: 09 78 00 8B 41 24 B2 22 22 A7 99 3A 58 B2 58 AA |.x..A$.""..:X.X.|
00000140: 31 3A 89 36 30 00 59 09 82 00 8B 41 24 B2 C7 28 |1:.60.Y....A$..(|
00000150: 33 34 29 A7 8D 20 32 35 30 00 62 09 8C 00 99 41 |34).. 250.b....A|
00000160: 24 3B 00 88 09 96 00 8B 20 4D 4D B2 31 AF 41 24 |$;...... MM.1.A$|
00000170: B3 B1 C7 28 33 34 29 A7 46 54 24 28 58 29 B2 46 |...(34).FT$(X).F|
00000180: 54 24 28 58 29 AA 41 24 00 B5 09 9B 00 8B 4D 4D |T$(X).A$......MM|
00000190: B2 30 AF C6 28 41 24 29 B1 36 34 AF C6 28 41 24 |.0..(A$).64..(A$|
000001A0: 29 B3 38 36 A7 50 53 24 28 58 29 B2 50 53 24 28 |).86.PS$(X).PS$(|
000001B0: 58 29 AA 41 24 00 BE 09 A0 00 89 31 31 30 00 C5 |X).A$......110..|
000001C0: 09 AA 00 A0 31 00 CE 09 B4 00 89 33 32 30 00 E1 |....1......320..|
000001D0: 09 BE 00 8B 46 46 24 28 31 29 B2 22 22 A7 35 30 |....FF$(1)."".50|
000001E0: 30 00 22 0A C8 00 8B 44 44 B2 31 31 A7 99 22 13 |0."....DD.11..".|
000001F0: 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 12 C1 CE |................|
00000200: CF D4 C8 C5 D2 20 C4 C9 D3 CB 20 D9 2F CE 22 3A |..... .... ./.":|
00000210: 9C 3A 9F 31 35 2C 38 2C 31 35 2C 22 49 22 3A A0 |.:.15,8,15,"I":.|
00000220: 31 35 00 37 0A D2 00 A1 41 4E 24 3A 8B 41 4E 24 |15.7....AN$:.AN$|
00000230: B2 22 22 A7 32 31 30 00 47 0A DC 00 8B 41 4E 24 |."".210.G....AN$|
00000240: B2 22 59 22 A7 31 30 00 56 0A E6 00 8B 41 4E 24 |."Y".10.V....AN$|
00000250: B2 22 4E 22 A7 8A 00 5F 0A F0 00 89 32 31 30 00 |."N"..._....210.|
00000260: 6D 0A FA 00 4D 4D B2 31 AB 4D 4D 3A 8E 00 86 0A |m...MM.1.MM:....|
00000270: 04 01 8F 20 52 45 41 44 20 45 52 52 4F 52 20 43 |... READ ERROR C|
00000280: 48 41 4E 4E 45 4C 00 98 0A 0E 01 9F 31 35 2C 38 |HANNEL......15,8|
00000290: 2C 31 35 2C 22 49 30 22 00 AD 0A 18 01 84 31 35 |,15,"I0"......15|
000002A0: 2C 45 4E 2C 45 4D 24 2C 54 52 2C 53 45 00 EB 0A |,EN,EM$,TR,SE...|
000002B0: 22 01 8B 45 4E B3 B1 30 A7 99 22 11 11 1D 1D 1D |"..EN..0..".....|
000002C0: 1D 1D 22 3B 45 4E 3B 45 4D 24 3B 54 52 3B 53 45 |..";EN;EM$;TR;SE|
000002D0: 3A 99 22 12 11 1D 1D C8 C9 D4 20 C1 20 CB C5 D9 |:."....... . ...|
000002E0: 92 22 3A 92 31 39 37 2C 31 39 31 00 F3 0A 2C 01 |.":.197,191...,.|
000002F0: A0 31 35 00 F9 0A 36 01 8E 00 02 0B 40 01 89 35 |.15...6.....@..5|
00000300: 30 30 00 1C 0B 4A 01 4E B2 58 AB 32 3A 8D 37 35 |00...J.N.X.2:.75|
00000310: 30 3A 8D 31 34 30 30 3A 53 53 B2 31 00 28 0B 54 |0:.1400:SS.1.(.T|
00000320: 01 81 53 46 B2 31 A4 4E 00 47 0B 5E 01 99 22 1D |..SF.1.N.G.^..".|
00000330: 1D 1D 22 3B 46 54 24 28 53 46 29 3B A3 32 35 29 |..";FT$(SF);.25)|
00000340: 22 92 59 2F 4E 22 3B 00 5C 0B 68 01 A1 53 46 24 |".Y/N";.\.h..SF$|
00000350: 3A 8B 53 46 24 B2 22 22 A7 33 36 30 00 93 0B 72 |:.SF$."".360...r|
00000360: 01 8B 53 46 24 B2 22 59 22 A7 99 22 9D 9D 9D 12 |..SF$."Y".."....|
00000370: 1E 59 45 53 1F 22 3A 46 46 24 28 53 53 29 B2 46 |.YES.":FF$(SS).F|
00000380: 54 24 28 53 46 29 3A 53 53 B2 53 53 AA 31 3A 89 |T$(SF):SS.SS.1:.|
00000390: 34 30 30 00 AD 0B 7C 01 8B 53 46 24 B2 22 4E 22 |400...|..SF$."N"|
000003A0: A7 99 22 9D 9D 9D 12 1F 4E 4F 20 20 22 00 C1 0B |..".....NO "...|
000003B0: 86 01 8B C2 28 32 31 34 29 B2 32 33 A7 8D 37 35 |....(214).23..75|
000003C0: 30 00 D9 0B 90 01 82 53 46 3A 8B 46 46 24 28 31 |0......SF:.FF$(1|
000003D0: 29 B3 B1 22 22 A7 34 32 30 00 E2 0B 9A 01 89 34 |).."".420......4|
000003E0: 39 30 00 0C 0C A4 01 9F 31 35 2C 38 2C 31 35 3A |90......15,8,15:|
000003F0: 8D 37 35 30 3A 53 50 24 B2 22 20 20 20 20 20 20 |.750:SP$." |
00000400: 20 20 20 20 20 20 20 20 20 20 20 22 00 18 0C AE | "....|
00000410: 01 81 54 B2 31 A4 53 53 00 3F 0C B8 01 99 22 13 |..T.1.SS.?....".|
00000420: 11 11 11 1D 1D 1D 1D 1C D3 C3 D2 C1 D4 C3 C8 C9 |................|
00000430: CE C7 20 22 3B 46 46 24 28 54 29 AA 53 50 24 00 |.. ";FF$(T).SP$.|
00000440: 54 0C C2 01 98 31 35 2C 22 53 30 3A 22 AA 46 46 |T....15,"S0:".FF|
00000450: 24 28 54 29 00 93 0C CC 01 8B 46 46 24 28 54 AA |$(T)......FF$(T.|
00000460: 31 29 B2 22 22 A7 84 31 35 2C 45 4E 2C 45 4D 24 |1).""..15,EN,EM$|
00000470: 2C 54 52 2C 53 45 3A 99 22 13 11 11 11 11 11 11 |,TR,SE:.".......|
00000480: 11 1D 1D 1D 22 3B 54 AB 31 3B 45 4D 24 3B 54 52 |....";T.1;EM$;TR|
00000490: 3B 53 45 00 BC 0C D6 01 99 22 13 11 11 11 11 11 |;SE......"......|
000004A0: 1E 1D 1D 1D 1D D3 C3 D2 C1 D4 C3 C8 C5 C4 20 20 |.............. |
000004B0: 22 3B 46 46 24 28 54 29 AA 53 50 24 00 D1 0C E0 |";FF$(T).SP$....|
000004C0: 01 82 54 3A A0 31 35 3A 8D 32 36 30 3A 89 34 39 |..T:.15:.260:.49|
000004D0: 30 00 E0 0C EA 01 44 44 B2 31 31 3A 89 31 39 30 |0.....DD.11:.190|
000004E0: 00 E9 0C F4 01 8D 37 35 30 00 1D 0D FE 01 99 22 |......750......"|
000004F0: 91 9A 12 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
00000500: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000510: 20 20 20 20 20 20 20 20 20 20 20 22 3B 00 53 0D | ";.S.|
00000520: 08 02 99 22 12 9A 20 20 92 1F B0 C0 C0 C0 C0 C0 |...".. ........|
00000530: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000540: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 12 9A |................|
00000550: 20 20 22 00 8A 0D 12 02 99 22 91 12 9A 20 20 92 | "......"... .|
00000560: 1F DD 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00000570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000580: 20 20 20 20 DD 12 9A 20 20 22 00 C7 0D 1C 02 99 | ... "......|
00000590: 22 91 12 9A 20 20 92 1F DD 1D 1D 1D 1D 12 31 2E |"... ........1.|
000005A0: 92 A4 12 D2 45 41 44 92 A4 A4 A4 A4 A4 A4 A4 A4 |....EAD.........|
000005B0: A4 A4 A4 A4 1E C4 49 52 45 43 54 4F 52 59 1F 20 |......IRECTORY. |
000005C0: 20 DD 12 9A 20 20 22 00 FE 0D 26 02 99 22 91 12 | ... "...&.."..|
000005D0: 9A 20 20 92 1F DD 1D 1D 1D 1D 1D 1D 1D A3 A3 A3 |. .............|
000005E0: A3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000005F0: 20 20 20 20 20 20 20 20 DD 12 9A 20 20 22 00 3B | ... ".;|
00000600: 0E 30 02 99 22 91 12 9A 20 20 92 1F DD 1D 1D 1D |.0.."... ......|
00000610: 1D 12 32 2E 92 A4 A4 A4 12 D3 43 52 41 54 43 48 |..2.......CRATCH|
00000620: 92 A4 A4 A4 A4 A4 A4 A4 1E C6 49 4C 45 53 20 20 |..........ILES |
00000630: 1F 20 20 20 20 DD 12 9A 20 20 22 00 72 0E 3A 02 |. ... ".r.:.|
00000640: 99 22 91 12 9A 20 20 92 1F DD 1D 1D 1D 1D 1D 1D |."... .........|
00000650: 1D 1D 1D A3 A3 A3 A3 A3 A3 A3 20 20 20 20 20 20 |.......... |
00000660: 20 20 20 20 20 20 20 20 20 20 20 20 DD 12 9A 20 | ... |
00000670: 20 22 00 AF 0E 44 02 99 22 91 12 9A 20 20 92 1F | "...D.."... ..|
00000680: DD 1D 1D 1D 1D 12 33 2E 92 A4 A4 A4 A4 A4 12 C3 |......3.........|
00000690: 48 41 4E 47 45 92 A4 A4 A4 A4 A4 A4 1E CE 41 4D |HANGE.........AM|
000006A0: 45 2F C9 C4 1F 20 20 20 20 DD 12 9A 20 20 22 00 |E/... ... ".|
000006B0: E6 0E 4E 02 99 22 91 12 9A 20 20 92 1F DD 1D 1D |..N.."... .....|
000006C0: 1D 1D 1D 1D 1D 1D 1D 1D 1D A3 A3 A3 A3 A3 A3 20 |............... |
000006D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006E0: DD 12 9A 20 20 22 00 23 0F 58 02 99 22 91 12 9A |... ".#.X.."...|
000006F0: 20 20 92 1F DD 1D 1D 1D 1D 12 34 2E 92 A4 A4 A4 | ........4.....|
00000700: A4 A4 A4 A4 12 D6 41 4C 49 44 41 54 45 92 A4 A4 |......ALIDATE...|
00000710: 1E C4 49 53 4B 1F 20 20 20 20 20 20 20 DD 12 9A |..ISK. ...|
00000720: 20 20 22 00 5A 0F 62 02 99 22 91 12 9A 20 20 92 | ".Z.b.."... .|
00000730: 1F DD 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D A3 |................|
00000740: A3 A3 A3 A3 A3 A3 A3 20 20 20 20 20 20 20 20 20 |....... |
00000750: 20 20 20 20 DD 12 9A 20 20 22 00 97 0F 6C 02 99 | ... "...l..|
00000760: 22 91 12 9A 20 20 92 1F DD 1D 1D 1D 1D 12 35 2E |"... ........5.|
00000770: 92 A4 A4 A4 A4 A4 A4 A4 12 C8 45 41 44 45 52 92 |..........EADER.|
00000780: A4 A4 A4 A4 1E C4 49 53 4B 1F 20 20 20 20 20 20 |......ISK. |
00000790: 20 DD 12 9A 20 20 22 00 CE 0F 76 02 99 22 91 12 | ... "...v.."..|
000007A0: 9A 20 20 92 1F DD 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |. .............|
000007B0: 1D 1D 1D A3 A3 A3 A3 A3 A3 20 20 20 20 20 20 20 |......... |
000007C0: 20 20 20 20 20 20 20 20 DD 12 9A 20 20 22 00 0B | ... "..|
000007D0: 10 80 02 99 22 91 12 9A 20 20 92 1F DD 1D 1D 1D |...."... ......|
000007E0: 1D 12 36 2E 92 A4 A4 A4 A4 A4 12 D0 52 49 4E 54 |..6.........RINT|
000007F0: 92 A4 A4 A4 A4 A4 A4 A4 1E C2 4C 4F 43 4B 53 20 |..........LOCKS |
00000800: C6 52 45 45 1F DD 12 9A 20 20 22 00 42 10 8A 02 |.REE.... ".B...|
00000810: 99 22 91 12 9A 20 20 92 1F DD 1D 1D 1D 1D 1D 1D |."... .........|
00000820: 1D 1D 1D 1D 1D A3 A3 A3 A3 A3 20 20 20 20 20 20 |.......... |
00000830: 20 20 20 20 20 20 20 20 20 20 20 20 DD 12 9A 20 | ... |
00000840: 20 22 00 7F 10 94 02 99 22 91 12 9A 20 20 92 1F | "......"... ..|
00000850: DD 1D 1D 1D 1D 12 37 2E 92 A4 A4 A4 12 D5 4E 53 |......7.......NS|
00000860: 43 52 41 54 43 48 92 A4 A4 A4 A4 A4 1E C6 49 4C |CRATCH........IL|
00000870: 45 20 20 1F 20 20 20 20 20 DD 12 9A 20 20 22 00 |E . ... ".|
00000880: B6 10 9E 02 99 22 91 12 9A 20 20 92 1F DD 1D 1D |....."... .....|
00000890: 1D 1D 1D 1D 1D 1D 1D A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000008A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008B0: DD 12 9A 20 20 22 00 F3 10 A8 02 99 22 91 12 9A |... "......"...|
000008C0: 20 20 92 1F DD 1D 1D 1D 1D 12 38 2E 92 A4 12 C5 | ........8.....|
000008D0: 4E 44 92 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |ND..............|
000008E0: 1E D0 52 4F 47 52 41 4D 1F 20 20 20 20 DD 12 9A |..ROGRAM. ...|
000008F0: 20 20 22 00 2A 11 B2 02 99 22 91 12 9A 20 20 92 | ".*...."... .|
00000900: 1F DD 1D 1D 1D 1D 1D 1D 1D A3 A3 A3 20 20 20 20 |............ |
00000910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000920: 20 20 20 20 DD 12 9A 20 20 22 00 61 11 BC 02 99 | ... ".a....|
00000930: 22 91 12 9A 20 20 92 1F AD C0 C0 C0 C0 C0 C0 C0 |"... ..........|
00000940: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000950: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 12 9A 20 20 |.............. |
00000960: 22 00 95 11 C6 02 99 22 91 12 9A 20 20 20 20 20 |"......"... |
00000970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000990: 20 20 20 1F 22 00 B6 11 D0 02 97 31 39 38 2C 30 | ."......198,0|
000009A0: 3A 92 31 39 38 2C 31 3A A1 56 24 3A 8B 56 24 B2 |:.198,1:.V$:.V$.|
000009B0: 22 22 A7 37 32 30 00 D1 11 D5 02 8B C6 28 56 24 |"".720.......(V$|
000009C0: 29 B1 35 36 B0 C6 28 56 24 29 B3 34 39 A7 37 32 |).56..(V$).49.72|
000009D0: 30 00 DF 11 DA 02 8B 56 24 B2 22 38 22 A7 80 00 |0......V$."8"...|
000009E0: 04 12 E4 02 91 C5 28 56 24 29 89 33 30 2C 33 33 |......(V$).30,33|
000009F0: 30 2C 37 36 30 2C 31 31 36 30 2C 31 32 30 30 2C |0,760,1160,1200,|
00000A00: 31 33 30 30 00 3A 12 EE 02 99 22 93 1F 12 20 C6 |1300.:...."... .|
00000A10: C9 CC C5 20 C1 D2 D2 C1 CE C7 C5 D2 2E 2E 2E CC |... ............|
00000A20: 41 4D D3 4F 46 54 2E 2E 2E CC 45 4C 59 53 54 41 |AM.OFT....ELYSTA|
00000A30: 44 2E 31 39 38 34 92 22 3A 8E 00 59 12 F8 02 8D |D.1984.":..Y....|
00000A40: 37 35 30 3A 99 22 11 1D 1D 1D 12 CE 92 41 4D 45 |750:.".......AME|
00000A50: 20 4F 52 20 12 C9 92 44 22 00 6C 12 F9 02 A1 43 | OR ...D".l....C|
00000A60: 24 3A 8B 43 24 B2 22 22 A7 37 36 31 00 7C 12 FA |$:.C$."".761.|..|
00000A70: 02 8B 43 24 B2 22 49 22 A7 39 37 30 00 8D 12 FB |..C$."I".970....|
00000A80: 02 8B 43 24 B3 B1 22 4E 22 A7 37 36 31 00 C2 12 |..C$.."N".761...|
00000A90: 02 03 99 22 12 1D 1D 1D 11 11 C4 C9 D3 CB 20 CE |...".......... .|
00000AA0: C1 CD C5 20 92 20 3A 22 3B 3A 8F 20 2A 2A 2A 20 |... . :";:. *** |
00000AB0: 52 45 41 44 20 44 49 53 4B 20 4E 41 4D 45 20 2A |READ DISK NAME *|
00000AC0: 2A 2A 00 CE 12 0C 03 9F 31 2C 38 2C 31 35 00 DD |**......1,8,15..|
00000AD0: 12 16 03 9F 32 2C 38 2C 32 2C 22 23 22 00 F2 12 |....2,8,2,"#"...|
00000AE0: 20 03 98 31 2C 22 55 31 20 32 20 30 20 31 38 20 | ..1,"U1 2 0 18 |
00000AF0: 30 22 00 05 13 2A 03 98 31 2C 22 42 2D 50 20 32 |0"...*..1,"B-P 2|
00000B00: 20 31 34 34 22 00 11 13 34 03 81 49 B2 31 A4 31 | 144"...4..I.1.1|
00000B10: 36 00 2B 13 3E 03 A1 23 32 2C 41 24 3A 8B 41 24 |6.+.>..#2,A$:.A$|
00000B20: B2 C7 28 31 36 30 29 A7 38 35 30 00 36 13 48 03 |..(160).850.6.H.|
00000B30: 99 41 24 3B 3A 82 00 40 13 52 03 A0 32 3A A0 31 |.A$;:..@.R..2:.1|
00000B40: 00 5C 13 5C 03 8F 20 2A 2A 2A 2A 20 43 48 41 4E |.\.\.. **** CHAN|
00000B50: 47 45 20 4E 41 4D 45 20 2A 2A 2A 2A 00 68 13 66 |GE NAME ****.h.f|
00000B60: 03 9F 31 2C 38 2C 31 35 00 77 13 70 03 9F 32 2C |..1,8,15.w.p..2,|
00000B70: 38 2C 32 2C 22 23 22 00 8C 13 7A 03 98 31 2C 22 |8,2,"#"...z..1,"|
00000B80: 55 31 20 32 20 30 20 31 38 20 30 22 00 9F 13 84 |U1 2 0 18 0"....|
00000B90: 03 98 31 2C 22 42 2D 50 20 32 20 31 34 34 22 00 |..1,"B-P 2 144".|
00000BA0: CB 13 8E 03 85 22 13 11 11 11 11 11 11 11 11 11 |....."..........|
00000BB0: 11 1D 1D 1D 12 1E CE C5 D7 20 C4 C9 D3 CB 20 CE |......... .... .|
00000BC0: C1 CD C5 92 1F 20 20 22 3B 41 24 00 ED 13 98 03 |..... ";A$.....|
00000BD0: 8B 20 C3 28 41 24 29 B3 31 36 20 A7 41 24 B2 41 |. .(A$).16 .A$.A|
00000BE0: 24 AA C7 28 31 36 30 29 3A 89 39 32 30 00 F8 13 |$..(160):.920...|
00000BF0: A2 03 98 32 2C 41 24 3B 00 0D 14 AC 03 98 31 2C |...2,A$;......1,|
00000C00: 22 55 32 20 32 20 30 20 31 38 20 30 22 00 14 14 |"U2 2 0 18 0"...|
00000C10: B6 03 A0 32 00 23 14 C0 03 98 31 2C 22 49 30 22 |...2.#....1,"I0"|
00000C20: 3A A0 31 00 3E 14 C1 03 99 22 12 1D 1D 1D 11 11 |:.1.>...."......|
00000C30: C3 C8 C1 CE C7 C5 20 C9 C4 20 D9 2F CE 22 00 51 |...... .. ./.".Q|
00000C40: 14 C2 03 A1 43 24 3A 8B 43 24 B2 22 22 A7 39 36 |....C$:.C$."".96|
00000C50: 32 00 62 14 C3 03 8B 43 24 B3 B1 22 59 22 A7 35 |2.b....C$.."Y".5|
00000C60: 30 30 00 8A 14 CA 03 99 22 12 11 11 1D 1D 1D C9 |00......".......|
00000C70: C4 92 20 3A 22 3B 3A 8F 20 2A 2A 2A 2A 20 52 45 |.. :";:. **** RE|
00000C80: 41 44 20 49 44 20 2A 2A 2A 2A 00 96 14 D4 03 9F |AD ID ****......|
00000C90: 31 2C 38 2C 31 35 00 A5 14 DE 03 9F 32 2C 38 2C |1,8,15......2,8,|
00000CA0: 32 2C 22 23 22 00 BA 14 E8 03 98 31 2C 22 55 31 |2,"#"......1,"U1|
00000CB0: 20 32 20 30 20 31 38 20 30 22 00 CD 14 F2 03 98 | 2 0 18 0"......|
00000CC0: 31 2C 22 42 2D 50 20 32 20 31 36 32 22 00 D8 14 |1,"B-P 2 162"...|
00000CD0: FC 03 81 49 B2 31 A4 35 00 F3 14 06 04 A1 23 32 |...I.1.5......#2|
00000CE0: 2C 41 24 3A 8B 41 24 B2 C7 28 31 36 30 29 A7 31 |,A$:.A$..(160).1|
00000CF0: 30 35 30 00 FE 14 10 04 99 41 24 3B 3A 82 00 08 |050......A$;:...|
00000D00: 15 1A 04 A0 32 3A A0 31 00 14 15 24 04 9F 31 2C |....2:.1...$..1,|
00000D10: 38 2C 31 35 00 23 15 2E 04 9F 32 2C 38 2C 32 2C |8,15.#....2,8,2,|
00000D20: 22 23 22 00 38 15 38 04 98 31 2C 22 55 31 20 32 |"#".8.8..1,"U1 2|
00000D30: 20 30 20 31 38 20 30 22 00 4B 15 42 04 98 31 2C | 0 18 0".K.B..1,|
00000D40: 22 42 2D 50 20 32 20 31 36 32 22 00 86 15 4C 04 |"B-P 2 162"...L.|
00000D50: 85 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00000D60: 11 11 11 11 11 1D 1D 1D 1E 12 CE C5 D7 20 C9 C4 |............. ..|
00000D70: 92 1F 20 3A 22 3B 41 24 3A 8B C3 28 41 24 29 B1 |.. :";A$:..(A$).|
00000D80: 35 A7 31 31 30 30 00 91 15 56 04 98 32 2C 41 24 |5.1100...V..2,A$|
00000D90: 3B 00 A6 15 60 04 98 31 2C 22 55 32 20 32 20 30 |;...`..1,"U2 2 0|
00000DA0: 20 31 38 20 30 22 00 AD 15 6A 04 A0 32 00 BC 15 | 18 0"...j..2...|
00000DB0: 74 04 98 31 2C 22 49 30 22 3A A0 31 00 C5 15 7E |t..1,"I0":.1...~|
00000DC0: 04 89 35 30 30 00 DC 15 88 04 8F 20 2A 2A 2A 20 |..500...... *** |
00000DD0: 56 41 4C 49 44 41 54 45 20 2A 2A 2A 00 14 16 92 |VALIDATE ***....|
00000DE0: 04 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00000DF0: 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D |................|
00000E00: 1D 1D 1D 1D 1D 1D 1D 1D 12 D6 C1 CC C9 C4 C1 D4 |................|
00000E10: C9 CE C7 22 00 2B 16 9C 04 9F 31 35 2C 38 2C 31 |...".+....15,8,1|
00000E20: 35 2C 22 56 30 3A 22 3A A0 31 35 00 39 16 A6 04 |5,"V0:":.15.9...|
00000E30: 8D 32 36 30 3A 89 35 30 30 00 72 16 B0 04 8D 37 |.260:.500.r....7|
00000E40: 35 30 3A 99 22 13 11 11 1D 1D 1D 12 1E C1 CC CC |50:."...........|
00000E50: 20 C4 C1 D4 C1 1F 92 20 57 49 4C 4C 20 42 45 20 | ...... WILL BE |
00000E60: 43 4C 45 41 52 45 44 20 46 52 4F 4D 20 44 49 53 |CLEARED FROM DIS|
00000E70: 4B 22 00 90 16 B5 04 99 22 13 11 11 11 11 1D 1D |K"......".......|
00000E80: 1D 49 4E 20 1E 33 1F 20 53 45 43 4F 4E 44 53 22 |.IN .3. SECONDS"|
00000E90: 00 AE 16 BA 04 99 22 13 11 11 11 11 11 11 1D 1D |......".........|
00000EA0: 1D C3 4F 4E 54 49 4E 55 45 20 D9 2F CE 22 00 C4 |..ONTINUE ./."..|
00000EB0: 16 C4 04 A1 43 4F 24 3A 8B 43 4F 24 B2 22 22 A7 |....CO$:.CO$."".|
00000EC0: 31 32 32 30 00 D5 16 C9 04 8B 43 4F 24 B2 22 4E |1220......CO$."N|
00000ED0: 22 A7 35 30 30 00 E8 16 CA 04 8B 43 4F 24 B3 B1 |".500......CO$..|
00000EE0: 22 59 22 A7 31 32 32 30 00 0D 17 CE 04 85 22 13 |"Y".1220......".|
00000EF0: 11 11 11 11 11 11 11 11 1D 1D 1D CE 45 57 20 C4 |............EW .|
00000F00: 49 53 4B 20 CE 41 4D 45 22 3B 4E 4E 24 00 2E 17 |ISK .AME";NN$...|
00000F10: D3 04 9F 31 2C 38 2C 31 35 2C 22 4E 30 3A 22 AA |...1,8,15,"N0:".|
00000F20: 4E 4E 24 3A A0 31 3A 89 35 30 30 87 59 2E 00 48 |NN$:.1:.500.Y..H|
00000F30: 17 D8 04 A1 23 31 2C 42 24 3A 8B 42 24 B2 22 22 |....#1,B$:.B$.""|
00000F40: A7 42 24 B2 C7 28 30 29 00 6A 17 E2 04 99 C6 28 |.B$..(0).j.....(|
00000F50: 41 24 29 AA 32 35 36 AC C6 28 42 24 29 22 42 4C |A$).256..(B$)"BL|
00000F60: 4F 43 4B 53 20 46 52 45 45 22 00 76 17 EC 04 A0 |OCKS FREE".v....|
00000F70: 31 3A 89 35 30 30 00 87 17 14 05 9F 31 2C 38 2C |1:.500......1,8,|
00000F80: 31 35 2C 22 49 30 22 00 9E 17 1E 05 98 31 2C 22 |15,"I0"......1,"|
00000F90: 4D 2D 52 22 C7 28 32 35 30 29 C7 28 32 29 00 B8 |M-R".(250).(2)..|
00000FA0: 17 28 05 A1 23 31 2C 41 24 3A 8B 41 24 B2 22 22 |.(..#1,A$:.A$.""|
00000FB0: A7 41 24 B2 C7 28 30 29 00 CF 17 32 05 98 31 2C |.A$..(0)...2..1,|
00000FC0: 22 4D 2D 52 22 C7 28 32 35 32 29 C7 28 32 29 00 |"M-R".(252).(2).|
00000FD0: E9 17 3C 05 A1 23 31 2C 42 24 3A 8B 42 24 B2 22 |..<..#1,B$:.B$."|
00000FE0: 22 A7 42 24 B2 C7 28 30 29 00 1C 18 46 05 99 22 |".B$..(0)...F.."|
00000FF0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3B C6 28 |............";.(|
00001000: 41 24 29 AA 32 35 36 AC C6 28 42 24 29 3B 22 20 |A$).256..(B$);" |
00001010: C2 CC CF C3 CB D3 20 C6 D2 C5 C5 22 00 23 18 50 |...... ....".#.P|
00001020: 05 A0 31 00 68 18 5A 05 99 22 12 13 11 11 11 11 |..1.h.Z.."......|
00001030: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001040: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D C8 |................|
00001050: C9 D4 20 C1 20 CB C5 D9 92 22 3A 92 31 39 37 2C |.. . ....":.197,|
00001060: 31 39 31 3A 89 35 30 30 00 7B 18 78 05 8F 20 53 |191:.500.{.x.. S|
00001070: 4F 52 54 20 52 4F 55 54 49 4E 45 00 A2 18 82 05 |ORT ROUTINE.....|
00001080: 99 22 13 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00001090: 1D 1D D3 CF D2 D4 C9 CE C7 20 D2 C5 C3 CF D2 C4 |......... ......|
000010A0: D3 22 00 B4 18 8C 05 81 49 B2 31 A4 4E 3A 81 4A |."......I.1.N:.J|
000010B0: B2 31 A4 4E 00 CD 18 96 05 8B 46 54 24 28 49 29 |.1.N......FT$(I)|
000010C0: B3 46 54 24 28 4A 29 A7 8D 31 34 38 30 00 D7 18 |.FT$(J)..1480...|
000010D0: A0 05 82 4A 3A 82 49 00 E2 18 A5 05 8D 37 35 30 |...J:.I......750|
000010E0: 3A 8E 00 F1 18 C8 05 48 46 24 B2 46 54 24 28 49 |:......HF$.FT$(I|
000010F0: 29 00 03 19 D2 05 46 54 24 28 49 29 B2 46 54 24 |).....FT$(I).FT$|
00001100: 28 4A 29 00 12 19 DC 05 46 54 24 28 4A 29 B2 48 |(J).....FT$(J).H|
00001110: 46 24 00 48 19 E6 05 99 22 13 11 11 11 11 11 11 |F$.H....".......|
00001120: 1D 1D 1D 1F 22 3B 49 3B 22 9F 20 4F 46 20 1F 22 |....";I;". OF ."|
00001130: 3B 4E 3B 22 9F 20 D2 C5 C3 CF D2 C4 D3 20 D3 CF |;N;". ....... ..|
00001140: D2 D4 C5 C4 1F 22 3A 8E 00 71 19 60 EA 81 45 B2 |.....":..q.`..E.|
00001150: 30 A4 36 3A 99 4E 42 24 28 45 29 A3 34 29 46 54 |0.6:.NB$(E).4)FT|
00001160: 24 28 45 29 A3 32 32 29 3B 50 53 24 28 45 29 3A |$(E).22);PS$(E):|
00001170: 82 00 00 00 |.... |
..F....FT$(144),FF$(144),NB$(144),PS$(14
4):X.0:.53280,5:.53281,1:."..".Y....".":
.260:.500.....I.0.X:FT$(I)."":NB$(I).""
:.I:X.0...#..750:.260:.1,8,0,"$0"...(.N$
.G(0)...2..#1,A$,A$.G.<..B(214).23..750.
U.F..#1,A$,A$...P..A$."".170...Z..#1,A$,
B$.#.D.NB$(X).D(F(A$.N$).256.F(B$.N$)):.
NB$(X);".";...N..#1,A$.E.X..A$.""..:X.X.
1:.60.Y....A$.G(34).. 250.B....A$;......
MM.1.A$..G(34).FT$(X).FT$(X).A$......MM
.0.F(A$).64.F(A$).86.PS$(X).PS$(X).A$...
..110.E... 1.N....320......FF$(1)."".50
0.".H..DD.11.."...............ANOTHER DI
SK Y/N":.:.15,8,15,"I": 15.7.R..AN$:.AN$
."".210.G....AN$."Y".10.V....AN$."N"..._
....210.M...MM.1.MM:....... READ ERROR C
HANNEL......15,8,15,"I0"......15,EN,EM$,
TR,SE..."..EN..0..".......";EN;EM$;TR;SE
:."....HIT A KEY.":.197,191...,. 15...6.
....@..500...J.N.X.2:.750:.1400:SS.1.(.T
..SF.1.N.G.^.."...";FT$(SF);.25)".Y/N";.
\.H..SF$:.SF$."".360...R..SF$."Y".."....
.YES.":FF$(SS).FT$(SF):SS.SS.1:.400...|.
.SF$."N"..".....NO ".A....B(214).23..75
0.Y....SF:.FF$(1).."".420......490......
15,8,15:.750:SP$." "....
..T.1.SS.?....".........SCRATCHING ";FF$
(T).SP$.T.B..15,"S0:".FF$(T)...L..FF$(T.
1).""..15,EN,EM$,TR,SE:."...........";T.
1;EM$;TR;SE...V.."...........SCRATCHED
";FF$(T).SP$.Q....T: 15:.260:.490.....DD
.11:.190......750......"...
";.S...."..
........................................
"......"... ...
... ".G...."... ........1.
...READ..............DIRECTORY. ... ".
..&.."... ..............
... ".;.0.."... ........2.....
.SCRATCH.........FILES . ... ".R.:.
."... ...................
... "...D.."... ........3........C
HANGE........NAME/ID. ... "...N.."..
. ....................
... ".#.X.."... ........4..........VAL
IDATE....DISK. ... ".Z.B.."... .
....................... ...
"...L.."... ........5..........HEADER.
.....DISK. ... ".N.V.."... .....
................. ... "..
...."... ........6........PRINT........
.BLOCKS FREE.... ".B...."... .........
.......... ... ".....
"... ........7......UNSCRATCH.......FIL
E . ... "......"... .............
........ ... "......"...
........8....END...............PROGRAM
. ... ".*...."... .............
... ".A...."... ..
......................................
"...F.."...
."...P..198,0:.198,1:.V$:.V$.
"".720.Q.U..F(V$).56.F(V$).49.720...Z..V
$."8"........E(V$).30,330,760,1160,1200,
1300.:...."... FILE ARRANGER...LAMSOFT..
.LELYSTAD.1984.":..Y....750:.".....N.AME
OR .I.D".L....C$:.C$."".761.|....C$."I"
.970......C$.."N".761.B...."......DISK N
AME . :";:. *** READ DISK NAME ***.N....
1,8,15......2,8,2,"#"... ..1,"U1 2 0 18
0"...*..1,"B-P 2 144"...4..I.1.16.+.>..#
2,A$:.A$.G(160).850.6.H..A$;:..@.R. 2: 1
.\.\.. **** CHANGE NAME ****.H.F..1,8,15
.W.P..2,8,2,"#"...Z..1,"U1 2 0 18 0"....
..1,"B-P 2 144".K...."................NE
W DISK NAME.. ";A$...... C(A$).16 .A$.A
$.G(160):.920......2,A$;......1,"U2 2 0
18 0"..... 2.#....1,"I0": 1.>.A.."......
CHANGE ID Y/N".Q.B..C$:.C$."".962.B.C..C
$.."Y".500...J.."......ID. :";:. **** RE
AD ID ****...T..1,8,15......2,8,2,"#"...
...1,"U1 2 0 18 0".M....1,"B-P 2 162".X.
...I.1.5......#2,A$:.A$.G(160).1050.....
.A$;:...... 2: 1...$..1,8,15.#....2,8,2,
"#".8.8..1,"U1 2 0 18 0".K.B..1,"B-P 2 1
62"...L.."........................NEW ID
.. :";A$:.C(A$).5.1100...V..2,A$;...`..1
,"U2 2 0 18 0"...J. 2...T..1,"I0": 1.E.~
..500...... *** VALIDATE ***......".....
.................................VALIDAT
ING".+....15,8,15,"V0:": 15.9....260:.50
0.R....750:."........ALL DATA.. WILL BE
CLEARED FROM DISK"......"........IN .3.
SECONDS"......"..........CONTINUE Y/N".D
.D..CO$:.CO$."".1220.U.I..CO$."N".500...
J..CO$.."Y".1220...N.."............NEW D
ISK NAME";NN$...S..1,8,15,"N0:".NN$: 1:.
500.Y..H.X..#1,B$:.B$."".B$.G(0).J....F(
A$).256.F(B$)"BLOCKS FREE".V... 1:.500..
....1,8,15,"I0"......1,"M-R"G(250)G(2)..
.(..#1,A$:.A$."".A$.G(0).O.2..1,"M-R"G(2
52)G(2)...<..#1,B$:.B$."".B$.G(0)...F.."
............";F(A$).256.F(B$);" BLOCKS F
REE".#.P. 1.H.Z.."......................
...............HIT A KEY.":.197,191:.500
.{.X.. SORT ROUTINE......"..............
..SORTING RECORDS"......I.1.N:.J.1.N.M..
..FT$(I).FT$(J)..1480.W. ..J:.I......750
:....H.HF$.FT$(I)...R.FT$(I).FT$(J).....
FT$(J).HF$.H...."...........";I;". OF ."
;N;". RECORDS SORTED.":..Q.`..E.0.6:.NB$
(E).4)FT$(E).22);PS$(E):....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL