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
-
... ... @@ -224,6 +224,10 @@ 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 + 227 227 {{code language="Lua"}} 228 228 local tempBit = 0 229 229 local tempWord = 0 ... ... @@ -345,6 +345,104 @@ 345 345 end 346 346 {{/code}} 347 347 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 + 348 348 = **2 V-Box connect with third part server** = 349 349 350 350 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. ... ... @@ -497,142 +497,134 @@ 497 497 -- Meta class 498 498 --main 499 499 function mq.main() 500 - 501 - 602 + if not mq.m then 603 + local err = "" 502 502 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")) 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")) 541 541 ------------------------------------------------------------------------------------------------------------------------- 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) 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, 569 569 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 570 570 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 725 + end 726 + -- mq.m:unsubscribe("stc/test") 727 + -- mq.m:disconnect() -- close matt 728 + -- mq.m:close() -- close clase 729 + end 636 636 end 637 637 {{/code}} 638 638
- InputHTTPparameter.png
-
- Author
-
... ... @@ -1,0 +1,1 @@ 1 +XWiki.Hunter - Size
-
... ... @@ -1,0 +1,1 @@ 1 +17.9 KB - Content