新手lua十进制转换十六进制

function ReadHexString()
local num = "xfgyiuggf 0.456 mv"
local a,b = string.match(num,"%D*(%d+)%.?(%d*)")
local ret1 = ""
a = tonumber(a)
local multiple = 0


if a ~= 0 then
while a > 0 do
local decimal = tostring( a % 16 )
if decimal == "10" then
decimal = "A"
elseif decimal == "11" then
decimal = "B"
elseif decimal == "12" then
decimal = "C"
elseif decimal == "13" then
decimal = "D"
elseif decimal == "14" then
deciaml = "E"
elseif decimal =="15" then
decimal = "F"
end
a = math.floor( a / 16 )
ret1 = decimal..ret1
multiple = multiple + 1
end
-- print (ret1)
else
ret1 = "0"
end


local ret = "."
if tonumber (b) == 0 then
print (ret1.."."..b)
elseif b ~= nil then
b = "0."..b
b = tonumber(b)
local decimal = 0
local multiple = 0
while multiple < 5 do
b = b * 16
decimal = string.match(b,"(%d+)%.")
b = b - tonumber(decimal)
if decimal == "10" then
decimal = "A"
elseif decimal == "11" then
decimal = "B"
elseif decimal == "12" then
decimal = "C"
elseif decimal == "13" then
decimal = "D"
elseif decimal == "14" then
deciaml = "E"
elseif decimal =="15" then
decimal = "F"
end
ret = ret..decimal
multiple = multiple + 1
end
print (ret1..ret)
else
print (ret)
end
end


ReadHexString()