Skip to Content

Changes for page 2 Script

Last modified by Devin Chen on 2025/06/06 14:03
From version 39.1
edited by Hunter
on 2023/03/17 15:50
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.

Summary

Details

Page properties
Author
... ... @@ -1,1 +1,1 @@
1 -XWiki.Hunter
1 +XWiki.Stone
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
... ... @@ -141,312 +141,7 @@
141 141  end
142 142  {{/code}}
143 143  
144 -== **1.6 LINE Notify** ==
145 145  
146 -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.
147 -
148 -{{code}}
149 -local tempBit = 0
150 -local tempWord = 0
151 -
152 -local LineToken = "08XCpubkOdwGdGgRTXF0x8umiyrALtoM0v6lBFUV6PC"
153 -
154 -local https = require("https")
155 -local json = require("json")
156 -local ltn12 = require("ltn12")
157 -
158 --- Send http.get request and return response result
159 -function getHttpsUrl(url,header,reqbody)
160 - local body = {}
161 - local bodyJson = json.encode(body)
162 - local result_table, code, headers, status = https.request{
163 - method = "POST",
164 - url = url,
165 - source = ltn12.source.string(reqbody),
166 - headers = header,
167 - sink = ltn12.sink.table(body)
168 - }
169 - print("code:"..code)
170 - if code~= 200 then
171 - return
172 - else
173 - return body
174 - end
175 -end
176 -
177 -function getMessageUrl(lineMessage)
178 - local url = "https://notify-api.line.me/api/notify"
179 - local reqMess = "message="..lineMessage
180 - local headers =
181 - {
182 - ["Authorization"] = "Bearer "..LineToken,
183 - ["Content-Type"] = "application/x-www-form-urlencoded",
184 - ["Content-Length"] = #reqMess
185 - }
186 -
187 - print("Get the link:"..url)
188 - getHttpsUrl(url, headers, reqMess)
189 -end
190 -
191 -
192 -function linenotify.main()
193 - local bitValue = addr_getbit("@test");
194 - local message = ''
195 - print("b=="..bitValue)
196 - if bitValue == 1 and bitValue ~= tempBit then
197 - message = 'Alarm V-Box triggered, the output is '.. bitValue
198 - getMessageUrl(message)
199 - print("Notification pushed of triggering alarm,"..bitValue)
200 - elseif bitValue == 0 and bitValue ~= tempBit then
201 - message = 'Alarm V-Box dismissed, the output is '.. bitValue
202 - getMessageUrl(message)
203 - print("Notification pushed of dismissing alarm,"..bitValue)
204 - end
205 - tempBit = bitValue----Prevent monitoring values from continuous being sent to the platform
206 -
207 - local wordValue = addr_getword("@t2")
208 - print("w=="..wordValue)
209 - --dosomething
210 - if wordValue >= 100 and wordValue ~= tempWord and tempWord <= 100 then
211 - message = 'Alarm V-Box triggered, the temperature is '.. wordValue
212 - getMessageUrl(message)
213 - print("Notification pushed of triggering alarm,"..wordValue)
214 - elseif wordValue < 100 and wordValue ~= tempWord and tempWord >= 100 then
215 - message = 'Alarm V-Box dismissed, the temperature is '.. wordValue
216 - getMessageUrl(message)
217 - print("Notification pushed of dismissing alarm,"..wordValue)
218 - end
219 - tempWord = wordValue----Prevent monitoring values from continuous being sent to the platform
220 -end
221 -{{/code}}
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 -== **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 -
450 450  = **2 V-Box connect with third part server** =
451 451  
452 452  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.
... ... @@ -465,9 +465,8 @@
465 465  
466 466  (% class="mark" %)2.If your server requires SSL certificate to log in,please use OpenCloud.Because only OpenCloud platform can support to upload certificate
467 467  
468 -{{info}}
157 +(% class="wikigeneratedid" %)
469 469  **✎Note: **Before program the script of MQTT, please make sure the server(MQTT broker) can be connected through MQTT Client tool.
470 -{{/info}}
471 471  
472 472  (% class="wikigeneratedid" %)
473 473  Tool link: **[[MQTT.fx>>http://mqttfx.jensd.de/index.php/download]]**
... ... @@ -515,13 +515,9 @@
515 515  --initialize mqtt
516 516  function mqtt_init()
517 517   print(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENT_ID))
518 - if g_mq then
519 - mqtt.close() --Close mqtt object
520 - end
521 521   g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENT_ID) -- create mqtt object,and declare it as a global variable
522 522   if g_mq then
523 523   g_mq:on("message", mqtt_msg_callback) -- Register a callback for receiving messages
524 - g_mq:on("offline", mqtt_msg_offline) -- Register a callback for offline
525 525   print("mqtt init success")
526 526   else
527 527   print("mqtt init failed:", err)
... ... @@ -579,11 +579,9 @@
579 579   if g_mq:isconnected() then
580 580   send_data()
581 581   else
582 - --if exceed 5 sec not connect, reconnect once
583 - if os.time() - LAST_TIME > 5 then
266 + --if exceed 20 sec not connect, reconnect once
267 + if os.time() - LAST_TIME > 20 then
584 584   LAST_TIME = os.time()
585 - --reinitial the mqtt object
586 - mqtt_init()
587 587   --connect to mqtt or reconnect
588 588   mqtt_connect()
589 589   end
... ... @@ -606,134 +606,142 @@
606 606  -- Meta class
607 607  --main
608 608  function mq.main()
609 - if not mq.m then
610 - local err = ""
291 + if not mq.m then
292 +  local err = ""
611 611  
612 - mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID") -- create connection
613 - if mq.m then
614 - mq.config = {
615 - username = "",-- ID
616 - password = "",-- password
617 - netway = 1, -- Ethernet connection, WIFI=1
618 - -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
619 - -- cleansession = 0, -- Optional, keep session
620 - }
621 - mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
622 - local str = string.format("%s:%s", topic, msg)
623 - -- print("mqtt msg:", str) -- Print out the received topics and content
624 - end)
625 - mq.m:on("offline", function (cause) -- Register for lost connection callbacks
626 - -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
627 - end)
628 - mq.m:on("arrived", function() -- Registration for sending messages to callbacks
629 - print("msg arrived")
630 - end)
631 - else
632 - print("mqtt create failed:", err) -- Create object failed
633 - end
634 - else
635 - if mq.m:isconnected() then -- If online, post a message
636 - local phaseStatus ="unknow"
637 - if addr_getbit("@Standby")== 1 then
638 - phaseStatus = "Standby"
639 - elseif addr_getbit("@Pre-Freeze")==1 then
640 - phaseStatus= "Pre-Freeze"
641 - elseif addr_getbit("@Prepare")==1 then
642 - phaseStatus ="Prepare"
643 - elseif addr_getbit("@Primary Dry")==1 then
644 - phaseStatus = "Primary dry"
645 - elseif addr_getbit("@Secondary Dry")==1 then
646 - phaseStatus = "Secondary Dry"
647 - end
648 - --print(addr_getbit("@Primary Dry"))
294 +  mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID")  -- create connection
295 +  if mq.m then
296 +   mq.config = {
297 +    username = "",-- ID
298 +    password = "",-- password
299 +    netway = 1, -- Ethernet connection, WIFI=1
300 +    -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
301 +    -- cleansession = 0, -- Optional, keep session
302 +   }
303 +   mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
304 +    local str = string.format("%s:%s", topic, msg)
305 +    -- print("mqtt msg:", str) -- Print out the received topics and content
306 +   end
307 +   )
308 +   mq.m:on("offline", function (cause) -- Register for lost connection callbacks
309 +    -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
310 +   end)
311 +   mq.m:on("arrived", function() -- Registration for sending messages to callbacks 
312 +    print("msg arrived")
313 +   end)
314 +  else
315 +   print("mqtt create failed:", err) -- Create object failed
316 +  end
317 + else
318 +  if mq.m:isconnected() then -- If online, post a message
319 +     local phaseStatus ="unknow"
320 +     if addr_getbit("@Standby")== 1 then
321 +         phaseStatus = "Standby"
322 +     elseif addr_getbit("@Pre-Freeze")==1 then
323 +         phaseStatus= "Pre-Freeze"
324 +     elseif addr_getbit("@Prepare")==1 then
325 +         phaseStatus ="Prepare"
326 +     elseif addr_getbit("@Primary Dry")==1 then
327 +         phaseStatus = "Primary dry"
328 +     elseif addr_getbit("@Secondary Dry")==1 then
329 +         phaseStatus = "Secondary Dry"
330 +     end
331 +--   print(addr_getbit("@Primary Dry"))
649 649  -------------------------------------------------------------------------------------------------------------------------
650 - local activating ="unknow"
651 - if addr_getbit("@Compressor")==1 then
652 - activating = ",".."Compressor"
653 - end
654 - if addr_getbit("@Silicone Pump")==1 then
655 - activating = activating..",".."Silicone Pump"
656 - end
657 - if addr_getbit("@Vacuum Pump")==1 then
658 - activating = activating..",".."Vacuum Pump"
659 - end
660 - if addr_getbit("@Root Pump")==1 then
661 - activating = activating..",".."Root Pump"
662 - end
663 - if addr_getbit("@Heater")==1 then
664 - activating = activating..",".."Heater"
665 - end
666 - if addr_getbit("@Valve Silicone")==1 then
667 - activating = activating..",".."Valve Silicone"
668 - end
669 - if addr_getbit("@Valve Ice Condenser")==1 then
670 - activating = activating..",".."Valve Ice Condenser"
671 - end
672 - if addr_getbit("@Valve Vacuum Pump")==1 then
673 - activating = activating..",".."Valve Vacuum Pump"
674 - end
675 - local pr_activating =string.sub(activating,2)
676 - -- print(pr_activating)
677 - local status_text ="unknow"
678 - if addr_getbit("@Status Run")==1 then
679 - status_text = "RUNNING"
680 - else
681 - status_text = "STOP"
682 - end
683 --------------------------------------------------------------------------------------------------------------------------
684 - local js = {type="status",
685 - mc_name ="FD300",
686 - status=status_text,
687 - elapsed_time={
688 - hour=addr_getword("@Elapsed Time (Hour)"),
689 - min=addr_getword("@Elapsed Time (Minute)"),
690 - sec=addr_getword("@Elapsed Time (Second)")
691 - },
692 - phase = phaseStatus,
693 - step = addr_getword("@Step"),
694 - activating_output = pr_activating,
695 - sv=addr_getshort("@SV Silicone")/10,
696 - pv=addr_getshort("@PV Silicone")/10,
697 - product1=addr_getshort("@Product 1")/10,
333 +     local activating ="unknow"
334 +     if addr_getbit("@Compressor")==1 then
335 +         activating = ",".."Compressor"
336 +     end
337 +     if addr_getbit("@Silicone Pump")==1 then
338 +         activating = activating..",".."Silicone Pump"
339 +     end
340 +     if addr_getbit("@Vacuum Pump")==1 then
341 +         activating = activating..",".."Vacuum Pump"
342 +     end
343 +     if addr_getbit("@Root Pump")==1 then
344 +         activating = activating..",".."Root Pump"
345 +     end
346 +     if addr_getbit("@Heater")==1 then
347 +         activating = activating..",".."Heater"
348 +     end
349 +     if addr_getbit("@Valve Silicone")==1 then
350 +         activating = activating..",".."Valve Silicone"
351 +     end
352 +     if addr_getbit("@Valve Ice Condenser")==1 then
353 +         activating = activating..",".."Valve Ice Condenser"
354 +     end
355 +     if addr_getbit("@Valve Vacuum Pump")==1 then
356 +         activating = activating..",".."Valve Vacuum Pump"
357 +     end
358 +     local pr_activating =string.sub(activating,2)
359 +    --  print(pr_activating)  
698 698  
699 - product2=addr_getshort("@Product 2")/10,
700 - product3=addr_getshort("@Product 3")/10,
701 - product4=addr_getshort("@Product 4")/10,
702 - ice1=addr_getshort("@Ice condenser 1")/10,
703 - ice2=addr_getshort("@Ice condenser 2")/10,
704 - vacuum=addr_getfloat("@Vacuum")
705 - }
706 - local jsAlarm = { HPC = addr_getbit("@B_25395#W0.00"),
707 - ODPC = addr_getbit("@B_25395#W0.01"),
708 - MTPC=addr_getbit("@B_25395#W0.02"),
709 - HTT = addr_getbit("@B_25395#W1.03"),
710 - CPC = addr_getbit("@B_25395#W0.08"),
711 - CPSP =addr_getbit("@B_25395#W1.00"),
712 - CPVP =addr_getbit("@B_25395#W0.10"),
713 - CPRP =addr_getbit("@B_25395#W0.11"),
714 - HP =addr_getbit("@B_25395#W1.01"),
715 - PP= addr_getbit("@B_25395#W1.02"),
716 - PO=addr_getbit("@B_25395#W0.07"),
717 - FSE=addr_getbit("@B_25395#W2.04"),
718 - AVVSVV=addr_getbit("@B_25395#W1.12"),
719 - ICHT=addr_getbit("@B_25395#W3.06")
720 - }
721 - -- ("@B_25395#CIO1.02")
722 - mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
723 - mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
724 - else
725 - local stat, err = mq.m:connect(mq.config) -- connection
726 - if stat == nil then --Determine whether to connect
727 - print("mqtt connect failed:", err)
728 - return -- Connection failed, return directly
729 - end
730 - mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
731 731  
732 - end
733 - -- mq.m:unsubscribe("stc/test")
734 - -- mq.m:disconnect() -- close matt
735 - -- mq.m:close() -- close clase
736 - end
362 +
363 +     local status_text ="unknow"
364 +     if addr_getbit("@Status Run")==1 then
365 +         status_text = "RUNNING"
366 +     else
367 +         status_text = "STOP"
368 +     end
369 +-------------------------------------------------------------------------------------------------------------------------      
370 +
371 +     local js =  {type="status",
372 +                  mc_name ="FD300",
373 +                  status=status_text,
374 +                  elapsed_time={
375 +                                hour=addr_getword("@Elapsed Time (Hour)"),
376 +                                min=addr_getword("@Elapsed Time (Minute)"),
377 +                                sec=addr_getword("@Elapsed Time (Second)")
378 +                                },
379 +                   phase = phaseStatus,
380 +                   step = addr_getword("@Step"),
381 +                   activating_output = pr_activating,
382 +                   sv=addr_getshort("@SV Silicone")/10,
383 +                   pv=addr_getshort("@PV Silicone")/10,
384 +                   product1=addr_getshort("@Product 1")/10,
385 +
386 +                   product2=addr_getshort("@Product 2")/10,
387 +                   product3=addr_getshort("@Product 3")/10,
388 +                   product4=addr_getshort("@Product 4")/10,
389 +                   ice1=addr_getshort("@Ice condenser 1")/10,
390 +                   ice2=addr_getshort("@Ice condenser 2")/10,
391 +                   vacuum=addr_getfloat("@Vacuum")
392 +
393 +                }
394 +     local jsAlarm = {  HPC = addr_getbit("@B_25395#W0.00"),
395 +                        ODPC = addr_getbit("@B_25395#W0.01"),
396 +                        MTPC=addr_getbit("@B_25395#W0.02"),
397 +                        HTT = addr_getbit("@B_25395#W1.03"),
398 +                        CPC = addr_getbit("@B_25395#W0.08"),
399 +                        CPSP =addr_getbit("@B_25395#W1.00"),
400 +                        CPVP =addr_getbit("@B_25395#W0.10"),
401 +                        CPRP =addr_getbit("@B_25395#W0.11"),
402 +                        HP =addr_getbit("@B_25395#W1.01"),
403 +                        PP= addr_getbit("@B_25395#W1.02"),
404 +                        PO=addr_getbit("@B_25395#W0.07"),
405 +                        FSE=addr_getbit("@B_25395#W2.04"),
406 +                        AVVSVV=addr_getbit("@B_25395#W1.12"),
407 +                        ICHT=addr_getbit("@B_25395#W3.06")
408 +
409 +                }
410 +
411 +    -- ("@B_25395#CIO1.02")
412 +     mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
413 +     mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
414 +  else
415 +   local stat, err = mq.m:connect(mq.config) -- connection
416 +   if stat == nil then --Determine whether to connect
417 +    print("mqtt connect failed:", err)
418 +    return -- Connection failed, return directly
419 +   end
420 +   mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
421 +
422 +  end
423 +  -- mq.m:unsubscribe("stc/test")
424 +  -- mq.m:disconnect() -- close matt
425 +  -- mq.m:close() -- close clase
426 + end
737 737  end
738 738  {{/code}}
739 739  
... ... @@ -1163,20 +1163,35 @@
1163 1163  
1164 1164  {{code language="java"}}
1165 1165  {
856 +
1166 1166    "Version": "2012-10-17",
858 +
1167 1167    "Statement": [
860 +
1168 1168      {
862 +
1169 1169        "Effect": "Allow",
864 +
1170 1170        "Action": [
866 +
1171 1171          "iot:Connect",
868 +
1172 1172          "iot:Publish",
870 +
1173 1173          "iot:Subscribe",
872 +
1174 1174          "iot:Receive",
874 +
1175 1175          "greengrass:Discover"
876 +
1176 1176        ],
878 +
1177 1177        "Resource": "*"
880 +
1178 1178      }
882 +
1179 1179    ]
884 +
1180 1180  }
1181 1181  {{/code}}
1182 1182  
... ... @@ -1241,190 +1241,185 @@
1241 1241  
1242 1242  [[image:image-20220709165402-20.png]]
1243 1243  
1244 -{{info}}
1245 -**✎Note:** Before using the following demo script, please make sure the V-Box firmware is newer than 22110701
1246 -{{/info}}
1247 -
1248 -{{code language="lua"}}
1249 1249  sprint = print
1250 1250  
1251 ---Cloud mode interface to obtain the MQTT information configured by the cloud platform: (5 returns, namely the server address, client ID, connection table, last word table, certificate table)
951 +~-~-Cloud mode interface to obtain the MQTT information configured by the cloud platform: (5 returns, namely the server address, client ID, connection table, last word table, certificate table)
1252 1252  
1253 1253  local MQTT_URL, MQTT_CLIENTID, MQTT_CFG, MQTT_LWT, MQTT_CART = mqtt.setup_cfg()
1254 1254  
1255 ---publish to topics
955 +~-~-publish to topics
1256 1256  
1257 1257  local pub_RE_TOPIC = string.format('TEST')
1258 1258  
1259 ---Subscribe topics
959 +~-~-Subscribe topics
1260 1260  
1261 1261  local Subscribe_RE_TOPIC1 = string.format('TEST')
1262 1262  
1263 ---variable
963 +~-~-variable
1264 1264  
1265 1265  local last_time = 0
1266 1266  
1267 ---Timing main function
967 +~-~-Timing main function
1268 1268  
1269 1269  function aws.main()
1270 1270  
1271 - sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main start")
971 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main start")
1272 1272  
1273 - if g_mq then
973 + if g_mq then
1274 1274  
1275 - if g_mq:isconnected() then
975 + if g_mq:isconnected() then
1276 1276  
1277 - send_Data()
977 + send_Data()
1278 1278  
1279 - else
979 + else
1280 1280  
1281 - if os.time() - last_time > 5 then
981 + if os.time() - last_time > 5 then
1282 1282  
1283 - last_time = os.time()
983 + last_time = os.time()
1284 1284  
1285 - mymqtt_connect()
985 + mymqtt_connect()
1286 1286  
1287 - end
1288 -
1289 1289   end
1290 1290  
1291 - else
989 + end
1292 1292  
1293 - mymqtt_init()
991 + else
1294 1294  
1295 - end
993 + mymqtt_init()
1296 1296  
1297 - sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main end")
995 + end
1298 1298  
997 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main end")
998 +
1299 1299  end
1300 1300  
1301 1301  
1002 +~-~- Initialize MQTT
1302 1302  
1303 --- Initialize MQTT
1304 -
1305 1305  function mymqtt_init()
1306 1306  
1307 - sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
1006 + sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
1308 1308  
1309 - g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENTID, 1) -- Create the object and declare it as a global variable, 1 means using the domain to connect
1008 + g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENTID) ~-~- Create the object and declare it as a global variable
1310 1310  
1311 - if g_mq then
1010 + if g_mq then
1312 1312  
1313 - g_mq:on("message", mymqtt_msg_callback) -- Register to receive message callbacks
1012 + g_mq:on("message", mymqtt_msg_callback) ~-~- Register to receive message callbacks
1314 1314  
1315 - sprint("mqtt init success")
1014 + sprint("mqtt init success")
1316 1316  
1317 - else
1016 + else
1318 1318  
1319 - sprint("mqtt init failed:", err)
1018 + sprint("mqtt init failed:", err)
1320 1320  
1321 - end
1020 + end
1322 1322  
1323 1323  end
1324 1324  
1325 --- Connect to MQTT server
1024 +~-~- Connect to MQTT server
1326 1326  
1327 1327  function mymqtt_connect()
1328 1328  
1329 - sprint("mqtt connecting...")
1028 + sprint("mqtt connecting...")
1330 1330  
1331 - local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
1030 + local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
1332 1332  
1333 - if stat == nil then
1032 + if stat == nil then
1334 1334  
1335 - sprint("mqtt connect failed:", err)
1034 + sprint("mqtt connect failed:", err)
1336 1336  
1337 - return
1036 + return
1338 1338  
1339 - else
1038 + else
1340 1340  
1341 - sprint("mqtt connected")
1040 + sprint("mqtt connected")
1342 1342  
1343 - end
1042 + end
1344 1344  
1345 - g_mq:subscribe(Subscribe_RE_TOPIC1, 0)
1044 + g_mq:subscribe(TEST, 0)
1346 1346  
1347 1347  end
1348 1348  
1349 --- Receive MQTT message callback function
1048 +~-~- Receive MQTT message callback function
1350 1350  
1351 1351  function mymqtt_msg_callback(topic, msg)
1352 1352  
1353 - print("topic:",topic)
1052 + print("topic:",topic)
1354 1354  
1355 - print("revdata:",msg)
1054 + print("revdata:",msg)
1356 1356  
1357 - local revData = json.decode(msg)
1056 + local revData = json.decode(msg)
1358 1358  
1359 - print (revData)
1058 + print (revData)
1360 1360  
1361 - if topic == Subscribe_RE_TOPIC1 then --Process topic information subscribed from the cloud
1060 + if topic == Subscribe_RE_TOPIC1 then ~-~-Process topic information subscribed from the cloud
1362 1362  
1363 - if string.match(topic,Subscribe_RE_TOPIC1) then
1062 +if string.match(topic,Subscribe_RE_TOPIC1) then
1364 1364  
1365 - --if revData ~= nil then
1064 + ~-~-if revData ~~= nil then
1366 1366  
1367 - for k,v in pairs (revData) do
1066 + for k,v in pairs (revData) do
1368 1368  
1369 - print("printing revdata after kv here")
1068 + print("printing revdata after kv here")
1370 1370  
1371 - print (k,v)
1070 + print (k,v)
1372 1372  
1373 - end
1072 + end
1374 1374  
1375 - print ("current state is",fanstate)
1074 + print ("current state is",fanstate)
1376 1376  
1377 - --end
1076 + ~-~-end
1378 1378  
1379 - end
1078 +end
1380 1380  
1381 - end
1080 +end
1382 1382  
1383 1383  end
1384 1384  
1385 1385  
1085 +~-~-Get real-time data
1386 1386  
1387 ---Get real-time data
1388 -
1389 1389  function getData()
1390 1390  
1391 - local jdata = {}
1089 + local jdata = {}
1392 1392  
1393 - local addr = bns_get_alldata()
1091 + local addr = bns_get_alldata()
1394 1394  
1395 - print(json.encode(addr))
1093 + print(json.encode(addr))
1396 1396  
1397 - for i,v in pairs(addr) do
1095 + for i,v in pairs(addr) do
1398 1398  
1399 - if v[2] == 1 then
1097 + if v[2] == 1 then
1400 1400  
1401 - jdata[v[3]] = v[4]
1099 + jdata[v[3]] = v[4]
1402 1402  
1403 - end
1101 + end
1404 1404  
1405 - end
1103 + end
1406 1406  
1407 - return jdata
1105 + return jdata
1408 1408  
1409 1409  end
1410 1410  
1411 ---send data
1109 +~-~-send data
1412 1412  
1413 1413  function send_Data()
1414 1414  
1415 - local pub_data =
1416 - {
1417 - 123
1418 - }
1113 + local pub_data =
1419 1419  
1115 + {
1116 +
1117 +123
1118 +
1119 +}
1120 +
1420 1420  sprint(json.encode(pub_data))
1421 1421  
1422 1422  print("..........",pub_RE_TOPIC)
1423 1423  
1424 - return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
1125 + return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
1425 1425  
1426 1426  end
1427 -{{/code}}
1428 1428  
1429 1429  Get message in AWS
1430 1430  
InputHTTPparameter.png
Author
... ... @@ -1,1 +1,0 @@
1 -XWiki.Hunter
Size
... ... @@ -1,1 +1,0 @@
1 -17.9 KB
Content