论武天地论坛

 找回密码
 立即注册
搜索
查看: 3779|回复: 0

2.5-Air302(NB-IOT)-基础外设-串口(485/422),CRC校验

[复制链接]

58

主题

58

帖子

244

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
244
发表于 2020-10-11 16:55:10 | 显示全部楼层 |阅读模式


电路说明
模块有三个串口:
日志打印口: HOST_TXD;HOST_RXD
AT/程序下载口: UART1_TXD;UART1_RXD
串口2: UART2_TXD;UART2_RXD  (连接了485/422)
819239-20201011052309649-1839718861.png



配置串口2,接收到什么回什么
819239-20201011054437723-1145977875.png


local UART_ID=2 --串口2


-- 订阅串口发布消息的主题
sys.subscribe("uart_write", function(data)
    uart.write(UART_ID, data) --返回接收的数据
end)


uart.on(UART_ID, "receive", function(id, len)
    local data = uart.read(id, 1024)
    sys.publish("uart_write", data) --发布主题为 uart_write 的消息
end)
-- 配置串口2,波特率115200,8位数据位.1位停止位,无校验位,小端模式,缓存大小1024字节
uart.setup(UART_ID, 115200,8,1,uart.None,uart.LSB,1024)


485接法
819239-20201011054814697-1560376483.png




422接法
819239-20201011055124947-1282094270.png




819239-20201011055232990-665237248.png


处理串口数据
1.字符串
819239-20201011055530783-855884610.png



819239-20201011055646127-1885521176.png




2.16进制数据
819239-20201011114018413-785120536.png




sys.subscribe("uart_write", function(data)
    if  data == "123"  then --接收到 "123" 返回 "456"
        uart.write(UART_ID, "456") --返回接收的数据
    end


    --接收到 0xaa 0x55  返回 0x01 0x03
    if  data:byte(1) == 0xaa and data:byte(2) == 0x55 then
        local hexdata = string.char(0x01, 0x03)
        uart.write(UART_ID,hexdata)--返回数据
    end


end)



819239-20201011114049344-1764818959.png



--计算crc  报错,有时间再询问官方
    local RevLen = string.len (data)

    local i; local datatable={};
    for  i=1,RevLen do
         datatable = data:byte(i);
    end
    log.info("CRC16=", CRC16(datatable,RevLen));




--计算CRC
function  CRC16(modbusdata,length)
    local i=0;local j=0;local crc=0;local k=1;local l=1;

    for k=1 ,length do
        crc = bit.bxor(crc,modbusdata[k])
        for l=1,8 do
            if  bit.band(crc,1) == 1 then
                crc = bit.rshift(crc,1);
                crc = bit.bxor(crc,0xa001);
            else
                crc = bit.rshift(crc,1);
            end
        end
    end
    return crc;
end

function CRC16Flage(modbusdata,length)
    local Receive_CRC = 0;local calculation = 1;
    Receive_CRC = CRC16(modbusdata,length-2)
    calculation = modbusdata[length];
    calculation = calculation * 256;
    calculation = calculation + modbusdata[length-1];
    if  Receive_CRC == calculation then
        return 1;
    else
        return 0;   
    end
end






copycode.gif
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|论武天地论坛

GMT+8, 2024-3-29 23:04 , Processed in 0.075120 second(s), 21 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表