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