Changes for page 2 Script

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

From 20.1 to 21.1 From 28.1 to 29.1

From version 21.1

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

Change comment: Renamed back-links.

To version 28.1

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

Change comment: There is no comment for this version

Raw
Rendered

Summary

Page properties (2 modified, 0 added, 0 removed)

Details

Page properties

Author

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

Content

@@ -70,6 +70,12 @@
  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
@@ -135,7 +135,214 @@
  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}}
++
  = **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.
@@ -288,142 +288,134 @@
  -- 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 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,
++        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
--
--     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
++  -- mq.m:unsubscribe("stc/test")
++  -- mq.m:disconnect() -- close matt
++  -- mq.m:close() -- close clase
++ end
  end
  {{/code}}

Changes for page 2 Script

Summary

Details

Navigation

Table of Contents