Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Binary to Hex Conversion
Message
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00036266
Message ID:
00036288
Views:
64
>>I need to convert a binary number to Hex, and vice-versa. It's been a long time since I've done this. Does anyone have some code that will do this for me?
>>
>>The binary number will look something like: 1100001111010001 (It will be as much as 16 digits)
>>
>>Craig
>
>Hi Craig,
>
>I'd suggest a two step approach, the first being to convert the binary string to an integer, then covert the integer to hex. I recently saw a routine to do the latter conversion, so here's the first part:
>
>FUNCTION BStr2Int
>
>LPARAMETER pc_bstr
>
>LOCAL lnresult, lni, lnj, lnlast
>lnlast = LEN(pc_bstr)
>lnj = -1
>lnresult = 0
>FOR lni = lnlast TO 1 STEP -1
> lnj = lnj + 1
> lnresult = lnresult + (VAL(SUBSTR(pc_bstr, lni, 1)) * (2 ^ lnj))
>NEXT
>RETURN lnresult
>
>Regards,
>
>George

shouldn't even be that much work. every four places in binary will equal one hex 'digit'. have to read right to left, of course, so your example (1100 0011 1101 0001) would read B3C1. just 8 + 4 + 2 + 1 to the hex 'digit' for each group. hex to binary is just as easy.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform