Converting Numbers To Hexidecimal

[WillieLucas]

Does Alpha5v4 Support converting numbers to hexidecimal if not is there anyway to do it. Your help will be greatly appreciated

[Tom Cone Jr]

RE: Converting Numbers To Hexidecimal

I can't find anything in the manual that answers this question.

If you know the range of values you want to convert, and you have the time and energy, I suppose you could build a lookup table by hand.

A BASIC programmer could probably output the list for you as a comma separated values, which could then be imported into the Lookup table. This assumes of course that you know the range of values you want included...

I might have time to fool with this over the weekend if you don't get any better suggestions from others in this forum.

-- tom

[csda1]

RE: Converting Numbers To Hexidecimal

William,

Create a global script function like the code below. Call it by passing a numeric value similar to

Dec2Hex(123)
Dec2Hex(-123)
Dec2Hex(123.45)
Dec2Hex(-123.45)
Dec2Hex(numeric_expression)



[b]function Dec2Hex as C(Number as N)
' Convert Number to HexaDecimal

' This contains the maximum number of fractional digits allowed
' it could be an additional parameter in the function too
places=5

Dec2Hex=""

' Compute the Integer portion
i=INT(ABS(number))
h=""
while i>0
h=SUBSTR("0123456789ABCDEF",MOD(i,16)+1,1)+h
i=INT(i/16)
END WHILE

' Compute the Fractional portion
p=0
i=ABS(number)-INT(ABS(number))
IF i>0.and.p0.and.p

[whanigsberg]

RE: Converting Numbers To Hexidecimal

hats off!

[Tom Cone Jr]

RE: Converting Numbers To Hexidecimal

It definitely looks as though I can leave my old BASIC books on the shelf a while longer!

Way to go Ira!

-- tom

[csda1]

RE: Converting Numbers To Hexidecimal

Tom,

Thank you for your e-mail note. Yes, you are correct that the board "Ate my homework". The correct code (hopefully) is;

function Dec2Hex as C(Number as N)
' Convert Number to HexaDecimal

' This contains the maximum number of fractional digits allowed
' it could be an additional parameter in the function too
places=5

Dec2Hex=""

' Compute the Integer portion
i=INT(ABS(number))
h=""
while i>0
h=SUBSTR("0123456789ABCDEF",MOD(i,16)+1,1)+h
i=INT(i/16)
END WHILE

' Compute the Fractional portion
p=0
i=ABS(number)-INT(ABS(number))
IF i>0.and.places>p
h=h+"."
while i>0.and.places>p
h=h+SUBSTR("0123456789ABCDEF",INT(i*16)+1,1)
i=(i*16)-INT(i*16)
p=p+1
END WHILE
END IF

' Add negative if less than 0
IF 0>number
h="-"+h
END IF

Dec2Hex=h

end function


Regards,

Ira J. Perlow
Computer Systems Design & Associates
[email protected]

[whanigsberg]

RE: Converting Numbers To Hexidecimal

Hi Ira and everyone,

Ira, my hat is still off event though "...the board "Ate my homework..."

Someday I should probably post the technology-enhanced and new-age-lifestyle based excuses students now give for damaged and absent course work.

You will easily be able to invent the the obvious "hard disk crash" and similar excuses. Incompatible versions of word processing software are prevalent.

But what is one to think of "I left it in my other car" and (as God is my witness, I am not making this up) "I can't write when I'm in love."

And then there are the pagers and cell phones going off in class....

Am I an old fogey or what?
Bill

[Selig Starr]

RE: Converting Numbers To Hexidecimal

Ira,
Iknew you would come up with a detailed conversion
from decimal to hex. I tried a less ambtious goal,
dealing with posutve integers and a limited range.
I was not sucessful. Here is my abortive effort.

Appreciate any comments from you or anyone on this
board on where I havw gone wrong.

I thought I would try my hand at creating a funnction HEX to convert
decimal to hexadecimal. My effort below does not work. It works fine
for numbers 1 to 14 and fails on numbers =>15.

I can understand why it might not work for numbers greater than 15
although I thought my logic was OK (ha ha).

However the failure for N=15 puzzles me. The function HEX2, below, is
exactly like the first part of HEX and it works fine.

Another point. When I use the STR(N.1) function it shows result