Changes for page 2 Script

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

From version 31.1
edited by Hunter
on 2022/11/22 09:47
Change comment: There is no comment for this version
To version 24.1
edited by Hunter
on 2022/10/09 15:02
Change comment: There is no comment for this version

Summary

Details

Page properties
Content
... ... @@ -70,12 +70,6 @@
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 -
79 79  {{code language="Lua"}}
80 80  local tempBit = 0
81 81  local tempWord = 0
... ... @@ -224,10 +224,6 @@
224 224  
225 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 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 231  {{code language="Lua"}}
232 232  local tempBit = 0
233 233  local tempWord = 0
... ... @@ -236,8 +236,8 @@
236 236  local json = require("json")
237 237  local ltn12 = require("ltn12")
238 238  
239 -local SID = 'AC1703bd710ffa98006d2bcc0b********'
240 -local Token = 'd3c11897623c39e538b20263ec19****'
229 +local SID = 'AC1703bd710ffa98006d2bcc0b8d6ca63a'
230 +local Token = 'd3c11897623c39e538b20263ec190ae0'
241 241  
242 242  local twilioPhoneNumber = '+14155238886'
243 243  local receiverPhoneNumber = '+8615880018277'
... ... @@ -349,104 +349,6 @@
349 349  end
350 350  {{/code}}
351 351  
352 -== **1.8 How to parse value from HTTP response body** ==
353 -
354 -This example use [[https:~~/~~/www.weatherapi.com/>>https://www.weatherapi.com/]] as example, to show how to parse value from HTTP response body. When we input the city name into address "@HDW5050":
355 -
356 -(% style="text-align:center" %)
357 -[[image:InputHTTPparameter.png]]
358 -
359 -Then the response body would be like as following:
360 -
361 -{{code language="json"}}
362 -{
363 - "location": {
364 - "name": "Madrid",
365 - "region": "Madrid",
366 - "country": "Spain",
367 - "lat": 40.4,
368 - "lon": -3.68,
369 - "tz_id": "Europe/Madrid",
370 - "localtime_epoch": 1669022636,
371 - "localtime": "2022-11-21 10:23"
372 - },
373 - "current": {
374 - "last_updated_epoch": 1669022100,
375 - "last_updated": "2022-11-21 10:15",
376 - "temp_c": 13.0,
377 - "temp_f": 55.4,
378 - "is_day": 1,
379 - "condition": {
380 - "text": "Partly cloudy",
381 - "icon": "//cdn.weatherapi.com/weather/64x64/day/116.png",
382 - "code": 1003
383 - },
384 - "wind_mph": 11.9,
385 - "wind_kph": 19.1,
386 - "wind_degree": 210,
387 - "wind_dir": "SSW",
388 - "pressure_mb": 1015.0,
389 - "pressure_in": 29.97,
390 - "precip_mm": 0.0,
391 - "precip_in": 0.0,
392 - "humidity": 88,
393 - "cloud": 75,
394 - "feelslike_c": 10.8,
395 - "feelslike_f": 51.4,
396 - "vis_km": 10.0,
397 - "vis_miles": 6.0,
398 - "uv": 3.0,
399 - "gust_mph": 22.1,
400 - "gust_kph": 35.6
401 - }
402 -}
403 -{{/code}}
404 -
405 -(% class="wikigeneratedid" %)
406 -So we decode json into lua object to assign the value into addresses HDW6060(temperature), HDW7070(humidity), the code example like follows:
407 -
408 -{{code language="lua"}}
409 -local APIkey = '70faaecf926b4341b1974006221711'
410 -
411 -
412 -local http = require("socket.http")
413 -local json = require("json")
414 -
415 --- Send http.get request and return response result
416 -function getHttpsUrl(url)
417 - local result_table, code, headers, status = http.request(url)
418 - print("code:"..code)
419 - if code~= 200 then
420 - return
421 - else
422 - return result_table
423 - end
424 -end
425 -
426 -function sendAPI(key, city)
427 - local url = "http://api.weatherapi.com/v1/current.json?key="..key.."&q="..city.."&aqi=no"
428 - --local url = 'http://v-box.net'
429 - --local url = 'https://www.google.com/'
430 - --http://api.weatherapi.com/v1/current.json?key=70faaecf926b4341b1974006221711&q=Barcelona&aqi=no
431 - print("Get the link:"..url)
432 - local body = getHttpsUrl(url)
433 - --print(body)
434 - local jsonBody = json.decode(body)
435 - --print(jsonBody["current"]["temp_c"])
436 - --print(type(jsonBody["current"]["temp_c"]))
437 - --print(type(jsonBody["current"]["humidity"]))
438 - addr_setfloat("@HDW6060", jsonBody["current"]["temp_c"])
439 - addr_setword("@HDW7070", jsonBody["current"]["humidity"])
440 -end
441 -
442 -
443 -function Weather.main()
444 - local cityName = addr_getstring("@HDW5050",6)
445 - print("cityName: "..cityName)
446 - sendAPI(APIkey, cityName)
447 -end
448 -{{/code}}
449 -
450 450  = **2 V-Box connect with third part server** =
451 451  
452 452  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.
... ... @@ -599,134 +599,142 @@
599 599  -- Meta class
600 600  --main
601 601  function mq.main()
602 - if not mq.m then
603 - local err = ""
494 + if not mq.m then
495 +  local err = ""
604 604  
605 - mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID") -- create connection
606 - if mq.m then
607 - mq.config = {
608 - username = "",-- ID
609 - password = "",-- password
610 - netway = 1, -- Ethernet connection, WIFI=1
611 - -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
612 - -- cleansession = 0, -- Optional, keep session
613 - }
614 - mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
615 - local str = string.format("%s:%s", topic, msg)
616 - -- print("mqtt msg:", str) -- Print out the received topics and content
617 - end)
618 - mq.m:on("offline", function (cause) -- Register for lost connection callbacks
619 - -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
620 - end)
621 - mq.m:on("arrived", function() -- Registration for sending messages to callbacks
622 - print("msg arrived")
623 - end)
624 - else
625 - print("mqtt create failed:", err) -- Create object failed
626 - end
627 - else
628 - if mq.m:isconnected() then -- If online, post a message
629 - local phaseStatus ="unknow"
630 - if addr_getbit("@Standby")== 1 then
631 - phaseStatus = "Standby"
632 - elseif addr_getbit("@Pre-Freeze")==1 then
633 - phaseStatus= "Pre-Freeze"
634 - elseif addr_getbit("@Prepare")==1 then
635 - phaseStatus ="Prepare"
636 - elseif addr_getbit("@Primary Dry")==1 then
637 - phaseStatus = "Primary dry"
638 - elseif addr_getbit("@Secondary Dry")==1 then
639 - phaseStatus = "Secondary Dry"
640 - end
641 - --print(addr_getbit("@Primary Dry"))
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"))
642 642  -------------------------------------------------------------------------------------------------------------------------
643 - local activating ="unknow"
644 - if addr_getbit("@Compressor")==1 then
645 - activating = ",".."Compressor"
646 - end
647 - if addr_getbit("@Silicone Pump")==1 then
648 - activating = activating..",".."Silicone Pump"
649 - end
650 - if addr_getbit("@Vacuum Pump")==1 then
651 - activating = activating..",".."Vacuum Pump"
652 - end
653 - if addr_getbit("@Root Pump")==1 then
654 - activating = activating..",".."Root Pump"
655 - end
656 - if addr_getbit("@Heater")==1 then
657 - activating = activating..",".."Heater"
658 - end
659 - if addr_getbit("@Valve Silicone")==1 then
660 - activating = activating..",".."Valve Silicone"
661 - end
662 - if addr_getbit("@Valve Ice Condenser")==1 then
663 - activating = activating..",".."Valve Ice Condenser"
664 - end
665 - if addr_getbit("@Valve Vacuum Pump")==1 then
666 - activating = activating..",".."Valve Vacuum Pump"
667 - end
668 - local pr_activating =string.sub(activating,2)
669 - -- print(pr_activating)
670 - local status_text ="unknow"
671 - if addr_getbit("@Status Run")==1 then
672 - status_text = "RUNNING"
673 - else
674 - status_text = "STOP"
675 - end
676 --------------------------------------------------------------------------------------------------------------------------
677 - local js = {type="status",
678 - mc_name ="FD300",
679 - status=status_text,
680 - elapsed_time={
681 - hour=addr_getword("@Elapsed Time (Hour)"),
682 - min=addr_getword("@Elapsed Time (Minute)"),
683 - sec=addr_getword("@Elapsed Time (Second)")
684 - },
685 - phase = phaseStatus,
686 - step = addr_getword("@Step"),
687 - activating_output = pr_activating,
688 - sv=addr_getshort("@SV Silicone")/10,
689 - pv=addr_getshort("@PV Silicone")/10,
690 - product1=addr_getshort("@Product 1")/10,
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)  
691 691  
692 - product2=addr_getshort("@Product 2")/10,
693 - product3=addr_getshort("@Product 3")/10,
694 - product4=addr_getshort("@Product 4")/10,
695 - ice1=addr_getshort("@Ice condenser 1")/10,
696 - ice2=addr_getshort("@Ice condenser 2")/10,
697 - vacuum=addr_getfloat("@Vacuum")
698 - }
699 - local jsAlarm = { HPC = addr_getbit("@B_25395#W0.00"),
700 - ODPC = addr_getbit("@B_25395#W0.01"),
701 - MTPC=addr_getbit("@B_25395#W0.02"),
702 - HTT = addr_getbit("@B_25395#W1.03"),
703 - CPC = addr_getbit("@B_25395#W0.08"),
704 - CPSP =addr_getbit("@B_25395#W1.00"),
705 - CPVP =addr_getbit("@B_25395#W0.10"),
706 - CPRP =addr_getbit("@B_25395#W0.11"),
707 - HP =addr_getbit("@B_25395#W1.01"),
708 - PP= addr_getbit("@B_25395#W1.02"),
709 - PO=addr_getbit("@B_25395#W0.07"),
710 - FSE=addr_getbit("@B_25395#W2.04"),
711 - AVVSVV=addr_getbit("@B_25395#W1.12"),
712 - ICHT=addr_getbit("@B_25395#W3.06")
713 - }
714 - -- ("@B_25395#CIO1.02")
715 - mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
716 - mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
717 - else
718 - local stat, err = mq.m:connect(mq.config) -- connection
719 - if stat == nil then --Determine whether to connect
720 - print("mqtt connect failed:", err)
721 - return -- Connection failed, return directly
722 - end
723 - mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
724 724  
725 - end
726 - -- mq.m:unsubscribe("stc/test")
727 - -- mq.m:disconnect() -- close matt
728 - -- mq.m:close() -- close clase
729 - end
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
730 730  end
731 731  {{/code}}
732 732  
InputHTTPparameter.png
Author
... ... @@ -1,1 +1,0 @@
1 -XWiki.Hunter
Size
... ... @@ -1,1 +1,0 @@
1 -17.9 KB
Content