Changes for page 2 Script

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

From 21.1 to 20.1 From 30.1 to 29.1

From version 29.1

edited by Hunter
on 2022/11/21 17:30

Change comment: There is no comment for this version

To version 21.1

edited by Stone Wu
on 2022/08/01 10:01

Change comment: Renamed back-links.

Raw
Rendered

Summary

Page properties (2 modified, 0 added, 0 removed)
Attachments (0 modified, 0 added, 1 removed)
- InputHTTPparameter.png

Details

Page properties

Author

@@ -1,1 +1,1 @@
--XWiki.Hunter
++XWiki.Stone

Content

@@ -70,12 +70,6 @@
  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.
--As for How to get the botToken and chatID, please check the followig videos:
--
--[[https:~~/~~/www.youtube.com/watch?v=zh6yYlnjX7k>>https://www.youtube.com/watch?v=zh6yYlnjX7k]]
--
--[[https:~~/~~/www.youtube.com/watch?v=Pj8mwuMZZvg>>https://www.youtube.com/watch?v=Pj8mwuMZZvg]]
--
  {{code language="Lua"}}
  local tempBit = 0
  local tempWord = 0
@@ -141,313 +141,7 @@
  end
  {{/code}}
--== **1.6 LINE Notify** ==
--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.
--
--{{code}}
--local tempBit = 0
--local tempWord = 0
--
--local LineToken = "08XCpubkOdwGdGgRTXF0x8umiyrALtoM0v6lBFUV6PC"
--
--local https = require("https")
--local json = require("json")
--local ltn12 = require("ltn12")
--
---- Send http.get request and return response result
--function getHttpsUrl(url,header,reqbody)
--    local body = {}
--    local bodyJson = json.encode(body)
--    local result_table, code, headers, status = https.request{
--        method = "POST",
--        url = url,
--        source = ltn12.source.string(reqbody),
--        headers = header,
--        sink = ltn12.sink.table(body)
--   }
--    print("code:"..code)
--    if code~= 200 then
--        return
--    else
--        return body
--    end
--end
--
--function getMessageUrl(lineMessage)
--    local url = "https://notify-api.line.me/api/notify"
--    local reqMess = "message="..lineMessage
--    local headers =
--                {
--                        ["Authorization"] = "Bearer "..LineToken,
--                        ["Content-Type"] = "application/x-www-form-urlencoded",
--                        ["Content-Length"] = #reqMess
--                }
--
--    print("Get the link:"..url)
--    getHttpsUrl(url, headers, reqMess)
--end
--
--
--function linenotify.main()
--    local bitValue = addr_getbit("@test");
--    local message = ''
--    print("b=="..bitValue)
--    if bitValue == 1 and bitValue ~= tempBit then
--        message = 'Alarm V-Box triggered, the output is '.. bitValue
--        getMessageUrl(message)
--        print("Notification pushed of triggering alarm,"..bitValue)
--    elseif bitValue == 0 and bitValue ~= tempBit then
--        message = 'Alarm V-Box dismissed, the output is '.. bitValue
--        getMessageUrl(message)
--        print("Notification pushed of dismissing alarm,"..bitValue)
--    end
--    tempBit = bitValue----Prevent monitoring values from continuous being sent to the platform
--
--    local wordValue = addr_getword("@t2")
--    print("w=="..wordValue)
--    --dosomething
--    if wordValue >= 100 and wordValue ~= tempWord and tempWord <= 100 then
--        message = 'Alarm V-Box triggered, the temperature is '.. wordValue
--        getMessageUrl(message)
--        print("Notification pushed of triggering alarm,"..wordValue)
--    elseif wordValue < 100 and wordValue ~= tempWord and tempWord >= 100 then
--        message = 'Alarm V-Box dismissed, the temperature is '.. wordValue
--        getMessageUrl(message)
--        print("Notification pushed of dismissing alarm,"..wordValue)
--    end
--    tempWord = wordValue----Prevent monitoring values from continuous being sent to the platform
--end
--{{/code}}
--
--== **1.7 Twilio WhatsApp Messaging** ==
--
--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.
--
--About how to register the Twilio API, please check the following video:
--
--[[https:~~/~~/www.youtube.com/watch?v=Id4lKichauU>>https://www.youtube.com/watch?v=Id4lKichauU]]
--
--{{code language="Lua"}}
--local tempBit = 0
--local tempWord = 0
--
--local https = require("https")
--local json = require("json")
--local ltn12 = require("ltn12")
--
--local SID = 'AC1703bd710ffa98006d2bcc0b********'
--local Token = 'd3c11897623c39e538b20263ec19****'
--
--local twilioPhoneNumber = '+14155238886'
--local receiverPhoneNumber = '+8615880018277'
--
--local b='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/'
--function encodingBase64(data)
--    return ((data:gsub('.', function(x)
--        local r,b='',x:byte()
--        for i=8,1,-1 do r=r..(b%2^i-b%2^(i-1)>0 and '1' or '0') end
--        return r;
--    end)..'0000'):gsub('%d%d%d?%d?%d?%d?', function(x)
--        if (#x < 6) then return '' end
--        local c=0
--        for i=1,6 do c=c+(x:sub(i,i)=='1' and 2^(6-i) or 0) end
--        return b:sub(c+1,c+1)
--    end)..({ '', '==', '=' })[#data%3+1])
--end
--
--function encodeUrl(str)
--    str = string.gsub(str, "([^%w%.%- ])", function(c)
--    return string.format("%%%02X", string.byte(c)) end)
--    return string.gsub(str, " ", "+")
--end
--
--
--
--
--function requestBodySplice(message, sender, receiver)
--    local reqBody = ''
--    local encodeMess = encodeUrl(message)
--    local encodeSend = encodeUrl(sender)
--    local encodeRece = encodeUrl(receiver)
--    --reqBody = "Body=Hello%20Wecon2&From=whatsapp%3A%2B14155238886&To=whatsapp%3A%2B8615880018277"
--    reqBody = string.format("Body=%s&From=whatsapp:%s&To=whatsapp:%s", encodeMess, encodeSend, encodeRece)
--    print(reqBody)
--    return reqBody
--end
--
--
---- Send http.get request and return response result
--function getHttpsUrl(url,header,reqbody)
--    local body = {}
--    local bodyJson = json.encode(body)
--    local result_table, code, headers, status = https.request{
--        method = "POST",
--        url = url,
--        source = ltn12.source.string(reqbody),
--        headers = header,
--        sink = ltn12.sink.table(body)
--   }
--    print("code:"..code)
--    if code~= 200 then
--        return
--    else
--        return body
--    end
--end
--
--function getMessageUrl(whatsAppMessage)
--    local auth = SID..':'..Token
--    local url = "https://api.twilio.com/2010-04-01/Accounts/"..SID.."/Messages"
--    --local reqMess = "message="..twilioMessage
--    local reqMess = requestBodySplice(whatsAppMessage, twilioPhoneNumber, receiverPhoneNumber)
--    local headers =
--                {
--                        ["Authorization"] = "Basic "..encodingBase64(auth),
--                        ["Content-Type"] = "application/x-www-form-urlencoded",
--                        ["Content-Length"] = #reqMess
--                }
--
--    print("Get the link:"..url)
--    getHttpsUrl(url, headers, reqMess)
--end
--
--
--
--function Twilio.main()
--  --dosomething
--  --local auth = SID..':'..Token
--  --print(requestBodySplice("HelloWorld", twilioPhoneNumber, receiverPhoneNumber))
--  --print(encodingBase64(auth))
--  local bitValue = addr_getbit("@testBit");
--    local message = ''
--    print("b=="..bitValue)
--    if bitValue == 1 and bitValue ~= tempBit then
--        message = 'Alarm V-Box triggered, the output is '.. bitValue
--        getMessageUrl(message)
--        print("Notification pushed of triggering alarm,"..bitValue)
--    elseif bitValue == 0 and bitValue ~= tempBit then
--        message = 'Alarm V-Box dismissed, the output is '.. bitValue
--        getMessageUrl(message)
--        print("Notification pushed of dismissing alarm,"..bitValue)
--    end
--    tempBit = bitValue----Prevent monitoring values from continuous being sent to the platform
--
--    local wordValue = addr_getword("@testWord")
--    print("w=="..wordValue)
--    --dosomething
--    if wordValue >= 100 and wordValue ~= tempWord and tempWord <= 100 then
--        message = 'Alarm V-Box triggered, the temperature is '.. wordValue
--        getMessageUrl(message)
--        print("Notification pushed of triggering alarm,"..wordValue)
--    elseif wordValue < 100 and wordValue ~= tempWord and tempWord >= 100 then
--        message = 'Alarm V-Box dismissed, the temperature is '.. wordValue
--        getMessageUrl(message)
--        print("Notification pushed of dismissing alarm,"..wordValue)
--    end
--    tempWord = wordValue----Prevent monitoring values from continuous being sent to the platform
--end
--{{/code}}
--
--
--== **1.8 How to parse value from HTTP response body** ==
--
--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":
--
--(% style="text-align:center" %)
--[[image:InputHTTPparameter.png]]
--
--Then the response body would be like as following:
--
--{{code language="json"}}
--{
--    "location": {
--        "name": "Madrid",
--        "region": "Madrid",
--        "country": "Spain",
--        "lat": 40.4,
--        "lon": -3.68,
--        "tz_id": "Europe/Madrid",
--        "localtime_epoch": 1669022636,
--        "localtime": "2022-11-21 10:23"
--    },
--    "current": {
--        "last_updated_epoch": 1669022100,
--        "last_updated": "2022-11-21 10:15",
--        "temp_c": 13.0,
--        "temp_f": 55.4,
--        "is_day": 1,
--        "condition": {
--            "text": "Partly cloudy",
--            "icon": "//cdn.weatherapi.com/weather/64x64/day/116.png",
--            "code": 1003
--        },
--        "wind_mph": 11.9,
--        "wind_kph": 19.1,
--        "wind_degree": 210,
--        "wind_dir": "SSW",
--        "pressure_mb": 1015.0,
--        "pressure_in": 29.97,
--        "precip_mm": 0.0,
--        "precip_in": 0.0,
--        "humidity": 88,
--        "cloud": 75,
--        "feelslike_c": 10.8,
--        "feelslike_f": 51.4,
--        "vis_km": 10.0,
--        "vis_miles": 6.0,
--        "uv": 3.0,
--        "gust_mph": 22.1,
--        "gust_kph": 35.6
--    }
--}
--{{/code}}
--
--(% class="wikigeneratedid" %)
--So we decode json into lua object to assign the value into addresses HDW6060(temperature), HDW7070(humidity) the code example like follows:
--
--{{code language="lua"}}
--local APIkey = '70faaecf926b4341b1974006221711'
--
--
--local http = require("socket.http")
--local json = require("json")
--
---- Send http.get request and return response result
--function getHttpsUrl(url)
--    local result_table, code, headers, status = http.request(url)
--    print("code:"..code)
--    if code~= 200 then
--        return
--    else
--        return result_table
--    end
--end
--
--function sendAPI(key, city)
--    local url = "http://api.weatherapi.com/v1/current.json?key="..key.."&q="..city.."&aqi=no"
--    --local url = 'http://v-box.net'
--    --local url = 'https://www.google.com/'
--    --http://api.weatherapi.com/v1/current.json?key=70faaecf926b4341b1974006221711&q=Barcelona&aqi=no
--    print("Get the link:"..url)
--    local body = getHttpsUrl(url)
--    --print(body)
--    local jsonBody = json.decode(body)
--    --print(jsonBody["current"]["temp_c"])
--    --print(type(jsonBody["current"]["temp_c"]))
--    --print(type(jsonBody["current"]["humidity"]))
--    addr_setfloat("@HDW6060", jsonBody["current"]["temp_c"])
--    addr_setword("@HDW7070", jsonBody["current"]["humidity"])
--end
--
--
--function Weather.main()
--    local cityName = addr_getstring("@HDW5050",6)
--    print("cityName: "..cityName)
--    sendAPI(APIkey, cityName)
--end
--{{/code}}
--
  = **2 V-Box connect with third part server** =
  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 @@
  -- Meta class
  --main
  function mq.main()
-- if not mq.m then
--  local err = ""
++ if not mq.m then
++  local err = ""
--  mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID")  -- create connection
--  if mq.m then
--   mq.config = {
--    username = "",-- ID
--    password = "",-- password
--    netway = 1, -- Ethernet connection, WIFI=1
--    -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
--    -- cleansession = 0, -- Optional, keep session
--   }
--   mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
--    local str = string.format("%s:%s", topic, msg)
--    -- print("mqtt msg:", str) -- Print out the received topics and content
--   end)
--   mq.m:on("offline", function (cause) -- Register for lost connection callbacks
--    -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
--   end)
--   mq.m:on("arrived", function() -- Registration for sending messages to callbacks
--    print("msg arrived")
--   end)
--  else
--   print("mqtt create failed:", err) -- Create object failed
--  end
-- else
--  if mq.m:isconnected() then -- If online, post a message
--     local phaseStatus ="unknow"
--     if addr_getbit("@Standby")== 1 then
--      phaseStatus = "Standby"
--     elseif addr_getbit("@Pre-Freeze")==1 then
--      phaseStatus= "Pre-Freeze"
--     elseif addr_getbit("@Prepare")==1 then
--      phaseStatus ="Prepare"
--     elseif addr_getbit("@Primary Dry")==1 then
--      phaseStatus = "Primary dry"
--     elseif addr_getbit("@Secondary Dry")==1 then
--      phaseStatus = "Secondary Dry"
--     end
--     --print(addr_getbit("@Primary Dry"))
++  mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID")  -- create connection
++  if mq.m then
++   mq.config = {
++    username = "",-- ID
++    password = "",-- password
++    netway = 1, -- Ethernet connection, WIFI=1
++    -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
++    -- cleansession = 0, -- Optional, keep session
++   }
++   mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
++    local str = string.format("%s:%s", topic, msg)
++    -- print("mqtt msg:", str) -- Print out the received topics and content
++   end
++   )
++   mq.m:on("offline", function (cause) -- Register for lost connection callbacks
++    -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
++   end)
++   mq.m:on("arrived", function() -- Registration for sending messages to callbacks
++    print("msg arrived")
++   end)
++  else
++   print("mqtt create failed:", err) -- Create object failed
++  end
++ else
++  if mq.m:isconnected() then -- If online, post a message
++     local phaseStatus ="unknow"
++     if addr_getbit("@Standby")== 1 then
++         phaseStatus = "Standby"
++     elseif addr_getbit("@Pre-Freeze")==1 then
++         phaseStatus= "Pre-Freeze"
++     elseif addr_getbit("@Prepare")==1 then
++         phaseStatus ="Prepare"
++     elseif addr_getbit("@Primary Dry")==1 then
++         phaseStatus = "Primary dry"
++     elseif addr_getbit("@Secondary Dry")==1 then
++         phaseStatus = "Secondary Dry"
++     end
++--   print(addr_getbit("@Primary Dry"))
  -------------------------------------------------------------------------------------------------------------------------
--     local activating ="unknow"
--     if addr_getbit("@Compressor")==1 then
--      activating = ",".."Compressor"
--     end
--     if addr_getbit("@Silicone Pump")==1 then
--      activating = activating..",".."Silicone Pump"
--     end
--     if addr_getbit("@Vacuum Pump")==1 then
--      activating = activating..",".."Vacuum Pump"
--     end
--     if addr_getbit("@Root Pump")==1 then
--      activating = activating..",".."Root Pump"
--     end
--     if addr_getbit("@Heater")==1 then
--      activating = activating..",".."Heater"
--     end
--     if addr_getbit("@Valve Silicone")==1 then
--      activating = activating..",".."Valve Silicone"
--     end
--     if addr_getbit("@Valve Ice Condenser")==1 then
--      activating = activating..",".."Valve Ice Condenser"
--     end
--     if addr_getbit("@Valve Vacuum Pump")==1 then
--      activating = activating..",".."Valve Vacuum Pump"
--     end
--     local pr_activating =string.sub(activating,2)
--    --  print(pr_activating)
--     local status_text ="unknow"
--     if addr_getbit("@Status Run")==1 then
--      status_text = "RUNNING"
--     else
--      status_text = "STOP"
--     end
---------------------------------------------------------------------------------------------------------------------------
--     local js = {type="status",
--        mc_name ="FD300",
--        status=status_text,
--        elapsed_time={
--          hour=addr_getword("@Elapsed Time (Hour)"),
--          min=addr_getword("@Elapsed Time (Minute)"),
--          sec=addr_getword("@Elapsed Time (Second)")
--        },
--        phase = phaseStatus,
--        step = addr_getword("@Step"),
--        activating_output = pr_activating,
--        sv=addr_getshort("@SV Silicone")/10,
--        pv=addr_getshort("@PV Silicone")/10,
--        product1=addr_getshort("@Product 1")/10,
++     local activating ="unknow"
++     if addr_getbit("@Compressor")==1 then
++         activating = ",".."Compressor"
++     end
++     if addr_getbit("@Silicone Pump")==1 then
++         activating = activating..",".."Silicone Pump"
++     end
++     if addr_getbit("@Vacuum Pump")==1 then
++         activating = activating..",".."Vacuum Pump"
++     end
++     if addr_getbit("@Root Pump")==1 then
++         activating = activating..",".."Root Pump"
++     end
++     if addr_getbit("@Heater")==1 then
++         activating = activating..",".."Heater"
++     end
++     if addr_getbit("@Valve Silicone")==1 then
++         activating = activating..",".."Valve Silicone"
++     end
++     if addr_getbit("@Valve Ice Condenser")==1 then
++         activating = activating..",".."Valve Ice Condenser"
++     end
++     if addr_getbit("@Valve Vacuum Pump")==1 then
++         activating = activating..",".."Valve Vacuum Pump"
++     end
++     local pr_activating =string.sub(activating,2)
++    --  print(pr_activating)
--        product2=addr_getshort("@Product 2")/10,
--        product3=addr_getshort("@Product 3")/10,
--        product4=addr_getshort("@Product 4")/10,
--        ice1=addr_getshort("@Ice condenser 1")/10,
--        ice2=addr_getshort("@Ice condenser 2")/10,
--        vacuum=addr_getfloat("@Vacuum")
--     }
--     local jsAlarm = {  HPC = addr_getbit("@B_25395#W0.00"),
--          ODPC = addr_getbit("@B_25395#W0.01"),
--          MTPC=addr_getbit("@B_25395#W0.02"),
--          HTT = addr_getbit("@B_25395#W1.03"),
--          CPC = addr_getbit("@B_25395#W0.08"),
--          CPSP =addr_getbit("@B_25395#W1.00"),
--          CPVP =addr_getbit("@B_25395#W0.10"),
--          CPRP =addr_getbit("@B_25395#W0.11"),
--          HP =addr_getbit("@B_25395#W1.01"),
--          PP= addr_getbit("@B_25395#W1.02"),
--          PO=addr_getbit("@B_25395#W0.07"),
--          FSE=addr_getbit("@B_25395#W2.04"),
--          AVVSVV=addr_getbit("@B_25395#W1.12"),
--          ICHT=addr_getbit("@B_25395#W3.06")
--     }
--     -- ("@B_25395#CIO1.02")
--     mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
--     mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
--  else
--   local stat, err = mq.m:connect(mq.config) -- connection
--   if stat == nil then --Determine whether to connect
--    print("mqtt connect failed:", err)
--    return -- Connection failed, return directly
--   end
--   mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
--  end
--  -- mq.m:unsubscribe("stc/test")
--  -- mq.m:disconnect() -- close matt
--  -- mq.m:close() -- close clase
-- end
++
++     local status_text ="unknow"
++     if addr_getbit("@Status Run")==1 then
++         status_text = "RUNNING"
++     else
++         status_text = "STOP"
++     end
++-------------------------------------------------------------------------------------------------------------------------
++
++     local js =  {type="status",
++                  mc_name ="FD300",
++                  status=status_text,
++                  elapsed_time={
++                                hour=addr_getword("@Elapsed Time (Hour)"),
++                                min=addr_getword("@Elapsed Time (Minute)"),
++                                sec=addr_getword("@Elapsed Time (Second)")
++                                },
++                   phase = phaseStatus,
++                   step = addr_getword("@Step"),
++                   activating_output = pr_activating,
++                   sv=addr_getshort("@SV Silicone")/10,
++                   pv=addr_getshort("@PV Silicone")/10,
++                   product1=addr_getshort("@Product 1")/10,
++
++                   product2=addr_getshort("@Product 2")/10,
++                   product3=addr_getshort("@Product 3")/10,
++                   product4=addr_getshort("@Product 4")/10,
++                   ice1=addr_getshort("@Ice condenser 1")/10,
++                   ice2=addr_getshort("@Ice condenser 2")/10,
++                   vacuum=addr_getfloat("@Vacuum")
++
++                }
++     local jsAlarm = {  HPC = addr_getbit("@B_25395#W0.00"),
++                        ODPC = addr_getbit("@B_25395#W0.01"),
++                        MTPC=addr_getbit("@B_25395#W0.02"),
++                        HTT = addr_getbit("@B_25395#W1.03"),
++                        CPC = addr_getbit("@B_25395#W0.08"),
++                        CPSP =addr_getbit("@B_25395#W1.00"),
++                        CPVP =addr_getbit("@B_25395#W0.10"),
++                        CPRP =addr_getbit("@B_25395#W0.11"),
++                        HP =addr_getbit("@B_25395#W1.01"),
++                        PP= addr_getbit("@B_25395#W1.02"),
++                        PO=addr_getbit("@B_25395#W0.07"),
++                        FSE=addr_getbit("@B_25395#W2.04"),
++                        AVVSVV=addr_getbit("@B_25395#W1.12"),
++                        ICHT=addr_getbit("@B_25395#W3.06")
++
++                }
++
++    -- ("@B_25395#CIO1.02")
++     mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
++     mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
++  else
++   local stat, err = mq.m:connect(mq.config) -- connection
++   if stat == nil then --Determine whether to connect
++    print("mqtt connect failed:", err)
++    return -- Connection failed, return directly
++   end
++   mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
++
++  end
++  -- mq.m:unsubscribe("stc/test")
++  -- mq.m:disconnect() -- close matt
++  -- mq.m:close() -- close clase
++ end
  end
  {{/code}}

InputHTTPparameter.png

Author

...	...	@@ -1,1 +1,0 @@
1		-XWiki.Hunter

Size

...	...	@@ -1,1 +1,0 @@
1		-17.9 KB

Content

Changes for page 2 Script

Summary

Details

Navigation

Table of Contents