Skip to Content

Changes for page 2 Script

Last modified by Devin Chen on 2025/06/06 14:03
From version 51.1
edited by Hunter
on 2023/05/06 10:19
Change comment: There is no comment for this version
To version 26.1
edited by Hunter
on 2022/10/25 09:36
Change comment: There is no comment for this version

Summary

Details

Page properties
Content
... ... @@ -27,19 +27,25 @@
27 27  
28 28  == **1.4 Short message** ==
29 29  
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.
30 +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. Script is as below:
32 +When the alarm condition is released，then send an "alarm release" sms.
33 33  
34 -{{code language="lua"}}
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 +(((
35 35  function sms.main()
36 -------send condition------
42 +~-~-~-~-~-~-send condition~-~-~-~-~-~-
37 37  local temp1 = addr_getword("@Temperature1")
38 38  local temp2 = addr_getword("@Temperature2")
39 39  local temp3 = addr_getword("@Temperature3")
40 40  local timer = addr_getword("@Timer")
41 41  local tag = addr_getbit("@Tag")
42 -------lasting time------
48 +~-~-~-~-~-~-lasting time~-~-~-~-~-~-
43 43  if temp1 > 5 and temp2 > 10 and temp3 < 20 then
44 44   timer = timer + 1
45 45   addr_setword("@Timer",timer)
... ... @@ -47,7 +47,7 @@
47 47   timer = 0
48 48   addr_setword("@Timer",timer)
49 49  end
50 -------send sms & output Y0------
56 +~-~-~-~-~-~-send sms & output Y0~-~-~-~-~-~-
51 51  if timer > 5 then
52 52   if tag == 0 then
53 53   send_sms_ira("19859254700","alarm trigger")
... ... @@ -58,7 +58,7 @@
58 58  addr_setbit("@Tag",0)
59 59  end
60 60  end
61 -{{/code}}
67 +)))
62 62  
63 63  == **1.5 Telegram notification** ==
64 64  
... ... @@ -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 language="lua"}}
148 +{{code}}
143 143  local tempBit = 0
144 144  local tempWord = 0
145 145  
... ... @@ -218,10 +218,6 @@
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 -
225 225  {{code language="Lua"}}
226 226  local tempBit = 0
227 227  local tempWord = 0
... ... @@ -343,135 +343,6 @@
343 343  end
344 344  {{/code}}
345 345  
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 -
475 475  = **2 V-Box connect with third part server** =
476 476  
477 477  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.
... ... @@ -490,9 +490,8 @@
490 490  
491 491  (% class="mark" %)2.If your server requires SSL certificate to log in,please use OpenCloud.Because only OpenCloud platform can support to upload certificate
492 492  
493 -{{info}}
366 +(% class="wikigeneratedid" %)
494 494  **✎Note: **Before program the script of MQTT, please make sure the server(MQTT broker) can be connected through MQTT Client tool.
495 -{{/info}}
496 496  
497 497  (% class="wikigeneratedid" %)
498 498  Tool link: **[[MQTT.fx>>http://mqttfx.jensd.de/index.php/download]]**
... ... @@ -499,25 +499,6 @@
499 499  
500 500  == **2.1 V-Box connect with test server(General Example)** ==
501 501  
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 -
521 521  {{code language="lua"}}
522 522  --MQTT configuration table
523 523  local MQTT_CFG={}
... ... @@ -559,13 +559,9 @@
559 559  --initialize mqtt
560 560  function mqtt_init()
561 561   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
565 565   g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENT_ID) -- create mqtt object,and declare it as a global variable
566 566   if g_mq then
567 567   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
569 569   print("mqtt init success")
570 570   else
571 571   print("mqtt init failed:", err)
... ... @@ -585,11 +585,6 @@
585 585   g_mq:subscribe(SUBSCRIBE_TOPIC, 0)
586 586  end
587 587  
588 ---Offline callback function
589 -function mqtt_msg_offline(cause)
590 - print("mqtt offline, cause:", cause)
591 -end
592 -
593 593  -- Received message callback function
594 594  function mqtt_msg_callback(topic, msg)
595 595   print("topic:", topic)
... ... @@ -628,11 +628,9 @@
628 628   if g_mq:isconnected() then
629 629   send_data()
630 630   else
631 - --if exceed 5 sec not connect, reconnect once
632 - if os.time() - LAST_TIME > 5 then
475 + --if exceed 20 sec not connect, reconnect once
476 + if os.time() - LAST_TIME > 20 then
633 633   LAST_TIME = os.time()
634 - --reinitial the mqtt object
635 - mqtt_init()
636 636   --connect to mqtt or reconnect
637 637   mqtt_connect()
638 638   end
... ... @@ -655,134 +655,142 @@
655 655  -- Meta class
656 656  --main
657 657  function mq.main()
658 - if not mq.m then
659 - local err = ""
500 + if not mq.m then
501 +  local err = ""
660 660  
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"))
503 +  mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID")  -- create connection
504 +  if mq.m then
505 +   mq.config = {
506 +    username = "",-- ID
507 +    password = "",-- password
508 +    netway = 1, -- Ethernet connection, WIFI=1
509 +    -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
510 +    -- cleansession = 0, -- Optional, keep session
511 +   }
512 +   mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
513 +    local str = string.format("%s:%s", topic, msg)
514 +    -- print("mqtt msg:", str) -- Print out the received topics and content
515 +   end
516 +   )
517 +   mq.m:on("offline", function (cause) -- Register for lost connection callbacks
518 +    -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
519 +   end)
520 +   mq.m:on("arrived", function() -- Registration for sending messages to callbacks 
521 +    print("msg arrived")
522 +   end)
523 +  else
524 +   print("mqtt create failed:", err) -- Create object failed
525 +  end
526 + else
527 +  if mq.m:isconnected() then -- If online, post a message
528 +     local phaseStatus ="unknow"
529 +     if addr_getbit("@Standby")== 1 then
530 +         phaseStatus = "Standby"
531 +     elseif addr_getbit("@Pre-Freeze")==1 then
532 +         phaseStatus= "Pre-Freeze"
533 +     elseif addr_getbit("@Prepare")==1 then
534 +         phaseStatus ="Prepare"
535 +     elseif addr_getbit("@Primary Dry")==1 then
536 +         phaseStatus = "Primary dry"
537 +     elseif addr_getbit("@Secondary Dry")==1 then
538 +         phaseStatus = "Secondary Dry"
539 +     end
540 +--   print(addr_getbit("@Primary Dry"))
698 698  -------------------------------------------------------------------------------------------------------------------------
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,
542 +     local activating ="unknow"
543 +     if addr_getbit("@Compressor")==1 then
544 +         activating = ",".."Compressor"
545 +     end
546 +     if addr_getbit("@Silicone Pump")==1 then
547 +         activating = activating..",".."Silicone Pump"
548 +     end
549 +     if addr_getbit("@Vacuum Pump")==1 then
550 +         activating = activating..",".."Vacuum Pump"
551 +     end
552 +     if addr_getbit("@Root Pump")==1 then
553 +         activating = activating..",".."Root Pump"
554 +     end
555 +     if addr_getbit("@Heater")==1 then
556 +         activating = activating..",".."Heater"
557 +     end
558 +     if addr_getbit("@Valve Silicone")==1 then
559 +         activating = activating..",".."Valve Silicone"
560 +     end
561 +     if addr_getbit("@Valve Ice Condenser")==1 then
562 +         activating = activating..",".."Valve Ice Condenser"
563 +     end
564 +     if addr_getbit("@Valve Vacuum Pump")==1 then
565 +         activating = activating..",".."Valve Vacuum Pump"
566 +     end
567 +     local pr_activating =string.sub(activating,2)
568 +    --  print(pr_activating)  
747 747  
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
780 780  
781 - end
782 - -- mq.m:unsubscribe("stc/test")
783 - -- mq.m:disconnect() -- close matt
784 - -- mq.m:close() -- close clase
785 - end
571 +
572 +     local status_text ="unknow"
573 +     if addr_getbit("@Status Run")==1 then
574 +         status_text = "RUNNING"
575 +     else
576 +         status_text = "STOP"
577 +     end
578 +-------------------------------------------------------------------------------------------------------------------------      
579 +
580 +     local js =  {type="status",
581 +                  mc_name ="FD300",
582 +                  status=status_text,
583 +                  elapsed_time={
584 +                                hour=addr_getword("@Elapsed Time (Hour)"),
585 +                                min=addr_getword("@Elapsed Time (Minute)"),
586 +                                sec=addr_getword("@Elapsed Time (Second)")
587 +                                },
588 +                   phase = phaseStatus,
589 +                   step = addr_getword("@Step"),
590 +                   activating_output = pr_activating,
591 +                   sv=addr_getshort("@SV Silicone")/10,
592 +                   pv=addr_getshort("@PV Silicone")/10,
593 +                   product1=addr_getshort("@Product 1")/10,
594 +
595 +                   product2=addr_getshort("@Product 2")/10,
596 +                   product3=addr_getshort("@Product 3")/10,
597 +                   product4=addr_getshort("@Product 4")/10,
598 +                   ice1=addr_getshort("@Ice condenser 1")/10,
599 +                   ice2=addr_getshort("@Ice condenser 2")/10,
600 +                   vacuum=addr_getfloat("@Vacuum")
601 +
602 +                }
603 +     local jsAlarm = {  HPC = addr_getbit("@B_25395#W0.00"),
604 +                        ODPC = addr_getbit("@B_25395#W0.01"),
605 +                        MTPC=addr_getbit("@B_25395#W0.02"),
606 +                        HTT = addr_getbit("@B_25395#W1.03"),
607 +                        CPC = addr_getbit("@B_25395#W0.08"),
608 +                        CPSP =addr_getbit("@B_25395#W1.00"),
609 +                        CPVP =addr_getbit("@B_25395#W0.10"),
610 +                        CPRP =addr_getbit("@B_25395#W0.11"),
611 +                        HP =addr_getbit("@B_25395#W1.01"),
612 +                        PP= addr_getbit("@B_25395#W1.02"),
613 +                        PO=addr_getbit("@B_25395#W0.07"),
614 +                        FSE=addr_getbit("@B_25395#W2.04"),
615 +                        AVVSVV=addr_getbit("@B_25395#W1.12"),
616 +                        ICHT=addr_getbit("@B_25395#W3.06")
617 +
618 +                }
619 +
620 +    -- ("@B_25395#CIO1.02")
621 +     mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
622 +     mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
623 +  else
624 +   local stat, err = mq.m:connect(mq.config) -- connection
625 +   if stat == nil then --Determine whether to connect
626 +    print("mqtt connect failed:", err)
627 +    return -- Connection failed, return directly
628 +   end
629 +   mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
630 +
631 +  end
632 +  -- mq.m:unsubscribe("stc/test")
633 +  -- mq.m:disconnect() -- close matt
634 +  -- mq.m:close() -- close clase
635 + end
786 786  end
787 787  {{/code}}
788 788  
... ... @@ -1212,20 +1212,35 @@
1212 1212  
1213 1213  {{code language="java"}}
1214 1214  {
1065 +
1215 1215    "Version": "2012-10-17",
1067 +
1216 1216    "Statement": [
1069 +
1217 1217      {
1071 +
1218 1218        "Effect": "Allow",
1073 +
1219 1219        "Action": [
1075 +
1220 1220          "iot:Connect",
1077 +
1221 1221          "iot:Publish",
1079 +
1222 1222          "iot:Subscribe",
1081 +
1223 1223          "iot:Receive",
1083 +
1224 1224          "greengrass:Discover"
1085 +
1225 1225        ],
1087 +
1226 1226        "Resource": "*"
1089 +
1227 1227      }
1091 +
1228 1228    ]
1093 +
1229 1229  }
1230 1230  {{/code}}
1231 1231  
... ... @@ -1290,190 +1290,185 @@
1290 1290  
1291 1291  [[image:image-20220709165402-20.png]]
1292 1292  
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"}}
1298 1298  sprint = print
1299 1299  
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)
1160 +~-~-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)
1301 1301  
1302 1302  local MQTT_URL, MQTT_CLIENTID, MQTT_CFG, MQTT_LWT, MQTT_CART = mqtt.setup_cfg()
1303 1303  
1304 ---publish to topics
1164 +~-~-publish to topics
1305 1305  
1306 1306  local pub_RE_TOPIC = string.format('TEST')
1307 1307  
1308 ---Subscribe topics
1168 +~-~-Subscribe topics
1309 1309  
1310 1310  local Subscribe_RE_TOPIC1 = string.format('TEST')
1311 1311  
1312 ---variable
1172 +~-~-variable
1313 1313  
1314 1314  local last_time = 0
1315 1315  
1316 ---Timing main function
1176 +~-~-Timing main function
1317 1317  
1318 1318  function aws.main()
1319 1319  
1320 - sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main start")
1180 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main start")
1321 1321  
1322 - if g_mq then
1182 + if g_mq then
1323 1323  
1324 - if g_mq:isconnected() then
1184 + if g_mq:isconnected() then
1325 1325  
1326 - send_Data()
1186 + send_Data()
1327 1327  
1328 - else
1188 + else
1329 1329  
1330 - if os.time() - last_time > 5 then
1190 + if os.time() - last_time > 5 then
1331 1331  
1332 - last_time = os.time()
1192 + last_time = os.time()
1333 1333  
1334 - mymqtt_connect()
1194 + mymqtt_connect()
1335 1335  
1336 - end
1337 -
1338 1338   end
1339 1339  
1340 - else
1198 + end
1341 1341  
1342 - mymqtt_init()
1200 + else
1343 1343  
1344 - end
1202 + mymqtt_init()
1345 1345  
1346 - sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main end")
1204 + end
1347 1347  
1206 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main end")
1207 +
1348 1348  end
1349 1349  
1350 1350  
1211 +~-~- Initialize MQTT
1351 1351  
1352 --- Initialize MQTT
1353 -
1354 1354  function mymqtt_init()
1355 1355  
1356 - sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
1215 + sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
1357 1357  
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
1217 + g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENTID) ~-~- Create the object and declare it as a global variable
1359 1359  
1360 - if g_mq then
1219 + if g_mq then
1361 1361  
1362 - g_mq:on("message", mymqtt_msg_callback) -- Register to receive message callbacks
1221 + g_mq:on("message", mymqtt_msg_callback) ~-~- Register to receive message callbacks
1363 1363  
1364 - sprint("mqtt init success")
1223 + sprint("mqtt init success")
1365 1365  
1366 - else
1225 + else
1367 1367  
1368 - sprint("mqtt init failed:", err)
1227 + sprint("mqtt init failed:", err)
1369 1369  
1370 - end
1229 + end
1371 1371  
1372 1372  end
1373 1373  
1374 --- Connect to MQTT server
1233 +~-~- Connect to MQTT server
1375 1375  
1376 1376  function mymqtt_connect()
1377 1377  
1378 - sprint("mqtt connecting...")
1237 + sprint("mqtt connecting...")
1379 1379  
1380 - local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
1239 + local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
1381 1381  
1382 - if stat == nil then
1241 + if stat == nil then
1383 1383  
1384 - sprint("mqtt connect failed:", err)
1243 + sprint("mqtt connect failed:", err)
1385 1385  
1386 - return
1245 + return
1387 1387  
1388 - else
1247 + else
1389 1389  
1390 - sprint("mqtt connected")
1249 + sprint("mqtt connected")
1391 1391  
1392 - end
1251 + end
1393 1393  
1394 - g_mq:subscribe(Subscribe_RE_TOPIC1, 0)
1253 + g_mq:subscribe(TEST, 0)
1395 1395  
1396 1396  end
1397 1397  
1398 --- Receive MQTT message callback function
1257 +~-~- Receive MQTT message callback function
1399 1399  
1400 1400  function mymqtt_msg_callback(topic, msg)
1401 1401  
1402 - print("topic:",topic)
1261 + print("topic:",topic)
1403 1403  
1404 - print("revdata:",msg)
1263 + print("revdata:",msg)
1405 1405  
1406 - local revData = json.decode(msg)
1265 + local revData = json.decode(msg)
1407 1407  
1408 - print (revData)
1267 + print (revData)
1409 1409  
1410 - if topic == Subscribe_RE_TOPIC1 then --Process topic information subscribed from the cloud
1269 + if topic == Subscribe_RE_TOPIC1 then ~-~-Process topic information subscribed from the cloud
1411 1411  
1412 - if string.match(topic,Subscribe_RE_TOPIC1) then
1271 +if string.match(topic,Subscribe_RE_TOPIC1) then
1413 1413  
1414 - --if revData ~= nil then
1273 + ~-~-if revData ~~= nil then
1415 1415  
1416 - for k,v in pairs (revData) do
1275 + for k,v in pairs (revData) do
1417 1417  
1418 - print("printing revdata after kv here")
1277 + print("printing revdata after kv here")
1419 1419  
1420 - print (k,v)
1279 + print (k,v)
1421 1421  
1422 - end
1281 + end
1423 1423  
1424 - print ("current state is",fanstate)
1283 + print ("current state is",fanstate)
1425 1425  
1426 - --end
1285 + ~-~-end
1427 1427  
1428 - end
1287 +end
1429 1429  
1430 - end
1289 +end
1431 1431  
1432 1432  end
1433 1433  
1434 1434  
1294 +~-~-Get real-time data
1435 1435  
1436 ---Get real-time data
1437 -
1438 1438  function getData()
1439 1439  
1440 - local jdata = {}
1298 + local jdata = {}
1441 1441  
1442 - local addr = bns_get_alldata()
1300 + local addr = bns_get_alldata()
1443 1443  
1444 - print(json.encode(addr))
1302 + print(json.encode(addr))
1445 1445  
1446 - for i,v in pairs(addr) do
1304 + for i,v in pairs(addr) do
1447 1447  
1448 - if v[2] == 1 then
1306 + if v[2] == 1 then
1449 1449  
1450 - jdata[v[3]] = v[4]
1308 + jdata[v[3]] = v[4]
1451 1451  
1452 - end
1310 + end
1453 1453  
1454 - end
1312 + end
1455 1455  
1456 - return jdata
1314 + return jdata
1457 1457  
1458 1458  end
1459 1459  
1460 ---send data
1318 +~-~-send data
1461 1461  
1462 1462  function send_Data()
1463 1463  
1464 - local pub_data =
1465 - {
1466 - 123
1467 - }
1322 + local pub_data =
1468 1468  
1324 + {
1325 +
1326 +123
1327 +
1328 +}
1329 +
1469 1469  sprint(json.encode(pub_data))
1470 1470  
1471 1471  print("..........",pub_RE_TOPIC)
1472 1472  
1473 - return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
1334 + return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
1474 1474  
1475 1475  end
1476 -{{/code}}
1477 1477  
1478 1478  Get message in AWS
1479 1479  
InputHTTPparameter.png
Author
... ... @@ -1,1 +1,0 @@
1 -XWiki.Hunter
Size
... ... @@ -1,1 +1,0 @@
1 -17.9 KB
Content