NAME=JBBinDec
AUTHOR=
ITEM=function JBBinDec(binary$)
DESCRIPTION=Function to convert binary numbers to decimal integers.
OUTSIDE CODE=

function JBBinDec(binary$)
    num = 1
    for i = len(binary$) to 1 step -1
        if mid$(binary$, i, 1) = "1" then JBBinDec = JBBinDec + num
        num = num*2
    next i
end function