> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 0A 00 8F 20 2A 49 4E 53 49 44 45 20 |..(.... *INSIDE |
00000010: 43 4F 4D 4D 4F 44 4F 52 45 20 44 4F 53 2A 20 2A |COMMODORE DOS* *|
00000020: 50 47 2E 20 34 39 35 2A 00 3F 08 14 00 8F 20 2A |PG. 495*.?.... *|
00000030: 4A 4A 4D 2A 20 20 20 2A 30 34 31 39 38 37 2A 00 |JJM* *041987*.|
00000040: 58 08 64 00 8F 20 48 45 58 41 44 45 43 49 4D 41 |X.d.. HEXADECIMA|
00000050: 4C 20 54 4F 20 47 43 52 00 72 08 6E 00 48 24 B2 |L TO GCR.r.n.H$.|
00000060: 22 30 31 32 33 34 35 36 37 38 39 41 42 43 44 45 |"0123456789ABCDE|
00000070: 46 22 00 7E 08 78 00 86 42 24 28 31 35 29 00 90 |F".~.x..B$(15)..|
00000080: 08 82 00 42 24 28 30 29 B2 22 30 31 30 31 30 22 |...B$(0)."01010"|
00000090: 00 A2 08 8C 00 42 24 28 31 29 B2 22 30 31 30 31 |.....B$(1)."0101|
000000A0: 31 22 00 B4 08 96 00 42 24 28 32 29 B2 22 31 30 |1".....B$(2)."10|
000000B0: 30 31 30 22 00 C6 08 A0 00 42 24 28 33 29 B2 22 |010".....B$(3)."|
000000C0: 31 30 30 31 31 22 00 D8 08 AA 00 42 24 28 34 29 |10011".....B$(4)|
000000D0: B2 22 30 31 31 31 30 22 00 EA 08 B4 00 42 24 28 |."01110".....B$(|
000000E0: 35 29 B2 22 30 31 31 31 31 22 00 FC 08 BE 00 42 |5)."01111".....B|
000000F0: 24 28 36 29 B2 22 31 30 31 31 30 22 00 0E 09 C8 |$(6)."10110"....|
00000100: 00 42 24 28 37 29 B2 22 31 30 31 31 31 22 00 20 |.B$(7)."10111". |
00000110: 09 D2 00 42 24 28 38 29 B2 22 30 31 30 30 31 22 |...B$(8)."01001"|
00000120: 00 32 09 DC 00 42 24 28 39 29 B2 22 31 31 30 30 |.2...B$(9)."1100|
00000130: 31 22 00 45 09 E6 00 42 24 28 31 30 29 B2 22 31 |1".E...B$(10)."1|
00000140: 31 30 31 30 22 00 58 09 F0 00 42 24 28 31 31 29 |1010".X...B$(11)|
00000150: B2 22 31 31 30 31 31 22 00 6B 09 FA 00 42 24 28 |."11011".k...B$(|
00000160: 31 32 29 B2 22 30 31 31 30 31 22 00 7E 09 04 01 |12)."01101".~...|
00000170: 42 24 28 31 33 29 B2 22 31 31 31 30 31 22 00 91 |B$(13)."11101"..|
00000180: 09 0E 01 42 24 28 31 34 29 B2 22 31 31 31 31 30 |...B$(14)."11110|
00000190: 22 00 A4 09 18 01 42 24 28 31 35 29 B2 22 31 30 |".....B$(15)."10|
000001A0: 31 30 31 22 00 BF 09 22 01 99 22 93 48 45 58 41 |101"..."..".HEXA|
000001B0: 44 45 43 49 4D 41 4C 20 54 4F 20 47 43 52 22 00 |DECIMAL TO GCR".|
000001C0: CA 09 2C 01 48 47 24 B2 22 22 00 F3 09 36 01 85 |..,.HG$.""...6..|
000001D0: 22 11 48 45 58 41 44 45 43 49 4D 41 4C 20 28 45 |".HEXADECIMAL (E|
000001E0: 2E 47 2E 2C 20 30 38 34 41 30 30 32 33 29 22 3B |.G., 084A0023)";|
000001F0: 48 47 24 00 03 0A 40 01 8B C3 28 48 47 24 29 B2 |HG$...@...(HG$).|
00000200: 30 A7 80 00 14 0A 4A 01 8B C3 28 48 47 24 29 B3 |0.....J...(HG$).|
00000210: B1 38 A7 80 00 1F 0A 54 01 81 49 B2 31 A4 34 00 |.8.....T..I.1.4.|
00000220: 39 0A 5E 01 48 47 24 28 49 29 B2 CA 28 48 47 24 |9.^.HG$(I)..(HG$|
00000230: 2C 49 AC 32 AB 31 2C 32 29 00 40 0A 68 01 82 49 |,I.2.1,2).@.h..I|
00000240: 00 4B 0A 72 01 81 4A B2 31 A4 34 00 56 0A 7C 01 |.K.r..J.1.4.V.|.|
00000250: 48 28 4A 29 B2 30 00 62 0A 86 01 81 49 B2 31 A4 |H(J).0.b....I.1.|
00000260: 31 36 00 89 0A 90 01 8B C8 28 48 47 24 28 4A 29 |16.......(HG$(J)|
00000270: 2C 31 29 B2 CA 28 48 24 2C 49 2C 31 29 A7 48 28 |,1)..(H$,I,1).H(|
00000280: 4A 29 B2 49 3A 49 B2 31 36 00 90 0A 9A 01 82 49 |J).I:I.16......I|
00000290: 00 A0 0A A4 01 8B 48 28 4A 29 B2 30 89 33 30 30 |......H(J).0.300|
000002A0: 00 B0 0A AE 01 48 28 4A 29 B2 48 28 4A 29 AB 31 |.....H(J).H(J).1|
000002B0: 00 BB 0A B8 01 4C 28 4A 29 B2 30 00 C7 0A C2 01 |.....L(J).0.....|
000002C0: 81 49 B2 31 A4 31 36 00 EE 0A CC 01 8B C9 28 48 |.I.1.16.......(H|
000002D0: 47 24 28 4A 29 2C 31 29 B2 CA 28 48 24 2C 49 2C |G$(J),1)..(H$,I,|
000002E0: 31 29 A7 4C 28 4A 29 B2 49 3A 49 B2 31 36 00 F5 |1).L(J).I:I.16..|
000002F0: 0A D6 01 82 49 00 05 0B E0 01 8B 4C 28 4A 29 B2 |....I......L(J).|
00000300: 30 89 33 30 30 00 15 0B EA 01 4C 28 4A 29 B2 4C |0.300.....L(J).L|
00000310: 28 4A 29 AB 31 00 1C 0B F4 01 82 4A 00 27 0B FE |(J).1......J.'..|
00000320: 01 81 49 B2 31 A4 34 00 42 0B 08 02 49 4D 41 47 |..I.1.4.B...IMAG|
00000330: 45 24 B2 49 4D 41 47 45 24 AA 42 24 28 48 28 49 |E$.IMAGE$.B$(H(I|
00000340: 29 29 00 5D 0B 12 02 49 4D 41 47 45 24 B2 49 4D |)).]...IMAGE$.IM|
00000350: 41 47 45 24 AA 42 24 28 4C 28 49 29 29 00 64 0B |AGE$.B$(L(I)).d.|
00000360: 1C 02 82 49 00 73 0B 26 02 99 22 11 22 49 4D 41 |...I.s.&.."."IMA|
00000370: 47 45 24 00 7D 0B 30 02 99 22 91 22 3B 00 88 0B |GE$.}.0..".";...|
00000380: 3A 02 81 49 B2 31 A4 38 00 96 0B 44 02 99 22 5E |:..I.1.8...D.."^|
00000390: 20 20 20 20 22 3B 00 9D 0B 4E 02 82 49 00 A6 0B | ";...N..I...|
000003A0: 58 02 99 22 91 22 00 B1 0B 62 02 81 49 B2 31 A4 |X.."."...b..I.1.|
000003B0: 35 00 CE 0B 6C 02 42 44 24 28 49 29 B2 CA 28 49 |5...l.BD$(I)..(I|
000003C0: 4D 41 47 45 24 2C 49 AC 38 AB 37 2C 38 29 00 D5 |MAGE$,I.8.7,8)..|
000003D0: 0B 76 02 82 49 00 E0 0B 80 02 81 4A B2 31 A4 35 |.v..I......J.1.5|
000003E0: 00 EB 0B 8A 02 81 49 B2 31 A4 38 00 14 0C 94 02 |......I.1.8.....|
000003F0: 8B CA 28 42 44 24 28 4A 29 2C 49 2C 31 29 B2 22 |..(BD$(J),I,1)."|
00000400: 31 22 A7 44 28 4A 29 B2 44 28 4A 29 AA 32 AE 28 |1".D(J).D(J).2.(|
00000410: 38 AB 49 29 00 1B 0C 9E 02 82 49 00 22 0C A8 02 |8.I)......I."...|
00000420: 82 4A 00 2D 0C B2 02 81 49 B2 31 A4 35 00 40 0C |.J.-....I.1.5.@.|
00000430: BC 02 48 B2 B5 28 44 28 49 29 AD 31 36 29 AA 31 |..H..(D(I).16).1|
00000440: 00 56 0C C6 02 4C B2 44 28 49 29 AB 28 48 AB 31 |.V...L.D(I).(H.1|
00000450: 29 AC 31 36 AA 31 00 75 0C D0 02 44 48 24 28 49 |).16.1.u...DH$(I|
00000460: 29 B2 CA 28 48 24 2C 48 2C 31 29 AA CA 28 48 24 |)..(H$,H,1)..(H$|
00000470: 2C 4C 2C 31 29 00 7C 0C DA 02 82 49 00 93 0C E4 |,L,1).|....I....|
00000480: 02 99 22 11 48 45 58 41 44 45 43 49 4D 41 4C 3A |..".HEXADECIMAL:|
00000490: 20 22 3B 00 9E 0C EE 02 81 49 B2 31 A4 34 00 AF | ";......I.1.4..|
000004A0: 0C F8 02 99 48 47 24 28 49 29 3B 22 20 22 3B 00 |....HG$(I);" ";.|
000004B0: B6 0C 02 03 82 49 00 BC 0C 0C 03 99 00 D3 0C 16 |.....I..........|
000004C0: 03 99 22 11 47 43 52 20 20 20 20 20 20 20 20 3A |..".GCR :|
000004D0: 20 22 3B 00 DE 0C 20 03 81 49 B2 31 A4 35 00 EF | ";... ..I.1.5..|
000004E0: 0C 2A 03 99 44 48 24 28 49 29 3B 22 20 22 3B 00 |.*..DH$(I);" ";.|
000004F0: F6 0C 34 03 82 49 00 FC 0C 3E 03 99 00 0A 0D 48 |..4..I...>.....H|
00000500: 03 99 22 11 44 4F 4E 45 21 22 00 10 0D 52 03 80 |..".DONE!"...R..|
00000510: 00 00 00 |... |
..(.... *INSIDE COMMODORE DOS* *PG. 495*
.?.... *JJM* *041987*.X.D.. HEXADECIMA
L TO GCR.R.N.H$."0123456789ABCDEF".~.X..
B$(15).....B$(0)."01010".....B$(1)."0101
1".....B$(2)."10010".F. .B$(3)."10011".X
...B$(4)."01110".....B$(5)."01111".....B
$(6)."10110"...H.B$(7)."10111". .R.B$(8)
."01001".2...B$(9)."11001".E...B$(10)."1
1010".X...B$(11)."11011".K...B$(12)."011
01".~...B$(13)."11101".....B$(14)."11110
".....B$(15)."10101"..."..".HEXADECIMAL
TO GCR".J.,.HG$.""...6..".HEXADECIMAL (E
.G., 084A0023)";HG$...@..C(HG$).0.....J.
.C(HG$)..8.....T..I.1.4.9.^.HG$(I).J(HG$
,I.2.1,2).@.H..I.K.R..J.1.4.V.|.H(J).0.B
....I.1.16......H(HG$(J),1).J(H$,I,1).H(
J).I:I.16......I. ....H(J).0.300.....H(J
).H(J).1.....L(J).0.G.B..I.1.16...L..I(H
G$(J),1).J(H$,I,1).L(J).I:I.16...V..I...
...L(J).0.300.....L(J).L(J).1......J.'..
..I.1.4.B...IMAGE$.IMAGE$.B$(H(I)).]...I
MAGE$.IMAGE$.B$(L(I)).D....I.S.&.."."IMA
GE$.}.0..".";...:..I.1.8...D.."^ ";..
.N..I...X.."."...B..I.1.5.N.L.BD$(I).J(I
MAGE$,I.8.7,8).U.V..I......J.1.5......I.
1.8......J(BD$(J),I,1)."1".D(J).D(J).2.(
8.I)......I."....J.-....I.1.5.@...H..(D(
I).16).1.V.F.L.D(I).(H.1).16.1.U.P.DH$(I
).J(H$,H,1).J(H$,L,1).|.Z..I......".HEXA
DECIMAL: ";......I.1.4......HG$(I);" ";.
.....I.......S....".GCR : ";... .
.I.1.5...*..DH$(I);" ";...4..I...>.....H
..".DONE!"...R.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL