> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 99 22 93 22 00 2E 08 02 00 85 |......."."......|
00000010: 22 57 48 41 54 20 49 53 20 4E 41 4D 45 20 4F 46 |"WHAT IS NAME OF|
00000020: 20 47 52 41 50 48 22 3B 51 24 3A 99 22 22 00 5A | GRAPH";Q$:."".Z|
00000030: 08 05 00 85 22 57 48 41 54 27 53 20 54 48 45 20 |...."WHAT'S THE |
00000040: 4D 41 58 49 4D 55 4D 20 50 52 49 43 45 20 53 43 |MAXIMUM PRICE SC|
00000050: 41 4C 45 22 3B 47 3A 99 22 22 00 63 08 0A 00 9F |ALE";G:."".c....|
00000060: 34 2C 34 00 6E 08 14 00 81 59 B2 30 A4 35 00 82 |4,4.n....Y.0.5..|
00000070: 08 1E 00 87 41 3A 41 24 B2 41 24 AA C7 28 41 29 |....A:A$.A$..(A)|
00000080: 3A 82 00 AA 08 28 00 85 22 48 4F 57 20 4D 41 4E |:....(.."HOW MAN|
00000090: 59 20 45 4E 54 52 49 45 53 20 41 52 45 20 54 48 |Y ENTRIES ARE TH|
000000A0: 45 52 45 22 3B 5A 3A 99 22 22 00 B4 08 32 00 86 |ERE";Z:.""...2..|
000000B0: 44 28 5A 29 00 BF 08 3C 00 81 49 B2 31 A4 5A 00 |D(Z)...<..I.1.Z.|
000000C0: D7 08 46 00 99 22 45 4E 54 52 59 20 4E 4F 2E 22 |..F.."ENTRY NO."|
000000D0: 3B 49 3B 22 3D 22 3B 00 E1 08 50 00 85 44 28 49 |;I;"=";...P..D(I|
000000E0: 29 00 E8 08 5A 00 82 49 00 0E 09 5F 00 98 34 2C |)...Z..I..._..4,|
000000F0: C7 28 31 35 29 A3 32 30 AB 28 C3 28 41 24 29 AD |.(15).20.(.(A$).|
00000100: 32 29 29 51 24 3A 98 34 2C C7 28 31 30 29 00 19 |2))Q$:.4,.(10)..|
00000110: 09 64 00 81 49 B2 31 A4 5A 00 39 09 6E 00 43 24 |.d..I.1.Z.9.n.C$|
00000120: B2 C7 28 32 35 35 29 AA C7 28 35 39 29 AA C7 28 |..(255)..(59)..(|
00000130: 31 35 29 AA C7 28 33 32 29 00 58 09 78 00 45 24 |15)..(32).X.x.E$|
00000140: B2 C7 28 32 37 29 AA C7 28 31 36 29 AA C7 28 30 |..(27)..(16)..(0|
00000150: 29 AA C7 28 32 35 35 29 00 71 09 82 00 42 24 B2 |)..(255).q...B$.|
00000160: C7 28 28 44 28 49 29 29 AD 28 47 AD 32 35 35 29 |.((D(I)).(G.255)|
00000170: 29 00 7C 09 8C 00 42 B2 44 28 49 29 00 91 09 96 |).|...B.D(I)....|
00000180: 00 44 24 B2 22 57 45 45 4B 22 AA C4 28 30 AA 49 |.D$."WEEK"..(0.I|
00000190: 29 00 B2 09 A0 00 98 34 2C C7 28 31 35 29 44 24 |)......4,.(15)D$|
000001A0: 41 24 42 24 43 24 45 24 42 22 44 4F 4C 4C 41 52 |A$B$C$E$B"DOLLAR|
000001B0: 53 22 00 B8 09 AA 00 82 00 BF 09 B4 00 A0 34 00 |S"............4.|
000001C0: D4 09 BE 00 83 38 2C 32 37 2C 31 36 2C 30 2C 35 |.....8,27,16,0,5|
000001D0: 33 2C 32 36 00 F6 09 DC 00 85 22 57 41 4E 54 20 |3,26......"WANT |
000001E0: 54 4F 20 44 4F 20 41 4E 4F 54 48 45 52 20 4F 4E |TO DO ANOTHER ON|
000001F0: 45 22 3B 41 4E 24 00 08 0A E6 00 8B 41 4E 24 B2 |E";AN$......AN$.|
00000200: 22 59 22 A7 9C 3A 89 31 00 0E 0A F0 00 80 00 30 |"Y"..:.1.......0|
00000210: 0A FA 00 8F 2A 2A 2A 57 52 49 54 54 45 4E 20 42 |....***WRITTEN B|
00000220: 59 20 42 52 49 41 4E 20 44 4F 42 42 53 2A 2A 2A |Y BRIAN DOBBS***|
00000230: 00 52 0A 04 01 8F 2A 2A 2A 2A 2A 2A 54 49 4D 4D |.R....******TIMM|
00000240: 49 4E 53 2C 20 4F 4E 54 41 52 49 4F 2A 2A 2A 2A |INS, ONTARIO****|
00000250: 2A 2A 00 00 00 |**... |
......."."......"WHAT IS NAME OF GRAPH";
Q$:."".Z...."WHAT'S THE MAXIMUM PRICE SC
ALE";G:."".C....4,4.N....Y.0.5......A:A$
.A$.G(A):....(.."HOW MANY ENTRIES ARE TH
ERE";Z:.""...2..D(Z)...<..I.1.Z.W.F.."EN
TRY NO.";I;"=";...P..D(I)...Z..I..._..4,
G(15).20.(C(A$).2))Q$:.4,G(10)...D..I.1.
Z.9.N.C$.G(255).G(59).G(15).G(32).X.X.E$
.G(27).G(16).G(0).G(255).Q...B$.G((D(I))
.(G.255)).|...B.D(I).....D$."WEEK".D(0.I
)... ..4,G(15)D$A$B$C$E$B"DOLLARS"......
..... 4.T....8,27,16,0,53,26......"WANT
TO DO ANOTHER ONE";AN$......AN$."Y"..:.1
.......0....***WRITTEN BY BRIAN DOBBS***
.R....******TIMMINS, ONTARIO******...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL