Changes for page 2 Script

Last modified by Devin Chen on 2025/06/06 14:03

From version 24.1
edited by Hunter
on 2022/10/09 15:02
Change comment: There is no comment for this version
To version 51.1
edited by Hunter
on 2023/05/06 10:19
Change comment: There is no comment for this version

Summary

Details

Page properties
Content
... ... @@ -27,25 +27,19 @@
27 27  
28 28  == **1.4 Short message** ==
29 29  
30 -When the alarm condition is reached: temp1 > 5 & temp2 >10 & temp3 < 20(lasts more than 5 seconds) , then send an "alarm trigger" sms.
30 +The following demo shows that when the alarm condition is reached: temp1 > 5 & temp2 >10 & temp3 < 20(lasts more than 5 seconds) , then send an "alarm trigger" sms.
31 31  
32 -When the alarm condition is released,then send an "alarm release" sms.
32 +When the alarm condition is released,then send an  "alarm release" sms. Script is as below:
33 33  
34 -(% style="text-align:center" %)
35 -[[image:1645535936750-316.png||height="385" width="400" class="img-thumbnail"]]
36 -
37 -Script is as below:
38 -
39 -(% class="box infomessage" %)
40 -(((
34 +{{code language="lua"}}
41 41  function sms.main()
42 -~-~-~-~-~-~-send condition~-~-~-~-~-~-
36 +------send condition------
43 43  local temp1 = addr_getword("@Temperature1")
44 44  local temp2 = addr_getword("@Temperature2")
45 45  local temp3 = addr_getword("@Temperature3")
46 46  local timer = addr_getword("@Timer")
47 47  local tag = addr_getbit("@Tag")
48 -~-~-~-~-~-~-lasting time~-~-~-~-~-~-
42 +------lasting time------
49 49  if temp1 > 5 and temp2 > 10 and temp3 < 20 then
50 50   timer = timer + 1
51 51   addr_setword("@Timer",timer)
... ... @@ -53,7 +53,7 @@
53 53   timer = 0
54 54   addr_setword("@Timer",timer)
55 55  end
56 -~-~-~-~-~-~-send sms & output Y0~-~-~-~-~-~-
50 +------send sms & output Y0------
57 57  if timer > 5 then
58 58   if tag == 0 then
59 59   send_sms_ira("19859254700","alarm trigger")
... ... @@ -64,12 +64,18 @@
64 64  addr_setbit("@Tag",0)
65 65  end
66 66  end
67 -)))
61 +{{/code}}
68 68  
69 69  == **1.5 Telegram notification** ==
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  
67 +As for How to get the botToken and chatID, please check the followig videos:
68 +
69 +[[https:~~/~~/www.youtube.com/watch?v=zh6yYlnjX7k>>https://www.youtube.com/watch?v=zh6yYlnjX7k]]
70 +
71 +[[https:~~/~~/www.youtube.com/watch?v=Pj8mwuMZZvg>>https://www.youtube.com/watch?v=Pj8mwuMZZvg]]
72 +
73 73  {{code language="Lua"}}
74 74  local tempBit = 0
75 75  local tempWord = 0
... ... @@ -139,7 +139,7 @@
139 139  
140 140  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.
141 141  
142 -{{code}}
142 +{{code language="lua"}}
143 143  local tempBit = 0
144 144  local tempWord = 0
145 145  
... ... @@ -218,6 +218,10 @@
218 218  
219 219  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.
220 220  
221 +About how to register the Twilio API, please check the following video:
222 +
223 +[[https:~~/~~/www.youtube.com/watch?v=Id4lKichauU>>https://www.youtube.com/watch?v=Id4lKichauU]]
224 +
221 221  {{code language="Lua"}}
222 222  local tempBit = 0
223 223  local tempWord = 0
... ... @@ -226,8 +226,8 @@
226 226  local json = require("json")
227 227  local ltn12 = require("ltn12")
228 228  
229 -local SID = 'AC1703bd710ffa98006d2bcc0b8d6ca63a'
230 -local Token = 'd3c11897623c39e538b20263ec190ae0'
233 +local SID = 'AC1703bd710ffa98006d2bcc0b********'
234 +local Token = 'd3c11897623c39e538b20263ec19****'
231 231  
232 232  local twilioPhoneNumber = '+14155238886'
233 233  local receiverPhoneNumber = '+8615880018277'
... ... @@ -339,6 +339,135 @@
339 339  end
340 340  {{/code}}
341 341  
346 +== **1.8 How to parse value from HTTP response body** ==
347 +
348 +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":
349 +
350 +(% style="text-align:center" %)
351 +[[image:InputHTTPparameter.png]]
352 +
353 +Then the response body would be like as following:
354 +
355 +{{code language="json"}}
356 +{
357 + "location": {
358 + "name": "Madrid",
359 + "region": "Madrid",
360 + "country": "Spain",
361 + "lat": 40.4,
362 + "lon": -3.68,
363 + "tz_id": "Europe/Madrid",
364 + "localtime_epoch": 1669022636,
365 + "localtime": "2022-11-21 10:23"
366 + },
367 + "current": {
368 + "last_updated_epoch": 1669022100,
369 + "last_updated": "2022-11-21 10:15",
370 + "temp_c": 13.0,
371 + "temp_f": 55.4,
372 + "is_day": 1,
373 + "condition": {
374 + "text": "Partly cloudy",
375 + "icon": "//cdn.weatherapi.com/weather/64x64/day/116.png",
376 + "code": 1003
377 + },
378 + "wind_mph": 11.9,
379 + "wind_kph": 19.1,
380 + "wind_degree": 210,
381 + "wind_dir": "SSW",
382 + "pressure_mb": 1015.0,
383 + "pressure_in": 29.97,
384 + "precip_mm": 0.0,
385 + "precip_in": 0.0,
386 + "humidity": 88,
387 + "cloud": 75,
388 + "feelslike_c": 10.8,
389 + "feelslike_f": 51.4,
390 + "vis_km": 10.0,
391 + "vis_miles": 6.0,
392 + "uv": 3.0,
393 + "gust_mph": 22.1,
394 + "gust_kph": 35.6
395 + }
396 +}
397 +{{/code}}
398 +
399 +(% class="wikigeneratedid" %)
400 +So we decode json into lua object to assign the value into addresses HDW6060(temperature), HDW7070(humidity), the code example like follows:
401 +
402 +{{code language="lua"}}
403 +local APIkey = '70faaecf926b4341b1974006221711'
404 +
405 +
406 +local http = require("socket.http")
407 +local json = require("json")
408 +
409 +-- Send http.get request and return response result
410 +function getHttpsUrl(url)
411 + local result_table, code, headers, status = http.request(url)
412 + print("code:"..code)
413 + if code~= 200 then
414 + return
415 + else
416 + return result_table
417 + end
418 +end
419 +
420 +function sendAPI(key, city)
421 + local url = "http://api.weatherapi.com/v1/current.json?key="..key.."&q="..city.."&aqi=no"
422 + --local url = 'http://v-box.net'
423 + --local url = 'https://www.google.com/'
424 + --http://api.weatherapi.com/v1/current.json?key=70faaecf926b4341b1974006221711&q=Barcelona&aqi=no
425 + print("Get the link:"..url)
426 + local body = getHttpsUrl(url)
427 + --print(body)
428 + local jsonBody = json.decode(body)
429 + --print(jsonBody["current"]["temp_c"])
430 + --print(type(jsonBody["current"]["temp_c"]))
431 + --print(type(jsonBody["current"]["humidity"]))
432 + addr_setfloat("@HDW6060", jsonBody["current"]["temp_c"])
433 + addr_setword("@HDW7070", jsonBody["current"]["humidity"])
434 +end
435 +
436 +
437 +function Weather.main()
438 + local cityName = addr_getstring("@HDW5050",6)
439 + print("cityName: "..cityName)
440 + sendAPI(APIkey, cityName)
441 +end
442 +{{/code}}
443 +
444 +== **1.9 High-Low Byte Switch** ==
445 +
446 +The following example is converting the floating number from order 1234 to order 3412, and formating output the number with 2 decimal point. About which high-low word order corresponding to which value, please refer to the [[Address Operation Table>>doc:V-BOX.V-Net.Manual.04 Lua Script.01 Lua Functions.WebHome||anchor="H2Addressoperation"]].
447 +
448 +{{code language="lua"}}
449 +function highLowByteSwitch(floatNumber)
450 + addr_setfloat("@W_0#HDW23036",floatNumber,0,2)
451 + local newFloat = addr_getfloat("@W_0#HDW23036")
452 + local formattedFloat = string.format("%.2f",newFloat)
453 + print("The formatted float value is the : "..formattedFloat)
454 + return formattedFloat
455 +end
456 +{{/code}}
457 +
458 +== **1.10 Read 64bits Unsigned Value** ==
459 +
460 +In our built-in function library doesn't have the function for reading 64-bit unsigned format value, so the following function is for solve this. But if the number is greater 2^53, the precision will be lost. So the final result will be a little bit different from the original value.
461 +
462 +{{code language="lua"}}
463 +function addr_getquatra(address)
464 + local highAddress = addr_newnoaddr(address,2)
465 + local low32 = addr_getdword(address)
466 + local high32 = addr_getdword(highAddress)
467 + --print("the low number is "..low32)
468 + --print("the high number is "..high32)
469 + local formatVal = string.format("%64.0f",2^32*high32+low32)
470 + print("the format value is ".. formatVal)
471 + return formatVal
472 +end
473 +{{/code}}
474 +
342 342  = **2 V-Box connect with third part server** =
343 343  
344 344  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.
... ... @@ -357,8 +357,9 @@
357 357  
358 358  (% class="mark" %)2.If your server requires SSL certificate to log in,please use OpenCloud.Because only OpenCloud platform can support to upload certificate
359 359  
360 -(% class="wikigeneratedid" %)
493 +{{info}}
361 361  **✎Note: **Before program the script of MQTT, please make sure the server(MQTT broker) can be connected through MQTT Client tool.
495 +{{/info}}
362 362  
363 363  (% class="wikigeneratedid" %)
364 364  Tool link: **[[MQTT.fx>>http://mqttfx.jensd.de/index.php/download]]**
... ... @@ -365,6 +365,25 @@
365 365  
366 366  == **2.1 V-Box connect with test server(General Example)** ==
367 367  
502 +The following example is trying to publish to the topic "testtopic/test/no1/7890", and subscribe the topic "testtopic/test/no1/123456".
503 +
504 +And the JSON message is like follows:
505 +
506 +{{code language="JSON"}}
507 +{
508 + "timestamp": 1631152760,
509 + "messageId": 1,
510 + "event": "test_data",
511 + "mfrs": "HMI/box",
512 + "data":
513 + {
514 + "id" : 1436217747670454274,
515 + "waterlevel" : 48,
516 + "temperture" : 23
517 + }
518 +}
519 +{{/code}}
520 +
368 368  {{code language="lua"}}
369 369  --MQTT configuration table
370 370  local MQTT_CFG={}
... ... @@ -406,9 +406,13 @@
406 406  --initialize mqtt
407 407  function mqtt_init()
408 408   print(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENT_ID))
562 + if g_mq then
563 + mqtt.close() --Close mqtt object
564 + end
409 409   g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENT_ID) -- create mqtt object,and declare it as a global variable
410 410   if g_mq then
411 411   g_mq:on("message", mqtt_msg_callback) -- Register a callback for receiving messages
568 + g_mq:on("offline", mqtt_msg_offline) -- Register a callback for offline
412 412   print("mqtt init success")
413 413   else
414 414   print("mqtt init failed:", err)
... ... @@ -428,6 +428,11 @@
428 428   g_mq:subscribe(SUBSCRIBE_TOPIC, 0)
429 429  end
430 430  
588 +--Offline callback function
589 +function mqtt_msg_offline(cause)
590 + print("mqtt offline, cause:", cause)
591 +end
592 +
431 431  -- Received message callback function
432 432  function mqtt_msg_callback(topic, msg)
433 433   print("topic:", topic)
... ... @@ -466,9 +466,11 @@
466 466   if g_mq:isconnected() then
467 467   send_data()
468 468   else
469 - --if exceed 20 sec not connect, reconnect once
470 - if os.time() - LAST_TIME > 20 then
631 + --if exceed 5 sec not connect, reconnect once
632 + if os.time() - LAST_TIME > 5 then
471 471   LAST_TIME = os.time()
634 + --reinitial the mqtt object
635 + mqtt_init()
472 472   --connect to mqtt or reconnect
473 473   mqtt_connect()
474 474   end
... ... @@ -491,142 +491,134 @@
491 491  -- Meta class
492 492  --main
493 493  function mq.main()
494 - if not mq.m then
495 -  local err = ""
658 + if not mq.m then
659 + local err = ""
496 496  
497 -  mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID")  -- create connection
498 -  if mq.m then
499 -   mq.config = {
500 -    username = "",-- ID
501 -    password = "",-- password
502 -    netway = 1, -- Ethernet connection, WIFI=1
503 -    -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
504 -    -- cleansession = 0, -- Optional, keep session
505 -   }
506 -   mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
507 -    local str = string.format("%s:%s", topic, msg)
508 -    -- print("mqtt msg:", str) -- Print out the received topics and content
509 -   end
510 -   )
511 -   mq.m:on("offline", function (cause) -- Register for lost connection callbacks
512 -    -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
513 -   end)
514 -   mq.m:on("arrived", function() -- Registration for sending messages to callbacks 
515 -    print("msg arrived")
516 -   end)
517 -  else
518 -   print("mqtt create failed:", err) -- Create object failed
519 -  end
520 - else
521 -  if mq.m:isconnected() then -- If online, post a message
522 -     local phaseStatus ="unknow"
523 -     if addr_getbit("@Standby")== 1 then
524 -         phaseStatus = "Standby"
525 -     elseif addr_getbit("@Pre-Freeze")==1 then
526 -         phaseStatus= "Pre-Freeze"
527 -     elseif addr_getbit("@Prepare")==1 then
528 -         phaseStatus ="Prepare"
529 -     elseif addr_getbit("@Primary Dry")==1 then
530 -         phaseStatus = "Primary dry"
531 -     elseif addr_getbit("@Secondary Dry")==1 then
532 -         phaseStatus = "Secondary Dry"
533 -     end
534 ---   print(addr_getbit("@Primary Dry"))
661 + mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID") -- create connection
662 + if mq.m then
663 + mq.config = {
664 + username = "",-- ID
665 + password = "",-- password
666 + netway = 1, -- Ethernet connection, WIFI=1
667 + -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
668 + -- cleansession = 0, -- Optional, keep session
669 + }
670 + mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
671 + local str = string.format("%s:%s", topic, msg)
672 + -- print("mqtt msg:", str) -- Print out the received topics and content
673 + end)
674 + mq.m:on("offline", function (cause) -- Register for lost connection callbacks
675 + -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
676 + end)
677 + mq.m:on("arrived", function() -- Registration for sending messages to callbacks
678 + print("msg arrived")
679 + end)
680 + else
681 + print("mqtt create failed:", err) -- Create object failed
682 + end
683 + else
684 + if mq.m:isconnected() then -- If online, post a message
685 + local phaseStatus ="unknow"
686 + if addr_getbit("@Standby")== 1 then
687 + phaseStatus = "Standby"
688 + elseif addr_getbit("@Pre-Freeze")==1 then
689 + phaseStatus= "Pre-Freeze"
690 + elseif addr_getbit("@Prepare")==1 then
691 + phaseStatus ="Prepare"
692 + elseif addr_getbit("@Primary Dry")==1 then
693 + phaseStatus = "Primary dry"
694 + elseif addr_getbit("@Secondary Dry")==1 then
695 + phaseStatus = "Secondary Dry"
696 + end
697 + --print(addr_getbit("@Primary Dry"))
535 535  -------------------------------------------------------------------------------------------------------------------------
536 -     local activating ="unknow"
537 -     if addr_getbit("@Compressor")==1 then
538 -         activating = ",".."Compressor"
539 -     end
540 -     if addr_getbit("@Silicone Pump")==1 then
541 -         activating = activating..",".."Silicone Pump"
542 -     end
543 -     if addr_getbit("@Vacuum Pump")==1 then
544 -         activating = activating..",".."Vacuum Pump"
545 -     end
546 -     if addr_getbit("@Root Pump")==1 then
547 -         activating = activating..",".."Root Pump"
548 -     end
549 -     if addr_getbit("@Heater")==1 then
550 -         activating = activating..",".."Heater"
551 -     end
552 -     if addr_getbit("@Valve Silicone")==1 then
553 -         activating = activating..",".."Valve Silicone"
554 -     end
555 -     if addr_getbit("@Valve Ice Condenser")==1 then
556 -         activating = activating..",".."Valve Ice Condenser"
557 -     end
558 -     if addr_getbit("@Valve Vacuum Pump")==1 then
559 -         activating = activating..",".."Valve Vacuum Pump"
560 -     end
561 -     local pr_activating =string.sub(activating,2)
562 -    --  print(pr_activating)  
699 + local activating ="unknow"
700 + if addr_getbit("@Compressor")==1 then
701 + activating = ",".."Compressor"
702 + end
703 + if addr_getbit("@Silicone Pump")==1 then
704 + activating = activating..",".."Silicone Pump"
705 + end
706 + if addr_getbit("@Vacuum Pump")==1 then
707 + activating = activating..",".."Vacuum Pump"
708 + end
709 + if addr_getbit("@Root Pump")==1 then
710 + activating = activating..",".."Root Pump"
711 + end
712 + if addr_getbit("@Heater")==1 then
713 + activating = activating..",".."Heater"
714 + end
715 + if addr_getbit("@Valve Silicone")==1 then
716 + activating = activating..",".."Valve Silicone"
717 + end
718 + if addr_getbit("@Valve Ice Condenser")==1 then
719 + activating = activating..",".."Valve Ice Condenser"
720 + end
721 + if addr_getbit("@Valve Vacuum Pump")==1 then
722 + activating = activating..",".."Valve Vacuum Pump"
723 + end
724 + local pr_activating =string.sub(activating,2)
725 + -- print(pr_activating)
726 + local status_text ="unknow"
727 + if addr_getbit("@Status Run")==1 then
728 + status_text = "RUNNING"
729 + else
730 + status_text = "STOP"
731 + end
732 +-------------------------------------------------------------------------------------------------------------------------
733 + local js = {type="status",
734 + mc_name ="FD300",
735 + status=status_text,
736 + elapsed_time={
737 + hour=addr_getword("@Elapsed Time (Hour)"),
738 + min=addr_getword("@Elapsed Time (Minute)"),
739 + sec=addr_getword("@Elapsed Time (Second)")
740 + },
741 + phase = phaseStatus,
742 + step = addr_getword("@Step"),
743 + activating_output = pr_activating,
744 + sv=addr_getshort("@SV Silicone")/10,
745 + pv=addr_getshort("@PV Silicone")/10,
746 + product1=addr_getshort("@Product 1")/10,
563 563  
748 + product2=addr_getshort("@Product 2")/10,
749 + product3=addr_getshort("@Product 3")/10,
750 + product4=addr_getshort("@Product 4")/10,
751 + ice1=addr_getshort("@Ice condenser 1")/10,
752 + ice2=addr_getshort("@Ice condenser 2")/10,
753 + vacuum=addr_getfloat("@Vacuum")
754 + }
755 + local jsAlarm = { HPC = addr_getbit("@B_25395#W0.00"),
756 + ODPC = addr_getbit("@B_25395#W0.01"),
757 + MTPC=addr_getbit("@B_25395#W0.02"),
758 + HTT = addr_getbit("@B_25395#W1.03"),
759 + CPC = addr_getbit("@B_25395#W0.08"),
760 + CPSP =addr_getbit("@B_25395#W1.00"),
761 + CPVP =addr_getbit("@B_25395#W0.10"),
762 + CPRP =addr_getbit("@B_25395#W0.11"),
763 + HP =addr_getbit("@B_25395#W1.01"),
764 + PP= addr_getbit("@B_25395#W1.02"),
765 + PO=addr_getbit("@B_25395#W0.07"),
766 + FSE=addr_getbit("@B_25395#W2.04"),
767 + AVVSVV=addr_getbit("@B_25395#W1.12"),
768 + ICHT=addr_getbit("@B_25395#W3.06")
769 + }
770 + -- ("@B_25395#CIO1.02")
771 + mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
772 + mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
773 + else
774 + local stat, err = mq.m:connect(mq.config) -- connection
775 + if stat == nil then --Determine whether to connect
776 + print("mqtt connect failed:", err)
777 + return -- Connection failed, return directly
778 + end
779 + mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
564 564  
565 -
566 -     local status_text ="unknow"
567 -     if addr_getbit("@Status Run")==1 then
568 -         status_text = "RUNNING"
569 -     else
570 -         status_text = "STOP"
571 -     end
572 --------------------------------------------------------------------------------------------------------------------------      
573 -
574 -     local js =  {type="status",
575 -                  mc_name ="FD300",
576 -                  status=status_text,
577 -                  elapsed_time={
578 -                                hour=addr_getword("@Elapsed Time (Hour)"),
579 -                                min=addr_getword("@Elapsed Time (Minute)"),
580 -                                sec=addr_getword("@Elapsed Time (Second)")
581 -                                },
582 -                   phase = phaseStatus,
583 -                   step = addr_getword("@Step"),
584 -                   activating_output = pr_activating,
585 -                   sv=addr_getshort("@SV Silicone")/10,
586 -                   pv=addr_getshort("@PV Silicone")/10,
587 -                   product1=addr_getshort("@Product 1")/10,
588 -
589 -                   product2=addr_getshort("@Product 2")/10,
590 -                   product3=addr_getshort("@Product 3")/10,
591 -                   product4=addr_getshort("@Product 4")/10,
592 -                   ice1=addr_getshort("@Ice condenser 1")/10,
593 -                   ice2=addr_getshort("@Ice condenser 2")/10,
594 -                   vacuum=addr_getfloat("@Vacuum")
595 -
596 -                }
597 -     local jsAlarm = {  HPC = addr_getbit("@B_25395#W0.00"),
598 -                        ODPC = addr_getbit("@B_25395#W0.01"),
599 -                        MTPC=addr_getbit("@B_25395#W0.02"),
600 -                        HTT = addr_getbit("@B_25395#W1.03"),
601 -                        CPC = addr_getbit("@B_25395#W0.08"),
602 -                        CPSP =addr_getbit("@B_25395#W1.00"),
603 -                        CPVP =addr_getbit("@B_25395#W0.10"),
604 -                        CPRP =addr_getbit("@B_25395#W0.11"),
605 -                        HP =addr_getbit("@B_25395#W1.01"),
606 -                        PP= addr_getbit("@B_25395#W1.02"),
607 -                        PO=addr_getbit("@B_25395#W0.07"),
608 -                        FSE=addr_getbit("@B_25395#W2.04"),
609 -                        AVVSVV=addr_getbit("@B_25395#W1.12"),
610 -                        ICHT=addr_getbit("@B_25395#W3.06")
611 -
612 -                }
613 -
614 -    -- ("@B_25395#CIO1.02")
615 -     mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
616 -     mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
617 -  else
618 -   local stat, err = mq.m:connect(mq.config) -- connection
619 -   if stat == nil then --Determine whether to connect
620 -    print("mqtt connect failed:", err)
621 -    return -- Connection failed, return directly
622 -   end
623 -   mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
624 -
625 -  end
626 -  -- mq.m:unsubscribe("stc/test")
627 -  -- mq.m:disconnect() -- close matt
628 -  -- mq.m:close() -- close clase
629 - end
781 + end
782 + -- mq.m:unsubscribe("stc/test")
783 + -- mq.m:disconnect() -- close matt
784 + -- mq.m:close() -- close clase
785 + end
630 630  end
631 631  {{/code}}
632 632  
... ... @@ -1056,35 +1056,20 @@
1056 1056  
1057 1057  {{code language="java"}}
1058 1058  {
1059 -
1060 1060    "Version": "2012-10-17",
1061 -
1062 1062    "Statement": [
1063 -
1064 1064      {
1065 -
1066 1066        "Effect": "Allow",
1067 -
1068 1068        "Action": [
1069 -
1070 1070          "iot:Connect",
1071 -
1072 1072          "iot:Publish",
1073 -
1074 1074          "iot:Subscribe",
1075 -
1076 1076          "iot:Receive",
1077 -
1078 1078          "greengrass:Discover"
1079 -
1080 1080        ],
1081 -
1082 1082        "Resource": "*"
1083 -
1084 1084      }
1085 -
1086 1086    ]
1087 -
1088 1088  }
1089 1089  {{/code}}
1090 1090  
... ... @@ -1149,185 +1149,190 @@
1149 1149  
1150 1150  [[image:image-20220709165402-20.png]]
1151 1151  
1293 +{{info}}
1294 +**✎Note:** Before using the following demo script, please make sure the V-Box firmware is newer than 22110701
1295 +{{/info}}
1296 +
1297 +{{code language="lua"}}
1152 1152  sprint = print
1153 1153  
1154 -~-~-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)
1300 +--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)
1155 1155  
1156 1156  local MQTT_URL, MQTT_CLIENTID, MQTT_CFG, MQTT_LWT, MQTT_CART = mqtt.setup_cfg()
1157 1157  
1158 -~-~-publish to topics
1304 +--publish to topics
1159 1159  
1160 1160  local pub_RE_TOPIC = string.format('TEST')
1161 1161  
1162 -~-~-Subscribe topics
1308 +--Subscribe topics
1163 1163  
1164 1164  local Subscribe_RE_TOPIC1 = string.format('TEST')
1165 1165  
1166 -~-~-variable
1312 +--variable
1167 1167  
1168 1168  local last_time = 0
1169 1169  
1170 -~-~-Timing main function
1316 +--Timing main function
1171 1171  
1172 1172  function aws.main()
1173 1173  
1174 - sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main start")
1320 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main start")
1175 1175  
1176 - if g_mq then
1322 + if g_mq then
1177 1177  
1178 - if g_mq:isconnected() then
1324 + if g_mq:isconnected() then
1179 1179  
1180 - send_Data()
1326 + send_Data()
1181 1181  
1182 - else
1328 + else
1183 1183  
1184 - if os.time() - last_time > 5 then
1330 + if os.time() - last_time > 5 then
1185 1185  
1186 - last_time = os.time()
1332 + last_time = os.time()
1187 1187  
1188 - mymqtt_connect()
1334 + mymqtt_connect()
1189 1189  
1336 + end
1337 +
1190 1190   end
1191 1191  
1192 - end
1340 + else
1193 1193  
1194 - else
1342 + mymqtt_init()
1195 1195  
1196 - mymqtt_init()
1344 + end
1197 1197  
1198 - end
1346 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main end")
1199 1199  
1200 - sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main end")
1201 -
1202 1202  end
1203 1203  
1204 1204  
1205 -~-~- Initialize MQTT
1206 1206  
1352 +-- Initialize MQTT
1353 +
1207 1207  function mymqtt_init()
1208 1208  
1209 - sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
1356 + sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
1210 1210  
1211 - g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENTID) ~-~- Create the object and declare it as a global variable
1358 + g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENTID, 1) -- Create the object and declare it as a global variable, 1 means using the domain to connect
1212 1212  
1213 - if g_mq then
1360 + if g_mq then
1214 1214  
1215 - g_mq:on("message", mymqtt_msg_callback) ~-~- Register to receive message callbacks
1362 + g_mq:on("message", mymqtt_msg_callback) -- Register to receive message callbacks
1216 1216  
1217 - sprint("mqtt init success")
1364 + sprint("mqtt init success")
1218 1218  
1219 - else
1366 + else
1220 1220  
1221 - sprint("mqtt init failed:", err)
1368 + sprint("mqtt init failed:", err)
1222 1222  
1223 - end
1370 + end
1224 1224  
1225 1225  end
1226 1226  
1227 -~-~- Connect to MQTT server
1374 +-- Connect to MQTT server
1228 1228  
1229 1229  function mymqtt_connect()
1230 1230  
1231 - sprint("mqtt connecting...")
1378 + sprint("mqtt connecting...")
1232 1232  
1233 - local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
1380 + local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
1234 1234  
1235 - if stat == nil then
1382 + if stat == nil then
1236 1236  
1237 - sprint("mqtt connect failed:", err)
1384 + sprint("mqtt connect failed:", err)
1238 1238  
1239 - return
1386 + return
1240 1240  
1241 - else
1388 + else
1242 1242  
1243 - sprint("mqtt connected")
1390 + sprint("mqtt connected")
1244 1244  
1245 - end
1392 + end
1246 1246  
1247 - g_mq:subscribe(TEST, 0)
1394 + g_mq:subscribe(Subscribe_RE_TOPIC1, 0)
1248 1248  
1249 1249  end
1250 1250  
1251 -~-~- Receive MQTT message callback function
1398 +-- Receive MQTT message callback function
1252 1252  
1253 1253  function mymqtt_msg_callback(topic, msg)
1254 1254  
1255 - print("topic:",topic)
1402 + print("topic:",topic)
1256 1256  
1257 - print("revdata:",msg)
1404 + print("revdata:",msg)
1258 1258  
1259 - local revData = json.decode(msg)
1406 + local revData = json.decode(msg)
1260 1260  
1261 - print (revData)
1408 + print (revData)
1262 1262  
1263 - if topic == Subscribe_RE_TOPIC1 then ~-~-Process topic information subscribed from the cloud
1410 + if topic == Subscribe_RE_TOPIC1 then --Process topic information subscribed from the cloud
1264 1264  
1265 -if string.match(topic,Subscribe_RE_TOPIC1) then
1412 + if string.match(topic,Subscribe_RE_TOPIC1) then
1266 1266  
1267 - ~-~-if revData ~~= nil then
1414 + --if revData ~= nil then
1268 1268  
1269 - for k,v in pairs (revData) do
1416 + for k,v in pairs (revData) do
1270 1270  
1271 - print("printing revdata after kv here")
1418 + print("printing revdata after kv here")
1272 1272  
1273 - print (k,v)
1420 + print (k,v)
1274 1274  
1275 - end
1422 + end
1276 1276  
1277 - print ("current state is",fanstate)
1424 + print ("current state is",fanstate)
1278 1278  
1279 - ~-~-end
1426 + --end
1280 1280  
1281 -end
1428 + end
1282 1282  
1283 -end
1430 + end
1284 1284  
1285 1285  end
1286 1286  
1287 1287  
1288 -~-~-Get real-time data
1289 1289  
1436 +--Get real-time data
1437 +
1290 1290  function getData()
1291 1291  
1292 - local jdata = {}
1440 + local jdata = {}
1293 1293  
1294 - local addr = bns_get_alldata()
1442 + local addr = bns_get_alldata()
1295 1295  
1296 - print(json.encode(addr))
1444 + print(json.encode(addr))
1297 1297  
1298 - for i,v in pairs(addr) do
1446 + for i,v in pairs(addr) do
1299 1299  
1300 - if v[2] == 1 then
1448 + if v[2] == 1 then
1301 1301  
1302 - jdata[v[3]] = v[4]
1450 + jdata[v[3]] = v[4]
1303 1303  
1304 - end
1452 + end
1305 1305  
1306 - end
1454 + end
1307 1307  
1308 - return jdata
1456 + return jdata
1309 1309  
1310 1310  end
1311 1311  
1312 -~-~-send data
1460 +--send data
1313 1313  
1314 1314  function send_Data()
1315 1315  
1316 - local pub_data =
1464 + local pub_data =
1465 + {
1466 + 123
1467 + }
1317 1317  
1318 - {
1319 -
1320 -123
1321 -
1322 -}
1323 -
1324 1324  sprint(json.encode(pub_data))
1325 1325  
1326 1326  print("..........",pub_RE_TOPIC)
1327 1327  
1328 - return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
1473 + return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
1329 1329  
1330 1330  end
1476 +{{/code}}
1331 1331  
1332 1332  Get message in AWS
1333 1333  
InputHTTPparameter.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Hunter
Size
... ... @@ -1,0 +1,1 @@
1 +17.9 KB
Content