esp8266连接阿里云远程开门(lua编程)

一、esp8266连接wifi

wifi.setmode(wifi.STATION)
MQTTconnectFlag="Wait..."
ip="Wait..."

cfg={}
cfg.ssid="《wifi名》"
cfg.pwd="《wifi密码》"

wifi.sta.config(cfg)

wifi.eventmon.register(wifi.eventmon.STA_GOT_IP, function(T)
print("Connected, IP is "..wifi.sta.getip())
ip=wifi.sta.getip()
dofile("s51.lua")
end)

wifi.eventmon.register(wifi.eventmon.STA_DISCONNECTED, function(T)
print("wifi disconnect")
end)

二、esp8266输出pwm波控制舵机;用dht11采集温湿度上传阿里云

dhtp=1
pin=4
jdqp=2
pwm.setup(pin, 50, 130)
pwm.start(pin)

sv=net.createServer(net.TCP,30)
sv:listen(81,function(c)
c:on("receive", function(c,msg)
print(msg)
if msg=="1" then
do
pwm.setduty(pin, 70)
tmr.delay(3000000)
end

 do
     pwm.setduty(pin, 130)
     tmr.delay(3000000)
  end
  end

end)
end)

gpio.mode(dhtp, gpio.INPUT)
gpio.mode(jdqp, gpio.OUTPUT)
gpio.write(jdqp, 1)

json="N/A"
wd="N/A"
sd="N/A"
js="N/A"
fs="N/A"
rw="N/A"
rw="N/A"
hw="N/A"
MQTTconnectFlag="N/A"
sj=0
ww="0"
ss="0"
flag=1
jc=1
jx=0

ProductKey ="a1ho0OSpiyR"
ClientId =wifi.sta.getmac()
DeviceName ="xiaowu"
DeviceSecret="HArCY6rc2FH4kTYtTBVPbqzLRR9Yzt29"
RegionId="cn-shanghai"

myMQTTport=1883
myMQTT=nil

myMQTThost=ProductKey..".iot-as-mqtt."..RegionId..".aliyuncs.com" --host
myMQTTusername=DeviceName.."&"..ProductKey

t1="/a1ho0OSpiyR/xiaowu/user/topic0"
t2="/a1ho0OSpiyR/xiaowu/user/get"
sb="/sys/a1ho0OSpiyR/xiaowu/thing/event/property/post"

function GetNetTime()
sntp.sync({"203.107.6.88","0.nodemcu.pool.ntp.org","1.nodemcu.pool.ntp.org","2.nodemcu.pool.ntp.org","3.nodemcu.pool.ntp.org","www.beijing-time.org"},
function(sec, usec, server, info)
print('sync', sec, usec, server,info)
sj=sec-5
sj2=string.format(sec.."000")
print(sj2)
end,
function()
print("get time error")
end)
return sj
end

myMQTTtimes='6666'
hmacdata="clientId"..ClientId.."deviceName"..DeviceName.."productKey"..ProductKey.."timestamp"..myMQTTtimes
myMQTTpassword=crypto.toHex(crypto.hmac("sha1",hmacdata,DeviceSecret))
myMQTTClientId=ClientId.."|securemode=3,signmethod=hmacsha1,timestamp="..myMQTTtimes.."|"

myMQTT=mqtt.Client(myMQTTClientId, 120,myMQTTusername,myMQTTpassword)

MQTTconnectFlag=0
tmr.alarm(0,1000,1,function()
if myMQTT~=nil then
print("Attempting client connect...")
myMQTT:connect(myMQTThost, myMQTTport,0,MQTTSuccess,MQTTFailed)
end
end)

function MQTTSuccess(client)
print("MQTT connected")
client:subscribe({t1=0,t2=0}, function(conn)
print("subscribe success")
end)
myMQTT=client
MQTTconnectFlag=1
ms="CONNCET"
tmr.stop(0)
end

function MQTTFailed(client,reson)
print("Fail reson:"..reson)
MQTTconnectFlag=0
ms="FILED"
tmr.start(0)
end

myMQTT:on("offline", function(client)
print ("offline")
tmr.start(0)
end)

print(q)
myMQTT:on("message", function(client, topic, data)
print(topic ..":")
if data ~= nil then
print(data)
if data=="11" then
gpio.write(1,1)
elseif data=="0" then
client:publish(sb,q,0,0,function(client) print("updata ok!") end)
elseif string.find(data,[[{"BinarySwitch":0}]])~=nil
then
do
pwm.setduty(pin, 70)
tmr.delay(3000000)
end

 do
     pwm.setduty(pin, 130)
     tmr.delay(3000000)
       end

end
end

end)
function cj()
z,wd,sd,x,y=dht.read11(dhtp)
if wd~=-999 and sd~=-999 then
ww=wd
ss=sd
end
jdqs=gpio.read(jdqp)
if jdqs==1 then
jdq="ON"
else
jdq="OFF"
end
end

function sc()
json=string.format([[{
"id": "123",
"version": "1.0",
"params": {
"CurrentTemperature": {
"value": %d,
"time": %s
},
"CurrentHumidity": {
"value": %d,
"time": %s
},
"BinarySwitch": {
"value":%d,
"time": %s
}
},
"method": "thing.event.property.post"
}]],ww,sj2,ss,sj2,jdqs,sj2)
end
tmr.alarm(2,20000,1,function()
tmr.alarm(1, 5000, 1, function()
sj=sj+5
if MQTTconnectFlag==1 and myMQTT~=nil then
sj2=string.format(sj.."000")
cj()
sc()
myMQTT:publish(sb,json,0,0,function(client)
print("send ok" )
end)
end
tmr.alarm(3,1500,1,function()

a=gpio.read(3)
tmr.delay(1000000)
c=gpio.read(3)
if a==1 and c ==0 then
    jx=jx+1
    
end

end)

end)
GetNetTime()
end)

注:本源码大多参考网上大神的例程,我只是稍加 修改拿来用的!

©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 204,793评论 6 478
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 87,567评论 2 381
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 151,342评论 0 338
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 54,825评论 1 277
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 63,814评论 5 368
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 48,680评论 1 281
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 38,033评论 3 399
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 36,687评论 0 258
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 42,175评论 1 300
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 35,668评论 2 321
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 37,775评论 1 332
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 33,419评论 4 321
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 39,020评论 3 307
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 29,978评论 0 19
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 31,206评论 1 260
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 45,092评论 2 351
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 42,510评论 2 343

推荐阅读更多精彩内容