ARRANGER 2.0
FILE INFORMATION
FILENAME(S): ARRANGER 2.0
FILE TYPE(S): PRG
FILE SIZE: 4.8K
FIRST SEEN: 2025-12-02 00:02:02
APPEARS ON: 1 disk(s)
FILE HASH
84b295dac003dce82060183731802fa6519a15bb58ef62dff1d44255bf235f3c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | ARRANGER 2.0 | PRG | earthshaker | 3 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 46 08 90 01 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 91 01 99 22 93 22 3A |:."..".Y....".":|
00000050: 8D 34 32 37 3A 89 34 35 34 00 7F 08 92 01 81 49 |.427:.454......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 93 01 8D 34 38 30 3A 8D 34 32 37 3A 9F 31 |.....480:.427:.1|
00000090: 2C 38 2C 30 2C 22 24 30 22 00 A5 08 94 01 4E 24 |,8,0,"$0".....N$|
000000A0: B2 C7 28 30 29 00 B3 08 95 01 A1 23 31 2C 41 24 |..(0)......#1,A$|
000000B0: 2C 41 24 00 C7 08 96 01 8B C2 28 32 31 34 29 B2 |,A$.......(214).|
000000C0: 32 33 A7 8D 34 38 30 00 D5 08 97 01 A1 23 31 2C |23..480......#1,|
000000D0: 41 24 2C 41 24 00 E4 08 98 01 8B 41 24 B2 22 22 |A$,A$......A$.""|
000000E0: A7 34 31 38 00 F2 08 99 01 A1 23 31 2C 41 24 2C |.418......#1,A$,|
000000F0: 42 24 00 23 09 9A 01 4E 42 24 28 58 29 B2 C4 28 |B$.#...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 9B 01 A1 23 31 2C 41 24 00 46 |.";......#1,A$.F|
00000130: 09 9C 01 8B 41 24 B2 22 22 A7 99 3A 58 B2 58 AA |....A$.""..:X.X.|
00000140: 31 3A 89 34 30 36 00 5A 09 9D 01 8B 41 24 B2 C7 |1:.406.Z....A$..|
00000150: 28 33 34 29 A7 8D 20 34 32 36 00 63 09 9E 01 99 |(34).. 426.c....|
00000160: 41 24 3B 00 89 09 9F 01 8B 20 4D 4D B2 31 AF 41 |A$;...... MM.1.A|
00000170: 24 B3 B1 C7 28 33 34 29 A7 46 54 24 28 58 29 B2 |$...(34).FT$(X).|
00000180: 46 54 24 28 58 29 AA 41 24 00 B6 09 A0 01 8B 4D |FT$(X).A$......M|
00000190: 4D B2 30 AF C6 28 41 24 29 B1 36 34 AF C6 28 41 |M.0..(A$).64..(A|
000001A0: 24 29 B3 38 36 A7 50 53 24 28 58 29 B2 50 53 24 |$).86.PS$(X).PS$|
000001B0: 28 58 29 AA 41 24 00 BF 09 A1 01 89 34 31 31 00 |(X).A$......411.|
000001C0: C6 09 A2 01 A0 31 00 CF 09 A3 01 89 34 33 33 00 |.....1......433.|
000001D0: E2 09 A4 01 8B 46 46 24 28 31 29 B2 22 22 A7 34 |.....FF$(1)."".4|
000001E0: 35 34 00 23 0A A5 01 8B 44 44 B2 31 31 A7 99 22 |54.#....DD.11.."|
000001F0: 13 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 12 C1 |................|
00000200: CE CF D4 C8 C5 D2 20 C4 C9 D3 CB 20 D9 2F CE 22 |...... .... ./."|
00000210: 3A 9C 3A 9F 31 35 2C 38 2C 31 35 2C 22 49 22 3A |:.:.15,8,15,"I":|
00000220: A0 31 35 00 38 0A A6 01 A1 41 4E 24 3A 8B 41 4E |.15.8....AN$:.AN|
00000230: 24 B2 22 22 A7 34 32 32 00 49 0A A7 01 8B 41 4E |$."".422.I....AN|
00000240: 24 B2 22 59 22 A7 34 30 30 00 58 0A A8 01 8B 41 |$."Y".400.X....A|
00000250: 4E 24 B2 22 4E 22 A7 8A 00 61 0A A9 01 89 34 32 |N$."N"...a....42|
00000260: 32 00 6F 0A AA 01 4D 4D B2 31 AB 4D 4D 3A 8E 00 |2.o...MM.1.MM:..|
00000270: 88 0A AB 01 8F 20 52 45 41 44 20 45 52 52 4F 52 |..... READ ERROR|
00000280: 20 43 48 41 4E 4E 45 4C 00 9A 0A AC 01 9F 31 35 | CHANNEL......15|
00000290: 2C 38 2C 31 35 2C 22 49 30 22 00 AF 0A AD 01 84 |,8,15,"I0"......|
000002A0: 31 35 2C 45 4E 2C 45 4D 24 2C 54 52 2C 53 45 00 |15,EN,EM$,TR,SE.|
000002B0: ED 0A AE 01 8B 45 4E B3 B1 30 A7 99 22 11 11 1D |.....EN..0.."...|
000002C0: 1D 1D 1D 1D 22 3B 45 4E 3B 45 4D 24 3B 54 52 3B |....";EN;EM$;TR;|
000002D0: 53 45 3A 99 22 12 11 1D 1D C8 C9 D4 20 C1 20 CB |SE:."....... . .|
000002E0: C5 D9 92 22 3A 92 31 39 37 2C 31 39 31 00 F5 0A |...":.197,191...|
000002F0: AF 01 A0 31 35 00 FB 0A B0 01 8E 00 04 0B B1 01 |...15...........|
00000300: 89 34 35 34 00 18 0B B2 01 8B 46 54 24 28 31 29 |.454......FT$(1)|
00000310: B2 22 22 A7 8D 34 38 30 00 62 0B B3 01 8B 46 54 |.""..480.b....FT|
00000320: 24 28 31 29 B2 22 22 A7 99 22 11 1D 1D D0 4C 45 |$(1)."".."....LE|
00000330: 41 53 45 20 4C 4F 41 44 20 44 49 52 45 43 54 4F |ASE LOAD DIRECTO|
00000340: 52 59 20 42 45 46 4F 52 45 20 55 53 49 4E 47 22 |RY BEFORE USING"|
00000350: 3A 99 22 11 1D 1D 54 48 49 53 20 4F 50 54 49 4F |:."...THIS OPTIO|
00000360: 4E 22 00 90 0B B4 01 8B 46 54 24 28 31 29 B2 22 |N"......FT$(1)."|
00000370: 22 A7 99 22 11 11 1D 1D 48 49 54 20 41 20 4B 45 |".."....HIT A KE|
00000380: 59 22 3A 92 31 39 37 2C 31 39 31 3A 89 34 35 34 |Y":.197,191:.454|
00000390: 00 A9 0B B5 01 4E B2 58 AB 32 3A 8D 34 38 30 3A |.....N.X.2:.480:|
000003A0: 8D 35 35 30 3A 53 53 B2 31 00 B5 0B B6 01 81 53 |.550:SS.1......S|
000003B0: 46 B2 31 A4 4E 00 D4 0B B7 01 99 22 1D 1D 1D 22 |F.1.N......"..."|
000003C0: 3B 46 54 24 28 53 46 29 3B A3 32 35 29 22 92 59 |;FT$(SF);.25)".Y|
000003D0: 2F 4E 22 3B 00 E9 0B B8 01 A1 53 46 24 3A 8B 53 |/N";......SF$:.S|
000003E0: 46 24 B2 22 22 A7 34 34 30 00 20 0C B9 01 8B 53 |F$."".440. ....S|
000003F0: 46 24 B2 22 59 22 A7 99 22 9D 9D 9D 12 1E 59 45 |F$."Y"..".....YE|
00000400: 53 1F 22 3A 46 46 24 28 53 53 29 B2 46 54 24 28 |S.":FF$(SS).FT$(|
00000410: 53 46 29 3A 53 53 B2 53 53 AA 31 3A 89 34 34 34 |SF):SS.SS.1:.444|
00000420: 00 3A 0C BA 01 8B 53 46 24 B2 22 4E 22 A7 99 22 |.:....SF$."N".."|
00000430: 9D 9D 9D 12 1F 4E 4F 20 20 22 00 4E 0C BB 01 8B |.....NO ".N....|
00000440: C2 28 32 31 34 29 B2 32 33 A7 8D 34 38 30 00 66 |.(214).23..480.f|
00000450: 0C BC 01 82 53 46 3A 8B 46 46 24 28 31 29 B3 B1 |....SF:.FF$(1)..|
00000460: 22 22 A7 34 34 36 00 6F 0C BD 01 89 34 35 33 00 |"".446.o....453.|
00000470: 99 0C BE 01 9F 31 35 2C 38 2C 31 35 3A 8D 34 38 |.....15,8,15:.48|
00000480: 30 3A 53 50 24 B2 22 20 20 20 20 20 20 20 20 20 |0:SP$." |
00000490: 20 20 20 20 20 20 20 20 22 00 A5 0C BF 01 81 54 | "......T|
000004A0: B2 31 A4 53 53 00 CC 0C C0 01 99 22 13 11 11 11 |.1.SS......"....|
000004B0: 1D 1D 1D 1D 1C D3 C3 D2 C1 D4 C3 C8 C9 CE C7 20 |............... |
000004C0: 22 3B 46 46 24 28 54 29 AA 53 50 24 00 E1 0C C1 |";FF$(T).SP$....|
000004D0: 01 98 31 35 2C 22 53 30 3A 22 AA 46 46 24 28 54 |..15,"S0:".FF$(T|
000004E0: 29 00 20 0D C2 01 8B 46 46 24 28 54 AA 31 29 B2 |). ....FF$(T.1).|
000004F0: 22 22 A7 84 31 35 2C 45 4E 2C 45 4D 24 2C 54 52 |""..15,EN,EM$,TR|
00000500: 2C 53 45 3A 99 22 13 11 11 11 11 11 11 11 1D 1D |,SE:."..........|
00000510: 1D 22 3B 54 AB 31 3B 45 4D 24 3B 54 52 3B 53 45 |.";T.1;EM$;TR;SE|
00000520: 00 49 0D C3 01 99 22 13 11 11 11 11 11 1E 1D 1D |.I....".........|
00000530: 1D 1D D3 C3 D2 C1 D4 C3 C8 C5 C4 20 20 22 3B 46 |........... ";F|
00000540: 46 24 28 54 29 AA 53 50 24 00 5E 0D C4 01 82 54 |F$(T).SP$.^....T|
00000550: 3A A0 31 35 3A 8D 34 32 37 3A 89 34 35 33 00 6D |:.15:.427:.453.m|
00000560: 0D C5 01 44 44 B2 31 31 3A 89 34 32 30 00 76 0D |...DD.11:.420.v.|
00000570: C6 01 8D 34 38 30 00 AA 0D C7 01 99 22 91 9A 12 |...480......"...|
00000580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005A0: 20 20 20 20 20 20 20 20 22 3B 00 E0 0D C8 01 99 | ";......|
000005B0: 22 12 9A 20 20 92 1F B0 C0 C0 C0 C0 C0 C0 C0 C0 |".. ...........|
000005C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000005D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 12 9A 20 20 22 |............. "|
000005E0: 00 17 0E C9 01 99 22 91 12 9A 20 20 92 1F DD 20 |......"... ... |
000005F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000600: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000610: 20 DD 12 9A 20 20 22 00 54 0E CA 01 99 22 91 12 | ... ".T...."..|
00000620: 9A 20 20 92 1F DD 1D 1D 1D 1D 12 31 2E 92 A4 12 |. ........1....|
00000630: D2 45 41 44 92 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |.EAD............|
00000640: A4 1E C4 49 52 45 43 54 4F 52 59 1F 20 20 DD 12 |...IRECTORY. ..|
00000650: 9A 20 20 22 00 8B 0E CB 01 99 22 91 12 9A 20 20 |. "......"... |
00000660: 92 1F DD 1D 1D 1D 1D 1D 1D 1D A3 A3 A3 A3 20 20 |.............. |
00000670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000680: 20 20 20 20 20 DD 12 9A 20 20 22 00 C8 0E CC 01 | ... ".....|
00000690: 99 22 91 12 9A 20 20 92 1F DD 1D 1D 1D 1D 12 32 |."... ........2|
000006A0: 2E 92 A4 A4 A4 12 D3 43 52 41 54 43 48 92 A4 A4 |.......CRATCH...|
000006B0: A4 A4 A4 A4 A4 1E C6 49 4C 45 53 20 20 1F 20 20 |.......ILES . |
000006C0: 20 20 DD 12 9A 20 20 22 00 FF 0E CD 01 99 22 91 | ... "......".|
000006D0: 12 9A 20 20 92 1F DD 1D 1D 1D 1D 1D 1D 1D 1D 1D |.. ............|
000006E0: A3 A3 A3 A3 A3 A3 A3 20 20 20 20 20 20 20 20 20 |....... |
000006F0: 20 20 20 20 20 20 20 20 20 DD 12 9A 20 20 22 00 | ... ".|
00000700: 3C 0F CE 01 99 22 91 12 9A 20 20 92 1F DD 1D 1D |<...."... .....|
00000710: 1D 1D 12 33 2E 92 A4 A4 A4 A4 A4 12 C3 48 41 4E |...3.........HAN|
00000720: 47 45 92 A4 A4 A4 A4 A4 A4 1E CE 41 4D 45 2F C9 |GE.........AME/.|
00000730: C4 1F 20 20 20 20 DD 12 9A 20 20 22 00 73 0F CF |.. ... ".s..|
00000740: 01 99 22 91 12 9A 20 20 92 1F DD 1D 1D 1D 1D 1D |.."... ........|
00000750: 1D 1D 1D 1D 1D 1D A3 A3 A3 A3 A3 A3 20 20 20 20 |............ |
00000760: 20 20 20 20 20 20 20 20 20 20 20 20 20 DD 12 9A | ...|
00000770: 20 20 22 00 B0 0F D0 01 99 22 91 12 9A 20 20 92 | "......"... .|
00000780: 1F DD 1D 1D 1D 1D 12 34 2E 92 A4 A4 A4 A4 A4 A4 |.......4........|
00000790: A4 12 D6 41 4C 49 44 41 54 45 92 A4 A4 1E C4 49 |...ALIDATE.....I|
000007A0: 53 4B 1F 20 20 20 20 20 20 20 DD 12 9A 20 20 22 |SK. ... "|
000007B0: 00 E7 0F D1 01 99 22 91 12 9A 20 20 92 1F DD 1D |......"... ....|
000007C0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D A3 A3 A3 A3 |................|
000007D0: A3 A3 A3 A3 20 20 20 20 20 20 20 20 20 20 20 20 |.... |
000007E0: 20 DD 12 9A 20 20 22 00 24 10 D2 01 99 22 91 12 | ... ".$...."..|
000007F0: 9A 20 20 92 1F DD 1D 1D 1D 1D 12 35 2E 92 A4 A4 |. ........5....|
00000800: A4 A4 A4 A4 A4 12 C3 4C 45 41 52 92 A4 A4 A4 A4 |.......LEAR.....|
00000810: A4 1E C4 49 53 4B 1F 20 20 20 20 20 20 20 DD 12 |...ISK. ..|
00000820: 9A 20 20 22 00 5B 10 D3 01 99 22 91 12 9A 20 20 |. ".[...."... |
00000830: 92 1F DD 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000840: A3 A3 A3 A3 A3 20 20 20 20 20 20 20 20 20 20 20 |..... |
00000850: 20 20 20 20 20 DD 12 9A 20 20 22 00 98 10 D4 01 | ... ".....|
00000860: 99 22 91 12 9A 20 20 92 1F DD 1D 1D 1D 1D 12 36 |."... ........6|
00000870: 2E 92 A4 A4 A4 A4 A4 12 D0 52 49 4E 54 92 A4 A4 |.........RINT...|
00000880: A4 A4 A4 A4 A4 1E C2 4C 4F 43 4B 53 20 C6 52 45 |.......LOCKS .RE|
00000890: 45 1F DD 12 9A 20 20 22 00 CF 10 D5 01 99 22 91 |E.... "......".|
000008A0: 12 9A 20 20 92 1F DD 1D 1D 1D 1D 1D 1D 1D 1D 1D |.. ............|
000008B0: 1D 1D A3 A3 A3 A3 A3 20 20 20 20 20 20 20 20 20 |....... |
000008C0: 20 20 20 20 20 20 20 20 20 DD 12 9A 20 20 22 00 | ... ".|
000008D0: 0C 11 D6 01 99 22 91 12 9A 20 20 92 1F DD 1D 1D |....."... .....|
000008E0: 1D 1D 12 37 2E 92 A4 A4 A4 12 C4 49 53 4B 92 A4 |...7.......ISK..|
000008F0: A4 A4 A4 A4 A4 A4 A4 A4 A4 1E C3 4F 4D 4D 41 4E |...........OMMAN|
00000900: 44 20 20 1F 20 20 DD 12 9A 20 20 22 00 43 11 D7 |D . ... ".C..|
00000910: 01 99 22 91 12 9A 20 20 92 1F DD 1D 1D 1D 1D 1D |.."... ........|
00000920: 1D 1D 1D 1D A3 A3 A3 A3 20 20 20 20 20 20 20 20 |........ |
00000930: 20 20 20 20 20 20 20 20 20 20 20 20 20 DD 12 9A | ...|
00000940: 20 20 22 00 80 11 D8 01 99 22 91 12 9A 20 20 92 | "......"... .|
00000950: 1F DD 1D 1D 1D 1D 12 38 2E 92 A4 12 C5 4E 44 92 |.......8.....ND.|
00000960: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 1E D0 52 |...............R|
00000970: 4F 47 52 41 4D 1F 20 20 20 20 DD 12 9A 20 20 22 |OGRAM. ... "|
00000980: 00 B7 11 D9 01 99 22 91 12 9A 20 20 92 1F DD 1D |......"... ....|
00000990: 1D 1D 1D 1D 1D 1D A3 A3 A3 20 20 20 20 20 20 20 |......... |
000009A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000009B0: 20 DD 12 9A 20 20 22 00 EE 11 DA 01 99 22 91 12 | ... "......"..|
000009C0: 9A 20 20 92 1F AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |. .............|
000009D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000009E0: C0 C0 C0 C0 C0 C0 C0 C0 BD 12 9A 20 20 22 00 22 |........... "."|
000009F0: 12 DB 01 99 22 91 12 9A 20 20 20 20 20 20 20 20 |...."... |
00000A00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A20: 1F 22 00 43 12 DC 01 97 31 39 38 2C 30 3A 92 31 |.".C....198,0:.1|
00000A30: 39 38 2C 31 3A A1 56 24 3A 8B 56 24 B2 22 22 A7 |98,1:.V$:.V$."".|
00000A40: 34 37 36 00 5E 12 DD 01 8B C6 28 56 24 29 B1 35 |476.^.....(V$).5|
00000A50: 36 B0 C6 28 56 24 29 B3 34 39 A7 34 37 36 00 6C |6..(V$).49.476.l|
00000A60: 12 DE 01 8B 56 24 B2 22 38 22 A7 80 00 93 12 DF |....V$."8"......|
00000A70: 01 91 C5 28 56 24 29 89 34 30 32 2C 34 33 34 2C |...(V$).402,434,|
00000A80: 34 38 31 2C 35 32 37 2C 35 33 31 2C 35 34 32 2C |481,527,531,542,|
00000A90: 35 36 31 00 C9 12 E0 01 99 22 93 1F 12 20 C6 C9 |561......"... ..|
00000AA0: CC C5 20 C1 D2 D2 C1 CE C7 C5 D2 2E 2E 2E CC 41 |.. ............A|
00000AB0: 4D D3 4F 46 54 2E 2E 2E CC 45 4C 59 53 54 41 44 |M.OFT....ELYSTAD|
00000AC0: 2E 31 39 38 34 92 22 3A 8E 00 E8 12 E1 01 8D 34 |.1984.":.......4|
00000AD0: 38 30 3A 99 22 11 1D 1D 1D 12 CE 92 41 4D 45 20 |80:.".......AME |
00000AE0: 4F 52 20 12 C9 92 44 22 00 FB 12 E2 01 A1 43 24 |OR ...D"......C$|
00000AF0: 3A 8B 43 24 B2 22 22 A7 34 38 32 00 0B 13 E3 01 |:.C$."".482.....|
00000B00: 8B 43 24 B2 22 49 22 A7 35 30 38 00 1C 13 E4 01 |.C$."I".508.....|
00000B10: 8B 43 24 B3 B1 22 4E 22 A7 34 38 32 00 51 13 E5 |.C$.."N".482.Q..|
00000B20: 01 99 22 12 1D 1D 1D 11 11 C4 C9 D3 CB 20 CE C1 |..".......... ..|
00000B30: CD C5 20 92 20 3A 22 3B 3A 8F 20 2A 2A 2A 20 52 |.. . :";:. *** R|
00000B40: 45 41 44 20 44 49 53 4B 20 4E 41 4D 45 20 2A 2A |EAD DISK NAME **|
00000B50: 2A 00 5D 13 E6 01 9F 31 2C 38 2C 31 35 00 6C 13 |*.]....1,8,15.l.|
00000B60: E7 01 9F 32 2C 38 2C 32 2C 22 23 22 00 81 13 E8 |...2,8,2,"#"....|
00000B70: 01 98 31 2C 22 55 31 20 32 20 30 20 31 38 20 30 |..1,"U1 2 0 18 0|
00000B80: 22 00 94 13 E9 01 98 31 2C 22 42 2D 50 20 32 20 |"......1,"B-P 2 |
00000B90: 31 34 34 22 00 A0 13 EA 01 81 49 B2 31 A4 31 36 |144"......I.1.16|
00000BA0: 00 BA 13 EB 01 A1 23 32 2C 41 24 3A 8B 41 24 B2 |......#2,A$:.A$.|
00000BB0: C7 28 31 36 30 29 A7 34 39 33 00 C5 13 EC 01 99 |.(160).493......|
00000BC0: 41 24 3B 3A 82 00 CF 13 ED 01 A0 32 3A A0 31 00 |A$;:.......2:.1.|
00000BD0: EB 13 EE 01 8F 20 2A 2A 2A 2A 20 43 48 41 4E 47 |..... **** CHANG|
00000BE0: 45 20 4E 41 4D 45 20 2A 2A 2A 2A 00 F7 13 EF 01 |E NAME ****.....|
00000BF0: 9F 31 2C 38 2C 31 35 00 06 14 F0 01 9F 32 2C 38 |.1,8,15......2,8|
00000C00: 2C 32 2C 22 23 22 00 1B 14 F1 01 98 31 2C 22 55 |,2,"#"......1,"U|
00000C10: 31 20 32 20 30 20 31 38 20 30 22 00 2E 14 F2 01 |1 2 0 18 0".....|
00000C20: 98 31 2C 22 42 2D 50 20 32 20 31 34 34 22 00 5A |.1,"B-P 2 144".Z|
00000C30: 14 F3 01 85 22 13 11 11 11 11 11 11 11 11 11 11 |...."...........|
00000C40: 1D 1D 1D 12 1E CE C5 D7 20 C4 C9 D3 CB 20 CE C1 |........ .... ..|
00000C50: CD C5 92 1F 20 20 22 3B 41 24 00 7C 14 F4 01 8B |.... ";A$.|....|
00000C60: 20 C3 28 41 24 29 B3 31 36 20 A7 41 24 B2 41 24 | .(A$).16 .A$.A$|
00000C70: AA C7 28 31 36 30 29 3A 89 35 30 30 00 87 14 F5 |..(160):.500....|
00000C80: 01 98 32 2C 41 24 3B 00 9C 14 F6 01 98 31 2C 22 |..2,A$;......1,"|
00000C90: 55 32 20 32 20 30 20 31 38 20 30 22 00 A3 14 F7 |U2 2 0 18 0"....|
00000CA0: 01 A0 32 00 B2 14 F8 01 98 31 2C 22 49 30 22 3A |..2......1,"I0":|
00000CB0: A0 31 00 CD 14 F9 01 99 22 12 1D 1D 1D 11 11 C3 |.1......".......|
00000CC0: C8 C1 CE C7 C5 20 C9 C4 20 D9 2F CE 22 00 E0 14 |..... .. ./."...|
00000CD0: FA 01 A1 43 24 3A 8B 43 24 B2 22 22 A7 35 30 36 |...C$:.C$."".506|
00000CE0: 00 F1 14 FB 01 8B 43 24 B3 B1 22 59 22 A7 34 35 |......C$.."Y".45|
00000CF0: 34 00 19 15 FC 01 99 22 12 11 11 1D 1D 1D C9 C4 |4......"........|
00000D00: 92 20 3A 22 3B 3A 8F 20 2A 2A 2A 2A 20 52 45 41 |. :";:. **** REA|
00000D10: 44 20 49 44 20 2A 2A 2A 2A 00 25 15 FD 01 9F 31 |D ID ****.%....1|
00000D20: 2C 38 2C 31 35 00 34 15 FE 01 9F 32 2C 38 2C 32 |,8,15.4....2,8,2|
00000D30: 2C 22 23 22 00 49 15 FF 01 98 31 2C 22 55 31 20 |,"#".I....1,"U1 |
00000D40: 32 20 30 20 31 38 20 30 22 00 5C 15 00 02 98 31 |2 0 18 0".\....1|
00000D50: 2C 22 42 2D 50 20 32 20 31 36 32 22 00 67 15 01 |,"B-P 2 162".g..|
00000D60: 02 81 49 B2 31 A4 35 00 81 15 02 02 A1 23 32 2C |..I.1.5......#2,|
00000D70: 41 24 3A 8B 41 24 B2 C7 28 31 36 30 29 A7 35 31 |A$:.A$..(160).51|
00000D80: 36 00 8C 15 03 02 99 41 24 3B 3A 82 00 96 15 04 |6......A$;:.....|
00000D90: 02 A0 32 3A A0 31 00 A2 15 05 02 9F 31 2C 38 2C |..2:.1......1,8,|
00000DA0: 31 35 00 B1 15 06 02 9F 32 2C 38 2C 32 2C 22 23 |15......2,8,2,"#|
00000DB0: 22 00 C6 15 07 02 98 31 2C 22 55 31 20 32 20 30 |"......1,"U1 2 0|
00000DC0: 20 31 38 20 30 22 00 D9 15 08 02 98 31 2C 22 42 | 18 0"......1,"B|
00000DD0: 2D 50 20 32 20 31 36 32 22 00 13 16 09 02 85 22 |-P 2 162"......"|
00000DE0: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000DF0: 11 11 11 1D 1D 1D 1E 12 CE C5 D7 20 C9 C4 92 1F |........... ....|
00000E00: 20 3A 22 3B 41 24 3A 8B C3 28 41 24 29 B1 35 A7 | :";A$:..(A$).5.|
00000E10: 35 32 31 00 1E 16 0A 02 98 32 2C 41 24 3B 00 33 |521......2,A$;.3|
00000E20: 16 0B 02 98 31 2C 22 55 32 20 32 20 30 20 31 38 |....1,"U2 2 0 18|
00000E30: 20 30 22 00 3A 16 0C 02 A0 32 00 49 16 0D 02 98 | 0".:....2.I....|
00000E40: 31 2C 22 49 30 22 3A A0 31 00 52 16 0E 02 89 34 |1,"I0":.1.R....4|
00000E50: 35 34 00 69 16 0F 02 8F 20 2A 2A 2A 20 56 41 4C |54.i.... *** VAL|
00000E60: 49 44 41 54 45 20 2A 2A 2A 00 A1 16 10 02 99 22 |IDATE ***......"|
00000E70: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000E80: 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000E90: 1D 1D 1D 1D 1D 12 D6 C1 CC C9 C4 C1 D4 C9 CE C7 |................|
00000EA0: 22 00 B8 16 11 02 9F 31 35 2C 38 2C 31 35 2C 22 |"......15,8,15,"|
00000EB0: 56 30 3A 22 3A A0 31 35 00 C6 16 12 02 8D 34 32 |V0:":.15......42|
00000EC0: 37 3A 89 34 35 34 00 FF 16 13 02 8D 34 38 30 3A |7:.454......480:|
00000ED0: 99 22 13 11 11 1D 1D 1D 12 1E C1 CC CC 20 C4 C1 |."........... ..|
00000EE0: D4 C1 1F 92 20 57 49 4C 4C 20 42 45 20 43 4C 45 |.... WILL BE CLE|
00000EF0: 41 52 45 44 20 46 52 4F 4D 20 44 49 53 4B 22 00 |ARED FROM DISK".|
00000F00: 1D 17 14 02 99 22 13 11 11 11 11 1D 1D 1D 49 4E |....."........IN|
00000F10: 20 1E 33 1F 20 53 45 43 4F 4E 44 53 22 00 3B 17 | .3. SECONDS".;.|
00000F20: 15 02 99 22 13 11 11 11 11 11 11 1D 1D 1D C3 4F |..."...........O|
00000F30: 4E 54 49 4E 55 45 20 D9 2F CE 22 00 50 17 16 02 |NTINUE ./.".P...|
00000F40: A1 43 4F 24 3A 8B 43 4F 24 B2 22 22 A7 35 33 34 |.CO$:.CO$."".534|
00000F50: 00 61 17 17 02 8B 43 4F 24 B2 22 4E 22 A7 34 35 |.a....CO$."N".45|
00000F60: 34 00 73 17 18 02 8B 43 4F 24 B3 B1 22 59 22 A7 |4.s....CO$.."Y".|
00000F70: 35 33 34 00 98 17 19 02 85 22 13 11 11 11 11 11 |534......"......|
00000F80: 11 11 11 1D 1D 1D CE 45 57 20 C4 49 53 4B 20 CE |.......EW .ISK .|
00000F90: 41 4D 45 22 3B 4E 4E 24 00 B9 17 1A 02 9F 31 2C |AME";NN$......1,|
00000FA0: 38 2C 31 35 2C 22 4E 30 3A 22 AA 4E 4E 24 3A A0 |8,15,"N0:".NN$:.|
00000FB0: 31 3A 89 34 35 34 87 59 2E 00 D3 17 1B 02 A1 23 |1:.454.Y.......#|
00000FC0: 31 2C 42 24 3A 8B 42 24 B2 22 22 A7 42 24 B2 C7 |1,B$:.B$."".B$..|
00000FD0: 28 30 29 00 F5 17 1C 02 99 C6 28 41 24 29 AA 32 |(0).......(A$).2|
00000FE0: 35 36 AC C6 28 42 24 29 22 42 4C 4F 43 4B 53 20 |56..(B$)"BLOCKS |
00000FF0: 46 52 45 45 22 00 01 18 1D 02 A0 31 3A 89 34 35 |FREE"......1:.45|
00001000: 34 00 12 18 1E 02 9F 31 2C 38 2C 31 35 2C 22 49 |4......1,8,15,"I|
00001010: 30 22 00 29 18 1F 02 98 31 2C 22 4D 2D 52 22 C7 |0".)....1,"M-R".|
00001020: 28 32 35 30 29 C7 28 32 29 00 43 18 20 02 A1 23 |(250).(2).C. ..#|
00001030: 31 2C 41 24 3A 8B 41 24 B2 22 22 A7 41 24 B2 C7 |1,A$:.A$."".A$..|
00001040: 28 30 29 00 5A 18 21 02 98 31 2C 22 4D 2D 52 22 |(0).Z.!..1,"M-R"|
00001050: C7 28 32 35 32 29 C7 28 32 29 00 74 18 22 02 A1 |.(252).(2).t."..|
00001060: 23 31 2C 42 24 3A 8B 42 24 B2 22 22 A7 42 24 B2 |#1,B$:.B$."".B$.|
00001070: C7 28 30 29 00 A7 18 23 02 99 22 1D 1D 1D 1D 1D |.(0)...#..".....|
00001080: 1D 1D 1D 1D 1D 1D 1D 22 3B C6 28 41 24 29 AA 32 |.......";.(A$).2|
00001090: 35 36 AC C6 28 42 24 29 3B 22 20 C2 CC CF C3 CB |56..(B$);" .....|
000010A0: D3 20 C6 D2 C5 C5 22 00 AE 18 24 02 A0 31 00 F3 |. ...."...$..1..|
000010B0: 18 25 02 99 22 12 13 11 11 11 11 11 11 11 11 11 |.%.."...........|
000010C0: 11 11 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D |................|
000010D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D C8 C9 D4 20 C1 20 |............. . |
000010E0: CB C5 D9 92 22 3A 92 31 39 37 2C 31 39 31 3A 89 |....":.197,191:.|
000010F0: 34 35 34 00 06 19 26 02 8F 20 53 4F 52 54 20 52 |454...&.. SORT R|
00001100: 4F 55 54 49 4E 45 00 2D 19 27 02 99 22 13 11 11 |OUTINE.-.'.."...|
00001110: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D D3 CF D2 |................|
00001120: D4 C9 CE C7 20 D2 C5 C3 CF D2 C4 D3 22 00 3F 19 |.... .......".?.|
00001130: 28 02 81 49 B2 31 A4 4E 3A 81 4A B2 31 A4 4E 00 |(..I.1.N:.J.1.N.|
00001140: 57 19 29 02 8B 46 54 24 28 49 29 B3 46 54 24 28 |W.)..FT$(I).FT$(|
00001150: 4A 29 A7 8D 35 35 36 00 61 19 2A 02 82 4A 3A 82 |J)..556.a.*..J:.|
00001160: 49 00 6C 19 2B 02 8D 34 38 30 3A 8E 00 7B 19 2C |I.l.+..480:..{.,|
00001170: 02 48 46 24 B2 46 54 24 28 49 29 00 8D 19 2D 02 |.HF$.FT$(I)...-.|
00001180: 46 54 24 28 49 29 B2 46 54 24 28 4A 29 00 9C 19 |FT$(I).FT$(J)...|
00001190: 2E 02 46 54 24 28 4A 29 B2 48 46 24 00 D2 19 2F |..FT$(J).HF$.../|
000011A0: 02 99 22 13 11 11 11 11 11 11 1D 1D 1D 1F 22 3B |.."...........";|
000011B0: 49 3B 22 9F 20 4F 46 20 1F 22 3B 4E 3B 22 9F 20 |I;". OF .";N;". |
000011C0: D2 C5 C3 CF D2 C4 D3 20 D3 CF D2 D4 C5 C4 1F 22 |....... ......."|
000011D0: 3A 8E 00 FB 19 30 02 81 45 B2 30 A4 36 3A 99 4E |:....0..E.0.6:.N|
000011E0: 42 24 28 45 29 A3 34 29 46 54 24 28 45 29 A3 32 |B$(E).4)FT$(E).2|
000011F0: 32 29 3B 50 53 24 28 45 29 3A 82 00 04 1A 31 02 |2);PS$(E):....1.|
00001200: 8D 34 38 30 00 31 1A 32 02 99 22 11 1D 1D 53 3A |.480.1.2.."...S:|
00001210: 46 49 4C 45 4E 41 4D 45 A4 A4 A4 A4 A4 A4 A4 A4 |FILENAME........|
00001220: A4 54 4F 20 53 43 52 41 54 43 48 20 46 49 4C 45 |.TO SCRATCH FILE|
00001230: 22 00 5D 1A 33 02 99 22 11 1D 1D 52 3A 4E 45 57 |".].3.."...R:NEW|
00001240: 4E 41 4D 45 3D 4F 4C 44 4E 41 4D 45 A4 A4 54 4F |NAME=OLDNAME..TO|
00001250: 20 52 45 4E 41 4D 45 20 46 49 4C 45 22 00 89 1A | RENAME FILE"...|
00001260: 34 02 99 22 11 1D 1D 4E 3A 44 49 53 4B 4E 41 4D |4.."...N:DISKNAM|
00001270: 45 2C 49 44 A4 A4 A4 A4 A4 A4 54 4F 20 46 4F 52 |E,ID......TO FOR|
00001280: 4D 41 54 20 44 49 53 4B 22 00 9F 1A 35 02 99 22 |MAT DISK"...5.."|
00001290: 11 11 1D 1D 12 48 49 54 20 41 20 4B 45 59 22 00 |.....HIT A KEY".|
000012A0: B4 1A 36 02 A1 59 43 24 3A 8B 59 43 24 B2 22 22 |..6..YC$:.YC$.""|
000012B0: A7 35 36 36 00 D7 1A 39 02 8D 34 38 30 3A 99 22 |.566...9..480:."|
000012C0: 11 11 1D 1D 45 4E 54 45 52 20 43 4F 4D 4D 41 4E |....ENTER COMMAN|
000012D0: 44 20 4C 49 4E 45 22 00 F4 1A 3A 02 9F 32 2C 38 |D LINE"...:..2,8|
000012E0: 2C 31 35 3A 43 4D 24 B2 22 22 3A 99 22 11 11 1D |,15:CM$."":."...|
000012F0: 1D 3E 22 3B 00 09 1B 3B 02 A1 43 42 24 3A 8B 43 |.>";...;..CB$:.C|
00001300: 42 24 B2 22 22 A7 35 37 31 00 22 1B 3C 02 99 43 |B$."".571.".<..C|
00001310: 42 24 3B 3A 8B 43 42 24 B2 C7 28 31 33 29 A7 35 |B$;:.CB$..(13).5|
00001320: 37 35 00 35 1B 3D 02 8B 43 42 24 B2 C7 28 32 30 |75.5.=..CB$..(20|
00001330: 29 A7 35 37 31 00 4A 1B 3E 02 43 43 24 B2 43 43 |).571.J.>.CC$.CC|
00001340: 24 AA 43 42 24 3A 89 35 37 31 00 55 1B 3F 02 98 |$.CB$:.571.U.?..|
00001350: 32 2C 43 43 24 00 61 1B 40 02 A0 32 3A 89 34 35 |2,CC$.a.@..2:.45|
00001360: 34 00 00 00 |4... |
..F....FT$(144),FF$(144),NB$(144),PS$(14
4):X.0:.53280,5:.53281,1:."..".Y....".":
.427:.454.....I.0.X:FT$(I)."":NB$(I).""
:.I:X.0......480:.427:.1,8,0,"$0".....N$
.G(0)......#1,A$,A$.G....B(214).23..480.
U....#1,A$,A$......A$."".418......#1,A$,
B$.#...NB$(X).D(F(A$.N$).256.F(B$.N$)):.
NB$(X);".";......#1,A$.F....A$.""..:X.X.
1:.406.Z....A$.G(34).. 426.C....A$;.....
. MM.1.A$..G(34).FT$(X).FT$(X).A$... ..M
M.0.F(A$).64.F(A$).86.PS$(X).PS$(X).A$..
....411.F... 1.O....433......FF$(1)."".4
54.#....DD.11.."...............ANOTHER D
ISK Y/N":.:.15,8,15,"I": 15.8....AN$:.AN
$."".422.I....AN$."Y".400.X....AN$."N"..
.A....422.O...MM.1.MM:....... READ ERROR
CHANNEL......15,8,15,"I0"......15,EN,EM
$,TR,SE......EN..0..".......";EN;EM$;TR;
SE:."....HIT A KEY.":.197,191..... 15...
.........454......FT$(1).""..480.B....FT
$(1)."".."...PLEASE LOAD DIRECTORY BEFOR
E USING":."...THIS OPTION"......FT$(1)."
".."....HIT A KEY":.197,191:.454.....N.X
.2:.480:.550:SS.1......SF.1.N.T...."..."
;FT$(SF);.25)".Y/N";......SF$:.SF$."".44
0. ....SF$."Y"..".....YES.":FF$(SS).FT$(
SF):SS.SS.1:.444.:....SF$."N"..".....NO
".N....B(214).23..480.F....SF:.FF$(1)..
"".446.O....453......15,8,15:.480:SP$."
"......T.1.SS.L...."....
.....SCRATCHING ";FF$(T).SP$...A..15,"S0
:".FF$(T). .B..FF$(T.1).""..15,EN,EM$,TR
,SE:."...........";T.1;EM$;TR;SE.I.C..".
..........SCRATCHED ";FF$(T).SP$.^.D..T
: 15:.427:.453.M.E.DD.11:.420.V.F..480..
.G.."...
";...H..".. ...................
..................... "...I.."... ...
... ".
T.J.."... ........1....READ............
..DIRECTORY. ... "...K.."... ........
...... ... ".H.L.
."... ........2......SCRATCH.........FI
LES . ... "...M.."... ............
....... ... ".<.N.."..
. ........3........CHANGE........NAME/I
D. ... ".S.O.."... ................
.... ... "...P.."... .
.......4..........VALIDATE....DISK.
... "...Q.."... ....................
.... ... ".$.R.."... .....
...5..........CLEAR.......DISK. ..
. ".[.S.."... .....................
... "...T.."... ........6
........PRINT.........BLOCKS FREE.... "
.O.U.."... ...................
... "...V.."... ........7....
..DISK............COMMAND . ... ".C.W
.."... ................
... "...X.."... ........8....END.
..............PROGRAM. ... "...Y..".
.. .............
... "...Z.."... .....................
................... "."...."...
.".C....
198,0:.198,1:.V$:.V$."".476.^....F(V$).5
6.F(V$).49.476.L....V$."8"........E(V$).
402,434,481,527,531,542,561.I...."... FI
LE ARRANGER...LAMSOFT...LELYSTAD.1984.":
.......480:.".....N.AME OR .I.D"......C$
:.C$."".482......C$."I".508......C$.."N"
.482.Q...."......DISK NAME . :";:. *** R
EAD DISK NAME ***.]....1,8,15.L....2,8,2
,"#"......1,"U1 2 0 18 0"......1,"B-P 2
144". ....I.1.16......#2,A$:.A$.G(160).4
93.E....A$;:..O... 2: 1...... **** CHANG
E NAME ****......1,8,15......2,8,2,"#"..
....1,"U1 2 0 18 0"......1,"B-P 2 144".Z
...."................NEW DISK NAME.. ";
A$.|.... C(A$).16 .A$.A$.G(160):.500....
..2,A$;......1,"U2 2 0 18 0"..... 2.....
.1,"I0": 1.M...."......CHANGE ID Y/N"...
...C$:.C$."".506......C$.."Y".454......"
......ID. :";:. **** READ ID ****.%....1
,8,15.4....2,8,2,"#".I....1,"U1 2 0 18 0
".\....1,"B-P 2 162".G....I.1.5......#2,
A$:.A$.G(160).516......A$;:...... 2: 1..
....1,8,15......2,8,2,"#".F....1,"U1 2 0
18 0".Y....1,"B-P 2 162"......"........
................NEW ID.. :";A$:.C(A$).5.
521......2,A$;.3....1,"U2 2 0 18 0".:...
2.I....1,"I0": 1.R....454.I.... *** VAL
IDATE ***......"........................
..............VALIDATING"......15,8,15,"
V0:": 15.F....427:.454......480:."......
..ALL DATA.. WILL BE CLEARED FROM DISK".
....."........IN .3. SECONDS".;...."....
......CONTINUE Y/N".P....CO$:.CO$."".534
.A....CO$."N".454.S....CO$.."Y".534.....
."............NEW DISK NAME";NN$......1,
8,15,"N0:".NN$: 1:.454.Y..S....#1,B$:.B$
."".B$.G(0)......F(A$).256.F(B$)"BLOCKS
FREE"..... 1:.454......1,8,15,"I0".)....
1,"M-R"G(250)G(2).C. ..#1,A$:.A$."".A$.G
(0).Z.!..1,"M-R"G(252)G(2).T."..#1,B$:.B
$."".B$.G(0)...#.."............";F(A$).2
56.F(B$);" BLOCKS FREE"...$. 1...%.."...
..................................HIT A
KEY.":.197,191:.454...&.. SORT ROUTINE.-
.'.."................SORTING RECORDS".?.
(..I.1.N:.J.1.N.W.)..FT$(I).FT$(J)..556.
A.*..J:.I.L.+..480:..{.,.HF$.FT$(I)...-.
FT$(I).FT$(J).....FT$(J).HF$.R./..".....
......";I;". OF .";N;". RECORDS SORTED."
:....0..E.0.6:.NB$(E).4)FT$(E).22);PS$(E
):....1..480.1.2.."...S:FILENAME........
.TO SCRATCH FILE".].3.."...R:NEWNAME=OLD
NAME..TO RENAME FILE"...4.."...N:DISKNAM
E,ID......TO FORMAT DISK"...5..".....HIT
A KEY"...6..YC$:.YC$."".566.W.9..480:."
....ENTER COMMAND LINE"...:..2,8,15:CM$.
"":."....>";...;..CB$:.CB$."".571.".<..C
B$;:.CB$.G(13).575.5.=..CB$.G(20).571.J.
>.CC$.CC$.CB$:.571.U.?..2,CC$.A.@. 2:.45
4...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL