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, 0 added, 1 removed)
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 ... ... @@ -220,234 +220,6 @@ 220 220 end 221 221 {{/code}} 222 222 223 -== **1.7 Twilio WhatsApp Messaging** == 224 - 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 - 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 -{{code language="Lua"}} 232 -local tempBit = 0 233 -local tempWord = 0 234 - 235 -local https = require("https") 236 -local json = require("json") 237 -local ltn12 = require("ltn12") 238 - 239 -local SID = 'AC1703bd710ffa98006d2bcc0b********' 240 -local Token = 'd3c11897623c39e538b20263ec19****' 241 - 242 -local twilioPhoneNumber = '+14155238886' 243 -local receiverPhoneNumber = '+8615880018277' 244 - 245 -local b='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/' 246 -function encodingBase64(data) 247 - return ((data:gsub('.', function(x) 248 - local r,b='',x:byte() 249 - for i=8,1,-1 do r=r..(b%2^i-b%2^(i-1)>0 and '1' or '0') end 250 - return r; 251 - end)..'0000'):gsub('%d%d%d?%d?%d?%d?', function(x) 252 - if (#x < 6) then return '' end 253 - local c=0 254 - for i=1,6 do c=c+(x:sub(i,i)=='1' and 2^(6-i) or 0) end 255 - return b:sub(c+1,c+1) 256 - end)..({ '', '==', '=' })[#data%3+1]) 257 -end 258 - 259 -function encodeUrl(str) 260 - str = string.gsub(str, "([^%w%.%- ])", function(c) 261 - return string.format("%%%02X", string.byte(c)) end) 262 - return string.gsub(str, " ", "+") 263 -end 264 - 265 - 266 - 267 - 268 -function requestBodySplice(message, sender, receiver) 269 - local reqBody = '' 270 - local encodeMess = encodeUrl(message) 271 - local encodeSend = encodeUrl(sender) 272 - local encodeRece = encodeUrl(receiver) 273 - --reqBody = "Body=Hello%20Wecon2&From=whatsapp%3A%2B14155238886&To=whatsapp%3A%2B8615880018277" 274 - reqBody = string.format("Body=%s&From=whatsapp:%s&To=whatsapp:%s", encodeMess, encodeSend, encodeRece) 275 - print(reqBody) 276 - return reqBody 277 -end 278 - 279 - 280 --- Send http.get request and return response result 281 -function getHttpsUrl(url,header,reqbody) 282 - local body = {} 283 - local bodyJson = json.encode(body) 284 - local result_table, code, headers, status = https.request{ 285 - method = "POST", 286 - url = url, 287 - source = ltn12.source.string(reqbody), 288 - headers = header, 289 - sink = ltn12.sink.table(body) 290 - } 291 - print("code:"..code) 292 - if code~= 200 then 293 - return 294 - else 295 - return body 296 - end 297 -end 298 - 299 -function getMessageUrl(whatsAppMessage) 300 - local auth = SID..':'..Token 301 - local url = "https://api.twilio.com/2010-04-01/Accounts/"..SID.."/Messages" 302 - --local reqMess = "message="..twilioMessage 303 - local reqMess = requestBodySplice(whatsAppMessage, twilioPhoneNumber, receiverPhoneNumber) 304 - local headers = 305 - { 306 - ["Authorization"] = "Basic "..encodingBase64(auth), 307 - ["Content-Type"] = "application/x-www-form-urlencoded", 308 - ["Content-Length"] = #reqMess 309 - } 310 - 311 - print("Get the link:"..url) 312 - getHttpsUrl(url, headers, reqMess) 313 -end 314 - 315 - 316 - 317 -function Twilio.main() 318 - --dosomething 319 - --local auth = SID..':'..Token 320 - --print(requestBodySplice("HelloWorld", twilioPhoneNumber, receiverPhoneNumber)) 321 - --print(encodingBase64(auth)) 322 - local bitValue = addr_getbit("@testBit"); 323 - local message = '' 324 - print("b=="..bitValue) 325 - if bitValue == 1 and bitValue ~= tempBit then 326 - message = 'Alarm V-Box triggered, the output is '.. bitValue 327 - getMessageUrl(message) 328 - print("Notification pushed of triggering alarm,"..bitValue) 329 - elseif bitValue == 0 and bitValue ~= tempBit then 330 - message = 'Alarm V-Box dismissed, the output is '.. bitValue 331 - getMessageUrl(message) 332 - print("Notification pushed of dismissing alarm,"..bitValue) 333 - end 334 - tempBit = bitValue----Prevent monitoring values from continuous being sent to the platform 335 - 336 - local wordValue = addr_getword("@testWord") 337 - print("w=="..wordValue) 338 - --dosomething 339 - if wordValue >= 100 and wordValue ~= tempWord and tempWord <= 100 then 340 - message = 'Alarm V-Box triggered, the temperature is '.. wordValue 341 - getMessageUrl(message) 342 - print("Notification pushed of triggering alarm,"..wordValue) 343 - elseif wordValue < 100 and wordValue ~= tempWord and tempWord >= 100 then 344 - message = 'Alarm V-Box dismissed, the temperature is '.. wordValue 345 - getMessageUrl(message) 346 - print("Notification pushed of dismissing alarm,"..wordValue) 347 - end 348 - tempWord = wordValue----Prevent monitoring values from continuous being sent to the platform 349 -end 350 -{{/code}} 351 - 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 - 451 451 = **2 V-Box connect with third part server** = 452 452 453 453 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. ... ... @@ -600,134 +600,142 @@ 600 600 -- Meta class 601 601 --main 602 602 function mq.main() 603 - 604 - 369 + if not mq.m then 370 + local err = "" 605 605 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")) 372 + mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID") -- create connection 373 + if mq.m then 374 + mq.config = { 375 + username = "",-- ID 376 + password = "",-- password 377 + netway = 1, -- Ethernet connection, WIFI=1 378 + -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds. 379 + -- cleansession = 0, -- Optional, keep session 380 + } 381 + mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks 382 + local str = string.format("%s:%s", topic, msg) 383 + -- print("mqtt msg:", str) -- Print out the received topics and content 384 + end 385 + ) 386 + mq.m:on("offline", function (cause) -- Register for lost connection callbacks 387 + -- addr_setstring("@xxx", "cause"..(cause or " got nil")) 388 + end) 389 + mq.m:on("arrived", function() -- Registration for sending messages to callbacks 390 + print("msg arrived") 391 + end) 392 + else 393 + print("mqtt create failed:", err) -- Create object failed 394 + end 395 + else 396 + if mq.m:isconnected() then -- If online, post a message 397 + local phaseStatus ="unknow" 398 + if addr_getbit("@Standby")== 1 then 399 + phaseStatus = "Standby" 400 + elseif addr_getbit("@Pre-Freeze")==1 then 401 + phaseStatus= "Pre-Freeze" 402 + elseif addr_getbit("@Prepare")==1 then 403 + phaseStatus ="Prepare" 404 + elseif addr_getbit("@Primary Dry")==1 then 405 + phaseStatus = "Primary dry" 406 + elseif addr_getbit("@Secondary Dry")==1 then 407 + phaseStatus = "Secondary Dry" 408 + end 409 +-- print(addr_getbit("@Primary Dry")) 643 643 ------------------------------------------------------------------------------------------------------------------------- 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, 411 + local activating ="unknow" 412 + if addr_getbit("@Compressor")==1 then 413 + activating = ",".."Compressor" 414 + end 415 + if addr_getbit("@Silicone Pump")==1 then 416 + activating = activating..",".."Silicone Pump" 417 + end 418 + if addr_getbit("@Vacuum Pump")==1 then 419 + activating = activating..",".."Vacuum Pump" 420 + end 421 + if addr_getbit("@Root Pump")==1 then 422 + activating = activating..",".."Root Pump" 423 + end 424 + if addr_getbit("@Heater")==1 then 425 + activating = activating..",".."Heater" 426 + end 427 + if addr_getbit("@Valve Silicone")==1 then 428 + activating = activating..",".."Valve Silicone" 429 + end 430 + if addr_getbit("@Valve Ice Condenser")==1 then 431 + activating = activating..",".."Valve Ice Condenser" 432 + end 433 + if addr_getbit("@Valve Vacuum Pump")==1 then 434 + activating = activating..",".."Valve Vacuum Pump" 435 + end 436 + local pr_activating =string.sub(activating,2) 437 + -- print(pr_activating) 692 692 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 725 725 726 - end 727 - -- mq.m:unsubscribe("stc/test") 728 - -- mq.m:disconnect() -- close matt 729 - -- mq.m:close() -- close clase 730 - end 440 + 441 + local status_text ="unknow" 442 + if addr_getbit("@Status Run")==1 then 443 + status_text = "RUNNING" 444 + else 445 + status_text = "STOP" 446 + end 447 +------------------------------------------------------------------------------------------------------------------------- 448 + 449 + local js = {type="status", 450 + mc_name ="FD300", 451 + status=status_text, 452 + elapsed_time={ 453 + hour=addr_getword("@Elapsed Time (Hour)"), 454 + min=addr_getword("@Elapsed Time (Minute)"), 455 + sec=addr_getword("@Elapsed Time (Second)") 456 + }, 457 + phase = phaseStatus, 458 + step = addr_getword("@Step"), 459 + activating_output = pr_activating, 460 + sv=addr_getshort("@SV Silicone")/10, 461 + pv=addr_getshort("@PV Silicone")/10, 462 + product1=addr_getshort("@Product 1")/10, 463 + 464 + product2=addr_getshort("@Product 2")/10, 465 + product3=addr_getshort("@Product 3")/10, 466 + product4=addr_getshort("@Product 4")/10, 467 + ice1=addr_getshort("@Ice condenser 1")/10, 468 + ice2=addr_getshort("@Ice condenser 2")/10, 469 + vacuum=addr_getfloat("@Vacuum") 470 + 471 + } 472 + local jsAlarm = { HPC = addr_getbit("@B_25395#W0.00"), 473 + ODPC = addr_getbit("@B_25395#W0.01"), 474 + MTPC=addr_getbit("@B_25395#W0.02"), 475 + HTT = addr_getbit("@B_25395#W1.03"), 476 + CPC = addr_getbit("@B_25395#W0.08"), 477 + CPSP =addr_getbit("@B_25395#W1.00"), 478 + CPVP =addr_getbit("@B_25395#W0.10"), 479 + CPRP =addr_getbit("@B_25395#W0.11"), 480 + HP =addr_getbit("@B_25395#W1.01"), 481 + PP= addr_getbit("@B_25395#W1.02"), 482 + PO=addr_getbit("@B_25395#W0.07"), 483 + FSE=addr_getbit("@B_25395#W2.04"), 484 + AVVSVV=addr_getbit("@B_25395#W1.12"), 485 + ICHT=addr_getbit("@B_25395#W3.06") 486 + 487 + } 488 + 489 + -- ("@B_25395#CIO1.02") 490 + mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0) 491 + mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0) 492 + else 493 + local stat, err = mq.m:connect(mq.config) -- connection 494 + if stat == nil then --Determine whether to connect 495 + print("mqtt connect failed:", err) 496 + return -- Connection failed, return directly 497 + end 498 + mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics 499 + 500 + end 501 + -- mq.m:unsubscribe("stc/test") 502 + -- mq.m:disconnect() -- close matt 503 + -- mq.m:close() -- close clase 504 + end 731 731 end 732 732 {{/code}} 733 733
- InputHTTPparameter.png
-
- Author
-
... ... @@ -1,1 +1,0 @@ 1 -XWiki.Hunter - Size
-
... ... @@ -1,1 +1,0 @@ 1 -17.9 KB - Content