Skip to Content

Changes for page 2 Script

Last modified by Devin Chen on 2025/06/06 14:03
From version 16.1
edited by Leo Wei
on 2022/07/09 17:46
Change comment: There is no comment for this version
To version 33.1
edited by Hunter
on 2022/11/22 15:38
Change comment: There is no comment for this version

Summary

Details

Page properties
Author
... ... @@ -1,1 +1,1 @@
1 -XWiki.admin
1 +XWiki.Hunter
Content
... ... @@ -13,7 +13,7 @@
13 13  for example. addr_setshort(addr,num) Function: Write 16-bit signed decimal address
14 14  addr_getshort(addr) Function:Read 16-bit signed decimal address
15 15  addr_getword(string addr)Function: Read 16-bit unsigned decimal address
16 -More script function are in the second section of [[“V-BOX Script Interface Manual”>>doc:V-BOX.V-Net.1\.User Manual.04 Lua Script.01 Lua Functions.WebHome]]
16 +More script function are in the second section of [[“V-BOX Script Interface Manual”>>doc:V-BOX.V-Net.Manual.04 Lua Script.01 Lua Functions.WebHome]]
17 17  
18 18  == **1.2 Arithmetic** ==
19 19  
... ... @@ -36,39 +36,46 @@
36 36  
37 37  Script is as below:
38 38  
39 -{{code language="Lua"}}
39 +(% class="box infomessage" %)
40 +(((
40 40  function sms.main()
41 -------send condition------
42 +~-~-~-~-~-~-send condition~-~-~-~-~-~-
42 42  local temp1 = addr_getword("@Temperature1")
43 43  local temp2 = addr_getword("@Temperature2")
44 44  local temp3 = addr_getword("@Temperature3")
45 45  local timer = addr_getword("@Timer")
46 46  local tag = addr_getbit("@Tag")
47 -------lasting time------
48 +~-~-~-~-~-~-lasting time~-~-~-~-~-~-
48 48  if temp1 > 5 and temp2 > 10 and temp3 < 20 then
49 - timer = timer + 1
50 - addr_setword("@Timer",timer)
50 + timer = timer + 1
51 + addr_setword("@Timer",timer)
51 51  else
52 - timer = 0
53 - addr_setword("@Timer",timer)
53 + timer = 0
54 + addr_setword("@Timer",timer)
54 54  end
55 -------send sms & output Y0------
56 +~-~-~-~-~-~-send sms & output Y0~-~-~-~-~-~-
56 56  if timer > 5 then
57 - if tag == 0 then
58 - send_sms_ira("19859254700","alarm trigger")
59 - addr_setbit("@Tag",1)
60 - end
58 + if tag == 0 then
59 + send_sms_ira("19859254700","alarm trigger")
60 + addr_setbit("@Tag",1)
61 + end
61 61  elseif tag == 1 then
62 62  send_sms_ira("19859254700","alarm release")
63 63  addr_setbit("@Tag",0)
64 64  end
65 65  end
66 -{{/code}}
67 +)))
67 67  
68 68  == **1.5 Telegram notification** ==
69 69  
70 70  This example shows how to use the Bot API to send message into Telegram group or channel. When monitoring bit "@HDX" changes, it will trigger and send the message. Please replace with your own Token and chat id.
71 71  
73 +As for How to get the botToken and chatID, please check the followig videos:
74 +
75 +[[https:~~/~~/www.youtube.com/watch?v=zh6yYlnjX7k>>https://www.youtube.com/watch?v=zh6yYlnjX7k]]
76 +
77 +[[https:~~/~~/www.youtube.com/watch?v=Pj8mwuMZZvg>>https://www.youtube.com/watch?v=Pj8mwuMZZvg]]
78 +
72 72  {{code language="Lua"}}
73 73  local tempBit = 0
74 74  local tempWord = 0
... ... @@ -134,7 +134,312 @@
134 134  end
135 135  {{/code}}
136 136  
144 +== **1.6 LINE Notify** ==
137 137  
146 +This example shows how to use the LINE Notify to send message into LINE group. When monitoring bit "@test" changes, it will trigger and send the message. Please replace with your own Token.
147 +
148 +{{code}}
149 +local tempBit = 0
150 +local tempWord = 0
151 +
152 +local LineToken = "08XCpubkOdwGdGgRTXF0x8umiyrALtoM0v6lBFUV6PC"
153 +
154 +local https = require("https")
155 +local json = require("json")
156 +local ltn12 = require("ltn12")
157 +
158 +-- Send http.get request and return response result
159 +function getHttpsUrl(url,header,reqbody)
160 + local body = {}
161 + local bodyJson = json.encode(body)
162 + local result_table, code, headers, status = https.request{
163 + method = "POST",
164 + url = url,
165 + source = ltn12.source.string(reqbody),
166 + headers = header,
167 + sink = ltn12.sink.table(body)
168 + }
169 + print("code:"..code)
170 + if code~= 200 then
171 + return
172 + else
173 + return body
174 + end
175 +end
176 +
177 +function getMessageUrl(lineMessage)
178 + local url = "https://notify-api.line.me/api/notify"
179 + local reqMess = "message="..lineMessage
180 + local headers =
181 + {
182 + ["Authorization"] = "Bearer "..LineToken,
183 + ["Content-Type"] = "application/x-www-form-urlencoded",
184 + ["Content-Length"] = #reqMess
185 + }
186 +
187 + print("Get the link:"..url)
188 + getHttpsUrl(url, headers, reqMess)
189 +end
190 +
191 +
192 +function linenotify.main()
193 + local bitValue = addr_getbit("@test");
194 + local message = ''
195 + print("b=="..bitValue)
196 + if bitValue == 1 and bitValue ~= tempBit then
197 + message = 'Alarm V-Box triggered, the output is '.. bitValue
198 + getMessageUrl(message)
199 + print("Notification pushed of triggering alarm,"..bitValue)
200 + elseif bitValue == 0 and bitValue ~= tempBit then
201 + message = 'Alarm V-Box dismissed, the output is '.. bitValue
202 + getMessageUrl(message)
203 + print("Notification pushed of dismissing alarm,"..bitValue)
204 + end
205 + tempBit = bitValue----Prevent monitoring values from continuous being sent to the platform
206 +
207 + local wordValue = addr_getword("@t2")
208 + print("w=="..wordValue)
209 + --dosomething
210 + if wordValue >= 100 and wordValue ~= tempWord and tempWord <= 100 then
211 + message = 'Alarm V-Box triggered, the temperature is '.. wordValue
212 + getMessageUrl(message)
213 + print("Notification pushed of triggering alarm,"..wordValue)
214 + elseif wordValue < 100 and wordValue ~= tempWord and tempWord >= 100 then
215 + message = 'Alarm V-Box dismissed, the temperature is '.. wordValue
216 + getMessageUrl(message)
217 + print("Notification pushed of dismissing alarm,"..wordValue)
218 + end
219 + tempWord = wordValue----Prevent monitoring values from continuous being sent to the platform
220 +end
221 +{{/code}}
222 +
223 +== **1.7 Twilio WhatsApp Messaging** ==
224 +
225 +This example shows how to use the Twilio API to send WhatsApp message to private number. When monitoring bit "@testBit" changes, it will trigger and send the message. Please replace with your own SID, Token, twilioPhoneNumber and receiverPhoneNumber.
226 +
227 +About how to register the Twilio API, please check the following video:
228 +
229 +[[https:~~/~~/www.youtube.com/watch?v=Id4lKichauU>>https://www.youtube.com/watch?v=Id4lKichauU]]
230 +
231 +{{code language="Lua"}}
232 +local tempBit = 0
233 +local tempWord = 0
234 +
235 +local https = require("https")
236 +local json = require("json")
237 +local ltn12 = require("ltn12")
238 +
239 +local SID = 'AC1703bd710ffa98006d2bcc0b********'
240 +local Token = 'd3c11897623c39e538b20263ec19****'
241 +
242 +local twilioPhoneNumber = '+14155238886'
243 +local receiverPhoneNumber = '+8615880018277'
244 +
245 +local b='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/'
246 +function encodingBase64(data)
247 + return ((data:gsub('.', function(x)
248 + local r,b='',x:byte()
249 + for i=8,1,-1 do r=r..(b%2^i-b%2^(i-1)>0 and '1' or '0') end
250 + return r;
251 + end)..'0000'):gsub('%d%d%d?%d?%d?%d?', function(x)
252 + if (#x < 6) then return '' end
253 + local c=0
254 + for i=1,6 do c=c+(x:sub(i,i)=='1' and 2^(6-i) or 0) end
255 + return b:sub(c+1,c+1)
256 + end)..({ '', '==', '=' })[#data%3+1])
257 +end
258 +
259 +function encodeUrl(str)
260 + str = string.gsub(str, "([^%w%.%- ])", function(c)
261 + return string.format("%%%02X", string.byte(c)) end)
262 + return string.gsub(str, " ", "+")
263 +end
264 +
265 +
266 +
267 +
268 +function requestBodySplice(message, sender, receiver)
269 + local reqBody = ''
270 + local encodeMess = encodeUrl(message)
271 + local encodeSend = encodeUrl(sender)
272 + local encodeRece = encodeUrl(receiver)
273 + --reqBody = "Body=Hello%20Wecon2&From=whatsapp%3A%2B14155238886&To=whatsapp%3A%2B8615880018277"
274 + reqBody = string.format("Body=%s&From=whatsapp:%s&To=whatsapp:%s", encodeMess, encodeSend, encodeRece)
275 + print(reqBody)
276 + return reqBody
277 +end
278 +
279 +
280 +-- Send http.get request and return response result
281 +function getHttpsUrl(url,header,reqbody)
282 + local body = {}
283 + local bodyJson = json.encode(body)
284 + local result_table, code, headers, status = https.request{
285 + method = "POST",
286 + url = url,
287 + source = ltn12.source.string(reqbody),
288 + headers = header,
289 + sink = ltn12.sink.table(body)
290 + }
291 + print("code:"..code)
292 + if code~= 200 then
293 + return
294 + else
295 + return body
296 + end
297 +end
298 +
299 +function getMessageUrl(whatsAppMessage)
300 + local auth = SID..':'..Token
301 + local url = "https://api.twilio.com/2010-04-01/Accounts/"..SID.."/Messages"
302 + --local reqMess = "message="..twilioMessage
303 + local reqMess = requestBodySplice(whatsAppMessage, twilioPhoneNumber, receiverPhoneNumber)
304 + local headers =
305 + {
306 + ["Authorization"] = "Basic "..encodingBase64(auth),
307 + ["Content-Type"] = "application/x-www-form-urlencoded",
308 + ["Content-Length"] = #reqMess
309 + }
310 +
311 + print("Get the link:"..url)
312 + getHttpsUrl(url, headers, reqMess)
313 +end
314 +
315 +
316 +
317 +function Twilio.main()
318 + --dosomething
319 + --local auth = SID..':'..Token
320 + --print(requestBodySplice("HelloWorld", twilioPhoneNumber, receiverPhoneNumber))
321 + --print(encodingBase64(auth))
322 + local bitValue = addr_getbit("@testBit");
323 + local message = ''
324 + print("b=="..bitValue)
325 + if bitValue == 1 and bitValue ~= tempBit then
326 + message = 'Alarm V-Box triggered, the output is '.. bitValue
327 + getMessageUrl(message)
328 + print("Notification pushed of triggering alarm,"..bitValue)
329 + elseif bitValue == 0 and bitValue ~= tempBit then
330 + message = 'Alarm V-Box dismissed, the output is '.. bitValue
331 + getMessageUrl(message)
332 + print("Notification pushed of dismissing alarm,"..bitValue)
333 + end
334 + tempBit = bitValue----Prevent monitoring values from continuous being sent to the platform
335 +
336 + local wordValue = addr_getword("@testWord")
337 + print("w=="..wordValue)
338 + --dosomething
339 + if wordValue >= 100 and wordValue ~= tempWord and tempWord <= 100 then
340 + message = 'Alarm V-Box triggered, the temperature is '.. wordValue
341 + getMessageUrl(message)
342 + print("Notification pushed of triggering alarm,"..wordValue)
343 + elseif wordValue < 100 and wordValue ~= tempWord and tempWord >= 100 then
344 + message = 'Alarm V-Box dismissed, the temperature is '.. wordValue
345 + getMessageUrl(message)
346 + print("Notification pushed of dismissing alarm,"..wordValue)
347 + end
348 + tempWord = wordValue----Prevent monitoring values from continuous being sent to the platform
349 +end
350 +{{/code}}
351 +
352 +== **1.8 How to parse value from HTTP response body** ==
353 +
354 +This example use [[https:~~/~~/www.weatherapi.com/>>https://www.weatherapi.com/]] as example, to show how to parse value from HTTP response body. When we input the city name into address "@HDW5050":
355 +
356 +(% style="text-align:center" %)
357 +[[image:InputHTTPparameter.png]]
358 +
359 +Then the response body would be like as following:
360 +
361 +{{code language="json"}}
362 +{
363 + "location": {
364 + "name": "Madrid",
365 + "region": "Madrid",
366 + "country": "Spain",
367 + "lat": 40.4,
368 + "lon": -3.68,
369 + "tz_id": "Europe/Madrid",
370 + "localtime_epoch": 1669022636,
371 + "localtime": "2022-11-21 10:23"
372 + },
373 + "current": {
374 + "last_updated_epoch": 1669022100,
375 + "last_updated": "2022-11-21 10:15",
376 + "temp_c": 13.0,
377 + "temp_f": 55.4,
378 + "is_day": 1,
379 + "condition": {
380 + "text": "Partly cloudy",
381 + "icon": "//cdn.weatherapi.com/weather/64x64/day/116.png",
382 + "code": 1003
383 + },
384 + "wind_mph": 11.9,
385 + "wind_kph": 19.1,
386 + "wind_degree": 210,
387 + "wind_dir": "SSW",
388 + "pressure_mb": 1015.0,
389 + "pressure_in": 29.97,
390 + "precip_mm": 0.0,
391 + "precip_in": 0.0,
392 + "humidity": 88,
393 + "cloud": 75,
394 + "feelslike_c": 10.8,
395 + "feelslike_f": 51.4,
396 + "vis_km": 10.0,
397 + "vis_miles": 6.0,
398 + "uv": 3.0,
399 + "gust_mph": 22.1,
400 + "gust_kph": 35.6
401 + }
402 +}
403 +{{/code}}
404 +
405 +(% class="wikigeneratedid" %)
406 +So we decode json into lua object to assign the value into addresses HDW6060(temperature), HDW7070(humidity), the code example like follows:
407 +
408 +{{code language="lua"}}
409 +local APIkey = '70faaecf926b4341b1974006221711'
410 +
411 +
412 +local http = require("socket.http")
413 +local json = require("json")
414 +
415 +-- Send http.get request and return response result
416 +function getHttpsUrl(url)
417 + local result_table, code, headers, status = http.request(url)
418 + print("code:"..code)
419 + if code~= 200 then
420 + return
421 + else
422 + return result_table
423 + end
424 +end
425 +
426 +function sendAPI(key, city)
427 + local url = "http://api.weatherapi.com/v1/current.json?key="..key.."&q="..city.."&aqi=no"
428 + --local url = 'http://v-box.net'
429 + --local url = 'https://www.google.com/'
430 + --http://api.weatherapi.com/v1/current.json?key=70faaecf926b4341b1974006221711&q=Barcelona&aqi=no
431 + print("Get the link:"..url)
432 + local body = getHttpsUrl(url)
433 + --print(body)
434 + local jsonBody = json.decode(body)
435 + --print(jsonBody["current"]["temp_c"])
436 + --print(type(jsonBody["current"]["temp_c"]))
437 + --print(type(jsonBody["current"]["humidity"]))
438 + addr_setfloat("@HDW6060", jsonBody["current"]["temp_c"])
439 + addr_setword("@HDW7070", jsonBody["current"]["humidity"])
440 +end
441 +
442 +
443 +function Weather.main()
444 + local cityName = addr_getstring("@HDW5050",6)
445 + print("cityName: "..cityName)
446 + sendAPI(APIkey, cityName)
447 +end
448 +{{/code}}
449 +
138 138  = **2 V-Box connect with third part server** =
139 139  
140 140  V-Box have two mode.One is for V-Net,User need to use WECON server to store data.We call this V-NET platform.
... ... @@ -153,157 +153,273 @@
153 153  
154 154  (% class="mark" %)2.If your server requires SSL certificate to log in,please use OpenCloud.Because only OpenCloud platform can support to upload certificate
155 155  
156 -== **2.1 V-Box connect with customer server:grouprobotinfo.com** ==
468 +(% class="wikigeneratedid" %)
469 +**✎Note: **Before program the script of MQTT, please make sure the server(MQTT broker) can be connected through MQTT Client tool.
157 157  
158 -This demo does not use SSL certification. Script is as below
471 +(% class="wikigeneratedid" %)
472 +Tool link: **[[MQTT.fx>>http://mqttfx.jensd.de/index.php/download]]**
159 159  
160 -Demo1:
474 +== **2.1 V-Box connect with test server(General Example)** ==
161 161  
162 -{{code language="Lua"}}
163 --- Meta class
164 ---main
165 -function mq.main()
166 - if not mq.m then
167 -  local err = ""
476 +{{code language="lua"}}
477 +--MQTT configuration table
478 +local MQTT_CFG={}
479 +MQTT_CFG.username = "weconsupport"
480 +MQTT_CFG.password = "123456"
481 +MQTT_CFG.netway = 0
482 +MQTT_CFG.keepalive = 60
483 +MQTT_CFG.cleansession = 1
484 +--TCP URL
485 +MQTT_URL = "tcp://mq.tongxinmao.com:1883"
486 +--Client ID
487 +MQTT_CLIENT_ID = "V-BOXH-AG"
168 168  
169 -  mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID")  -- create connection
170 -  if mq.m then
171 -   mq.config = {
172 -    username = "",-- ID
173 -    password = "",-- password
174 -    netway = 1, -- Ethernet connection, WIFI=1
175 -    -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
176 -    -- cleansession = 0, -- Optional, keep session
177 -   }
178 -   mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
179 -    local str = string.format("%s:%s", topic, msg)
180 -    -- print("mqtt msg:", str) -- Print out the received topics and content
181 -   end
182 -   )
183 -   mq.m:on("offline", function (cause) -- Register for lost connection callbacks
184 -    -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
185 -   end)
186 -   mq.m:on("arrived", function() -- Registration for sending messages to callbacks 
187 -    print("msg arrived")
188 -   end)
189 -  else
190 -   print("mqtt create failed:", err) -- Create object failed
191 -  end
192 - else
193 -  if mq.m:isconnected() then -- If online, post a message
194 -     local phaseStatus ="unknow"
195 -     if addr_getbit("@Standby")== 1 then
196 -         phaseStatus = "Standby"
197 -     elseif addr_getbit("@Pre-Freeze")==1 then
198 -         phaseStatus= "Pre-Freeze"
199 -     elseif addr_getbit("@Prepare")==1 then
200 -         phaseStatus ="Prepare"
201 -     elseif addr_getbit("@Primary Dry")==1 then
202 -         phaseStatus = "Primary dry"
203 -     elseif addr_getbit("@Secondary Dry")==1 then
204 -         phaseStatus = "Secondary Dry"
205 -     end
206 ---   print(addr_getbit("@Primary Dry"))
207 --------------------------------------------------------------------------------------------------------------------------
208 -     local activating ="unknow"
209 -     if addr_getbit("@Compressor")==1 then
210 -         activating = ",".."Compressor"
211 -     end
212 -     if addr_getbit("@Silicone Pump")==1 then
213 -         activating = activating..",".."Silicone Pump"
214 -     end
215 -     if addr_getbit("@Vacuum Pump")==1 then
216 -         activating = activating..",".."Vacuum Pump"
217 -     end
218 -     if addr_getbit("@Root Pump")==1 then
219 -         activating = activating..",".."Root Pump"
220 -     end
221 -     if addr_getbit("@Heater")==1 then
222 -         activating = activating..",".."Heater"
223 -     end
224 -     if addr_getbit("@Valve Silicone")==1 then
225 -         activating = activating..",".."Valve Silicone"
226 -     end
227 -     if addr_getbit("@Valve Ice Condenser")==1 then
228 -         activating = activating..",".."Valve Ice Condenser"
229 -     end
230 -     if addr_getbit("@Valve Vacuum Pump")==1 then
231 -         activating = activating..",".."Valve Vacuum Pump"
232 -     end
233 -     local pr_activating =string.sub(activating,2)
234 -    --  print(pr_activating)  
489 +--Generate UUID
490 +function uuid()
491 + local seed = {'e','1','2','3','4','5','6','7','8','9','a','b','c','d','e','f'}
492 + local tb = {}
493 + for i=1, 32 do
494 + table.insert(tb, seed[math.random(1,16)])
495 + end
496 + local sid=table.concat(tb)
497 + return string.format('%s',
498 + string.sub(sid,1,32)
499 + )
500 +end
235 235  
236 236  
503 +--Topic name to subscribed
504 +local SUBSCRIBE_TOPIC = 'testtopic/test/no1/123456'
237 237  
238 -     local status_text ="unknow"
239 -     if addr_getbit("@Status Run")==1 then
240 -         status_text = "RUNNING"
241 -     else
242 -         status_text = "STOP"
243 -     end
244 --------------------------------------------------------------------------------------------------------------------------      
506 +--Topic name to be published
507 +local PUBLISH_TOPIC = 'testtopic/test/no1/7890'
245 245  
246 -     local js =  {type="status",
247 -                  mc_name ="FD300",
248 -                  status=status_text,
249 -                  elapsed_time={
250 -                                hour=addr_getword("@Elapsed Time (Hour)"),
251 -                                min=addr_getword("@Elapsed Time (Minute)"),
252 -                                sec=addr_getword("@Elapsed Time (Second)")
253 -                                },
254 -                   phase = phaseStatus,
255 -                   step = addr_getword("@Step"),
256 -                   activating_output = pr_activating,
257 -                   sv=addr_getshort("@SV Silicone")/10,
258 -                   pv=addr_getshort("@PV Silicone")/10,
259 -                   product1=addr_getshort("@Product 1")/10,
260 260  
261 -                   product2=addr_getshort("@Product 2")/10,
262 -                   product3=addr_getshort("@Product 3")/10,
263 -                   product4=addr_getshort("@Product 4")/10,
264 -                   ice1=addr_getshort("@Ice condenser 1")/10,
265 -                   ice2=addr_getshort("@Ice condenser 2")/10,
266 -                   vacuum=addr_getfloat("@Vacuum")
510 +--real time
511 +local LAST_TIME = 0
267 267  
268 -                }
269 -     local jsAlarm = {  HPC = addr_getbit("@B_25395#W0.00"),
270 -                        ODPC = addr_getbit("@B_25395#W0.01"),
271 -                        MTPC=addr_getbit("@B_25395#W0.02"),
272 -                        HTT = addr_getbit("@B_25395#W1.03"),
273 -                        CPC = addr_getbit("@B_25395#W0.08"),
274 -                        CPSP =addr_getbit("@B_25395#W1.00"),
275 -                        CPVP =addr_getbit("@B_25395#W0.10"),
276 -                        CPRP =addr_getbit("@B_25395#W0.11"),
277 -                        HP =addr_getbit("@B_25395#W1.01"),
278 -                        PP= addr_getbit("@B_25395#W1.02"),
279 -                        PO=addr_getbit("@B_25395#W0.07"),
280 -                        FSE=addr_getbit("@B_25395#W2.04"),
281 -                        AVVSVV=addr_getbit("@B_25395#W1.12"),
282 -                        ICHT=addr_getbit("@B_25395#W3.06")
283 -  
284 -                }
285 285  
286 -    -- ("@B_25395#CIO1.02")
287 -     mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
288 -     mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
289 -  else
290 -   local stat, err = mq.m:connect(mq.config) -- connection
291 -   if stat == nil then --Determine whether to connect
292 -    print("mqtt connect failed:", err)
293 -    return -- Connection failed, return directly
294 -   end
295 -   mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
514 +--initialize mqtt
515 +function mqtt_init()
516 + print(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENT_ID))
517 + g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENT_ID) -- create mqtt object,and declare it as a global variable
518 + if g_mq then
519 + g_mq:on("message", mqtt_msg_callback) -- Register a callback for receiving messages
520 + print("mqtt init success")
521 + else
522 + print("mqtt init failed:", err)
523 + end
524 +end
296 296  
297 -  end
298 -  -- mq.m:unsubscribe("stc/test")
299 -  -- mq.m:disconnect() -- close matt
300 -  -- mq.m:close() -- close clase
301 - end
526 +-- connect to mqtt
527 +function mqtt_connect()
528 + print("mqtt connecting...")
529 + local stat, err = g_mq:connect(MQTT_CFG)
530 + if stat == nil then
531 + print("mqtt connect failed:", err)
532 + return
533 + else
534 + print("mqtt connected")
535 + end
536 + g_mq:subscribe(SUBSCRIBE_TOPIC, 0)
302 302  end
538 +
539 +-- Received message callback function
540 +function mqtt_msg_callback(topic, msg)
541 + print("topic:", topic)
542 + print("msg:", msg)
543 + local objMsg = json.decode(msg)
544 + local water = objMsg.data.waterlevel
545 + local temp = objMsg.data.temperature
546 + addr_setword("@HDW20",water)
547 + addr_setword("@HDW10",temp)
548 +end
549 +
550 +--Send data (data upload to platform and encapsulate it with custom functions)
551 +function send_data()
552 + local pub_data = {
553 + timestamp = os.time(),
554 + messageId = 1,
555 + event = 'test_data',
556 + mfrs = 'V-Box',
557 + data = {
558 + id = uuid(),
559 + waterlevel = addr_getword("@HDW10"),
560 + temperature = addr_getword("@HDW20")
561 + }
562 + }
563 + return g_mq:publish(PUBLISH_TOPIC, json.encode(pub_data), 0, 0)
564 +end
565 +
566 +
567 +--main function fixed timed execution
568 +function MQTT.main()
569 + --dosomething
570 + print(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " main start")
571 + --determine the mqtt object whether exist
572 + if g_mq then
573 + --determine the mqtt object whether has been connected or not
574 + if g_mq:isconnected() then
575 + send_data()
576 + else
577 + --if exceed 20 sec not connect, reconnect once
578 + if os.time() - LAST_TIME > 20 then
579 + LAST_TIME = os.time()
580 + --connect to mqtt or reconnect
581 + mqtt_connect()
582 + end
583 + end
584 + else
585 + --mqtt object does not exist so create new one
586 + mqtt_init()
587 + end
588 + print(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " main end")
589 +end
303 303  {{/code}}
304 304  
305 -== **2.2 V-Box connect with Azure platform** ==
592 +== **2.2 V-Box connect with customer server:grouprobotinfo.com** ==
306 306  
594 +This demo does not use SSL certification. Script is as below
595 +
596 +Demo1:
597 +
598 +{{code language="lua"}}
599 +-- Meta class
600 +--main
601 +function mq.main()
602 + if not mq.m then
603 + local err = ""
604 +
605 + mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID") -- create connection
606 + if mq.m then
607 + mq.config = {
608 + username = "",-- ID
609 + password = "",-- password
610 + netway = 1, -- Ethernet connection, WIFI=1
611 + -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
612 + -- cleansession = 0, -- Optional, keep session
613 + }
614 + mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
615 + local str = string.format("%s:%s", topic, msg)
616 + -- print("mqtt msg:", str) -- Print out the received topics and content
617 + end)
618 + mq.m:on("offline", function (cause) -- Register for lost connection callbacks
619 + -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
620 + end)
621 + mq.m:on("arrived", function() -- Registration for sending messages to callbacks
622 + print("msg arrived")
623 + end)
624 + else
625 + print("mqtt create failed:", err) -- Create object failed
626 + end
627 + else
628 + if mq.m:isconnected() then -- If online, post a message
629 + local phaseStatus ="unknow"
630 + if addr_getbit("@Standby")== 1 then
631 + phaseStatus = "Standby"
632 + elseif addr_getbit("@Pre-Freeze")==1 then
633 + phaseStatus= "Pre-Freeze"
634 + elseif addr_getbit("@Prepare")==1 then
635 + phaseStatus ="Prepare"
636 + elseif addr_getbit("@Primary Dry")==1 then
637 + phaseStatus = "Primary dry"
638 + elseif addr_getbit("@Secondary Dry")==1 then
639 + phaseStatus = "Secondary Dry"
640 + end
641 + --print(addr_getbit("@Primary Dry"))
642 +-------------------------------------------------------------------------------------------------------------------------
643 + local activating ="unknow"
644 + if addr_getbit("@Compressor")==1 then
645 + activating = ",".."Compressor"
646 + end
647 + if addr_getbit("@Silicone Pump")==1 then
648 + activating = activating..",".."Silicone Pump"
649 + end
650 + if addr_getbit("@Vacuum Pump")==1 then
651 + activating = activating..",".."Vacuum Pump"
652 + end
653 + if addr_getbit("@Root Pump")==1 then
654 + activating = activating..",".."Root Pump"
655 + end
656 + if addr_getbit("@Heater")==1 then
657 + activating = activating..",".."Heater"
658 + end
659 + if addr_getbit("@Valve Silicone")==1 then
660 + activating = activating..",".."Valve Silicone"
661 + end
662 + if addr_getbit("@Valve Ice Condenser")==1 then
663 + activating = activating..",".."Valve Ice Condenser"
664 + end
665 + if addr_getbit("@Valve Vacuum Pump")==1 then
666 + activating = activating..",".."Valve Vacuum Pump"
667 + end
668 + local pr_activating =string.sub(activating,2)
669 + -- print(pr_activating)
670 + local status_text ="unknow"
671 + if addr_getbit("@Status Run")==1 then
672 + status_text = "RUNNING"
673 + else
674 + status_text = "STOP"
675 + end
676 +-------------------------------------------------------------------------------------------------------------------------
677 + local js = {type="status",
678 + mc_name ="FD300",
679 + status=status_text,
680 + elapsed_time={
681 + hour=addr_getword("@Elapsed Time (Hour)"),
682 + min=addr_getword("@Elapsed Time (Minute)"),
683 + sec=addr_getword("@Elapsed Time (Second)")
684 + },
685 + phase = phaseStatus,
686 + step = addr_getword("@Step"),
687 + activating_output = pr_activating,
688 + sv=addr_getshort("@SV Silicone")/10,
689 + pv=addr_getshort("@PV Silicone")/10,
690 + product1=addr_getshort("@Product 1")/10,
691 +
692 + product2=addr_getshort("@Product 2")/10,
693 + product3=addr_getshort("@Product 3")/10,
694 + product4=addr_getshort("@Product 4")/10,
695 + ice1=addr_getshort("@Ice condenser 1")/10,
696 + ice2=addr_getshort("@Ice condenser 2")/10,
697 + vacuum=addr_getfloat("@Vacuum")
698 + }
699 + local jsAlarm = { HPC = addr_getbit("@B_25395#W0.00"),
700 + ODPC = addr_getbit("@B_25395#W0.01"),
701 + MTPC=addr_getbit("@B_25395#W0.02"),
702 + HTT = addr_getbit("@B_25395#W1.03"),
703 + CPC = addr_getbit("@B_25395#W0.08"),
704 + CPSP =addr_getbit("@B_25395#W1.00"),
705 + CPVP =addr_getbit("@B_25395#W0.10"),
706 + CPRP =addr_getbit("@B_25395#W0.11"),
707 + HP =addr_getbit("@B_25395#W1.01"),
708 + PP= addr_getbit("@B_25395#W1.02"),
709 + PO=addr_getbit("@B_25395#W0.07"),
710 + FSE=addr_getbit("@B_25395#W2.04"),
711 + AVVSVV=addr_getbit("@B_25395#W1.12"),
712 + ICHT=addr_getbit("@B_25395#W3.06")
713 + }
714 + -- ("@B_25395#CIO1.02")
715 + mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
716 + mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
717 + else
718 + local stat, err = mq.m:connect(mq.config) -- connection
719 + if stat == nil then --Determine whether to connect
720 + print("mqtt connect failed:", err)
721 + return -- Connection failed, return directly
722 + end
723 + mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
724 +
725 + end
726 + -- mq.m:unsubscribe("stc/test")
727 + -- mq.m:disconnect() -- close matt
728 + -- mq.m:close() -- close clase
729 + end
730 +end
731 +{{/code}}
732 +
733 +== **2.3 V-Box connect with Azure platform** ==
734 +
307 307  In this demo,V-Box connects with Azure by SSL certification.
308 308  
309 309  Video link: [[https:~~/~~/youtu.be/cdI6rIQcpMY?list=PL_Bpnb2RgaksCic9HCcVAZhU9sYwCRKzW>>https://youtu.be/cdI6rIQcpMY?list=PL_Bpnb2RgaksCic9HCcVAZhU9sYwCRKzW]]
... ... @@ -312,137 +312,129 @@
312 312  
313 313  Script is as below
314 314  
315 -{{code language="Lua"}}
316 ---https://support.huaweicloud.com/qs-IoT/iot_05_0005.html  mqtt.fx monitor to connect azure iot
743 +(% class="box infomessage" %)
744 +(((
745 +~-~-https:~/~/support.huaweicloud.com/qs-IoT/iot_05_0005.html mqtt.fx monitor to connect azure iot
317 317  sprint = print
318 318  
319 ---Get custom configuration parameters (vbox custom information)
320 ---local CUSTOM = bns_get_config("bind")
321 ---local DS_ID = CUSTOM.DSID or "60a71ccbbbe12002c08f3a1a_WECON"
748 +~-~-Get custom configuration parameters (vbox custom information)
749 +~-~-local CUSTOM = bns_get_config("bind")
750 +~-~-local DS_ID = CUSTOM.DSID or "60a71ccbbbe12002c08f3a1a_WECON"
322 322  
323 323  
324 -
325 ---Cloud mode interface to obtain the MQTT information configured by the cloud platform: (5 returns, namely the server address, client ID, connection table, last word table, certificate table)
753 +~-~-Cloud mode interface to obtain the MQTT information configured by the cloud platform: (5 returns, namely the server address, client ID, connection table, last word table, certificate table)
326 326  local MQTT_URL, MQTT_CLIENTID, MQTT_CFG, MQTT_LWT, MQTT_CART = mqtt.setup_cfg()
327 327  
328 ---MQTT_CFG.username = '60a71ccbbbe12002c08f3a1a_WECON'
329 ---MQTT_CFG.password='wecon123'
330 ---MQTT_CLIENTID = '60a71ccbbbe12002c08f3a1a_WECON_0_0_2021052110usernxame:60a71ccbbbe12002c08f3a1a_WECONpassword:a0a951581855aa8e0262129da6cf1b43f2c0ecfac4fa56117fc5a20c90be169a'
756 +~-~-MQTT_CFG.username = '60a71ccbbbe12002c08f3a1a_WECON'
757 +~-~-MQTT_CFG.password='wecon123'
758 +~-~-MQTT_CLIENTID = '60a71ccbbbe12002c08f3a1a_WECON_0_0_2021052110usernxame:60a71ccbbbe12002c08f3a1a_WECONpassword:a0a951581855aa8e0262129da6cf1b43f2c0ecfac4fa56117fc5a20c90be169a'
331 331  
332 ---publish to topics
760 +~-~-publish to topics
333 333  local pub_RE_TOPIC = string.format('devices/wecon_02/messages/events/')
334 ---Subscribe topics
762 +~-~-Subscribe topics
335 335  local Subscribe_RE_TOPIC1 = string.format('devices/wecon_02/messages/devicebound/#')
336 336  
337 ---variable
765 +~-~-variable
338 338  local last_time = 0
339 339  
340 340  
341 -
342 ---Timing main function
769 +~-~-Timing main function
343 343  function Azure.main()
344 344  
345 -   sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " Azureiot.main start")
346 -   if g_mq then
347 -        if g_mq:isconnected() then
348 -            send_Data()
349 -        else
350 -            if os.time() - last_time > 20 then
351 -                last_time = os.time()
352 -                mymqtt_connect()
353 -            end
354 -        end
355 -    else
356 -        mymqtt_init()
357 -    end
358 -    sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " Azureiot.main end")
772 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " Azureiot.main start")
773 + if g_mq then
774 + if g_mq:isconnected() then
775 + send_Data()
776 + else
777 + if os.time() - last_time > 20 then
778 + last_time = os.time()
779 + mymqtt_connect()
780 + end
781 + end
782 + else
783 + mymqtt_init()
784 + end
785 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " Azureiot.main end")
359 359  end
360 360  
361 --- Initialize MQTT
788 +~-~- Initialize MQTT
362 362  function mymqtt_init()
363 -    sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
364 -    g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENTID) -- Create the object and declare it as a global variable
365 -    if g_mq then
366 -        g_mq:on("message", mymqtt_msg_callback) -- Register to receive message callbacks
367 -        sprint("mqtt init success")
368 -    else
369 -        sprint("mqtt init failed:", err)
370 -    end
790 + sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
791 + g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENTID) ~-~- Create the object and declare it as a global variable
792 + if g_mq then
793 + g_mq:on("message", mymqtt_msg_callback) ~-~- Register to receive message callbacks
794 + sprint("mqtt init success")
795 + else
796 + sprint("mqtt init failed:", err)
797 + end
371 371  end
372 372  
373 --- Connect to MQTT server
800 +~-~- Connect to MQTT server
374 374  function mymqtt_connect()
375 -    sprint("mqtt connecting...")
376 -    local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
377 -    if stat == nil then
378 -        sprint("mqtt connect failed:", err)
379 -        return
380 -    else
381 -        sprint("mqtt connected")
382 -    end
383 -    g_mq:subscribe(Subscribe_RE_TOPIC1, 0) 
802 + sprint("mqtt connecting...")
803 + local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
804 + if stat == nil then
805 + sprint("mqtt connect failed:", err)
806 + return
807 + else
808 + sprint("mqtt connected")
809 + end
810 + g_mq:subscribe(Subscribe_RE_TOPIC1, 0) 
384 384  end
385 385  
386 --- Receive MQTT message callback function
813 +~-~- Receive MQTT message callback function
387 387  function mymqtt_msg_callback(topic, msg)
388 -    print("topic:",topic)
389 -    print("revdata:",msg)
390 -   -- local revData = json.decode(msg)
391 - --  if topic == Subscribe_RE_TOPIC1 then --Process topic information subscribed from the cloud
392 --- if string.match(topic,Subscribe_RE_TOPIC1) then
393 -     --   print("topi11:",topic)
394 -       setValue(revData)
395 -   -- end
815 + print("topic:",topic)
816 + print("revdata:",msg)
817 + ~-~- local revData = json.decode(msg)
818 + ~-~- if topic == Subscribe_RE_TOPIC1 then ~-~-Process topic information subscribed from the cloud
819 +~-~- if string.match(topic,Subscribe_RE_TOPIC1) then
820 + ~-~- print("topi11:",topic)
821 + setValue(revData)
822 + ~-~- end
396 396  end
397 397  
398 ---Process the received data
399 ---function setValue(revData)
400 -   -- if revData ~=nil then 
401 - --       for i,v in pairs(revData) do
402 -  --          print("Data received：",i,v)
403 -  --      end
404 -   -- end
405 ---end
825 +~-~-Process the received data
826 +~-~-function setValue(revData)
827 + ~-~- if revData ~~=nil then 
828 + ~-~- for i,v in pairs(revData) do
829 + ~-~- print("Data received：",i,v)
830 + ~-~- end
831 + ~-~- end
832 +~-~-end
406 406  
407 ---Get real-time data
834 +~-~-Get real-time data
408 408  function getData()
409 -    local jdata = {}
410 -    local addr = bns_get_alldata()
411 -    print(json.encode(addr))
412 -    for i,v in pairs(addr) do
413 -        if v[2] == 1 then
414 -           jdata[v[3]] = v[4]
415 -        end
416 -    end
417 -    return jdata
418 -end 
836 + local jdata = {}
837 + local addr = bns_get_alldata()
838 + print(json.encode(addr))
839 + for i,v in pairs(addr) do
840 + if v[2] == 1 then
841 + jdata[v[3]] = v[4]
842 + end
843 + end
844 + return jdata
845 +end
419 419  
420 420  
421 -
422 ---send data
848 +~-~-send data
423 423  function send_Data()
424 -    local pub_data = {100
425 -     --   services={{
426 -
427 -            --serviceId ='Temperature',
428 -           -- properties={
429 -               -- value = 55
430 -           -- },
431 -       -- }}
850 + local pub_data = {100
851 + ~-~- services=~{~{
852 +\\ ~-~-serviceId ='Temperature',
853 + ~-~- properties={
854 + ~-~- value = 55
855 + ~-~- },
856 + ~-~- }}
432 432  }
433 433  sprint(json.encode(pub_data))
434 434  print("..........",pub_RE_TOPIC)
435 -    return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
860 + return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
436 436  end
437 -{{/code}}
438 -
439 -== **2.3 How to configure the Huawei platform?** ==
440 -
441 -(% class="box infomessage" %)
442 -(((
443 -✎Note: Huawei IOT DA function is only in China area.If you want this function,you need to use chinese mobile to register
444 444  )))
445 445  
864 +== **2.4 How to configure the Huawei platform?（✎Note: Huawei IOT DA function is only in China area.If you want this function,you need to use chinese mobile to register）** ==
865 +
446 446  1.Register a account: [[https:~~/~~/www.huaweicloud.com/intl/en-us/s/JUlPVERNJQ>>https://www.huaweicloud.com/intl/en-us/s/JUlPVERNJQ]]
447 447  
448 448  2.log in the Huawei IOTDA
... ... @@ -590,7 +590,7 @@
590 590  (% style="text-align:center" %)
591 591  [[image:1624441186851-536.png||height="434" width="700" class="img-thumbnail"]]
592 592  
593 -== **2.4 V-Box connect with Huawei platform** ==
1013 +== **2.5 V-Box connect with Huawei platform** ==
594 594  
595 595  In this demo,V-Box connects with Huawei by SSL certification.
596 596  
... ... @@ -711,7 +711,7 @@
711 711  (% style="text-align:center" %)
712 712  [[image:1624506666650-161.png||height="547" width="1000" class="img-thumbnail"]]
713 713  
714 -== **2.5 V-Box connect with AWS platform** ==
1134 +== **2.6 V-Box connect with AWS platform** ==
715 715  
716 716  === **Log in AWS** ===
717 717  
... ... @@ -736,312 +736,265 @@
736 736  
737 737  {{code language="java"}}
738 738  {
739 -
740 740    "Version": "2012-10-17",
741 -
742 742    "Statement": [
743 -
744 744      {
745 -
746 746        "Effect": "Allow",
747 -
748 748        "Action": [
749 -
750 750          "iot:Connect",
751 -
752 752          "iot:Publish",
753 -
754 754          "iot:Subscribe",
755 -
756 756          "iot:Receive",
757 -
758 758          "greengrass:Discover"
759 -
760 760        ],
761 -
762 762        "Resource": "*"
763 -
764 764      }
765 -
766 766    ]
767 -
768 768  }
769 769  {{/code}}
770 770  
771 -1. **Create things**
1176 +=== **Create things** ===
772 772  
773 773  Click “Manage”~-~-->“Things”~-~-->“Create things”~-~-->“Create single thing”
774 774  
1180 +[[image:image-20220709165402-6.png]]
775 775  
776 -|
777 -| |[[image:image-20220709165402-6.png]]
1182 +[[image:image-20220709165402-7.png]]
778 778  
779 -|
780 -| |[[image:image-20220709165402-7.png]]
781 -
782 -|
783 -| |[[image:image-20220709165402-8.png]]
784 -
785 785  Name the thing~-~-->Click “Next”
786 786  
1186 +[[image:image-20220709165402-8.png]]
787 787  
788 788  Select the way to create certificate
789 789  
1190 +[[image:image-20220709165402-9.png]]
790 790  
791 -|
792 -| |[[image:image-20220709165402-9.png]]
793 -
794 794  Select policy
795 795  
1194 +[[image:image-20220709165402-10.png]]
796 796  
797 -|
798 -| |[[image:image-20220709165402-10.png]]
1196 +[[image:image-20220709165402-11.png]]
799 799  
800 800  
1199 +=== **Test with MQTT.fx tool** ===
801 801  
802 -
803 -|
804 -| |[[image:image-20220709165402-11.png]]
805 -
806 -1. **Test with MQTT.fx tool**
807 -
808 808  Click “View Setting” to get the “Broker Adress”
809 809  
1203 +[[image:image-20220709165402-13.png]]
810 810  
811 -|
812 -| |[[image:image-20220709165402-12.png]]
1205 +[[image:image-20220709165402-12.png]]
813 813  
814 -|
815 -| |[[image:image-20220709165402-13.png]]
816 -
817 -
818 -
819 -|
820 -| |[[image:image-20220709165402-14.png]]
821 -
822 822  Create one connection in MQTT.fx tool, set broker port as 8883.
823 823  
1209 +[[image:image-20220709165402-14.png]]
1210 +
824 824  Upload the CA File, Client Certificate File, Client Key File
825 825  
1213 +[[image:image-20220709165402-15.png]]
826 826  
827 -|
828 -| |[[image:image-20220709165402-15.png]]
829 -
830 830  Publish message to topic “TEST”
831 831  
1217 +[[image:image-20220709165402-17.png]]
832 832  
833 -|
834 -| |[[image:image-20220709165402-16.png]]
835 -
836 -|
837 -| |[[image:image-20220709165402-17.png]]
838 -
839 839  Click”Test”~-~-->”MQTT test client”~-~-->”Subscrible to a topic”, to get message publish from MQTT.fx tool.
840 840  
1221 +[[image:image-20220709173500-1.png]]
1222 +
841 841  And we can also send message form AWS platform to MQTT.fx tool.
842 842  
1225 +[[image:image-20220709165402-18.png]]
843 843  
844 -|
845 -| |[[image:image-20220709165402-18.png]]
1227 +=== **Configurate in CloudTool** ===
846 846  
847 -1. **Configurate in CloudTool**
848 -
849 849  Copy the same setting in MQTT.fx to MQTT configuration
850 850  
1231 +[[image:image-20220709165402-19.png]]
851 851  
852 -|
853 -| |[[image:image-20220709165402-19.png]]
854 -
855 855   Add a lua script and copy the lua demo into it.
856 856  
1235 +[[image:image-20220709165402-20.png]]
857 857  
858 -|
859 -| |[[image:image-20220709165402-20.png]]
860 -
1237 +{{code language="lua"}}
861 861  sprint = print
862 862  
863 -~-~-Cloud mode interface to obtain the MQTT information configured by the cloud platform: (5 returns, namely the server address, client ID, connection table, last word table, certificate table)
1240 +--Cloud mode interface to obtain the MQTT information configured by the cloud platform: (5 returns, namely the server address, client ID, connection table, last word table, certificate table)
864 864  
865 865  local MQTT_URL, MQTT_CLIENTID, MQTT_CFG, MQTT_LWT, MQTT_CART = mqtt.setup_cfg()
866 866  
867 -~-~-publish to topics
1244 +--publish to topics
868 868  
869 869  local pub_RE_TOPIC = string.format('TEST')
870 870  
871 -~-~-Subscribe topics
1248 +--Subscribe topics
872 872  
873 873  local Subscribe_RE_TOPIC1 = string.format('TEST')
874 874  
875 -~-~-variable
1252 +--variable
876 876  
877 877  local last_time = 0
878 878  
879 -~-~-Timing main function
1256 +--Timing main function
880 880  
881 881  function aws.main()
882 882  
883 - sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main start")
1260 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main start")
884 884  
885 - if g_mq then
1262 + if g_mq then
886 886  
887 - if g_mq:isconnected() then
1264 + if g_mq:isconnected() then
888 888  
889 - send_Data()
1266 + send_Data()
890 890  
891 - else
1268 + else
892 892  
893 - if os.time() - last_time > 5 then
1270 + if os.time() - last_time > 5 then
894 894  
895 - last_time = os.time()
1272 + last_time = os.time()
896 896  
897 - mymqtt_connect()
1274 + mymqtt_connect()
898 898  
1276 + end
1277 +
899 899   end
900 900  
901 - end
1280 + else
902 902  
903 - else
1282 + mymqtt_init()
904 904  
905 - mymqtt_init()
1284 + end
906 906  
907 - end
1286 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main end")
908 908  
909 - sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main end")
910 -
911 911  end
912 912  
913 913  
914 -~-~- Initialize MQTT
915 915  
1292 +-- Initialize MQTT
1293 +
916 916  function mymqtt_init()
917 917  
918 - sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
1296 + sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
919 919  
920 - g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENTID) ~-~- Create the object and declare it as a global variable
1298 + g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENTID) -- Create the object and declare it as a global variable
921 921  
922 - if g_mq then
1300 + if g_mq then
923 923  
924 - g_mq:on("message", mymqtt_msg_callback) ~-~- Register to receive message callbacks
1302 + g_mq:on("message", mymqtt_msg_callback) -- Register to receive message callbacks
925 925  
926 - sprint("mqtt init success")
1304 + sprint("mqtt init success")
927 927  
928 - else
1306 + else
929 929  
930 - sprint("mqtt init failed:", err)
1308 + sprint("mqtt init failed:", err)
931 931  
932 - end
1310 + end
933 933  
934 934  end
935 935  
936 -~-~- Connect to MQTT server
1314 +-- Connect to MQTT server
937 937  
938 938  function mymqtt_connect()
939 939  
940 - sprint("mqtt connecting...")
1318 + sprint("mqtt connecting...")
941 941  
942 - local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
1320 + local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
943 943  
944 - if stat == nil then
1322 + if stat == nil then
945 945  
946 - sprint("mqtt connect failed:", err)
1324 + sprint("mqtt connect failed:", err)
947 947  
948 - return
1326 + return
949 949  
950 - else
1328 + else
951 951  
952 - sprint("mqtt connected")
1330 + sprint("mqtt connected")
953 953  
954 - end
1332 + end
955 955  
956 - g_mq:subscribe(TEST, 0)
1334 + g_mq:subscribe(TEST, 0)
957 957  
958 958  end
959 959  
960 -~-~- Receive MQTT message callback function
1338 +-- Receive MQTT message callback function
961 961  
962 962  function mymqtt_msg_callback(topic, msg)
963 963  
964 - print("topic:",topic)
1342 + print("topic:",topic)
965 965  
966 - print("revdata:",msg)
1344 + print("revdata:",msg)
967 967  
968 - local revData = json.decode(msg)
1346 + local revData = json.decode(msg)
969 969  
970 - print (revData)
1348 + print (revData)
971 971  
972 - if topic == Subscribe_RE_TOPIC1 then ~-~-Process topic information subscribed from the cloud
1350 + if topic == Subscribe_RE_TOPIC1 then --Process topic information subscribed from the cloud
973 973  
974 -if string.match(topic,Subscribe_RE_TOPIC1) then
1352 + if string.match(topic,Subscribe_RE_TOPIC1) then
975 975  
976 - ~-~-if revData ~~= nil then
1354 + --if revData ~= nil then
977 977  
978 - for k,v in pairs (revData) do
1356 + for k,v in pairs (revData) do
979 979  
980 - print("printing revdata after kv here")
1358 + print("printing revdata after kv here")
981 981  
982 - print (k,v)
1360 + print (k,v)
983 983  
984 - end
1362 + end
985 985  
986 - print ("current state is",fanstate)
1364 + print ("current state is",fanstate)
987 987  
988 - ~-~-end
1366 + --end
989 989  
990 -end
1368 + end
991 991  
992 -end
1370 + end
993 993  
994 994  end
995 995  
996 996  
997 -~-~-Get real-time data
998 998  
1376 +--Get real-time data
1377 +
999 999  function getData()
1000 1000  
1001 - local jdata = {}
1380 + local jdata = {}
1002 1002  
1003 - local addr = bns_get_alldata()
1382 + local addr = bns_get_alldata()
1004 1004  
1005 - print(json.encode(addr))
1384 + print(json.encode(addr))
1006 1006  
1007 - for i,v in pairs(addr) do
1386 + for i,v in pairs(addr) do
1008 1008  
1009 - if v[2] == 1 then
1388 + if v[2] == 1 then
1010 1010  
1011 - jdata[v[3]] = v[4]
1390 + jdata[v[3]] = v[4]
1012 1012  
1013 - end
1392 + end
1014 1014  
1015 - end
1394 + end
1016 1016  
1017 - return jdata
1396 + return jdata
1018 1018  
1019 1019  end
1020 1020  
1021 -~-~-send data
1400 +--send data
1022 1022  
1023 1023  function send_Data()
1024 1024  
1025 - local pub_data =
1404 + local pub_data =
1405 + {
1406 + 123
1407 + }
1026 1026  
1027 - {
1028 -
1029 -123
1030 -
1031 -}
1032 -
1033 1033  sprint(json.encode(pub_data))
1034 1034  
1035 1035  print("..........",pub_RE_TOPIC)
1036 1036  
1037 - return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
1413 + return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
1038 1038  
1039 1039  end
1416 +{{/code}}
1040 1040  
1041 -
1042 -
1043 1043  Get message in AWS
1044 1044  
1045 -
1046 -|
1047 -| |[[image:image-20220709165402-21.png]]
1420 +[[image:image-20220709165402-21.png]]
InputHTTPparameter.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Hunter
Size
... ... @@ -1,0 +1,1 @@
1 +17.9 KB
Content
image-20220709173500-1.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +1.5 MB
Content