> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 64 00 99 C7 28 31 34 37 29 3A 97 35 |..&.d...(147):.5|
00000010: 33 32 38 30 2C 38 3A 97 35 33 32 38 31 2C 30 3A |3280,8:.53281,0:|
00000020: 97 36 34 36 2C 31 00 49 08 6E 00 99 A3 31 33 29 |.646,1.I.n...13)|
00000030: 22 91 12 20 53 4F 52 54 20 44 49 52 45 43 54 4F |".. SORT DIRECTO|
00000040: 52 59 20 92 22 3A 99 3A 99 00 7E 08 73 00 99 A3 |RY .":.:..~.s...|
00000050: 33 29 22 12 20 52 45 4D 4F 56 45 20 44 4F 53 20 |3)". REMOVE DOS |
00000060: 56 41 44 45 52 20 49 46 20 57 4F 52 4B 49 4E 47 |VADER IF WORKING|
00000070: 20 57 49 54 48 20 38 20 92 22 3A 99 3A 99 00 A1 | WITH 8 .":.:...|
00000080: 08 78 00 99 A3 31 32 29 22 49 4E 50 55 54 20 27 |.x...12)"INPUT '|
00000090: 39 39 27 20 54 4F 20 41 42 4F 52 54 22 3A 99 3A |99' TO ABORT":.:|
000000A0: 99 00 D3 08 82 00 99 22 11 11 22 3B 3A 99 A3 31 |......."..";:..1|
000000B0: 30 29 22 57 4F 52 4B 49 4E 47 20 57 49 54 48 20 |0)"WORKING WITH |
000000C0: 44 45 56 49 43 45 20 20 20 38 9D 9D 9D 22 3B 3A |DEVICE 8...";:|
000000D0: 85 44 56 00 E3 08 8C 00 8B 44 56 B2 39 39 A7 89 |.DV......DV.99..|
000000E0: 34 33 30 00 14 09 91 00 99 3A 99 3A 99 A3 35 29 |430......:.:..5)|
000000F0: 22 12 20 49 4E 53 45 52 54 20 53 4F 55 52 43 45 |". INSERT SOURCE|
00000100: 20 44 49 53 4B 2D 48 49 54 20 53 50 41 43 45 20 | DISK-HIT SPACE |
00000110: 92 22 3A 99 00 27 09 92 00 A1 41 24 3A 8B 41 24 |.":..'....A$:.A$|
00000120: B2 22 22 A7 31 34 36 00 3A 09 93 00 8B 41 24 B2 |."".146.:....A$.|
00000130: C7 28 33 32 29 A7 89 31 35 30 00 43 09 94 00 89 |.(32)..150.C....|
00000140: 31 34 36 00 51 09 96 00 8D 34 38 30 3A 89 32 39 |146.Q....480:.29|
00000150: 30 00 7A 09 A0 00 99 22 11 53 4F 52 54 49 4E 47 |0.z....".SORTING|
00000160: 22 3A 53 4B B2 4B 31 3A 4C 25 28 4B 31 29 B2 4B |":SK.K1:L%(K1).K|
00000170: 31 3A 52 25 28 31 29 B2 4E 46 00 9A 09 AA 00 4C |1:R%(1).NF.....L|
00000180: 31 B2 4C 25 28 53 4B 29 3A 52 31 B2 52 25 28 53 |1.L%(SK):R1.R%(S|
00000190: 4B 29 3A 53 4B B2 53 4B AB 31 00 C0 09 B4 00 4C |K):SK.SK.1.....L|
000001A0: 32 B2 4C 31 3A 52 32 B2 52 31 3A 4B 45 24 B2 4E |2.L1:R2.R1:KE$.N|
000001B0: 53 24 28 B5 28 28 4C 31 AA 52 31 29 AD 32 29 29 |S$(.((L1.R1).2))|
000001C0: 00 EC 09 BE 00 4B 45 24 B2 CA 28 4B 45 24 2C 33 |.....KE$..(KE$,3|
000001D0: 31 29 AA CA 28 4B 45 24 2C 34 2C 4D 25 28 B5 28 |1)..(KE$,4,M%(.(|
000001E0: 28 4C 31 AA 52 31 29 AD 32 29 29 29 00 25 0A C8 |(L1.R1).2))).%..|
000001F0: 00 8B CA 28 4E 53 24 28 4C 32 29 2C 33 31 29 AA |...(NS$(L2),31).|
00000200: CA 28 4E 53 24 28 4C 32 29 2C 34 2C 4D 25 28 4C |.(NS$(L2),4,M%(L|
00000210: 32 29 29 B3 4B 45 24 A7 4C 32 B2 4C 32 AA 4B 31 |2)).KE$.L2.L2.K1|
00000220: 3A 89 32 30 30 00 5E 0A D2 00 8B 4B 45 24 B3 CA |:.200.^....KE$..|
00000230: 28 4E 53 24 28 52 32 29 2C 33 31 29 AA CA 28 4E |(NS$(R2),31)..(N|
00000240: 53 24 28 52 32 29 2C 34 2C 4D 25 28 52 32 29 29 |S$(R2),4,M%(R2))|
00000250: A7 52 32 B2 52 32 AB 4B 31 3A 89 32 31 30 00 6D |.R2.R2.K1:.210.m|
00000260: 0A DC 00 8B 4C 32 B1 52 32 A7 32 35 30 00 A3 0A |....L2.R2.250...|
00000270: E6 00 4E 24 B2 4E 53 24 28 52 32 29 3A 48 B2 4D |..N$.NS$(R2):H.M|
00000280: 25 28 52 32 29 3A 4E 53 24 28 52 32 29 B2 4E 53 |%(R2):NS$(R2).NS|
00000290: 24 28 4C 32 29 3A 4D 25 28 52 32 29 B2 4D 25 28 |$(L2):M%(R2).M%(|
000002A0: 4C 32 29 00 D0 0A F0 00 4E 53 24 28 4C 32 29 B2 |L2).....NS$(L2).|
000002B0: 4E 24 3A 4D 25 28 4C 32 29 B2 48 3A 4C 32 B2 4C |N$:M%(L2).H:L2.L|
000002C0: 32 AA 31 3A 52 32 B2 52 32 AB 31 3A 89 32 30 30 |2.1:R2.R2.1:.200|
000002D0: 00 F7 0A FA 00 8B 4C 32 B3 52 31 A7 53 4B B2 53 |......L2.R1.SK.S|
000002E0: 4B AA 31 3A 4C 25 28 53 4B 29 B2 4C 32 3A 52 25 |K.1:L%(SK).L2:R%|
000002F0: 28 53 4B 29 B2 52 31 00 0C 0B 04 01 52 31 B2 52 |(SK).R1.....R1.R|
00000300: 32 3A 8B 4C 31 B3 52 31 A7 31 38 30 00 18 0B 0E |2:.L1.R1.180....|
00000310: 01 8B 53 4B A7 31 37 30 00 1E 0B 18 01 8E 00 2C |..SK.170.......,|
00000320: 0B 22 01 4E 46 B2 30 3A 8D 34 34 30 00 63 0B 2C |.".NF.0:.440.c.,|
00000330: 01 8D 34 36 30 3A 81 50 50 B2 31 A4 38 3A 52 24 |..460:.PP.1.8:R$|
00000340: B2 22 22 3A 46 4C B2 30 3A 4D 25 28 4E 46 AA 31 |."":FL.0:M%(NF.1|
00000350: 29 B2 31 36 3A 81 58 B2 31 A4 33 30 3A A1 23 35 |).16:.X.1.30:.#5|
00000360: 2C 49 24 00 89 0B 36 01 8B 49 24 B2 C7 28 31 36 |,I$...6..I$..(16|
00000370: 30 29 AF 46 4C B2 30 A7 4D 25 28 4E 46 AA 31 29 |0).FL.0.M%(NF.1)|
00000380: B2 58 AB 34 3A 46 4C B2 31 00 B2 0B 40 01 52 24 |.X.4:FL.1...@.R$|
00000390: B2 52 24 AA C8 28 49 24 AA 43 30 24 2C 31 29 3A |.R$..(I$.C0$,1):|
000003A0: 82 3A 8B 50 50 B3 B1 38 A7 A1 23 35 2C 49 24 2C |.:.PP..8..#5,I$,|
000003B0: 49 24 00 DC 0B 4A 01 58 24 B2 43 30 24 3A 8B CA |I$...J.X$.C0$:..|
000003C0: 28 52 24 2C 31 2C 31 29 B2 43 30 24 A7 58 24 B2 |(R$,1,1).C0$.X$.|
000003D0: C7 28 32 35 35 29 3A 99 44 44 24 3B 00 13 0C 54 |.(255):.DD$;...T|
000003E0: 01 4E 46 B2 4E 46 AA 31 3A 4E 53 24 28 4E 46 29 |.NF.NF.1:NS$(NF)|
000003F0: B2 52 24 AA 58 24 3A 99 CA 28 52 24 2C 34 2C 31 |.R$.X$:..(R$,4,1|
00000400: 36 29 3A 82 50 50 3A 8B 59 53 B3 B1 32 35 35 A7 |6):.PP:.YS..255.|
00000410: 33 30 30 00 1F 0C 5E 01 A0 35 3A 8D 31 36 30 00 |300...^..5:.160.|
00000420: 48 0C 68 01 99 22 11 48 49 54 20 12 20 53 50 41 |H.h..".HIT . SPA|
00000430: 43 45 20 92 54 4F 20 52 45 57 52 49 54 45 20 44 |CE .TO REWRITE D|
00000440: 49 52 45 43 54 4F 52 59 00 5D 0C 72 01 A1 41 24 |IRECTORY.].r..A$|
00000450: 3A 8B 41 24 B3 B1 22 20 22 A7 33 37 30 00 6B 0C |:.A$.." ".370.k.|
00000460: 7C 01 8D 34 34 30 3A 4E 4E B2 30 00 84 0C 86 01 ||..440:NN.0.....|
00000470: 8D 34 36 30 3A 81 50 50 B2 31 A4 38 3A 4E 4E B2 |.460:.PP.1.8:NN.|
00000480: 4E 4E AA 31 00 B8 0C 90 01 98 35 2C CA 28 4E 53 |NN.1......5,.(NS|
00000490: 24 28 4E 4E 29 2C 31 2C 33 30 29 3B 3A 8B CA 28 |$(NN),1,30);:..(|
000004A0: 4E 53 24 28 4E 4E 29 2C 33 31 29 B2 C7 28 32 35 |NS$(NN),31)..(25|
000004B0: 35 29 A7 99 44 44 24 3B 00 E0 0C 9A 01 99 CA 28 |5)..DD$;.......(|
000004C0: 4E 53 24 28 4E 4E 29 2C 34 2C 31 36 29 3A 8B 50 |NS$(NN),4,16):.P|
000004D0: 50 B3 B1 38 A7 98 35 2C 43 30 24 3B 43 30 24 3B |P..8..5,C0$;C0$;|
000004E0: 00 08 0D A4 01 82 50 50 3A 98 31 35 2C 22 55 32 |......PP:.15,"U2|
000004F0: 22 3B 35 3B 30 3B 4C 54 3B 4C 53 3A 8B 59 53 B3 |";5;0;LT;LS:.YS.|
00000500: B1 32 35 35 A7 33 39 30 00 2A 0D AE 01 A0 35 3A |.255.390.*....5:|
00000510: 99 3A 99 A3 31 30 29 22 12 20 41 4C 4C 20 44 4F |.:..10)". ALL DO|
00000520: 4E 45 20 92 22 3A 89 35 30 30 00 5A 0D B8 01 9F |NE .":.500.Z....|
00000530: 35 2C 44 56 2C 35 2C 22 23 22 3A 59 54 B2 31 38 |5,DV,5,"#":YT.18|
00000540: 3A 59 53 B2 30 3A 8D 34 36 30 3A 98 31 35 2C 22 |:YS.0:.460:.15,"|
00000550: 42 2D 50 22 3B 35 3B 31 34 33 00 81 0D C2 01 99 |B-P";5;143......|
00000560: 52 4E 24 3B 3A 81 58 B2 31 A4 32 34 3A A1 23 35 |RN$;:.X.1.24:.#5|
00000570: 2C 49 24 3A 99 49 24 3B 3A 82 3A 99 52 46 24 3A |,I$:.I$;:.:.RF$:|
00000580: 8E 00 BB 0D CC 01 98 31 35 2C 22 55 31 22 3B 35 |.......15,"U1";5|
00000590: 3B 30 3B 59 54 3B 59 53 3A 4C 54 B2 59 54 3A 4C |;0;YT;YS:LT.YT:L|
000005A0: 53 B2 59 53 3A A1 23 35 2C 54 24 2C 53 24 3A 59 |S.YS:.#5,T$,S$:Y|
000005B0: 54 B2 C6 28 54 24 AA 43 30 24 29 00 CE 0D D6 01 |T..(T$.C0$).....|
000005C0: 59 53 B2 C6 28 53 24 AA 43 30 24 29 3A 8E 00 13 |YS..(S$.C0$):...|
000005D0: 0E E0 01 58 B2 31 35 30 3A 86 4C 25 28 58 29 2C |...X.150:.L%(X),|
000005E0: 4D 25 28 58 29 2C 52 25 28 58 29 2C 4E 53 24 28 |M%(X),R%(X),NS$(|
000005F0: 58 29 3A 4B 31 B2 31 3A 9F 31 35 2C 44 56 2C 31 |X):K1.1:.15,DV,1|
00000600: 35 2C 22 49 22 3A 43 30 24 B2 C7 28 30 29 3A 4E |5,"I":C0$..(0):N|
00000610: 46 B2 30 00 4E 0E EA 01 44 44 24 B2 22 3E 3E 3E |F.0.N...DD$.">>>|
00000620: 3E 3E 3E 3E 3E 3E 3E 3E 3E 3E 3E 12 20 44 45 4C |>>>>>>>>>>>. DEL|
00000630: 45 54 45 44 20 92 22 3A 52 4E 24 B2 C7 28 31 38 |ETED .":RN$..(18|
00000640: 29 3A 52 46 24 B2 C7 28 31 34 36 29 3A 8E 00 7E |):RF$..(146):..~|
00000650: 0E F4 01 99 3A 99 A3 33 29 22 12 20 42 45 20 53 |....:..3)". BE S|
00000660: 55 52 45 20 54 4F 20 49 4E 53 45 52 54 20 44 4F |URE TO INSERT DO|
00000670: 53 20 56 41 44 45 52 20 92 22 3A 99 3A 99 00 A4 |S VADER .":.:...|
00000680: 0E F5 01 99 3A 99 22 48 49 54 20 41 4E 59 20 4B |....:."HIT ANY K|
00000690: 45 59 20 54 4F 20 52 45 54 55 52 4E 20 54 4F 20 |EY TO RETURN TO |
000006A0: 4D 45 4E 55 00 BA 0E F6 01 92 31 39 37 2C 36 34 |MENU......197,64|
000006B0: 2C 36 34 3A 97 31 39 38 2C 30 00 C5 0E F7 01 97 |,64:.198,0......|
000006C0: 36 34 36 2C 30 00 DF 0E F9 01 99 C7 28 31 34 37 |646,0.......(147|
000006D0: 29 3A 99 22 4C 4F 41 44 49 4E 47 11 11 11 22 00 |):."LOADING...".|
000006E0: 06 0F FE 01 99 22 4C 4F 41 44 22 C7 28 33 34 29 |....."LOAD".(34)|
000006F0: 22 4D 45 4E 55 20 32 20 2B 22 C7 28 33 34 29 22 |"MENU 2 +".(34)"|
00000700: 2C 38 91 91 91 22 00 3B 0F 08 02 97 36 33 31 2C |,8...".;....631,|
00000710: 31 33 3A 97 36 33 32 2C 38 32 3A 97 36 33 33 2C |13:.632,82:.633,|
00000720: 38 35 3A 97 36 33 34 2C 37 38 3A 97 36 33 35 2C |85:.634,78:.635,|
00000730: 31 33 3A 97 31 39 38 2C 35 3A 80 00 00 00 |13:.198,5:.... |
..&.D..G(147):.53280,8:.53281,0:.646,1.I
.N...13)".. SORT DIRECTORY .":.:..~.S...
3)". REMOVE DOS VADER IF WORKING WITH 8
.":.:....X...12)"INPUT '99' TO ABORT":.:
..S...."..";:..10)"WORKING WITH DEVICE
8...";:.DV......DV.99..430......:.:..5)
". INSERT SOURCE DISK-HIT SPACE .":..'..
..A$:.A$."".146.:....A$.G(32)..150.C....
146.Q....480:.290.Z. ..".SORTING":SK.K1:
L%(K1).K1:R%(1).NF.....L1.L%(SK):R1.R%(S
K):SK.SK.1.....L2.L1:R2.R1:KE$.NS$(.((L1
.R1).2)).....KE$.J(KE$,31).J(KE$,4,M%(.(
(L1.R1).2))).%.H..J(NS$(L2),31).J(NS$(L2
),4,M%(L2)).KE$.L2.L2.K1:.200.^.R..KE$.J
(NS$(R2),31).J(NS$(R2),4,M%(R2)).R2.R2.K
1:.210.M....L2.R2.250.....N$.NS$(R2):H.M
%(R2):NS$(R2).NS$(L2):M%(R2).M%(L2).P...
NS$(L2).N$:M%(L2).H:L2.L2.1:R2.R2.1:.200
......L2.R1.SK.SK.1:L%(SK).L2:R%(SK).R1.
....R1.R2:.L1.R1.180......SK.170.......,
.".NF.0:.440.C.,..460:.PP.1.8:R$."":FL.0
:M%(NF.1).16:.X.1.30:.#5,I$...6..I$.G(16
0).FL.0.M%(NF.1).X.4:FL.1...@.R$.R$.H(I$
.C0$,1):.:.PP..8..#5,I$,I$...J.X$.C0$:.J
(R$,1,1).C0$.X$.G(255):.DD$;...T.NF.NF.1
:NS$(NF).R$.X$:.J(R$,4,16):.PP:.YS..255.
300...^. 5:.160.H.H..".HIT . SPACE .TO R
EWRITE DIRECTORY.].R..A$:.A$.." ".370.K.
|..440:NN.0......460:.PP.1.8:NN.NN.1....
..5,J(NS$(NN),1,30);:.J(NS$(NN),31).G(25
5)..DD$;......J(NS$(NN),4,16):.PP..8..5,
C0$;C0$;......PP:.15,"U2";5;0;LT;LS:.YS.
.255.390.*... 5:.:..10)". ALL DONE .":.5
00.Z....5,DV,5,"#":YT.18:YS.0:.460:.15,"
B-P";5;143...B..RN$;:.X.1.24:.#5,I$:.I$;
:.:.RF$:....L..15,"U1";5;0;YT;YS:LT.YT:L
S.YS:.#5,T$,S$:YT.F(T$.C0$).N.V.YS.F(S$.
C0$):......X.150:.L%(X),M%(X),R%(X),NS$(
X):K1.1:.15,DV,15,"I":C0$.G(0):NF.0.N...
DD$.">>>>>>>>>>>>>>. DELETED .":RN$.G(18
):RF$.G(146):..~....:..3)". BE SURE TO I
NSERT DOS VADER .":.:.......:."HIT ANY K
EY TO RETURN TO MENU......197,64,64:.198
,0.E....646,0......G(147):."LOADING...".
....."LOAD"G(34)"MENU 2 +"G(34)",8...".;
....631,13:.632,82:.633,85:.634,78:.635,
13:.198,5:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL