想问一件事情--,,,代码有没有专门的显示的..比如说插入代码什么的????
一些时间去准备朋友的元器件了...
接着写,,争取今天写完所有的文章,,因为答应了朋友下周5之前要做好朋友的东西
对于TCP大家在玩AT指令的时候有没有发现客户端最多连接5个,,,再连接就不行了??
所以在用AT指令开发的时候单片机程序一定要记得清除多余的连接
现在看用LUA语言怎么做
直接先上菜
Init.lua
gpio.mode(4,gpio.OUTPUT)
gpio.mode(2,gpio.OUTPUT)
gpio.write(4,1)
tmr.alarm(0,1000,1, function()
gpio.write(4,1-gpio.read(4))
end)
tmr.alarm(1,1000,0, function()
dofile("wifi.lua")
end)
wifi.lua
wifi.setmode(wifi.STATIONAP)
cfg={}
cfg.ssid="Hellow8266"cfg.pwd="11223344"wifi.ap.config(cfg)
apcfg={}
apcfg.ssid="qqqqq"apcfg.pwd="11223344"wifi.sta.config(apcfg)
wifi.sta.connect()
TCPSever=net.createServer(net.TCP,28800)
TcpConnectCnt=0TcpSocketTable={}
TCPSever:listen(8080,function(socket)ifTcpConnectCnt ==4thenifTcpSocketTable[0] ~=nil then
TcpSocketTable[0]:close()
TcpSocketTable[0] =nil
endelseifTcpSocketTable[TcpConnectCnt+1] ~=nil then
TcpSocketTable[TcpConnectCnt+1]:close()
TcpSocketTable[TcpConnectCnt+1] =nil
end
end
TcpSocketTable[TcpConnectCnt]=socket
print(TcpConnectCnt.."-Connect")
TcpConnectCnt= TcpConnectCnt +1ifTcpConnectCnt ==5then
TcpConnectCnt=0end
socket:on("receive",function(socket,data)
uart.write(0,data)
end)
socket:on("disconnection",function(sck,c)fori=0,4doifTcpSocketTable[i] ==sck then
TcpSocketTable[i]=nil
print(i.."-Disconnect")
end
end
end)
end)
uart.on("data",0,function(data)fori=0,5doifTcpSocketTable[i] ~=nil then
TcpSocketTable[i]:send(data)
end
end
end,0)
printip=0wifi.eventmon.register(wifi.eventmon.STA_DISCONNECTED, function(T)
printip=0end)
wifi.eventmon.register(wifi.eventmon.STA_GOT_IP, function(T)ifprintip ==0then
print("+IP"..T.IP)
end
printip=1end)
下面看解释.............
wifi.setmode(wifi.STATIONAP)--模式AP+STATION就不说了
cfg={}
cfg.ssid="Hellow8266"cfg.pwd="11223344"wifi.ap.config(cfg)--设置模块的无线和密码
apcfg={}
apcfg.ssid="qqqqq"apcfg.pwd="11223344"wifi.sta.config(apcfg)--设置模块连接路由器的无线和密码--wifi.sta.connect()连接路由器,断开后可能就不自动连接了,可以用下面的
wifi.sta.autoconnect(1)可以用这个断开后自动连接路由器
TCPSever=net.createServer(net.TCP,28800) --创建服务器超过28800S不通信断开已有的连接
TcpConnectCnt=0--连接个数计数
TcpSocketTable={}--存储socket
TCPSever:listen(8080,function(socket)
如果0号连接就把1号关掉,,,1号连接就把2号关掉....4号连接就把0号关掉,这样子循环,
当然您会问可以连接5个,,这样子只可以连接四个了,,,为什么....因为如果连接了5个就进不
来这个监听函数了.......所以必须留下一个空位ifTcpConnectCnt ==4thenifTcpSocketTable[0] ~=nil then
TcpSocketTable[0]:close()
TcpSocketTable[0] =nil
endelseifTcpSocketTable[TcpConnectCnt+1] ~=nil then
TcpSocketTable[TcpConnectCnt+1]:close()
TcpSocketTable[TcpConnectCnt+1] =nil
end
end
TcpSocketTable[TcpConnectCnt]= socket--把连接的socket存到数组
print(TcpConnectCnt.."-Connect")--打印几号连接了 对了 .. 是连接符
TcpConnectCnt= TcpConnectCnt +1--连接个数加一ifTcpConnectCnt ==5then --归零
TcpConnectCnt=0end
socket:on("receive",function(socket,data)
uart.write(0,data) --把接收到的数据发到串口
end)
socket:on("disconnection",function(sck,c)fori=0,4do--判断是哪个断开了连接,,就把对应的socket变量置为 nilifTcpSocketTable[i] ==sck then
TcpSocketTable[i]=nil
print(i.."-Disconnect")
end
end
end)
end)
uart.on("data",0,function(data)fori=0,4do--把串口的数据发向不为 nil 的连接ifTcpSocketTable[i] ~=nil then
TcpSocketTable[i]:send(data)
end
end
end,0)--下面是连接路由器和没有连接路由器的监听函数,,好像是1S检测一次
printip=0wifi.eventmon.register(wifi.eventmon.STA_DISCONNECTED, function(T)
printip=0end)
wifi.eventmon.register(wifi.eventmon.STA_GOT_IP, function(T)ifprintip ==0then
print("+IP"..T.IP)
end
printip=1end)
现在把程序下进去
测试软件呢在这里下载--也可以自己下载个网络调试助手
https://item.taobao.com/item.htm?spm=686.1000925.0.0.4a155084jlU4Rd&id=558508797404
连接了路由器了....
第一个连接
测试数据
再来几个连接
现在再连接一个
我现在随意断开一个,看一看串口应该打印哪一个断开了连接
现在发数据
好现在呢控制就用多个客户端控制继电器
http://www.cnblogs.com/yangfengwu/p/7513097.html
这篇文章最后的指令,,毕竟最终咱们就要做成那样子.....这样的话8266就应该使用的非常顺手和轻松了
对了在
http://www.cnblogs.com/yangfengwu/p/7520260.html
和http://www.cnblogs.com/yangfengwu/p/7524326.html
这篇两文章中有提及......这次是用多个TCP客户端控制,,还会加上CRC校验
可以直接用软件上的这两个按钮控制
先写不带CRC校验数据的
为了是程序好浏览,,就定义一个函数,,然后调用
现在的wifi.lua
wifi.setmode(wifi.STATIONAP)
cfg={}
cfg.ssid="Hellow8266"cfg.pwd="11223344"wifi.ap.config(cfg)
apcfg={}
apcfg.ssid="qqqqq"apcfg.pwd="11223344"wifi.sta.config(apcfg)
wifi.sta.connect()
TCPSever=net.createServer(net.TCP,28800)
TcpConnectCnt=0TcpSocketTable={}
TCPSever:listen(8080,function(socket)ifTcpConnectCnt ==4thenifTcpSocketTable[0] ~=nil then
TcpSocketTable[0]:close()
TcpSocketTable[0] =nil
endelseifTcpSocketTable[TcpConnectCnt+1] ~=nil then
TcpSocketTable[TcpConnectCnt+1]:close()
TcpSocketTable[TcpConnectCnt+1] =nil
end
end
TcpSocketTable[TcpConnectCnt]=socket
print(TcpConnectCnt.."-Connect")
TcpConnectCnt= TcpConnectCnt +1ifTcpConnectCnt ==5then
TcpConnectCnt=0end
socket:on("receive",function(socket,data)
uart.write(0,data)
control(data)
end)
socket:on("disconnection",function(sck,c)fori=0,4doifTcpSocketTable[i] ==sck then
TcpSocketTable[i]=nil
print(i.."-Disconnect")
end
end
end)
end)
function control(data)ifdata =="++MD610"then
gpio.write(2,1)
print("Relay=1")
endifdata =="++MD600"then
gpio.write(2,0)
print("Relay=0")
end
end
uart.on("data",0,function(data)fori=0,4doifTcpSocketTable[i] ~=nil then
TcpSocketTable[i]:send(data)
end
end
end,0)
printip=0wifi.eventmon.register(wifi.eventmon.STA_DISCONNECTED, function(T)
printip=0end)
wifi.eventmon.register(wifi.eventmon.STA_GOT_IP, function(T)ifprintip ==0then
print("+IP"..T.IP)
end
printip=1end)
好现在控制一下
现在用另一个断开
对了最好把信息发给网络对不对,,,控制一下最好通过网络有一个回复
现在的wifi.lua
wifi.setmode(wifi.STATIONAP)
cfg={}
cfg.ssid="Hellow8266"cfg.pwd="11223344"wifi.ap.config(cfg)
apcfg={}
apcfg.ssid="qqqqq"apcfg.pwd="11223344"wifi.sta.config(apcfg)
wifi.sta.connect()
TCPSever=net.createServer(net.TCP,28800)
TcpConnectCnt=0TcpSocketTable={}
NowSocket=nil
TCPSever:listen(8080,function(socket)ifTcpConnectCnt ==4thenifTcpSocketTable[0] ~=nil then
TcpSocketTable[0]:close()
TcpSocketTable[0] =nil
endelseifTcpSocketTable[TcpConnectCnt+1] ~=nil then
TcpSocketTable[TcpConnectCnt+1]:close()
TcpSocketTable[TcpConnectCnt+1] =nil
end
end
TcpSocketTable[TcpConnectCnt]=socket
print(TcpConnectCnt.."-Connect")
TcpConnectCnt= TcpConnectCnt +1ifTcpConnectCnt ==5then
TcpConnectCnt=0end
socket:on("receive",function(socket,data)
NowSocket=socket
uart.write(0,data)
control(data)
end)
socket:on("disconnection",function(sck,c)fori=0,4doifTcpSocketTable[i] ==sck then
TcpSocketTable[i]=nil
print(i.."-Disconnect")
end
end
end)
end)
function control(data)ifdata =="++MD610"then
gpio.write(2,1)
print("Relay=1")ifNowSocket ~=nil then
NowSocket:send("Relay=1")
NowSocket=nil
end
endifdata =="++MD600"then
gpio.write(2,0)
print("Relay=0")ifNowSocket ~=nil then
NowSocket:send("Relay=0")
NowSocket=nil
end
end
end
uart.on("data",0,function(data)fori=0,4doifTcpSocketTable[i] ~=nil then
TcpSocketTable[i]:send(data)
end
end
end,0)
printip=0wifi.eventmon.register(wifi.eventmon.STA_DISCONNECTED, function(T)
printip=0end)
wifi.eventmon.register(wifi.eventmon.STA_GOT_IP, function(T)ifprintip ==0then
print("+IP"..T.IP)
end
printip=1end)
好了现在加入CRC16校验数据
现在的wifi.lua
wifi.setmode(wifi.STATIONAP)
cfg={}
cfg.ssid="Hellow8266"cfg.pwd="11223344"wifi.ap.config(cfg)
apcfg={}
apcfg.ssid="qqqqq"apcfg.pwd="11223344"wifi.sta.config(apcfg)
wifi.sta.connect()
TCPSever=net.createServer(net.TCP,28800)
TcpConnectCnt=0TcpSocketTable={}
NowSocket=nil
TCPSever:listen(8080,function(socket)ifTcpConnectCnt ==4thenifTcpSocketTable[0] ~=nil then
TcpSocketTable[0]:close()
TcpSocketTable[0] =nil
endelseifTcpSocketTable[TcpConnectCnt+1] ~=nil then
TcpSocketTable[TcpConnectCnt+1]:close()
TcpSocketTable[TcpConnectCnt+1] =nil
end
end
TcpSocketTable[TcpConnectCnt]=socket
print(TcpConnectCnt.."-Connect")
TcpConnectCnt= TcpConnectCnt +1ifTcpConnectCnt ==5then
TcpConnectCnt=0end
socket:on("receive",function(socket,data)
NowSocket=socket
uart.write(0,data)
control(data)
end)
socket:on("disconnection",function(sck,c)fori=0,4doifTcpSocketTable[i] ==sck then
TcpSocketTable[i]=nil
print(i.."-Disconnect")
end
end
end)
end)
function control(data)
local RevLen=string.len (data)
local crc= ow.crc16(string.sub(data,1,RevLen-2))
local recrc= data:byte(RevLen)
local recrc= recrc*256local recrc= recrc + data:byte(RevLen-1)ifcrc ==recrc thenifstring.sub(data,1,7) =="++MD610"then
gpio.write(2,1)
print("Relay=1")ifNowSocket ~=nil then
NowSocket:send("Relay=1")
NowSocket=nil
end
endifstring.sub(data,1,7) =="++MD600"then
gpio.write(2,0)
print("Relay=0")ifNowSocket ~=nil then
NowSocket:send("Relay=0")
NowSocket=nil
end
endelseifNowSocket ~=nil then
NowSocket:send("CRC16 Faild")
NowSocket=nil
end
end
end
uart.on("data",0,function(data)fori=0,4doifTcpSocketTable[i] ~=nil then
TcpSocketTable[i]:send(data)
end
end
end,0)
printip=0wifi.eventmon.register(wifi.eventmon.STA_DISCONNECTED, function(T)
printip=0end)
wifi.eventmon.register(wifi.eventmon.STA_GOT_IP, function(T)ifprintip ==0then
print("+IP"..T.IP)
end
printip=1end)
他呢,,参数要填写字符串
上位机的CRC计算函数
//////////////////privateintcrc16_modbus(byte[] modbusdata,intlength)
{inti, j;intcrc =0x0;try{for(i =0; i < length; i++)
{
crc^=modbusdata[i];for(j =0; j <8; j++)
{if((crc &0x01) ==1)
{
crc= (crc >>1) ^0xa001;
}else{
crc>>=1;
}
}
}
}catch(Exception)
{throw;
}returncrc;
}
我的置高继电器函数
privatevoidbutton7_Click_1(objectsender, EventArgs e)
{byte[] sendbyte =newbyte[7];
sendbyte[0] = (byte)'+';//2Bsendbyte[1] = (byte)'+';
sendbyte[2] = (byte)'M';//4Dsendbyte[3] = (byte)'D';//44sendbyte[4] = (byte)'6';//6sendbyte[5] = (byte)'1';//1if(comboBox3.Text=="继电器")//pin2{
sendbyte[6] = (byte)'0';
}elseif(comboBox3.Text =="CS")//pin8{
sendbyte[6] = (byte)'1';
}elseif(comboBox3.Text =="MOSI")//pin7{
sendbyte[6] = (byte)'2';
}elseif(comboBox3.Text =="MISO")//pin6{
sendbyte[6] = (byte)'3';
}elseif(comboBox3.Text =="CLK")//pin5{
sendbyte[6] = (byte)'4';
}if(radioButtonNetCon.Checked)//网络发送{
TcpSendDataMethod(sendbyte);
}elseif(radioButtonSerialCon.Checked)//串口发送{
SerialSend(sendbyte);
}
}////////////privatevoidTcpSendDataMethod(byte[] byt)
{intcrc =0;byte[] sendbyte =newbyte[byt.Length +2];for(inti =0; i < byt.Length; i++)
{
sendbyte[i]=byt[i];
}
crc= crc16_modbus(byt, byt.Length);//计算CRCbyte[] Crcbyte = System.BitConverter.GetBytes(crc);//得到CRCsendbyte[sendbyte.Length-2] = Crcbyte[0];
sendbyte[sendbyte.Length-1] = Crcbyte[1];try{ networkstrem.Write(sendbyte,0, sendbyte.Length); }catch(Exception) { MessageBox.Show("请检查连接","提示!"); }
}
还要说一点让8266计算CRC,发现8266存储数据是大端模式......
好了现在测试一下用软件的按钮控制
好啦终于这完这一篇了....累..真心的累.............