NAME=JBHexDec
AUTHOR=
ITEM=function JBHexDec(hexa$)
DESCRIPTION=Function to convert hexadecimals to decimals.
OUTSIDE CODE=

function JBHexDec(hexa$)
    digits$ = "123456789ABCDEF"
    num = 1
    for i = len(hexa$) to 1 step -1
        a = instr(digits$, mid$(hexa$, i, 1))
        JBHexDec = JBHexDec + a * num
        num = num * 16
    next i
end function