我正在尝试创建一个Lua程序来监视从设备的周期状态ping。从设备以16位十六进制字发送其状态,我需要将其转换为二进制字符串,因为每个位都与设备的属性有关。我可以收到输入字符串,并且每个参数都有一个包含16个键的表。但我很难理解如何将十六进制字转换为16位字符串,以便我可以监控它。
这是我开始研究的基本功能。
function slave_Status(IP,Port,Name)
status = path:read(IP,Port)
sTable = {}
if status then
sTable.ready=bit32.rshift(status:byte(1), 0)
sTable.paused=bit32.rshift(status:byte(1), 1)
sTable.emergency=bit32.rshift(status:byte(1), 2)
sTable.started=bit32.rshift(status:byte(1), 3)
sTable.busy=bit32.rshift(status:byte(1), 4)
sTable.reserved1=bit32.rshift(status:byte(1), 5)
sTable.reserved2=bit32.rshift(status:byte(1), 6)
sTable.reserved3=bit32.rshift(status:byte(1), 7)
sTable.reserved4=bit32.rshift(status:byte(2), 0)
sTable.delay1=bit32.rshift(status:byte(2), 1)
sTable.delay2=bit32.rshift(status:byte(2), 2)
sTable.armoff=bit32.rshift(status:byte(2), 3)
sTable.shieldoff=bit32.rshift(status:byte(2), 4)
sTable.diskerror=bit32.rshift(status:byte(2), 5)
sTable.conoff=bit32.rshift(status:byte(2), 6)
sTable.envoff=bit32.rshift(status:byte(2), 7)
end
end
我希望这种方法可以理解吗?我想收到Hex字符串,例如0x18C2
并将其转换为0001 1000 1100 0010
,将最右边的位向右移动并将其放入正确的密钥中。然后在函数中,我将监视该位是否变好或变坏。
如果我在Linux中的终结者中运行类似的功能,并打印出对,我得到以下回报:
49
24
12
6
3
1
0
0
56
28
14
7
3
1
0
0
这是我不理解如何获取每个值并将其设置为位
的地方我对此很新,所以我不怀疑有更简单的方法可以做到这一点。如果我需要进一步解释,我会尝试。
答案 0 :(得分:3)
tonumber(s, 16)
会将十六进制表示转换为十进制,string.char
将返回一个数字的符号/字节表示。请查看此recent SO answer以获取如何使用它们的示例;答案中的解决方案可能适合您。
答案 1 :(得分:2)
我以不同于保罗建议的方式来处理这个问题。
首先,创建一个存储设备属性的表:
local tProperty = {
"ready",
"paused",
"emergency",
"started",
"busy",
"reserved1",
"reserved2",
"reserved3",
"reserved4",
"delay1",
"delay2",
"armoff",
"shieldoff",
"diskerror",
"conoff",
"envoff",
}
然后,由于您的设备将数据发送为0xYYYY
,因此您可以直接调用tonumber
(如果不是字符串)。使用函数将每个位存储在表中:
function BitConvert( sInput )
local tReturn, iNum = {}, tonumber( sInput ) -- optionally pass 16 as second argument to tonumber
while iNum > 0 do
table.insert( tReturn, 1, iNum % 2 )
iNum = math.floor( iNum / 2 )
end
for i = #tProperty - #tReturn, 1, -1 do
table.insert( tReturn, 1, 0 )
end
return tReturn
end
然后,将两个表格映射在一起:
function Map( tKeys, tValues )
local tReturn = {}
for i = 1, #tKeys do
tReturn[ tKeys[i] ] = tValues[i]
end
return tReturn
end
最后,您将拥有:
function slave_Status( IP, Port, Name )
local status = path:read( IP, Port )
local sTable = Map( tProperty, BitConvert(status) )
end