Skip to Content

Changes for page 2 Script

Last modified by Devin Chen on 2025/06/06 14:03
From version 15.1
edited by Leo Wei
on 2022/07/09 17:44
Change comment: There is no comment for this version
To version 30.1
edited by Hunter
on 2022/11/21 17:31
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,313 @@
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 +
353 +== **1.8 How to parse value from HTTP response body** ==
354 +
355 +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":
356 +
357 +(% style="text-align:center" %)
358 +[[image:InputHTTPparameter.png]]
359 +
360 +Then the response body would be like as following:
361 +
362 +{{code language="json"}}
363 +{
364 + "location": {
365 + "name": "Madrid",
366 + "region": "Madrid",
367 + "country": "Spain",
368 + "lat": 40.4,
369 + "lon": -3.68,
370 + "tz_id": "Europe/Madrid",
371 + "localtime_epoch": 1669022636,
372 + "localtime": "2022-11-21 10:23"
373 + },
374 + "current": {
375 + "last_updated_epoch": 1669022100,
376 + "last_updated": "2022-11-21 10:15",
377 + "temp_c": 13.0,
378 + "temp_f": 55.4,
379 + "is_day": 1,
380 + "condition": {
381 + "text": "Partly cloudy",
382 + "icon": "//cdn.weatherapi.com/weather/64x64/day/116.png",
383 + "code": 1003
384 + },
385 + "wind_mph": 11.9,
386 + "wind_kph": 19.1,
387 + "wind_degree": 210,
388 + "wind_dir": "SSW",
389 + "pressure_mb": 1015.0,
390 + "pressure_in": 29.97,
391 + "precip_mm": 0.0,
392 + "precip_in": 0.0,
393 + "humidity": 88,
394 + "cloud": 75,
395 + "feelslike_c": 10.8,
396 + "feelslike_f": 51.4,
397 + "vis_km": 10.0,
398 + "vis_miles": 6.0,
399 + "uv": 3.0,
400 + "gust_mph": 22.1,
401 + "gust_kph": 35.6
402 + }
403 +}
404 +{{/code}}
405 +
406 +(% class="wikigeneratedid" %)
407 +So we decode json into lua object to assign the value into addresses HDW6060(temperature), HDW7070(humidity), the code example like follows:
408 +
409 +{{code language="lua"}}
410 +local APIkey = '70faaecf926b4341b1974006221711'
411 +
412 +
413 +local http = require("socket.http")
414 +local json = require("json")
415 +
416 +-- Send http.get request and return response result
417 +function getHttpsUrl(url)
418 + local result_table, code, headers, status = http.request(url)
419 + print("code:"..code)
420 + if code~= 200 then
421 + return
422 + else
423 + return result_table
424 + end
425 +end
426 +
427 +function sendAPI(key, city)
428 + local url = "http://api.weatherapi.com/v1/current.json?key="..key.."&q="..city.."&aqi=no"
429 + --local url = 'http://v-box.net'
430 + --local url = 'https://www.google.com/'
431 + --http://api.weatherapi.com/v1/current.json?key=70faaecf926b4341b1974006221711&q=Barcelona&aqi=no
432 + print("Get the link:"..url)
433 + local body = getHttpsUrl(url)
434 + --print(body)
435 + local jsonBody = json.decode(body)
436 + --print(jsonBody["current"]["temp_c"])
437 + --print(type(jsonBody["current"]["temp_c"]))
438 + --print(type(jsonBody["current"]["humidity"]))
439 + addr_setfloat("@HDW6060", jsonBody["current"]["temp_c"])
440 + addr_setword("@HDW7070", jsonBody["current"]["humidity"])
441 +end
442 +
443 +
444 +function Weather.main()
445 + local cityName = addr_getstring("@HDW5050",6)
446 + print("cityName: "..cityName)
447 + sendAPI(APIkey, cityName)
448 +end
449 +{{/code}}
450 +
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** ==
469 +(% class="wikigeneratedid" %)
470 +**✎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
472 +(% class="wikigeneratedid" %)
473 +Tool link: **[[MQTT.fx>>http://mqttfx.jensd.de/index.php/download]]**
159 159  
160 -Demo1:
475 +== **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 = ""
477 +{{code language="lua"}}
478 +--MQTT configuration table
479 +local MQTT_CFG={}
480 +MQTT_CFG.username = "weconsupport"
481 +MQTT_CFG.password = "123456"
482 +MQTT_CFG.netway = 0
483 +MQTT_CFG.keepalive = 60
484 +MQTT_CFG.cleansession = 1
485 +--TCP URL
486 +MQTT_URL = "tcp://mq.tongxinmao.com:1883"
487 +--Client ID
488 +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)  
490 +--Generate UUID
491 +function uuid()
492 + local seed = {'e','1','2','3','4','5','6','7','8','9','a','b','c','d','e','f'}
493 + local tb = {}
494 + for i=1, 32 do
495 + table.insert(tb, seed[math.random(1,16)])
496 + end
497 + local sid=table.concat(tb)
498 + return string.format('%s',
499 + string.sub(sid,1,32)
500 + )
501 +end
235 235  
236 236  
504 +--Topic name to subscribed
505 +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 --------------------------------------------------------------------------------------------------------------------------      
507 +--Topic name to be published
508 +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")
511 +--real time
512 +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
515 +--initialize mqtt
516 +function mqtt_init()
517 + print(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENT_ID))
518 + g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENT_ID) -- create mqtt object,and declare it as a global variable
519 + if g_mq then
520 + g_mq:on("message", mqtt_msg_callback) -- Register a callback for receiving messages
521 + print("mqtt init success")
522 + else
523 + print("mqtt init failed:", err)
524 + end
525 +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
527 +-- connect to mqtt
528 +function mqtt_connect()
529 + print("mqtt connecting...")
530 + local stat, err = g_mq:connect(MQTT_CFG)
531 + if stat == nil then
532 + print("mqtt connect failed:", err)
533 + return
534 + else
535 + print("mqtt connected")
536 + end
537 + g_mq:subscribe(SUBSCRIBE_TOPIC, 0)
302 302  end
539 +
540 +-- Received message callback function
541 +function mqtt_msg_callback(topic, msg)
542 + print("topic:", topic)
543 + print("msg:", msg)
544 + local objMsg = json.decode(msg)
545 + local water = objMsg.data.waterlevel
546 + local temp = objMsg.data.temperature
547 + addr_setword("@HDW20",water)
548 + addr_setword("@HDW10",temp)
549 +end
550 +
551 +--Send data (data upload to platform and encapsulate it with custom functions)
552 +function send_data()
553 + local pub_data = {
554 + timestamp = os.time(),
555 + messageId = 1,
556 + event = 'test_data',
557 + mfrs = 'V-Box',
558 + data = {
559 + id = uuid(),
560 + waterlevel = addr_getword("@HDW10"),
561 + temperature = addr_getword("@HDW20")
562 + }
563 + }
564 + return g_mq:publish(PUBLISH_TOPIC, json.encode(pub_data), 0, 0)
565 +end
566 +
567 +
568 +--main function fixed timed execution
569 +function MQTT.main()
570 + --dosomething
571 + print(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " main start")
572 + --determine the mqtt object whether exist
573 + if g_mq then
574 + --determine the mqtt object whether has been connected or not
575 + if g_mq:isconnected() then
576 + send_data()
577 + else
578 + --if exceed 20 sec not connect, reconnect once
579 + if os.time() - LAST_TIME > 20 then
580 + LAST_TIME = os.time()
581 + --connect to mqtt or reconnect
582 + mqtt_connect()
583 + end
584 + end
585 + else
586 + --mqtt object does not exist so create new one
587 + mqtt_init()
588 + end
589 + print(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " main end")
590 +end
303 303  {{/code}}
304 304  
305 -== **2.2 V-Box connect with Azure platform** ==
593 +== **2.2 V-Box connect with customer server:grouprobotinfo.com** ==
306 306  
595 +This demo does not use SSL certification. Script is as below
596 +
597 +Demo1:
598 +
599 +{{code language="lua"}}
600 +-- Meta class
601 +--main
602 +function mq.main()
603 + if not mq.m then
604 + local err = ""
605 +
606 + mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID") -- create connection
607 + if mq.m then
608 + mq.config = {
609 + username = "",-- ID
610 + password = "",-- password
611 + netway = 1, -- Ethernet connection, WIFI=1
612 + -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
613 + -- cleansession = 0, -- Optional, keep session
614 + }
615 + mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
616 + local str = string.format("%s:%s", topic, msg)
617 + -- print("mqtt msg:", str) -- Print out the received topics and content
618 + end)
619 + mq.m:on("offline", function (cause) -- Register for lost connection callbacks
620 + -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
621 + end)
622 + mq.m:on("arrived", function() -- Registration for sending messages to callbacks
623 + print("msg arrived")
624 + end)
625 + else
626 + print("mqtt create failed:", err) -- Create object failed
627 + end
628 + else
629 + if mq.m:isconnected() then -- If online, post a message
630 + local phaseStatus ="unknow"
631 + if addr_getbit("@Standby")== 1 then
632 + phaseStatus = "Standby"
633 + elseif addr_getbit("@Pre-Freeze")==1 then
634 + phaseStatus= "Pre-Freeze"
635 + elseif addr_getbit("@Prepare")==1 then
636 + phaseStatus ="Prepare"
637 + elseif addr_getbit("@Primary Dry")==1 then
638 + phaseStatus = "Primary dry"
639 + elseif addr_getbit("@Secondary Dry")==1 then
640 + phaseStatus = "Secondary Dry"
641 + end
642 + --print(addr_getbit("@Primary Dry"))
643 +-------------------------------------------------------------------------------------------------------------------------
644 + local activating ="unknow"
645 + if addr_getbit("@Compressor")==1 then
646 + activating = ",".."Compressor"
647 + end
648 + if addr_getbit("@Silicone Pump")==1 then
649 + activating = activating..",".."Silicone Pump"
650 + end
651 + if addr_getbit("@Vacuum Pump")==1 then
652 + activating = activating..",".."Vacuum Pump"
653 + end
654 + if addr_getbit("@Root Pump")==1 then
655 + activating = activating..",".."Root Pump"
656 + end
657 + if addr_getbit("@Heater")==1 then
658 + activating = activating..",".."Heater"
659 + end
660 + if addr_getbit("@Valve Silicone")==1 then
661 + activating = activating..",".."Valve Silicone"
662 + end
663 + if addr_getbit("@Valve Ice Condenser")==1 then
664 + activating = activating..",".."Valve Ice Condenser"
665 + end
666 + if addr_getbit("@Valve Vacuum Pump")==1 then
667 + activating = activating..",".."Valve Vacuum Pump"
668 + end
669 + local pr_activating =string.sub(activating,2)
670 + -- print(pr_activating)
671 + local status_text ="unknow"
672 + if addr_getbit("@Status Run")==1 then
673 + status_text = "RUNNING"
674 + else
675 + status_text = "STOP"
676 + end
677 +-------------------------------------------------------------------------------------------------------------------------
678 + local js = {type="status",
679 + mc_name ="FD300",
680 + status=status_text,
681 + elapsed_time={
682 + hour=addr_getword("@Elapsed Time (Hour)"),
683 + min=addr_getword("@Elapsed Time (Minute)"),
684 + sec=addr_getword("@Elapsed Time (Second)")
685 + },
686 + phase = phaseStatus,
687 + step = addr_getword("@Step"),
688 + activating_output = pr_activating,
689 + sv=addr_getshort("@SV Silicone")/10,
690 + pv=addr_getshort("@PV Silicone")/10,
691 + product1=addr_getshort("@Product 1")/10,
692 +
693 + product2=addr_getshort("@Product 2")/10,
694 + product3=addr_getshort("@Product 3")/10,
695 + product4=addr_getshort("@Product 4")/10,
696 + ice1=addr_getshort("@Ice condenser 1")/10,
697 + ice2=addr_getshort("@Ice condenser 2")/10,
698 + vacuum=addr_getfloat("@Vacuum")
699 + }
700 + local jsAlarm = { HPC = addr_getbit("@B_25395#W0.00"),
701 + ODPC = addr_getbit("@B_25395#W0.01"),
702 + MTPC=addr_getbit("@B_25395#W0.02"),
703 + HTT = addr_getbit("@B_25395#W1.03"),
704 + CPC = addr_getbit("@B_25395#W0.08"),
705 + CPSP =addr_getbit("@B_25395#W1.00"),
706 + CPVP =addr_getbit("@B_25395#W0.10"),
707 + CPRP =addr_getbit("@B_25395#W0.11"),
708 + HP =addr_getbit("@B_25395#W1.01"),
709 + PP= addr_getbit("@B_25395#W1.02"),
710 + PO=addr_getbit("@B_25395#W0.07"),
711 + FSE=addr_getbit("@B_25395#W2.04"),
712 + AVVSVV=addr_getbit("@B_25395#W1.12"),
713 + ICHT=addr_getbit("@B_25395#W3.06")
714 + }
715 + -- ("@B_25395#CIO1.02")
716 + mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
717 + mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
718 + else
719 + local stat, err = mq.m:connect(mq.config) -- connection
720 + if stat == nil then --Determine whether to connect
721 + print("mqtt connect failed:", err)
722 + return -- Connection failed, return directly
723 + end
724 + mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
725 +
726 + end
727 + -- mq.m:unsubscribe("stc/test")
728 + -- mq.m:disconnect() -- close matt
729 + -- mq.m:close() -- close clase
730 + end
731 +end
732 +{{/code}}
733 +
734 +== **2.3 V-Box connect with Azure platform** ==
735 +
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,131 +312,128 @@
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
744 +(% class="box infomessage" %)
745 +(((
746 +~-~-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"
749 +~-~-Get custom configuration parameters (vbox custom information)
750 +~-~-local CUSTOM = bns_get_config("bind")
751 +~-~-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)
754 +~-~-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'
757 +~-~-MQTT_CFG.username = '60a71ccbbbe12002c08f3a1a_WECON'
758 +~-~-MQTT_CFG.password='wecon123'
759 +~-~-MQTT_CLIENTID = '60a71ccbbbe12002c08f3a1a_WECON_0_0_2021052110usernxame:60a71ccbbbe12002c08f3a1a_WECONpassword:a0a951581855aa8e0262129da6cf1b43f2c0ecfac4fa56117fc5a20c90be169a'
331 331  
332 ---publish to topics
761 +~-~-publish to topics
333 333  local pub_RE_TOPIC = string.format('devices/wecon_02/messages/events/')
334 ---Subscribe topics
763 +~-~-Subscribe topics
335 335  local Subscribe_RE_TOPIC1 = string.format('devices/wecon_02/messages/devicebound/#')
336 336  
337 ---variable
766 +~-~-variable
338 338  local last_time = 0
339 339  
340 340  
341 -
342 ---Timing main function
770 +~-~-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")
773 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " Azureiot.main start")
774 + if g_mq then
775 + if g_mq:isconnected() then
776 + send_Data()
777 + else
778 + if os.time() - last_time > 20 then
779 + last_time = os.time()
780 + mymqtt_connect()
781 + end
782 + end
783 + else
784 + mymqtt_init()
785 + end
786 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " Azureiot.main end")
359 359  end
360 360  
361 --- Initialize MQTT
789 +~-~- 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
791 + sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
792 + g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENTID) ~-~- Create the object and declare it as a global variable
793 + if g_mq then
794 + g_mq:on("message", mymqtt_msg_callback) ~-~- Register to receive message callbacks
795 + sprint("mqtt init success")
796 + else
797 + sprint("mqtt init failed:", err)
798 + end
371 371  end
372 372  
373 --- Connect to MQTT server
801 +~-~- 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) 
803 + sprint("mqtt connecting...")
804 + local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
805 + if stat == nil then
806 + sprint("mqtt connect failed:", err)
807 + return
808 + else
809 + sprint("mqtt connected")
810 + end
811 + g_mq:subscribe(Subscribe_RE_TOPIC1, 0) 
384 384  end
385 385  
386 --- Receive MQTT message callback function
814 +~-~- 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
816 + print("topic:",topic)
817 + print("revdata:",msg)
818 + ~-~- local revData = json.decode(msg)
819 + ~-~- if topic == Subscribe_RE_TOPIC1 then ~-~-Process topic information subscribed from the cloud
820 +~-~- if string.match(topic,Subscribe_RE_TOPIC1) then
821 + ~-~- print("topi11:",topic)
822 + setValue(revData)
823 + ~-~- 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
826 +~-~-Process the received data
827 +~-~-function setValue(revData)
828 + ~-~- if revData ~~=nil then 
829 + ~-~- for i,v in pairs(revData) do
830 + ~-~- print("Data received：",i,v)
831 + ~-~- end
832 + ~-~- end
833 +~-~-end
406 406  
407 ---Get real-time data
835 +~-~-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 
837 + local jdata = {}
838 + local addr = bns_get_alldata()
839 + print(json.encode(addr))
840 + for i,v in pairs(addr) do
841 + if v[2] == 1 then
842 + jdata[v[3]] = v[4]
843 + end
844 + end
845 + return jdata
846 +end
419 419  
420 420  
421 -
422 ---send data
849 +~-~-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 -       -- }}
851 + local pub_data = {100
852 + ~-~- services=~{~{
853 +\\ ~-~-serviceId ='Temperature',
854 + ~-~- properties={
855 + ~-~- value = 55
856 + ~-~- },
857 + ~-~- }}
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)
861 + return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
436 436  end
437 -{{/code}}
863 +)))
438 438  
439 -== **2.3 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 +== **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）** ==
440 440  
441 441  1.Register a account: [[https:~~/~~/www.huaweicloud.com/intl/en-us/s/JUlPVERNJQ>>https://www.huaweicloud.com/intl/en-us/s/JUlPVERNJQ]]
442 442  
... ... @@ -585,7 +585,7 @@
585 585  (% style="text-align:center" %)
586 586  [[image:1624441186851-536.png||height="434" width="700" class="img-thumbnail"]]
587 587  
588 -== **2.4 V-Box connect with Huawei platform** ==
1014 +== **2.5 V-Box connect with Huawei platform** ==
589 589  
590 590  In this demo,V-Box connects with Huawei by SSL certification.
591 591  
... ... @@ -706,7 +706,7 @@
706 706  (% style="text-align:center" %)
707 707  [[image:1624506666650-161.png||height="547" width="1000" class="img-thumbnail"]]
708 708  
709 -== **2.5 V-Box connect with AWS platform** ==
1135 +== **2.6 V-Box connect with AWS platform** ==
710 710  
711 711  === **Log in AWS** ===
712 712  
... ... @@ -763,102 +763,67 @@
763 763  }
764 764  {{/code}}
765 765  
766 -1. **Create things**
1192 +=== **Create things** ===
767 767  
768 768  Click “Manage”~-~-->“Things”~-~-->“Create things”~-~-->“Create single thing”
769 769  
1196 +[[image:image-20220709165402-6.png]]
770 770  
771 -|
772 -| |[[image:image-20220709165402-6.png]]
1198 +[[image:image-20220709165402-7.png]]
773 773  
774 -|
775 -| |[[image:image-20220709165402-7.png]]
776 -
777 -|
778 -| |[[image:image-20220709165402-8.png]]
779 -
780 780  Name the thing~-~-->Click “Next”
781 781  
1202 +[[image:image-20220709165402-8.png]]
782 782  
783 783  Select the way to create certificate
784 784  
1206 +[[image:image-20220709165402-9.png]]
785 785  
786 -|
787 -| |[[image:image-20220709165402-9.png]]
788 -
789 789  Select policy
790 790  
1210 +[[image:image-20220709165402-10.png]]
791 791  
792 -|
793 -| |[[image:image-20220709165402-10.png]]
1212 +[[image:image-20220709165402-11.png]]
794 794  
795 795  
1215 +=== **Test with MQTT.fx tool** ===
796 796  
797 -
798 -
799 -
800 -|
801 -| |[[image:image-20220709165402-11.png]]
802 -
803 -
804 -
805 -1. **Test with MQTT.fx tool**
806 -
807 807  Click “View Setting” to get the “Broker Adress”
808 808  
1219 +[[image:image-20220709165402-13.png]]
809 809  
810 -|
811 -| |[[image:image-20220709165402-12.png]]
1221 +[[image:image-20220709165402-12.png]]
812 812  
813 -|
814 -| |[[image:image-20220709165402-13.png]]
815 -
816 -
817 -
818 -
819 -
820 -|
821 -| |[[image:image-20220709165402-14.png]]
822 -
823 823  Create one connection in MQTT.fx tool, set broker port as 8883.
824 824  
1225 +[[image:image-20220709165402-14.png]]
1226 +
825 825  Upload the CA File, Client Certificate File, Client Key File
826 826  
1229 +[[image:image-20220709165402-15.png]]
827 827  
828 -|
829 -| |[[image:image-20220709165402-15.png]]
830 -
831 831  Publish message to topic “TEST”
832 832  
1233 +[[image:image-20220709165402-17.png]]
833 833  
834 -|
835 -| |[[image:image-20220709165402-16.png]]
836 -
837 -|
838 -| |[[image:image-20220709165402-17.png]]
839 -
840 840  Click”Test”~-~-->”MQTT test client”~-~-->”Subscrible to a topic”, to get message publish from MQTT.fx tool.
841 841  
1237 +[[image:image-20220709173500-1.png]]
1238 +
842 842  And we can also send message form AWS platform to MQTT.fx tool.
843 843  
1241 +[[image:image-20220709165402-18.png]]
844 844  
845 -|
846 -| |[[image:image-20220709165402-18.png]]
1243 +=== **Configurate in CloudTool** ===
847 847  
848 -1. **Configurate in CloudTool**
849 -
850 850  Copy the same setting in MQTT.fx to MQTT configuration
851 851  
1247 +[[image:image-20220709165402-19.png]]
852 852  
853 -|
854 -| |[[image:image-20220709165402-19.png]]
855 -
856 856   Add a lua script and copy the lua demo into it.
857 857  
1251 +[[image:image-20220709165402-20.png]]
858 858  
859 -|
860 -| |[[image:image-20220709165402-20.png]]
861 -
862 862  sprint = print
863 863  
864 864  ~-~-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)
... ... @@ -1039,10 +1039,6 @@
1039 1039  
1040 1040  end
1041 1041  
1042 -
1043 -
1044 1044  Get message in AWS
1045 1045  
1046 -
1047 -|
1048 -| |[[image:image-20220709165402-21.png]]
1435 +[[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