> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 0A 00 8F 20 2A 2A 20 50 52 45 50 41 |..'.... ** PREPA|
00000010: 52 45 44 20 42 59 20 44 41 56 49 44 20 42 52 41 |RED BY DAVID BRA|
00000020: 44 4C 45 59 20 2A 2A 00 30 08 5A 00 99 22 93 22 |DLEY **.0.Z.."."|
00000030: 00 4D 08 64 00 97 35 33 32 38 30 2C 30 3A 97 35 |.M.d..53280,0:.5|
00000040: 33 32 38 31 2C 30 3A 99 22 05 0E 22 3B 00 6E 08 |3281,0:."..";.n.|
00000050: 6E 00 87 4E 4D 3A 86 54 54 24 28 4E 4D 29 2C 54 |n..NM:.TT$(NM),T|
00000060: 4C 24 28 4E 4D 29 2C 52 4E 24 28 4E 4D 29 00 93 |L$(NM),RN$(NM)..|
00000070: 08 78 00 81 49 B2 31 A4 4E 4D 3A 87 54 54 24 28 |.x..I.1.NM:.TT$(|
00000080: 49 29 2C 54 4C 24 28 49 29 2C 52 4E 24 28 49 29 |I),TL$(I),RN$(I)|
00000090: 3A 82 49 00 C9 08 7D 00 99 22 93 22 3A 99 A3 31 |:.I...}..".":..1|
000000A0: 30 29 3A 99 22 81 2A 1E 2A 1C 2A 1F 2A 9E 1D 12 |0):.".*.*.*.*...|
000000B0: CD C5 CE D5 2F CC CF C1 C4 C5 D2 92 1D 1F 2A 1C |..../.........*.|
000000C0: 2A 1E 2A 81 2A 9E 22 3A 99 00 F8 08 87 00 99 22 |*.*.*.":......."|
000000D0: 1D 1D 1D C5 CE D4 C5 D2 A0 D9 CF D5 D2 A0 C3 C8 |................|
000000E0: CF C9 C3 C5 A0 C1 CE C4 A0 D0 D2 C5 D3 D3 A0 12 |................|
000000F0: D2 C5 D4 D5 D2 CE 92 22 00 00 09 89 00 99 3A 99 |......."......:.|
00000100: 00 0C 09 8C 00 81 49 B2 31 A4 4E 4D 00 32 09 96 |......I.1.NM.2..|
00000110: 00 99 A3 31 32 29 C9 28 22 30 22 AA CA 28 C4 28 |...12).("0"..(.(|
00000120: 49 29 2C 32 29 2C 32 29 22 29 20 22 54 54 24 28 |I),2),2)") "TT$(|
00000130: 49 29 00 39 09 9B 00 82 49 00 87 09 A2 00 8F 20 |I).9....I...... |
00000140: 2A 52 49 41 54 45 20 4C 49 4E 45 20 31 36 33 20 |*RIATE LINE 163 |
00000150: 54 48 52 4F 55 47 48 20 31 36 39 2E 20 20 2A 20 |THROUGH 169. * |
00000160: 20 20 20 20 20 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A | ********|
00000170: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000180: 2A 2A 2A 2A 2A 2A 2A 00 BA 09 A4 00 99 22 13 11 |*******......"..|
00000190: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000001A0: 11 11 11 11 11 11 12 9C 1D 1D 1D 1D 1D 1D 28 CD |..............(.|
000001B0: C5 CE D5 20 23 31 29 92 9E 22 00 E9 09 AA 00 85 |... #1).."......|
000001C0: 22 13 1D 1D 1D 11 11 11 11 11 11 11 11 11 11 11 |"...............|
000001D0: 11 11 11 11 11 11 11 11 11 11 D9 CF D5 D2 A0 C3 |................|
000001E0: C8 CF C9 C3 C5 22 3B 41 24 00 FC 09 AB 00 8B 41 |.....";A$......A|
000001F0: 24 B2 22 51 22 A7 99 22 93 22 3A 80 00 0F 0A AC |$."Q"..".":.....|
00000200: 00 8B 41 24 B2 22 4C 22 A7 99 22 93 22 3A 9B 00 |..A$."L"..".":..|
00000210: 3C 0A B4 00 41 B2 C5 28 41 24 29 3A 8B 28 41 B3 |<...A..(A$):.(A.|
00000220: 31 B0 41 B1 4E 4D 29 AF 41 24 B3 B1 C7 28 38 30 |1.A.NM).A$...(80|
00000230: 29 A7 99 22 91 22 3B 3A 89 31 37 30 00 5C 0A B9 |)..".";:.170.\..|
00000240: 00 8B 41 24 B2 C7 28 38 30 29 A7 8D 32 35 30 3A |..A$..(80)..250:|
00000250: 99 22 11 11 11 22 3B 3A 89 31 37 30 00 80 0A BE |."...";:.170....|
00000260: 00 99 22 93 8E 4C 4F 41 44 22 C7 28 33 34 29 54 |.."..LOAD".(34)T|
00000270: 4C 24 28 41 29 C7 28 33 34 29 22 2C 38 2C 31 22 |L$(A).(34)",8,1"|
00000280: 00 92 0A C8 00 99 22 11 11 11 11 22 52 4E 24 28 |......"...."RN$(|
00000290: 41 29 00 B5 0A D2 00 97 31 39 38 2C 33 3A 97 36 |A)......198,3:.6|
000002A0: 33 31 2C 31 39 3A 97 36 33 32 2C 31 33 3A 97 36 |31,19:.632,13:.6|
000002B0: 33 33 2C 31 33 00 BB 0A DC 00 80 00 C5 0A FA 00 |33,13...........|
000002C0: 8C 3A 87 4E 4D 00 EA 0A FC 00 81 49 B2 31 A4 4E |.:.NM......I.1.N|
000002D0: 4D 3A 87 54 54 24 28 49 29 2C 54 4C 24 28 49 29 |M:.TT$(I),TL$(I)|
000002E0: 2C 52 4E 24 28 49 29 3A 82 49 00 15 0B 0E 01 9F |,RN$(I):.I......|
000002F0: 34 2C 34 3A 98 34 2C C7 28 31 30 29 C7 28 31 30 |4,4:.4,.(10).(10|
00000300: 29 C7 28 31 30 29 3B 22 20 20 22 3A 43 44 24 B2 |).(10);" ":CD$.|
00000310: C7 28 31 37 29 00 3D 0B 10 01 81 49 B2 31 A4 4E |.(17).=....I.1.N|
00000320: 4D 3A 98 34 2C 43 44 24 3B C7 28 31 36 29 3B 22 |M:.4,CD$;.(16);"|
00000330: 31 35 22 3B 54 54 24 28 49 29 3A 82 49 00 59 0B |15";TT$(I):.I.Y.|
00000340: 12 01 98 34 2C 22 20 20 20 22 C7 28 31 30 29 C7 |...4," ".(10).|
00000350: 28 31 30 29 3A A0 34 3A 8E 00 5F 0B 84 03 8F 00 |(10):.4:.._.....|
00000360: 65 0B 8E 03 8F 00 6B 0B 98 03 8F 00 7E 0B DE 03 |e.....k.....~...|
00000370: 8F 20 50 52 4F 47 52 41 4D 20 44 41 54 41 00 87 |. PROGRAM DATA..|
00000380: 0B E8 03 83 20 31 35 00 AB 0B F2 03 83 22 D1 D5 |.... 15......"..|
00000390: C9 C3 CB A0 C6 CF D2 CD C1 D4 22 2C 51 55 49 43 |..........",QUIC|
000003A0: 4B 46 4F 52 4D 41 54 2C 52 55 4E 00 CE 0B FC 03 |KFORMAT,RUN.....|
000003B0: 83 22 C4 C9 D3 CB A0 CC C9 D3 D4 C5 D2 22 2C 44 |."...........",D|
000003C0: 49 53 4B 20 4C 49 53 54 45 52 2C 52 55 4E 00 F8 |ISK LISTER,RUN..|
000003D0: 0B 06 04 83 22 C4 C9 D2 C5 C3 D4 CF D2 D9 A0 D3 |...."...........|
000003E0: C8 D5 C6 C6 CC C5 22 2C 44 49 52 2E 20 53 48 55 |......",DIR. SHU|
000003F0: 46 46 4C 45 2C 52 55 4E 00 1D 0C 10 04 83 22 C4 |FFLE,RUN......".|
00000400: C9 D2 C5 C3 D4 CF D2 D9 A0 D3 CF D2 D4 22 2C 44 |.............",D|
00000410: 49 52 20 53 4F 52 54 2E 43 2C 52 55 4E 00 48 0C |IR SORT.C,RUN.H.|
00000420: 1A 04 83 22 D4 C9 CE D9 A0 C4 C9 D2 C5 C3 D4 CF |..."............|
00000430: D2 D9 22 2C 54 49 4E 59 20 44 49 52 45 43 54 4F |..",TINY DIRECTO|
00000440: 52 59 2E 43 2C 52 55 4E 00 7B 0C 24 04 83 22 C4 |RY.C,RUN.{.$..".|
00000450: C9 D2 C5 C3 D4 CF D2 D9 A0 CC C9 D3 D4 A0 C1 CE |................|
00000460: C4 A0 D3 CF D2 D4 22 2C 44 49 52 20 4C 49 53 54 |......",DIR LIST|
00000470: 20 53 4F 52 54 2E 43 2C 52 55 4E 00 A8 0C 2E 04 | SORT.C,RUN.....|
00000480: 83 22 CD C1 D3 D4 C5 D2 A0 C4 C9 D2 C5 C3 D4 CF |."..............|
00000490: D2 D9 22 2C 4D 41 53 54 45 52 20 44 49 52 45 43 |..",MASTER DIREC|
000004A0: 54 4F 52 59 2C 52 55 4E 00 CB 0C 38 04 83 22 CC |TORY,RUN...8..".|
000004B0: C1 C2 C5 CC A0 CD C1 CB C5 D2 22 2C 4C 41 42 45 |..........",LABE|
000004C0: 4C 20 4D 41 4B 45 52 2C 52 55 4E 00 F0 0C 42 04 |L MAKER,RUN...B.|
000004D0: 83 22 C4 C9 D2 C5 C3 D4 CF D2 D9 A0 D2 C5 C1 C4 |."..............|
000004E0: 22 2C 44 49 52 20 52 45 41 44 2E 43 2C 52 55 4E |",DIR READ.C,RUN|
000004F0: 00 19 0D 4C 04 83 22 C1 D5 D4 CF C2 CF CF D4 A0 |...L..".........|
00000500: CD C1 CB C5 D2 22 2C 41 55 54 4F 42 4F 4F 54 20 |.....",AUTOBOOT |
00000510: 4D 41 4B 45 52 2C 52 55 4E 00 3E 0D 56 04 83 22 |MAKER,RUN.>.V.."|
00000520: CC CF C3 CB A0 D5 CE CC CF C3 CB 22 2C 4C 4F 43 |...........",LOC|
00000530: 4B 20 55 4E 4C 4F 43 4B 2E 43 2C 52 55 4E 00 65 |K UNLOCK.C,RUN.e|
00000540: 0D 60 04 83 22 D2 C5 C3 CF D6 C5 D2 A0 31 35 34 |.`.."........154|
00000550: 31 22 2C 52 45 43 4F 56 45 52 20 31 35 34 31 2E |1",RECOVER 1541.|
00000560: 43 2C 52 55 4E 00 93 0D 6A 04 83 22 C4 C9 D3 CB |C,RUN...j.."....|
00000570: A0 C4 C9 D3 C1 D3 D3 C5 CD C2 CC C5 22 2C 20 44 |............", D|
00000580: 49 53 4B 20 44 49 53 41 53 53 45 4D 42 4C 45 2C |ISK DISASSEMBLE,|
00000590: 52 55 4E 00 B8 0D 74 04 83 22 C4 C9 D3 CB A0 C3 |RUN...t.."......|
000005A0: C8 C5 C3 CB C5 D2 22 2C 44 49 53 4B 20 43 48 45 |......",DISK CHE|
000005B0: 43 4B 45 52 2C 52 55 4E 00 D7 0D 7E 04 83 22 CD |CKER,RUN...~..".|
000005C0: CF D2 C5 20 CD C5 CE D5 22 2C 4D 4F 52 45 20 4D |... ....",MORE M|
000005D0: 45 4E 55 2C 52 55 4E 00 00 00 |ENU,RUN... |
..'.... ** PREPARED BY DAVID BRADLEY **.
0.Z..".".M.D..53280,0:.53281,0:."..";.N.
N..NM:.TT$(NM),TL$(NM),RN$(NM)...X..I.1.
NM:.TT$(I),TL$(I),RN$(I):.I.I.}..".":..1
0):.".*.*.*.*...MENU/LOADER...*.*.*.*.":
......."...ENTER YOUR CHOICE AND PRESS .
RETURN."......:.......I.1.NM.2.....12)I(
"0".J(D(I),2),2)") "TT$(I).9....I......
*RIATE LINE 163 THROUGH 169. *
*******************************......"..
..............................(MENU #1).
."......".........................YOUR C
HOICE";A$......A$."Q"..".":.......A$."L"
..".":..<...A.E(A$):.(A.1.A.NM).A$..G(80
)..".";:.170.\....A$.G(80)..250:."...";:
.170......"..LOAD"G(34)TL$(A)G(34)",8,1"
...H.."...."RN$(A)...R..198,3:.631,19:.6
32,13:.633,13.......E....:.NM......I.1.N
M:.TT$(I),TL$(I),RN$(I):.I......4,4:.4,G
(10)G(10)G(10);" ":CD$.G(17).=....I.1.N
M:.4,CD$;G(16);"15";TT$(I):.I.Y....4,"
"G(10)G(10): 4:.._.....E.....K.....~...
. PROGRAM DATA...... 15......"QUICK FORM
AT",QUICKFORMAT,RUN.N...."DISK LISTER",D
ISK LISTER,RUN......"DIRECTORY SHUFFLE",
DIR. SHUFFLE,RUN......"DIRECTORY SORT",D
IR SORT.C,RUN.H...."TINY DIRECTORY",TINY
DIRECTORY.C,RUN.{.$.."DIRECTORY LIST AN
D SORT",DIR LIST SORT.C,RUN......"MASTER
DIRECTORY",MASTER DIRECTORY,RUN.K.8.."L
ABEL MAKER",LABEL MAKER,RUN...B.."DIRECT
ORY READ",DIR READ.C,RUN...L.."AUTOBOOT
MAKER",AUTOBOOT MAKER,RUN.>.V.."LOCK UNL
OCK",LOCK UNLOCK.C,RUN.E.`.."RECOVER 154
1",RECOVER 1541.C,RUN...J.."DISK DISASSE
MBLE", DISK DISASSEMBLE,RUN...T.."DISK C
HECKER",DISK CHECKER,RUN.W.~.."MORE MENU
",MORE MENU,RUN...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL