> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 0A 00 99 22 93 99 22 3A 97 35 33 32 |......."..":.532|
00000010: 38 31 2C 30 3A 97 35 33 32 38 30 2C 30 3A 00 4B |81,0:.53280,0:.K|
00000020: 08 0F 00 99 22 1D 1D 1D 1D 1D 2A 2A 2A 2A 2A 2A |....".....******|
00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 78 08 14 00 |**********".x...|
00000050: 99 22 1D 1D 1D 1D 1D 2A 20 20 20 20 20 20 20 20 |.".....* |
00000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000070: 20 20 20 20 20 20 2A 22 00 A5 08 19 00 99 22 1D | *"......".|
00000080: 1D 1D 1D 1D 2A 20 20 20 20 41 44 44 52 45 53 53 |....* ADDRESS|
00000090: 20 4C 4F 43 41 54 45 52 20 56 45 52 53 20 32 20 | LOCATER VERS 2 |
000000A0: 20 20 20 2A 22 00 D2 08 1E 00 99 22 1D 1D 1D 1D | *"......"....|
000000B0: 1D 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.* |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000D0: 2A 22 00 FF 08 23 00 99 22 1D 1D 1D 1D 1D 2A 20 |*"...#..".....* |
000000E0: 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 50 52 | THIS PROGRAM PR|
000000F0: 4F 56 49 44 45 53 20 54 48 45 20 20 20 2A 22 00 |OVIDES THE *".|
00000100: 2C 09 28 00 99 22 1D 1D 1D 1D 1D 2A 20 20 53 54 |,.(..".....* ST|
00000110: 41 52 54 20 41 4E 44 20 45 4E 44 20 41 44 44 52 |ART AND END ADDR|
00000120: 45 53 53 20 4F 46 20 20 20 20 2A 22 00 59 09 2D |ESS OF *".Y.-|
00000130: 00 99 22 1D 1D 1D 1D 1D 2A 20 20 41 4E 59 20 46 |..".....* ANY F|
00000140: 49 4C 45 20 4F 4E 20 44 49 53 4B 2C 20 41 4E 44 |ILE ON DISK, AND|
00000150: 20 54 48 45 20 20 20 2A 22 00 86 09 32 00 99 22 | THE *"...2.."|
00000160: 1D 1D 1D 1D 1D 2A 20 20 4E 55 4D 42 45 52 20 4F |.....* NUMBER O|
00000170: 46 20 42 4C 4F 43 4B 53 20 55 53 45 44 20 54 4F |F BLOCKS USED TO|
00000180: 20 20 20 20 2A 22 00 B3 09 37 00 99 22 1D 1D 1D | *"...7.."...|
00000190: 1D 1D 2A 20 20 53 54 4F 52 45 20 54 48 45 20 50 |..* STORE THE P|
000001A0: 52 4F 47 52 41 4D 20 4F 4E 20 44 49 53 4B 20 20 |ROGRAM ON DISK |
000001B0: 20 2A 22 00 E0 09 3C 00 99 22 1D 1D 1D 1D 1D 2A | *"...<..".....*|
000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 22 | *"|
000001E0: 00 0F 0A 41 00 99 22 1D 1D 1D 1D 1D 2A 20 20 20 |...A..".....* |
000001F0: 4D 4F 44 49 46 49 45 44 20 42 59 3A 20 9E 20 47 |MODIFIED BY: . G|
00000200: 52 45 47 20 52 49 58 99 20 20 20 20 20 2A 22 00 |REG RIX. *".|
00000210: 3C 0A 46 00 99 22 1D 1D 1D 1D 1D 2A 20 20 20 20 |<.F..".....* |
00000220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000230: 20 20 20 20 20 20 20 20 20 20 2A 22 00 69 0A 4B | *".i.K|
00000240: 00 99 22 1D 1D 1D 1D 1D 2A 2A 2A 2A 2A 2A 2A 2A |..".....********|
00000250: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000260: 2A 2A 2A 2A 2A 2A 2A 2A 22 00 6F 0A 50 00 3A 00 |********".o.P.:.|
00000270: 75 0A 55 00 3A 00 A9 0A 5A 00 99 22 11 11 12 1E |u.U.:...Z.."....|
00000280: 20 20 20 20 20 20 20 20 20 20 20 20 41 44 44 52 | ADDR|
00000290: 45 53 53 20 4C 4F 43 41 54 45 52 20 20 20 20 20 |ESS LOCATER |
000002A0: 20 20 20 20 20 20 20 20 22 00 C3 0A 5F 00 85 22 | "..._.."|
000002B0: 11 9F 50 52 4F 47 52 41 4D 20 4E 41 4D 45 22 3B |..PROGRAM NAME";|
000002C0: 50 4E 24 00 D5 0A 64 00 9F 31 35 2C 38 2C 31 35 |PN$...d..15,8,15|
000002D0: 2C 22 49 30 22 00 F0 0A 69 00 84 31 35 2C 41 2C |,"I0"...i..15,A,|
000002E0: 41 24 2C 42 2C 43 3A 8B 41 B3 B1 30 A7 33 39 35 |A$,B,C:.A..0.395|
000002F0: 00 06 0B 6E 00 9F 31 2C 38 2C 33 2C 50 4E 24 AA |...n..1,8,3,PN$.|
00000300: 22 2C 50 2C 52 22 00 17 0B 73 00 84 31 35 2C 41 |",P,R"...s..15,A|
00000310: 2C 41 24 2C 42 2C 43 00 24 0B 78 00 8B 41 B2 30 |,A$,B,C.$.x..A.0|
00000320: A7 31 33 35 00 55 0B 7D 00 99 22 11 9E 05 22 3B |.135.U.}.."...";|
00000330: C7 28 33 34 29 3B 50 4E 24 3B C7 28 33 34 29 3B |.(34);PN$;.(34);|
00000340: 22 20 20 96 46 49 4C 45 20 4E 4F 54 20 46 4F 55 |" .FILE NOT FOU|
00000350: 4E 44 2E 1E 22 00 64 0B 82 00 A0 31 3A A0 31 35 |ND..".d....1:.15|
00000360: 3A 89 39 35 00 81 0B 87 00 99 22 11 11 93 9E 12 |:.95......".....|
00000370: 44 41 54 41 20 46 4F 52 3A 20 20 22 3B 50 4E 24 |DATA FOR: ";PN$|
00000380: 3B 00 9A 0B 8C 00 81 49 B2 B9 28 30 29 A4 33 39 |;......I..(0).39|
00000390: 3A 99 22 20 22 3B 3A 82 3A 99 00 B1 0B 91 00 99 |:." ";:.:.......|
000003A0: 22 11 53 54 41 52 54 A0 41 44 44 52 45 53 53 3A |".START.ADDRESS:|
000003B0: 22 00 C3 0B 96 00 A1 23 31 2C 41 24 3A A1 23 31 |"......#1,A$:.#1|
000003C0: 2C 42 24 00 D6 0B 9B 00 8B 41 24 B2 22 22 A7 41 |,B$......A$."".A|
000003D0: 24 B2 C7 28 30 29 00 E9 0B A0 00 8B 42 24 B2 22 |$..(0)......B$."|
000003E0: 22 A7 42 24 B2 C7 28 30 29 00 00 0C A5 00 53 41 |".B$..(0).....SA|
000003F0: B2 C6 28 41 24 29 AA 32 35 36 AC C6 28 42 24 29 |..(A$).256..(B$)|
00000400: 00 23 0C AA 00 99 22 12 44 45 43 49 4D 41 4C 3A |.#....".DECIMAL:|
00000410: 92 22 3B 53 41 3B 3A 53 48 B2 53 41 3A 53 41 24 |.";SA;:SH.SA:SA$|
00000420: B2 22 22 00 2E 0C AF 00 81 49 B2 30 A4 33 00 44 |.""......I.0.3.D|
00000430: 0C B4 00 53 52 B2 53 48 AB B5 28 53 48 AD 31 36 |...SR.SH..(SH.16|
00000440: 29 AC 31 36 00 51 0C B9 00 53 52 B2 53 52 AA 34 |).16.Q...SR.SR.4|
00000450: 38 00 64 0C BE 00 8B 53 52 B1 35 37 A7 53 52 B2 |8.d....SR.57.SR.|
00000460: 53 52 AA 37 00 76 0C C3 00 53 41 24 B2 C7 28 53 |SR.7.v...SA$..(S|
00000470: 52 29 AA 53 41 24 00 86 0C C8 00 53 48 B2 B5 28 |R).SA$.....SH..(|
00000480: 53 48 AD 31 36 29 00 8C 0C CD 00 82 00 A4 0C D2 |SH.16)..........|
00000490: 00 99 A3 32 30 29 3B 22 12 48 45 58 3A 92 20 22 |...20);".HEX:. "|
000004A0: 3B 53 41 24 00 AB 0C D7 00 A0 31 00 C6 0C DC 00 |;SA$......1.....|
000004B0: 99 22 11 4C 45 4E 47 54 48 20 49 4E 20 42 4C 4F |.".LENGTH IN BLO|
000004C0: 43 4B 53 3A 22 3B 00 DA 0C E1 00 9F 31 2C 38 2C |CKS:";......1,8,|
000004D0: 30 2C 22 24 3A 22 AA 50 4E 24 00 E8 0C E6 00 A1 |0,"$:".PN$......|
000004E0: 23 31 2C 41 24 2C 42 24 00 F6 0C EB 00 A1 23 31 |#1,A$,B$......#1|
000004F0: 2C 41 24 2C 42 24 00 04 0D F0 00 A1 23 31 2C 41 |,A$,B$......#1,A|
00000500: 24 2C 42 24 00 1A 0D F5 00 A1 23 31 2C 42 24 3A |$,B$......#1,B$:|
00000510: 8B 53 54 B3 B1 30 A7 33 35 35 00 2D 0D FA 00 8B |.ST..0.355.-....|
00000520: 42 24 B3 B1 C7 28 33 34 29 A7 32 34 35 00 47 0D |B$...(34).245.G.|
00000530: FF 00 A1 23 31 2C 42 24 3A 8B 42 24 B3 B1 C7 28 |...#1,B$:.B$...(|
00000540: 33 34 29 A7 32 35 35 00 60 0D 04 01 A1 23 31 2C |34).255.`....#1,|
00000550: 42 24 3A 8B 42 24 B2 C7 28 33 32 29 A7 32 36 30 |B$:.B$..(32).260|
00000560: 00 77 0D 09 01 A1 23 31 2C 42 24 3A 8B 42 24 B3 |.w....#1,B$:.B$.|
00000570: B1 22 22 A7 32 36 35 00 97 0D 0E 01 A1 23 31 2C |."".265......#1,|
00000580: 41 24 3A A1 23 31 2C 42 24 3A A1 23 31 2C 41 24 |A$:.#1,B$:.#1,A$|
00000590: 3A A1 23 31 2C 42 24 00 AA 0D 13 01 8B 41 24 B2 |:.#1,B$......A$.|
000005A0: 22 22 A7 41 24 B2 C7 28 30 29 00 BD 0D 18 01 8B |"".A$..(0)......|
000005B0: 42 24 B2 22 22 A7 42 24 B2 C7 28 30 29 00 D4 0D |B$."".B$..(0)...|
000005C0: 1D 01 41 42 B2 C6 28 41 24 29 AA 32 35 36 AC C6 |..AB..(A$).256..|
000005D0: 28 42 24 29 00 DC 0D 22 01 99 41 42 00 E3 0D 27 |(B$)..."..AB...'|
000005E0: 01 A0 31 00 04 0E 2C 01 99 22 11 41 50 50 52 4F |..1...,..".APPRO|
000005F0: 58 49 4D 41 54 45 20 45 4E 44 20 41 44 44 52 45 |XIMATE END ADDRE|
00000600: 53 53 3A 22 00 15 0E 31 01 53 41 B2 53 41 AA 32 |SS:"...1.SA.SA.2|
00000610: 35 36 AC 41 42 00 38 0E 36 01 99 22 12 44 45 43 |56.AB.8.6..".DEC|
00000620: 49 4D 41 4C 3A 92 22 3B 53 41 3B 3A 53 48 B2 53 |IMAL:.";SA;:SH.S|
00000630: 41 3A 53 41 24 B2 22 22 00 43 0E 3B 01 81 49 B2 |A:SA$."".C.;..I.|
00000640: 30 A4 33 00 59 0E 40 01 53 52 B2 53 48 AB B5 28 |0.3.Y.@.SR.SH..(|
00000650: 53 48 AD 31 36 29 AC 31 36 00 66 0E 45 01 53 52 |SH.16).16.f.E.SR|
00000660: B2 53 52 AA 34 38 00 79 0E 4A 01 8B 53 52 B1 35 |.SR.48.y.J..SR.5|
00000670: 37 A7 53 52 B2 53 52 AA 37 00 8B 0E 4F 01 53 41 |7.SR.SR.7...O.SA|
00000680: 24 B2 C7 28 53 52 29 AA 53 41 24 00 9B 0E 54 01 |$..(SR).SA$...T.|
00000690: 53 48 B2 B5 28 53 48 AD 31 36 29 00 A1 0E 59 01 |SH..(SH.16)...Y.|
000006A0: 82 00 B9 0E 5E 01 99 A3 32 30 29 3B 22 12 48 45 |....^...20);".HE|
000006B0: 58 3A 92 20 22 3B 53 41 24 00 C4 0E 63 01 A0 31 |X:. ";SA$...c..1|
000006C0: 3A A0 31 35 00 E1 0E 68 01 85 22 11 99 4C 4F 43 |:.15...h.."..LOC|
000006D0: 41 54 45 20 41 4E 4F 54 48 45 52 20 22 3B 52 50 |ATE ANOTHER ";RP|
000006E0: 24 00 F1 0E 6D 01 8B 52 50 24 B2 22 59 22 A7 39 |$...m..RP$."Y".9|
000006F0: 35 00 1E 0F 72 01 99 22 11 44 4F 20 59 4F 55 20 |5...r..".DO YOU |
00000700: 57 49 53 48 20 54 4F 20 4C 4F 41 44 22 3B C7 28 |WISH TO LOAD";.(|
00000710: 33 34 29 3B 50 4E 24 3B C7 28 33 34 29 3B 00 27 |34);PN$;.(34);.'|
00000720: 0F 77 01 85 4C 44 24 00 5B 0F 7C 01 8B 4C 44 24 |.w..LD$.[.|..LD$|
00000730: B2 22 59 22 A7 99 22 1D 11 05 4C 4F 41 44 22 3B |."Y".."...LOAD";|
00000740: C7 28 33 34 29 3B 50 4E 24 3B C7 28 33 34 29 3B |.(34);PN$;.(34);|
00000750: 22 2C 38 2C 31 91 91 91 22 3A 80 00 9E 0F 81 01 |",8,1...":......|
00000760: 99 22 93 9C 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00000770: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000780: 43 49 41 4F 20 21 11 11 11 11 11 11 22 3A 99 22 |CIAO !......":."|
00000790: 05 20 53 59 53 36 34 37 33 38 91 91 91 22 00 A8 |. SYS64738..."..|
000007A0: 0F 86 01 A0 31 35 3A 80 00 C8 0F 8B 01 99 22 11 |....15:.......".|
000007B0: 11 12 44 49 53 4B 2D 45 52 52 4F 52 3A 22 3B 41 |..DISK-ERROR:";A|
000007C0: 3B 42 3B 43 3A 99 41 24 00 DE 0F 90 01 85 22 11 |;B;C:.A$......".|
000007D0: 54 52 59 20 41 47 41 49 4E 22 3B 54 59 24 00 F1 |TRY AGAIN";TY$..|
000007E0: 0F 95 01 8B 54 59 24 B3 B1 22 59 22 A7 89 33 36 |....TY$.."Y"..36|
000007F0: 30 00 FA 0F 9A 01 89 31 30 35 00 00 00 AA 36 1C |0......105....6.|
00000800: FF FF |.. |
......."..":.53281,0:.53280,0:.K...."...
..********************************".X...
.".....* *"
......".....* ADDRESS LOCATER VERS 2
*".R....".....*
*"...#..".....* THIS PROGRAM PR
OVIDES THE *".,.(..".....* START AND
END ADDRESS OF *".Y.-..".....* ANY F
ILE ON DISK, AND THE *"...2..".....*
NUMBER OF BLOCKS USED TO *"...7.."...
..* STORE THE PROGRAM ON DISK *"...<.
.".....* *"
...A..".....* MODIFIED BY: . GREG RIX.
*".<.F..".....*
*".I.K..".....****************
****************".O.P.:.U.U.:...Z.."....
ADDRESS LOCATER
".C._.."..PROGRAM NAME";PN$.U.D..15,8,15
,"I0"...I..15,A,A$,B,C:.A..0.395...N..1,
8,3,PN$.",P,R"...S..15,A,A$,B,C.$.X..A.0
.135.U.}.."...";G(34);PN$;G(34);" .FILE
NOT FOUND..".D... 1: 15:.95......".....
DATA FOR: ";PN$;......I..(0).39:." ";:.
:.......".START ADDRESS:".C....#1,A$:.#1
,B$.V....A$."".A$.G(0)... ..B$."".B$.G(0
).....SA.F(A$).256.F(B$).#....".DECIMAL:
.";SA;:SH.SA:SA$.""......I.0.3.D...SR.SH
..(SH.16).16.Q...SR.SR.48.D....SR.57.SR.
SR.7.V.C.SA$.G(SR).SA$...H.SH..(SH.16)..
.M.....R...20);".HEX:. ";SA$...W. 1.F...
.".LENGTH IN BLOCKS:";.Z....1,8,0,"$:".P
N$......#1,A$,B$......#1,A$,B$......#1,A
$,B$......#1,B$:.ST..0.355.-....B$..G(34
).245.G....#1,B$:.B$..G(34).255.`....#1,
B$:.B$.G(32).260.W....#1,B$:.B$.."".265.
.....#1,A$:.#1,B$:.#1,A$:.#1,B$......A$.
"".A$.G(0)......B$."".B$.G(0).T...AB.F(A
$).256.F(B$)..."..AB...'. 1...,..".APPRO
XIMATE END ADDRESS:"...1.SA.SA.256.AB.8.
6..".DECIMAL:.";SA;:SH.SA:SA$."".C.;..I.
0.3.Y.@.SR.SH..(SH.16).16.F.E.SR.SR.48.Y
.J..SR.57.SR.SR.7...O.SA$.G(SR).SA$...T.
SH..(SH.16)...Y.....^...20);".HEX:. ";SA
$.D.C. 1: 15...H.."..LOCATE ANOTHER ";RP
$...M..RP$."Y".95...R..".DO YOU WISH TO
LOAD";G(34);PN$;G(34);.'.W..LD$.[.|..LD$
."Y".."...LOAD";G(34);PN$;G(34);",8,1...
":......."..............................
CIAO !......":.". SYS64738..."..... 15:.
.H...."...DISK-ERROR:";A;B;C:.A$......".
TRY AGAIN";TY$......TY$.."Y"..360......1
05....6...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL