Skip to Content

Changes for page 2 Script

Last modified by Devin Chen on 2025/06/06 14:03
From version 5.1
edited by Hunter
on 2022/07/08 14:11
Change comment: There is no comment for this version
To version 28.1
edited by Hunter
on 2022/11/21 17:01
Change comment: There is no comment for this version

Summary

Details

Page properties
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  
... ... @@ -70,6 +70,12 @@
70 70  
71 71  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.
72 72  
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 +
73 73  {{code language="Lua"}}
74 74  local tempBit = 0
75 75  local tempWord = 0
... ... @@ -135,7 +135,214 @@
135 135  end
136 136  {{/code}}
137 137  
144 +== **1.6 LINE Notify** ==
138 138  
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 +
139 139  = **2 V-Box connect with third part server** =
140 140  
141 141  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.
... ... @@ -154,152 +154,272 @@
154 154  
155 155  (% class="mark" %)2.If your server requires SSL certificate to log in,please use OpenCloud.Because only OpenCloud platform can support to upload certificate
156 156  
157 -== **2.1 V-Box connect with customer server:grouprobotinfo.com** ==
370 +(% class="wikigeneratedid" %)
371 +**✎Note: **Before program the script of MQTT, please make sure the server(MQTT broker) can be connected through MQTT Client tool.
158 158  
373 +(% class="wikigeneratedid" %)
374 +Tool link: **[[MQTT.fx>>http://mqttfx.jensd.de/index.php/download]]**
375 +
376 +== **2.1 V-Box connect with test server(General Example)** ==
377 +
378 +{{code language="lua"}}
379 +--MQTT configuration table
380 +local MQTT_CFG={}
381 +MQTT_CFG.username = "weconsupport"
382 +MQTT_CFG.password = "123456"
383 +MQTT_CFG.netway = 0
384 +MQTT_CFG.keepalive = 60
385 +MQTT_CFG.cleansession = 1
386 +--TCP URL
387 +MQTT_URL = "tcp://mq.tongxinmao.com:1883"
388 +--Client ID
389 +MQTT_CLIENT_ID = "V-BOXH-AG"
390 +
391 +--Generate UUID
392 +function uuid()
393 + local seed = {'e','1','2','3','4','5','6','7','8','9','a','b','c','d','e','f'}
394 + local tb = {}
395 + for i=1, 32 do
396 + table.insert(tb, seed[math.random(1,16)])
397 + end
398 + local sid=table.concat(tb)
399 + return string.format('%s',
400 + string.sub(sid,1,32)
401 + )
402 +end
403 +
404 +
405 +--Topic name to subscribed
406 +local SUBSCRIBE_TOPIC = 'testtopic/test/no1/123456'
407 +
408 +--Topic name to be published
409 +local PUBLISH_TOPIC = 'testtopic/test/no1/7890'
410 +
411 +
412 +--real time
413 +local LAST_TIME = 0
414 +
415 +
416 +--initialize mqtt
417 +function mqtt_init()
418 + print(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENT_ID))
419 + g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENT_ID) -- create mqtt object,and declare it as a global variable
420 + if g_mq then
421 + g_mq:on("message", mqtt_msg_callback) -- Register a callback for receiving messages
422 + print("mqtt init success")
423 + else
424 + print("mqtt init failed:", err)
425 + end
426 +end
427 +
428 +-- connect to mqtt
429 +function mqtt_connect()
430 + print("mqtt connecting...")
431 + local stat, err = g_mq:connect(MQTT_CFG)
432 + if stat == nil then
433 + print("mqtt connect failed:", err)
434 + return
435 + else
436 + print("mqtt connected")
437 + end
438 + g_mq:subscribe(SUBSCRIBE_TOPIC, 0)
439 +end
440 +
441 +-- Received message callback function
442 +function mqtt_msg_callback(topic, msg)
443 + print("topic:", topic)
444 + print("msg:", msg)
445 + local objMsg = json.decode(msg)
446 + local water = objMsg.data.waterlevel
447 + local temp = objMsg.data.temperature
448 + addr_setword("@HDW20",water)
449 + addr_setword("@HDW10",temp)
450 +end
451 +
452 +--Send data (data upload to platform and encapsulate it with custom functions)
453 +function send_data()
454 + local pub_data = {
455 + timestamp = os.time(),
456 + messageId = 1,
457 + event = 'test_data',
458 + mfrs = 'V-Box',
459 + data = {
460 + id = uuid(),
461 + waterlevel = addr_getword("@HDW10"),
462 + temperature = addr_getword("@HDW20")
463 + }
464 + }
465 + return g_mq:publish(PUBLISH_TOPIC, json.encode(pub_data), 0, 0)
466 +end
467 +
468 +
469 +--main function fixed timed execution
470 +function MQTT.main()
471 + --dosomething
472 + print(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " main start")
473 + --determine the mqtt object whether exist
474 + if g_mq then
475 + --determine the mqtt object whether has been connected or not
476 + if g_mq:isconnected() then
477 + send_data()
478 + else
479 + --if exceed 20 sec not connect, reconnect once
480 + if os.time() - LAST_TIME > 20 then
481 + LAST_TIME = os.time()
482 + --connect to mqtt or reconnect
483 + mqtt_connect()
484 + end
485 + end
486 + else
487 + --mqtt object does not exist so create new one
488 + mqtt_init()
489 + end
490 + print(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " main end")
491 +end
492 +{{/code}}
493 +
494 +== **2.2 V-Box connect with customer server:grouprobotinfo.com** ==
495 +
159 159  This demo does not use SSL certification. Script is as below
160 160  
161 161  Demo1:
162 162  
163 -(% class="box infomessage" %)
164 -(((
165 -~-~- Meta class
166 -~-~-main
500 +{{code language="lua"}}
501 +-- Meta class
502 +--main
167 167  function mq.main()
168 168   if not mq.m then
169 169   local err = ""
170 -\\ mq.m, err = mqtt.create("tcp:~/~/grouprobotinfo.com:1883", "ClienID") ~-~- create connection
506 +
507 + mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID") -- create connection
171 171   if mq.m then
172 172   mq.config = {
173 - username = "",~-~- ID
174 - password = "",~-~- password
175 - netway = 1, ~-~- Ethernet connection, WIFI=1
176 - ~-~- keepalive = 100, ~-~- Optional, set the connection heartbeat interval for 100 seconds.
177 - ~-~- cleansession = 0, ~-~- Optional, keep session
510 + username = "",-- ID
511 + password = "",-- password
512 + netway = 1, -- Ethernet connection, WIFI=1
513 + -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
514 + -- cleansession = 0, -- Optional, keep session
178 178   }
179 - mq.m:on("message", function(topic, msg) ~-~- Register for receiving message callbacks
516 + mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
180 180   local str = string.format("%s:%s", topic, msg)
181 - ~-~- print("mqtt msg:", str) ~-~- Print out the received topics and content
182 - end
183 - )
184 - mq.m:on("offline", function (cause) ~-~- Register for lost connection callbacks
185 - ~-~- addr_setstring("@xxx", "cause"..(cause or " got nil"))
518 + -- print("mqtt msg:", str) -- Print out the received topics and content
186 186   end)
187 - mq.m:on("arrived", function() ~-~- Registration for sending messages to callbacks 
520 + mq.m:on("offline", function (cause) -- Register for lost connection callbacks
521 + -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
522 + end)
523 + mq.m:on("arrived", function() -- Registration for sending messages to callbacks
188 188   print("msg arrived")
189 189   end)
190 190   else
191 - print("mqtt create failed:", err) ~-~- Create object failed
527 + print("mqtt create failed:", err) -- Create object failed
192 192   end
193 193   else
194 - if mq.m:isconnected() then ~-~- If online, post a message
530 + if mq.m:isconnected() then -- If online, post a message
195 195   local phaseStatus ="unknow"
196 196   if addr_getbit("@Standby")== 1 then
197 - phaseStatus = "Standby"
533 + phaseStatus = "Standby"
198 198   elseif addr_getbit("@Pre-Freeze")==1 then
199 - phaseStatus= "Pre-Freeze"
535 + phaseStatus= "Pre-Freeze"
200 200   elseif addr_getbit("@Prepare")==1 then
201 - phaseStatus ="Prepare"
537 + phaseStatus ="Prepare"
202 202   elseif addr_getbit("@Primary Dry")==1 then
203 - phaseStatus = "Primary dry"
539 + phaseStatus = "Primary dry"
204 204   elseif addr_getbit("@Secondary Dry")==1 then
205 - phaseStatus = "Secondary Dry"
541 + phaseStatus = "Secondary Dry"
206 206   end
207 -~-~- print(addr_getbit("@Primary Dry"))
208 -~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~--
543 + --print(addr_getbit("@Primary Dry"))
544 +-------------------------------------------------------------------------------------------------------------------------
209 209   local activating ="unknow"
210 210   if addr_getbit("@Compressor")==1 then
211 - activating = ",".."Compressor"
547 + activating = ",".."Compressor"
212 212   end
213 213   if addr_getbit("@Silicone Pump")==1 then
214 - activating = activating..",".."Silicone Pump"
550 + activating = activating..",".."Silicone Pump"
215 215   end
216 216   if addr_getbit("@Vacuum Pump")==1 then
217 - activating = activating..",".."Vacuum Pump"
553 + activating = activating..",".."Vacuum Pump"
218 218   end
219 219   if addr_getbit("@Root Pump")==1 then
220 - activating = activating..",".."Root Pump"
556 + activating = activating..",".."Root Pump"
221 221   end
222 222   if addr_getbit("@Heater")==1 then
223 - activating = activating..",".."Heater"
559 + activating = activating..",".."Heater"
224 224   end
225 225   if addr_getbit("@Valve Silicone")==1 then
226 - activating = activating..",".."Valve Silicone"
562 + activating = activating..",".."Valve Silicone"
227 227   end
228 228   if addr_getbit("@Valve Ice Condenser")==1 then
229 - activating = activating..",".."Valve Ice Condenser"
565 + activating = activating..",".."Valve Ice Condenser"
230 230   end
231 231   if addr_getbit("@Valve Vacuum Pump")==1 then
232 - activating = activating..",".."Valve Vacuum Pump"
568 + activating = activating..",".."Valve Vacuum Pump"
233 233   end
234 234   local pr_activating =string.sub(activating,2)
235 - ~-~- print(pr_activating) 
236 -
237 -
571 + -- print(pr_activating)
238 238   local status_text ="unknow"
239 239   if addr_getbit("@Status Run")==1 then
240 - status_text = "RUNNING"
574 + status_text = "RUNNING"
241 241   else
242 - status_text = "STOP"
576 + status_text = "STOP"
243 243   end
244 -~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~--
245 -\\ local js = {type="status",
246 - mc_name ="FD300",
247 - status=status_text,
248 - elapsed_time={
249 - hour=addr_getword("@Elapsed Time (Hour)"),
250 - min=addr_getword("@Elapsed Time (Minute)"),
251 - sec=addr_getword("@Elapsed Time (Second)")
252 - },
253 - phase = phaseStatus,
254 - step = addr_getword("@Step"),
255 - activating_output = pr_activating,
256 - sv=addr_getshort("@SV Silicone")/10,
257 - pv=addr_getshort("@PV Silicone")/10,
258 - product1=addr_getshort("@Product 1")/10,
259 -
260 - product2=addr_getshort("@Product 2")/10,
261 - product3=addr_getshort("@Product 3")/10,
262 - product4=addr_getshort("@Product 4")/10,
263 - ice1=addr_getshort("@Ice condenser 1")/10,
264 - ice2=addr_getshort("@Ice condenser 2")/10,
265 - vacuum=addr_getfloat("@Vacuum")
266 -
267 - }
578 +-------------------------------------------------------------------------------------------------------------------------
579 + local js = {type="status",
580 + mc_name ="FD300",
581 + status=status_text,
582 + elapsed_time={
583 + hour=addr_getword("@Elapsed Time (Hour)"),
584 + min=addr_getword("@Elapsed Time (Minute)"),
585 + sec=addr_getword("@Elapsed Time (Second)")
586 + },
587 + phase = phaseStatus,
588 + step = addr_getword("@Step"),
589 + activating_output = pr_activating,
590 + sv=addr_getshort("@SV Silicone")/10,
591 + pv=addr_getshort("@PV Silicone")/10,
592 + product1=addr_getshort("@Product 1")/10,
593 +
594 + product2=addr_getshort("@Product 2")/10,
595 + product3=addr_getshort("@Product 3")/10,
596 + product4=addr_getshort("@Product 4")/10,
597 + ice1=addr_getshort("@Ice condenser 1")/10,
598 + ice2=addr_getshort("@Ice condenser 2")/10,
599 + vacuum=addr_getfloat("@Vacuum")
600 + }
268 268   local jsAlarm = { HPC = addr_getbit("@B_25395#W0.00"),
269 - ODPC = addr_getbit("@B_25395#W0.01"),
270 - MTPC=addr_getbit("@B_25395#W0.02"),
271 - HTT = addr_getbit("@B_25395#W1.03"),
272 - CPC = addr_getbit("@B_25395#W0.08"),
273 - CPSP =addr_getbit("@B_25395#W1.00"),
274 - CPVP =addr_getbit("@B_25395#W0.10"),
275 - CPRP =addr_getbit("@B_25395#W0.11"),
276 - HP =addr_getbit("@B_25395#W1.01"),
277 - PP= addr_getbit("@B_25395#W1.02"),
278 - PO=addr_getbit("@B_25395#W0.07"),
279 - FSE=addr_getbit("@B_25395#W2.04"),
280 - AVVSVV=addr_getbit("@B_25395#W1.12"),
281 - ICHT=addr_getbit("@B_25395#W3.06")
282 -
283 - }
284 -\\ ~-~- ("@B_25395#CIO1.02")
602 + ODPC = addr_getbit("@B_25395#W0.01"),
603 + MTPC=addr_getbit("@B_25395#W0.02"),
604 + HTT = addr_getbit("@B_25395#W1.03"),
605 + CPC = addr_getbit("@B_25395#W0.08"),
606 + CPSP =addr_getbit("@B_25395#W1.00"),
607 + CPVP =addr_getbit("@B_25395#W0.10"),
608 + CPRP =addr_getbit("@B_25395#W0.11"),
609 + HP =addr_getbit("@B_25395#W1.01"),
610 + PP= addr_getbit("@B_25395#W1.02"),
611 + PO=addr_getbit("@B_25395#W0.07"),
612 + FSE=addr_getbit("@B_25395#W2.04"),
613 + AVVSVV=addr_getbit("@B_25395#W1.12"),
614 + ICHT=addr_getbit("@B_25395#W3.06")
615 + }
616 + -- ("@B_25395#CIO1.02")
285 285   mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
286 286   mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
287 287   else
288 - local stat, err = mq.m:connect(mq.config) ~-~- connection
289 - if stat == nil then ~-~-Determine whether to connect
620 + local stat, err = mq.m:connect(mq.config) -- connection
621 + if stat == nil then --Determine whether to connect
290 290   print("mqtt connect failed:", err)
291 - return ~-~- Connection failed, return directly
623 + return -- Connection failed, return directly
292 292   end
293 - mq.m:subscribe("mqtt-v-box-epsilon", 0)~-~- Subscribe to topics
294 -\\ end
295 - ~-~- mq.m:unsubscribe("stc/test")
296 - ~-~- mq.m:disconnect() ~-~- close matt
297 - ~-~- mq.m:close() ~-~- close clase
625 + mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
626 +
627 + end
628 + -- mq.m:unsubscribe("stc/test")
629 + -- mq.m:disconnect() -- close matt
630 + -- mq.m:close() -- close clase
298 298   end
299 299  end
300 -)))
633 +{{/code}}
301 301  
302 -== **2.2 V-Box connect with Azure platform** ==
635 +== **2.3 V-Box connect with Azure platform** ==
303 303  
304 304  In this demo,V-Box connects with Azure by SSL certification.
305 305  
... ... @@ -430,7 +430,7 @@
430 430  end
431 431  )))
432 432  
433 -== **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）** ==
766 +== **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）** ==
434 434  
435 435  1.Register a account: [[https:~~/~~/www.huaweicloud.com/intl/en-us/s/JUlPVERNJQ>>https://www.huaweicloud.com/intl/en-us/s/JUlPVERNJQ]]
436 436  
... ... @@ -579,7 +579,7 @@
579 579  (% style="text-align:center" %)
580 580  [[image:1624441186851-536.png||height="434" width="700" class="img-thumbnail"]]
581 581  
582 -== **2.4 V-Box connect with Huawei platform** ==
915 +== **2.5 V-Box connect with Huawei platform** ==
583 583  
584 584  In this demo,V-Box connects with Huawei by SSL certification.
585 585  
... ... @@ -700,6 +700,304 @@
700 700  (% style="text-align:center" %)
701 701  [[image:1624506666650-161.png||height="547" width="1000" class="img-thumbnail"]]
702 702  
703 -== **2.5 V-Box connect with AWS platform** ==
1036 +== **2.6 V-Box connect with AWS platform** ==
704 704  
705 -[[https:~~/~~/ftp.we-con.com.cn/Download/WIKI/V-BOX/Demo/AWS/AWS.zip>>https://ftp.we-con.com.cn/Download/WIKI/V-BOX/Demo/AWS/AWS.zip]]
1038 +=== **Log in AWS** ===
1039 +
1040 +Login aws account and click“Connect an IoT device”
1041 +
1042 +[[image:image-20220709165402-1.png]]
1043 +
1044 +[[image:image-20220709165402-2.png]]
1045 +
1046 +
1047 +=== **Create policy** ===
1048 +
1049 +Click “Secure”~-~-->“Policies”~-~-->“Create policy”~-~-->Click “Create”
1050 +
1051 +[[image:image-20220709165402-3.png]]
1052 +
1053 +Name the policy~-~-->Click “JSON”~-~-->Copy the following content~-~-->Click “Create”
1054 +
1055 +[[image:image-20220709165402-5.png]]
1056 +
1057 +[[image:image-20220709165402-4.png]]
1058 +
1059 +{{code language="java"}}
1060 +{
1061 +
1062 +  "Version": "2012-10-17",
1063 +
1064 +  "Statement": [
1065 +
1066 +    {
1067 +
1068 +      "Effect": "Allow",
1069 +
1070 +      "Action": [
1071 +
1072 +        "iot:Connect",
1073 +
1074 +        "iot:Publish",
1075 +
1076 +        "iot:Subscribe",
1077 +
1078 +        "iot:Receive",
1079 +
1080 +        "greengrass:Discover"
1081 +
1082 +      ],
1083 +
1084 +      "Resource": "*"
1085 +
1086 +    }
1087 +
1088 +  ]
1089 +
1090 +}
1091 +{{/code}}
1092 +
1093 +=== **Create things** ===
1094 +
1095 +Click “Manage”~-~-->“Things”~-~-->“Create things”~-~-->“Create single thing”
1096 +
1097 +[[image:image-20220709165402-6.png]]
1098 +
1099 +[[image:image-20220709165402-7.png]]
1100 +
1101 +Name the thing~-~-->Click “Next”
1102 +
1103 +[[image:image-20220709165402-8.png]]
1104 +
1105 +Select the way to create certificate
1106 +
1107 +[[image:image-20220709165402-9.png]]
1108 +
1109 +Select policy
1110 +
1111 +[[image:image-20220709165402-10.png]]
1112 +
1113 +[[image:image-20220709165402-11.png]]
1114 +
1115 +
1116 +=== **Test with MQTT.fx tool** ===
1117 +
1118 +Click “View Setting” to get the “Broker Adress”
1119 +
1120 +[[image:image-20220709165402-13.png]]
1121 +
1122 +[[image:image-20220709165402-12.png]]
1123 +
1124 +Create one connection in MQTT.fx tool, set broker port as 8883.
1125 +
1126 +[[image:image-20220709165402-14.png]]
1127 +
1128 +Upload the CA File, Client Certificate File, Client Key File
1129 +
1130 +[[image:image-20220709165402-15.png]]
1131 +
1132 +Publish message to topic “TEST”
1133 +
1134 +[[image:image-20220709165402-17.png]]
1135 +
1136 +Click”Test”~-~-->”MQTT test client”~-~-->”Subscrible to a topic”, to get message publish from MQTT.fx tool.
1137 +
1138 +[[image:image-20220709173500-1.png]]
1139 +
1140 +And we can also send message form AWS platform to MQTT.fx tool.
1141 +
1142 +[[image:image-20220709165402-18.png]]
1143 +
1144 +=== **Configurate in CloudTool** ===
1145 +
1146 +Copy the same setting in MQTT.fx to MQTT configuration
1147 +
1148 +[[image:image-20220709165402-19.png]]
1149 +
1150 + Add a lua script and copy the lua demo into it.
1151 +
1152 +[[image:image-20220709165402-20.png]]
1153 +
1154 +sprint = print
1155 +
1156 +~-~-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)
1157 +
1158 +local MQTT_URL, MQTT_CLIENTID, MQTT_CFG, MQTT_LWT, MQTT_CART = mqtt.setup_cfg()
1159 +
1160 +~-~-publish to topics
1161 +
1162 +local pub_RE_TOPIC = string.format('TEST')
1163 +
1164 +~-~-Subscribe topics
1165 +
1166 +local Subscribe_RE_TOPIC1 = string.format('TEST')
1167 +
1168 +~-~-variable
1169 +
1170 +local last_time = 0
1171 +
1172 +~-~-Timing main function
1173 +
1174 +function aws.main()
1175 +
1176 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main start")
1177 +
1178 + if g_mq then
1179 +
1180 + if g_mq:isconnected() then
1181 +
1182 + send_Data()
1183 +
1184 + else
1185 +
1186 + if os.time() - last_time > 5 then
1187 +
1188 + last_time = os.time()
1189 +
1190 + mymqtt_connect()
1191 +
1192 + end
1193 +
1194 + end
1195 +
1196 + else
1197 +
1198 + mymqtt_init()
1199 +
1200 + end
1201 +
1202 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main end")
1203 +
1204 +end
1205 +
1206 +
1207 +~-~- Initialize MQTT
1208 +
1209 +function mymqtt_init()
1210 +
1211 + sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
1212 +
1213 + g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENTID) ~-~- Create the object and declare it as a global variable
1214 +
1215 + if g_mq then
1216 +
1217 + g_mq:on("message", mymqtt_msg_callback) ~-~- Register to receive message callbacks
1218 +
1219 + sprint("mqtt init success")
1220 +
1221 + else
1222 +
1223 + sprint("mqtt init failed:", err)
1224 +
1225 + end
1226 +
1227 +end
1228 +
1229 +~-~- Connect to MQTT server
1230 +
1231 +function mymqtt_connect()
1232 +
1233 + sprint("mqtt connecting...")
1234 +
1235 + local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
1236 +
1237 + if stat == nil then
1238 +
1239 + sprint("mqtt connect failed:", err)
1240 +
1241 + return
1242 +
1243 + else
1244 +
1245 + sprint("mqtt connected")
1246 +
1247 + end
1248 +
1249 + g_mq:subscribe(TEST, 0)
1250 +
1251 +end
1252 +
1253 +~-~- Receive MQTT message callback function
1254 +
1255 +function mymqtt_msg_callback(topic, msg)
1256 +
1257 + print("topic:",topic)
1258 +
1259 + print("revdata:",msg)
1260 +
1261 + local revData = json.decode(msg)
1262 +
1263 + print (revData)
1264 +
1265 + if topic == Subscribe_RE_TOPIC1 then ~-~-Process topic information subscribed from the cloud
1266 +
1267 +if string.match(topic,Subscribe_RE_TOPIC1) then
1268 +
1269 + ~-~-if revData ~~= nil then
1270 +
1271 + for k,v in pairs (revData) do
1272 +
1273 + print("printing revdata after kv here")
1274 +
1275 + print (k,v)
1276 +
1277 + end
1278 +
1279 + print ("current state is",fanstate)
1280 +
1281 + ~-~-end
1282 +
1283 +end
1284 +
1285 +end
1286 +
1287 +end
1288 +
1289 +
1290 +~-~-Get real-time data
1291 +
1292 +function getData()
1293 +
1294 + local jdata = {}
1295 +
1296 + local addr = bns_get_alldata()
1297 +
1298 + print(json.encode(addr))
1299 +
1300 + for i,v in pairs(addr) do
1301 +
1302 + if v[2] == 1 then
1303 +
1304 + jdata[v[3]] = v[4]
1305 +
1306 + end
1307 +
1308 + end
1309 +
1310 + return jdata
1311 +
1312 +end
1313 +
1314 +~-~-send data
1315 +
1316 +function send_Data()
1317 +
1318 + local pub_data =
1319 +
1320 + {
1321 +
1322 +123
1323 +
1324 +}
1325 +
1326 +sprint(json.encode(pub_data))
1327 +
1328 +print("..........",pub_RE_TOPIC)
1329 +
1330 + return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
1331 +
1332 +end
1333 +
1334 +Get message in AWS
1335 +
1336 +[[image:image-20220709165402-21.png]]
image-20220709165226-1.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +1.2 MB
Content
image-20220709165402-1.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +200.2 KB
Content
image-20220709165402-10.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +19.0 KB
Content
image-20220709165402-11.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +105.9 KB
Content
image-20220709165402-12.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +29.0 KB
Content
image-20220709165402-13.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +158.8 KB
Content
image-20220709165402-14.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +48.1 KB
Content
image-20220709165402-15.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +46.9 KB
Content
image-20220709165402-16.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +140.7 KB
Content
image-20220709165402-17.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +12.5 KB
Content
image-20220709165402-18.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +32.2 KB
Content
image-20220709165402-19.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +66.6 KB
Content
image-20220709165402-2.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +188.5 KB
Content
image-20220709165402-20.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +33.3 KB
Content
image-20220709165402-21.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +124.8 KB
Content
image-20220709165402-3.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +103.9 KB
Content
image-20220709165402-4.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +4.0 KB
Content
image-20220709165402-5.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +66.5 KB
Content
image-20220709165402-6.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +110.0 KB
Content
image-20220709165402-7.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +25.4 KB
Content
image-20220709165402-8.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +64.2 KB
Content
image-20220709165402-9.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +37.5 KB
Content
image-20220709173500-1.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +1.5 MB
Content