@TOC

一、Lora介绍

Lora不是一种协议，而是一种基于扩频通信的射频技术，它相对于其他射频技术比如2.4G或普通433/915M来讲，具有更远的传输距离（几千米）和更强的越障性能。所以我们把一个Lora设备作为中心点，多个Lora设备作为节点可以组成一个范围达几千米的星型网络。

上图中，中心点和某个节点的通信流程实现可参考如下模式：

二、例程实现功能介绍

某个Lora节点每隔2秒主动向中心点发送一包5字节的数据(1,2,3,4,5)，Lora中心点收到后将收到的数据每个都加1，作为应答内容返回给该节点。所以当该Lora节点收到(2,3,4,5,6)时即可判定正确收到了响应。节点每收到一次正确的响应时LED1灯会闪烁一次作为指示。

Core为Lora功能提供了十分简单的API函数，只需下面三个函数即可完成上面的功能。

LIB_LoraConfig()
LIB_LoraRecv()
LIB_LoraSend()

三、接线图

下图中Lora中心点和节点接法一样。

五、完整代码

这里只演示了Lora中心点和一个Lora节点的通信，实际应用中如果中心点需要和多个Lora节点通信，那么每个Lora节点的代码可以都一样，只需将每个节点的地址(addr)改成不一样的即可。同时建议每个节点的发送时间周期可以错开一些。

注意：受Lora模块硬件资源限制，通信中每包数据尽量不要太大，最好10字节以内。且Lora通信节点个数也不要超过20个为好。

Lora中心点代码：

--本机地址(范围：0-65535)，其他Lora节点如果需要发送消息给本机必须知道该地址
addr = 100 
--通信信道(范围：410-441MHz)，相互通信的Lora节点必须在同一信道
channel = 433
--无线速率(范围：0.3, 1.2, 4.8, 9.6, 19.2kpbs)，速率越低通信质量越高
baudrate = "9.6kpbs"
--发射功率(范围：11, 14, 17, 20dB)，该值越大通信质量越高，但功耗会增加
tx_pwr = "20dB"
--设置Lora模块占用TX0、RX0、Aux接D5引脚，Md0接D6引脚
--Lora通信参数:地址=100，通信信道=433M，无线速率=9.6kbps，发射功率=20dBm
LIB_LoraConfig("UART0","D5","D6",addr,channel,baudrate,tx_pwr)
--开始大循环
while(GC(1) == true)
do
    --查询是否收到数据，如果收到就应答
    recv_flag,recv_addr,recv_data = LIB_LoraRecv()
    if recv_flag == 1 then
        --将收到的数据全部加1作为应答返回给发送者
        for i = 1, #recv_data, 1 do 
            recv_data[i] = recv_data[i] + 1
        end
        LIB_LoraSend(recv_addr, recv_data)
    end
end

Lora节点代码：

--本机地址(范围：0-65535)，其他Lora节点如果需要发送消息给本机必须知道该地址
addr = 101 
--通信信道(范围：410-441MHz)，相互通信的Lora节点必须在同一信道
channel = 433
--无线速率(范围：0.3, 1.2, 4.8, 9.6, 19.2kpbs)，速率越低通信质量越高
baudrate = "9.6kpbs"
--发射功率(范围：11, 14, 17, 20dB)，该值越大通信质量越高，但功耗会增加
tx_pwr = "20dB"
--设置Lora模块占用TX0、RX0、Aux接D5引脚，Md0接D6引脚
--Lora通信参数:地址=100，通信信道=433M，无线速率=9.6kbps，发射功率=20dBm
LIB_LoraConfig("UART0","D5","D6",addr,channel,baudrate,tx_pwr)
--配置D8为普通输出,控制电路板上的LED1
LIB_GpioOutputConfig("D8","STANDARD")
--使能10毫秒定时器开始工作
LIB_10msTimerConfig("ENABLE")
cnt_10ms = 0
--定义10毫秒定时器的回调函数
function LIB_10msTimerCallback()
    cnt_10ms = cnt_10ms + 1
end
--此处延时1秒是为了等待Lora模块初始化过程完成
LIB_DelayMs(1000)
--开始大循环
while(GC(1) == true)
do
    --每2秒向地址为100的中心节点发送一包数据
    if cnt_10ms >= 200 then
        cnt_10ms = 0
        send_data = {1, 2, 3, 4, 5}
        LIB_LoraSend(100, send_data)
    end
    --查询是否收到中心节点应答的数据
    recv_flag,recv_addr,recv_data = LIB_LoraRecv()
    if recv_flag == 1 then
        --如果验证正确，闪烁一次LED1灯
        if recv_data[1] == 2 and recv_data[2] == 3 and recv_data[3] == 4 and recv_data[4] == 5 and recv_data[5] == 6 then
            LIB_GpioToggle("D8")
        end
    end
end

六、代码运行结果

通过实验我们可以看到Lora节点的的LED1灯每2秒钟闪烁一次，每闪烁一次就表示收到了Lora中心点的正确响应数据，从而反映出一次发送和接收流程的正确完成。

下图为Lora节点的实拍图：

更多详情请参看 shineblink.com官网链接