bpack=string.pack
bunpack=string.unpack
-- 输出二进制
function hex(s)
s=string.gsub(s,"(.)",function (x) return string.format("%02X",string.byte(x)) end)
return s
end
--解包传入的是hex和FMT(><大小端)，输出是FMT指定的类型：i int, n lua_num
--i=12345 f="i"
--a=bpack(f,i,i,i)
--print(hex(a))
--print(bunpack(a,f))
--打包输入fmt，实际类型，输出hex
local n = 0x12345678
--tb = {}
--dump(tb)
--tb = n
--dump(tb)
a = bpack('>n', n)
dump(hex(a))