NUMBER CONVERTER
FILE INFORMATION
FILENAME(S): NUMBER CONVERTER
FILE TYPE(S): PRG
FILE SIZE: 1.2K
FIRST SEEN: 2025-12-01 02:25:40
APPEARS ON: 1 disk(s)
FILE HASH
995fc6b87f01110e5596cdd25ba906c1744beaf70ab17af5e9338da4de78cec3
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| INSIDE C DOS 1 | NUMBER CONVERTER | PRG | hedning, shine | 9 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 0A 00 8F 20 2A 4E 55 4D 42 45 52 20 |....... *NUMBER |
00000010: 43 4F 4E 56 45 52 54 45 52 2A 00 42 08 14 00 8F |CONVERTER*.B....|
00000020: 20 2A 43 4F 4E 56 45 52 54 20 44 2D 48 2D 42 20 | *CONVERT D-H-B |
00000030: 4F 52 20 43 4F 4D 42 49 4E 41 54 49 4F 4E 20 4F |OR COMBINATION O|
00000040: 46 2A 00 67 08 1E 00 8F 20 2A 41 44 41 50 54 45 |F*.g.... *ADAPTE|
00000050: 44 20 46 52 4F 4D 20 49 4E 53 49 44 45 20 43 4F |D FROM INSIDE CO|
00000060: 4D 4D 4F 44 4F 52 45 00 84 08 28 00 8F 20 20 44 |MMODORE...(.. D|
00000070: 4F 53 2A 20 20 2A 4A 4A 4D 2A 20 20 2A 30 33 32 |OS* *JJM* *032|
00000080: 35 38 37 2A 00 8D 08 64 00 99 22 93 22 00 B0 08 |587*...d.."."...|
00000090: 6E 00 99 22 45 4E 54 45 52 20 4E 55 4D 42 45 52 |n.."ENTER NUMBER|
000000A0: 20 50 52 45 46 49 58 45 44 20 57 49 54 48 3A 22 | PREFIXED WITH:"|
000000B0: 00 DF 08 78 00 99 22 44 2D 44 45 43 49 4D 41 4C |...x.."D-DECIMAL|
000000C0: 20 20 48 2D 48 45 58 20 20 42 2D 42 49 4E 41 52 | H-HEX B-BINAR|
000000D0: 59 20 20 28 4F 52 20 51 2D 51 55 49 54 29 22 00 |Y (OR Q-QUIT)".|
000000E0: EF 08 82 00 85 49 24 3A 41 B2 C3 28 49 24 29 00 |.....I$:A..(I$).|
000000F0: 01 09 8C 00 8B 20 49 24 B2 22 22 20 A7 20 31 30 |..... I$."" . 10|
00000100: 30 00 33 09 96 00 54 24 B2 C8 28 49 24 2C 31 29 |0.3...T$..(I$,1)|
00000110: 3A 48 24 B2 22 30 31 32 33 34 35 36 37 38 39 41 |:H$."0123456789A|
00000120: 42 43 44 45 46 22 3A 49 24 B2 CA 28 49 24 2C 32 |BCDEF":I$..(I$,2|
00000130: 2C 41 29 00 47 09 A0 00 8B 20 54 24 B2 22 44 22 |,A).G.... T$."D"|
00000140: 20 A7 20 35 30 30 30 00 5B 09 AA 00 8B 20 54 24 | . 5000.[.... T$|
00000150: B2 22 48 22 20 A7 20 36 30 30 30 00 6F 09 B4 00 |."H" . 6000.o...|
00000160: 8B 20 54 24 B2 22 42 22 20 A7 20 37 30 30 30 00 |. T$."B" . 7000.|
00000170: 85 09 B9 00 8B 20 54 24 B2 22 51 22 20 A7 20 99 |..... T$."Q" . .|
00000180: 22 93 22 3A 80 00 8F 09 BE 00 89 20 31 30 30 00 |".":....... 100.|
00000190: AE 09 88 13 8F 20 2A 43 4F 4E 56 45 52 54 20 44 |..... *CONVERT D|
000001A0: 45 43 49 4D 41 4C 20 54 4F 20 48 45 58 2A 00 BF |ECIMAL TO HEX*..|
000001B0: 09 92 13 44 B2 AB 31 3A 44 B2 C5 28 49 24 29 00 |...D..1:D..(I$).|
000001C0: D7 09 9C 13 8B 20 44 B3 30 20 B0 20 44 B1 32 35 |..... D.0 . D.25|
000001D0: 35 20 A7 20 31 30 30 00 E5 09 A6 13 48 B2 B5 28 |5 . 100.....H..(|
000001E0: 44 AD 31 36 29 00 F4 09 B0 13 4C B2 44 AB 28 48 |D.16).....L.D.(H|
000001F0: AC 31 36 29 00 14 0A BA 13 48 44 24 B2 CA 28 48 |.16).....HD$..(H|
00000200: 24 2C 48 AA 31 2C 31 29 AA CA 28 48 24 2C 4C AA |$,H.1,1)..(H$,L.|
00000210: 31 2C 31 29 00 36 0A BF 13 8F 20 2A 43 4F 4E 56 |1,1).6.... *CONV|
00000220: 45 52 54 20 44 45 43 49 4D 41 4C 20 54 4F 20 42 |ERT DECIMAL TO B|
00000230: 49 4E 41 52 59 2A 00 59 0A C4 13 96 A5 42 28 42 |INARY*.Y.....B(B|
00000240: 29 B2 32 AE 28 42 AB B5 28 42 AD 38 29 AC 38 29 |).2.(B..(B.8).8)|
00000250: AF 44 3A 42 49 24 B2 22 22 00 6B 0A CE 13 81 20 |.D:BI$."".k.... |
00000260: 42 B2 37 20 A4 20 30 20 A9 AB 31 00 8E 0A D8 13 |B.7 . 0 ..1.....|
00000270: 8B 20 A5 42 28 42 29 B2 30 20 A7 20 42 49 24 B2 |. .B(B).0 . BI$.|
00000280: 42 49 24 AA 22 30 22 3A 89 20 35 31 30 30 00 9E |BI$."0":. 5100..|
00000290: 0A E2 13 42 49 24 B2 42 49 24 AA 22 31 22 00 A6 |...BI$.BI$."1"..|
000002A0: 0A EC 13 82 20 42 00 B2 0A 50 14 89 20 31 30 30 |.... B...P.. 100|
000002B0: 30 30 00 D1 0A 70 17 8F 20 2A 43 4F 4E 56 45 52 |00...p.. *CONVER|
000002C0: 54 20 48 45 58 20 54 4F 20 44 45 43 49 4D 41 4C |T HEX TO DECIMAL|
000002D0: 2A 00 DC 0A 7A 17 48 44 24 B2 49 24 00 F1 0A 84 |*...z.HD$.I$....|
000002E0: 17 8B 20 C3 28 48 44 24 29 B2 30 20 A7 20 31 30 |.. .(HD$).0 . 10|
000002F0: 30 00 07 0B 8E 17 8B 20 C3 28 48 44 24 29 B3 B1 |0...... .(HD$)..|
00000300: 32 20 A7 20 31 30 30 00 0F 0B 98 17 48 B2 30 00 |2 . 100.....H.0.|
00000310: 1C 0B A2 17 81 20 49 B2 31 A4 31 36 00 40 0B AC |..... I.1.16.@..|
00000320: 17 8B 20 C8 28 48 44 24 2C 31 29 B2 CA 28 48 24 |.. .(HD$,1)..(H$|
00000330: 2C 49 2C 31 29 20 A7 20 48 B2 49 3A 49 B2 31 36 |,I,1) . H.I:I.16|
00000340: 00 48 0B B6 17 82 20 49 00 52 0B CA 17 48 B2 48 |.H.... I.R...H.H|
00000350: AB 31 00 5A 0B D4 17 4C B2 30 00 67 0B DE 17 81 |.1.Z...L.0.g....|
00000360: 20 49 B2 31 A4 31 36 00 8B 0B E8 17 8B 20 C9 28 | I.1.16...... .(|
00000370: 48 44 24 2C 31 29 B2 CA 28 48 24 2C 49 2C 31 29 |HD$,1)..(H$,I,1)|
00000380: 20 A7 20 4C B2 49 3A 49 B2 31 36 00 93 0B F2 17 | . L.I:I.16.....|
00000390: 82 20 49 00 9D 0B 06 18 4C B2 4C AB 31 00 AA 0B |. I.....L.L.1...|
000003A0: 10 18 44 B2 48 AC 31 36 AA 4C 00 B5 0B 1A 18 89 |..D.H.16.L......|
000003B0: 20 35 30 35 35 00 D7 0B 58 1B 8F 20 2A 43 4F 4E | 5055...X.. *CON|
000003C0: 56 45 52 54 20 42 49 4E 41 52 59 20 54 4F 20 44 |VERT BINARY TO D|
000003D0: 45 43 49 4D 41 4C 2A 00 E1 0B 62 1B 42 24 B2 49 |ECIMAL*...b.B$.I|
000003E0: 24 00 F5 0B 6C 1B 8B 20 C3 28 42 24 29 B2 30 20 |$...l.. .(B$).0 |
000003F0: A7 20 31 30 30 00 0A 0C 76 1B 8B 20 C3 28 42 24 |. 100...v.. .(B$|
00000400: 29 B3 B1 38 20 A7 20 31 30 30 00 12 0C 80 1B 42 |)..8 . 100.....B|
00000410: B2 30 00 1A 0C 8A 1B 44 B2 30 00 28 0C 94 1B 81 |.0.....D.0.(....|
00000420: 20 49 B2 31 20 A4 20 38 00 57 0C 9E 1B 8B 20 CA | I.1 . 8.W.... .|
00000430: 28 42 24 2C 49 2C 31 29 B2 22 31 22 20 A7 20 42 |(B$,I,1)."1" . B|
00000440: B2 42 AA 31 3A 44 B2 44 AA 32 AE 28 38 AB 49 29 |.B.1:D.D.2.(8.I)|
00000450: 3A 89 20 37 30 39 30 00 73 0C A8 1B 8B 20 CA 28 |:. 7090.s.... .(|
00000460: 42 24 2C 49 2C 31 29 B2 22 30 22 20 A7 20 42 B2 |B$,I,1)."0" . B.|
00000470: 42 AA 31 00 7B 0C B2 1B 82 20 49 00 86 0C C6 1B |B.1.{.... I.....|
00000480: 89 20 35 30 33 30 00 9C 0C 10 27 8F 20 2A 50 52 |. 5030....'. *PR|
00000490: 49 4E 54 20 52 45 53 55 4C 54 53 2A 00 AF 0C 1A |INT RESULTS*....|
000004A0: 27 99 22 93 44 45 43 49 4D 41 4C 3D 22 3B 44 00 |'.".DECIMAL=";D.|
000004B0: C4 0C 24 27 99 22 20 20 20 20 48 45 58 3D 20 22 |..$'." HEX= "|
000004C0: 3B 48 44 24 00 D9 0C 2E 27 99 22 20 42 49 4E 41 |;HD$....'." BINA|
000004D0: 52 59 3D 20 22 3B 42 49 24 00 E7 0C 38 27 99 3A |RY= ";BI$...8'.:|
000004E0: 99 3A 89 20 31 31 30 00 00 00 |.:. 110... |
....... *NUMBER CONVERTER*.B.... *CONVER
T D-H-B OR COMBINATION OF*.G.... *ADAPTE
D FROM INSIDE COMMODORE...(.. DOS* *JJ
M* *032587*...D.."."...N.."ENTER NUMBER
PREFIXED WITH:"...X.."D-DECIMAL H-HEX
B-BINARY (OR Q-QUIT)"......I$:A.C(I$).
..... I$."" . 100.3...T$.H(I$,1):H$."012
3456789ABCDEF":I$.J(I$,2,A).G. .. T$."D"
. 5000.[.... T$."H" . 6000.O.... T$."B"
. 7000...... T$."Q" . .".":....... 100.
..... *CONVERT DECIMAL TO HEX*.....D..1:
D.E(I$).W.... D.0 . D.255 . 100.....H..(
D.16).....L.D.(H.16).....HD$.J(H$,H.1,1)
.J(H$,L.1,1).6.... *CONVERT DECIMAL TO B
INARY*.Y.D...B(B).2.(B..(B.8).8).D:BI$."
".K.N.. B.7 . 0 ..1...X.. .B(B).0 . BI$.
BI$."0":. 5100.....BI$.BI$."1"...... B..
.P.. 10000.Q.P.. *CONVERT HEX TO DECIMAL
*...Z.HD$.I$...... C(HD$).0 . 100......
C(HD$)..2 . 100.....H.0...... I.1.16.@..
.. H(HD$,1).J(H$,I,1) . H.I:I.16.H.... I
.R.J.H.H.1.Z.T.L.0.G.... I.1.16...... I(
HD$,1).J(H$,I,1) . L.I:I.16...... I.....
L.L.1.....D.H.16.L...... 5055.W.X.. *CON
VERT BINARY TO DECIMAL*...B.B$.I$...L..
C(B$).0 . 100...V.. C(B$)..8 . 100.....B
.0.....D.0.(.... I.1 . 8.W.... J(B$,I,1)
."1" . B.B.1:D.D.2.(8.I):. 7090.S.... J(
B$,I,1)."0" . B.B.1.{.... I...F.. 5030..
..'. *PRINT RESULTS*....'.".DECIMAL=";D.
D.$'." HEX= ";HD$.Y..'." BINARY= ";BI
$...8'.:.:. 110...
> CLICK IMAGE PREVIEW FOR FULL MODAL