> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 13 08 0A 00 86 20 50 4C 24 28 39 29 2C 47 |....... PL$(9),G|
00000010: 28 39 29 00 21 08 14 00 81 20 49 B2 31 20 A4 20 |(9).!.... I.1 . |
00000020: 39 00 33 08 1E 00 87 20 50 4C 24 28 49 29 2C 47 |9.3.... PL$(I),G|
00000030: 28 49 29 00 3B 08 28 00 82 20 49 00 49 08 32 00 |(I).;.(.. I.I.2.|
00000040: 99 20 C7 28 31 34 37 29 3B 00 72 08 3C 00 85 22 |. .(147);.r.<.."|
00000050: 48 4F 57 20 4D 55 43 48 20 44 4F 20 59 4F 55 20 |HOW MUCH DO YOU |
00000060: 57 45 49 47 48 20 49 4E 20 50 4F 55 4E 44 53 22 |WEIGH IN POUNDS"|
00000070: 3B 50 00 80 08 46 00 99 20 C7 28 31 34 37 29 3B |;P...F.. .(147);|
00000080: 00 AD 08 50 00 99 22 54 59 50 45 20 49 4E 20 54 |...P.."TYPE IN T|
00000090: 48 45 20 4E 55 4D 42 45 52 20 41 4E 44 20 50 52 |HE NUMBER AND PR|
000000A0: 45 53 53 20 3C 52 45 54 55 52 4E 3E 22 00 D3 08 |ESS <RETURN>"...|
000000B0: 5A 00 99 22 54 4F 20 53 45 45 20 48 4F 57 20 4D |Z.."TO SEE HOW M|
000000C0: 55 43 48 20 59 4F 55 27 44 20 57 45 49 47 48 20 |UCH YOU'D WEIGH |
000000D0: 4F 4E 22 00 EA 08 64 00 99 22 41 4E 4F 54 48 45 |ON"...d.."ANOTHE|
000000E0: 52 20 50 4C 41 4E 45 54 2E 22 00 F0 08 6E 00 99 |R PLANET."...n..|
000000F0: 00 FE 08 78 00 81 20 49 B2 31 20 A4 20 39 00 12 |...x.. I.1 . 9..|
00000100: 09 82 00 99 20 49 3B 22 29 20 22 3B 50 4C 24 28 |.... I;") ";PL$(|
00000110: 49 29 00 1A 09 8C 00 82 20 49 00 20 09 96 00 99 |I)...... I. ....|
00000120: 00 44 09 A0 00 85 22 57 48 49 43 48 20 4E 55 4D |.D...."WHICH NUM|
00000130: 42 45 52 20 44 4F 20 59 4F 55 20 43 48 4F 4F 53 |BER DO YOU CHOOS|
00000140: 45 22 3B 4E 00 59 09 AA 00 8B 20 4E B3 31 20 B0 |E";N.Y.... N.1 .|
00000150: 20 4E B1 39 20 A7 20 37 30 00 67 09 B4 00 99 20 | N.9 . 70.g.... |
00000160: C7 28 31 34 37 29 3B 00 8A 09 BE 00 99 22 59 4F |.(147);......"YO|
00000170: 55 20 57 4F 55 4C 44 20 57 45 49 47 48 22 3B 47 |U WOULD WEIGH";G|
00000180: 28 4E 29 AD 39 2E 37 32 AC 50 00 A7 09 C8 00 99 |(N).9.72.P......|
00000190: 22 50 4F 55 4E 44 53 20 4F 4E 20 22 3B 50 4C 24 |"POUNDS ON ";PL$|
000001A0: 28 4E 29 3B 22 2E 22 00 AD 09 D2 00 99 00 D2 09 |(N);".".........|
000001B0: DC 00 99 22 50 52 45 53 53 20 3C 50 3E 20 46 4F |..."PRESS <P> FO|
000001C0: 52 20 41 4E 4F 54 48 45 52 20 50 4C 41 4E 45 54 |R ANOTHER PLANET|
000001D0: 2C 22 00 F7 09 E6 00 99 22 3C 57 3E 20 54 4F 20 |,"......"<W> TO |
000001E0: 45 4E 54 45 52 20 41 4E 4F 54 4A 48 45 52 20 57 |ENTER ANOTJHER W|
000001F0: 45 49 47 48 54 2C 22 00 11 0A F0 00 99 22 50 52 |EIGHT,"......"PR|
00000200: 45 53 53 20 3C 51 3E 20 54 4F 20 51 55 49 54 2E |ESS <Q> TO QUIT.|
00000210: 22 00 1A 0A FA 00 A1 20 4B 24 00 2C 0A 04 01 8B |"...... K$.,....|
00000220: 20 4B 24 B2 22 22 20 A7 20 32 35 30 00 3E 0A 0E | K$."" . 250.>..|
00000230: 01 8B 20 4B 24 B2 22 50 22 20 A7 20 37 30 00 50 |.. K$."P" . 70.P|
00000240: 0A 18 01 8B 20 4B 24 B2 22 57 22 20 A7 20 35 30 |.... K$."W" . 50|
00000250: 00 65 0A 22 01 8B 20 4B 24 20 B3 B1 22 51 22 20 |.e.".. K$ .."Q" |
00000260: A7 20 32 35 30 00 6B 0A 2C 01 80 00 96 0A E8 03 |. 250.k.,.......|
00000270: 83 20 4D 45 52 43 55 52 59 2C 33 2E 37 38 2C 56 |. MERCURY,3.78,V|
00000280: 45 4E 55 53 2C 38 2E 36 2C 54 48 45 20 4D 4F 4F |ENUS,8.6,THE MOO|
00000290: 4E 2C 31 2E 36 32 00 C2 0A F2 03 83 20 4D 41 52 |N,1.62...... MAR|
000002A0: 53 2C 33 2E 37 32 2C 4A 55 50 49 54 45 52 2C 32 |S,3.72,JUPITER,2|
000002B0: 37 2E 38 39 2C 53 41 54 55 52 4E 2C 31 32 2E 38 |7.89,SATURN,12.8|
000002C0: 33 31 00 ED 0A FC 03 83 20 55 52 41 4E 55 53 2C |31...... URANUS,|
000002D0: 39 2E 30 33 2C 4E 45 50 54 55 4E 45 2C 31 31 2E |9.03,NEPTUNE,11.|
000002E0: 39 35 2C 50 4C 55 54 4F 2C 30 2E 39 31 00 00 00 |95,PLUTO,0.91...|
....... PL$(9),G(9).!.... I.1 . 9.3....
PL$(I),G(I).;.(.. I.I.2.. G(147);.R.<.."
HOW MUCH DO YOU WEIGH IN POUNDS";P...F..
G(147);...P.."TYPE IN THE NUMBER AND PR
ESS <RETURN>".S.Z.."TO SEE HOW MUCH YOU'
D WEIGH ON"...D.."ANOTHER PLANET."...N..
...X.. I.1 . 9...... I;") ";PL$(I)......
I. .....D. .."WHICH NUMBER DO YOU CHOOS
E";N.Y.... N.1 . N.9 . 70.G.... G(147);.
....."YOU WOULD WEIGH";G(N).9.72.P...H..
"POUNDS ON ";PL$(N);"."...R...R...."PRES
S <P> FOR ANOTHER PLANET,"......"<W> TO
ENTER ANOTJHER WEIGHT,"......"PRESS <Q>
TO QUIT."...... K$.,.... K$."" . 250.>..
.. K$."P" . 70.P.... K$."W" . 50.E.".. K
$ .."Q" . 250.K.,........ MERCURY,3.78,V
ENUS,8.6,THE MOON,1.62.B.... MARS,3.72,J
UPITER,27.89,SATURN,12.831...... URANUS,
9.03,NEPTUNE,11.95,PLUTO,0.91...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL