Skip to Content

Changes for page 2 Script

Last modified by Devin Chen on 2025/06/06 14:03
From version 20.1
edited by Hunter
on 2022/07/29 16:47
Change comment: There is no comment for this version
To version 41.1
edited by Hunter
on 2023/03/17 18:05
Change comment: There is no comment for this version

Summary

Details

Page properties
Content
... ... @@ -13,7 +13,7 @@
13 13  for example. addr_setshort(addr,num) Function: Write 16-bit signed decimal address
14 14  addr_getshort(addr) Function:Read 16-bit signed decimal address
15 15  addr_getword(string addr)Function: Read 16-bit unsigned decimal address
16 -More script function are in the second section of [[“V-BOX Script Interface Manual”>>doc:V-BOX.V-Net.04 Lua Script.01 Lua Functions.WebHome]]
16 +More script function are in the second section of [[“V-BOX Script Interface Manual”>>doc:V-BOX.V-Net.Manual.04 Lua Script.01 Lua Functions.WebHome]]
17 17  
18 18  == **1.2 Arithmetic** ==
19 19  
... ... @@ -70,6 +70,12 @@
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 +
73 73  {{code language="Lua"}}
74 74  local tempBit = 0
75 75  local tempWord = 0
... ... @@ -135,7 +135,312 @@
135 135  end
136 136  {{/code}}
137 137  
144 +== **1.6 LINE Notify** ==
138 138  
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 +
139 139  = **2 V-Box connect with third part server** =
140 140  
141 141  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.
... ... @@ -154,8 +154,9 @@
154 154  
155 155  (% class="mark" %)2.If your server requires SSL certificate to log in,please use OpenCloud.Because only OpenCloud platform can support to upload certificate
156 156  
157 -(% class="wikigeneratedid" %)
468 +{{info}}
158 158  **✎Note: **Before program the script of MQTT, please make sure the server(MQTT broker) can be connected through MQTT Client tool.
470 +{{/info}}
159 159  
160 160  (% class="wikigeneratedid" %)
161 161  Tool link: **[[MQTT.fx>>http://mqttfx.jensd.de/index.php/download]]**
... ... @@ -162,6 +162,25 @@
162 162  
163 163  == **2.1 V-Box connect with test server(General Example)** ==
164 164  
477 +The following example is trying to publish to the topic "testtopic/test/no1/7890", and subscribe the topic "testtopic/test/no1/123456".
478 +
479 +And the JSON message is like follows:
480 +
481 +{{code language="JSON"}}
482 +{
483 + "timestamp": 1631152760,
484 + "messageId": 1,
485 + "event": "test_data",
486 + "mfrs": "HMI/box",
487 + "data":
488 + {
489 + "id" : 1436217747670454274,
490 + "waterlevel" : 48,
491 + "temperture" : 23
492 + }
493 +}
494 +{{/code}}
495 +
165 165  {{code language="lua"}}
166 166  --MQTT configuration table
167 167  local MQTT_CFG={}
... ... @@ -203,9 +203,13 @@
203 203  --initialize mqtt
204 204  function mqtt_init()
205 205   print(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENT_ID))
537 + if g_mq then
538 + mqtt.close() --Close mqtt object
539 + end
206 206   g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENT_ID) -- create mqtt object,and declare it as a global variable
207 207   if g_mq then
208 208   g_mq:on("message", mqtt_msg_callback) -- Register a callback for receiving messages
543 + g_mq:on("offline", mqtt_msg_offline) -- Register a callback for offline
209 209   print("mqtt init success")
210 210   else
211 211   print("mqtt init failed:", err)
... ... @@ -225,6 +225,11 @@
225 225   g_mq:subscribe(SUBSCRIBE_TOPIC, 0)
226 226  end
227 227  
563 +--Offline callback function
564 +function mqtt_msg_offline(cause)
565 + print("mqtt offline, cause:", cause)
566 +end
567 +
228 228  -- Received message callback function
229 229  function mqtt_msg_callback(topic, msg)
230 230   print("topic:", topic)
... ... @@ -263,9 +263,11 @@
263 263   if g_mq:isconnected() then
264 264   send_data()
265 265   else
266 - --if exceed 20 sec not connect, reconnect once
267 - if os.time() - LAST_TIME > 20 then
606 + --if exceed 5 sec not connect, reconnect once
607 + if os.time() - LAST_TIME > 5 then
268 268   LAST_TIME = os.time()
609 + --reinitial the mqtt object
610 + mqtt_init()
269 269   --connect to mqtt or reconnect
270 270   mqtt_connect()
271 271   end
... ... @@ -288,142 +288,134 @@
288 288  -- Meta class
289 289  --main
290 290  function mq.main()
291 - if not mq.m then
292 -  local err = ""
633 + if not mq.m then
634 + local err = ""
293 293  
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"))
636 + mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID") -- create connection
637 + if mq.m then
638 + mq.config = {
639 + username = "",-- ID
640 + password = "",-- password
641 + netway = 1, -- Ethernet connection, WIFI=1
642 + -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
643 + -- cleansession = 0, -- Optional, keep session
644 + }
645 + mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
646 + local str = string.format("%s:%s", topic, msg)
647 + -- print("mqtt msg:", str) -- Print out the received topics and content
648 + end)
649 + mq.m:on("offline", function (cause) -- Register for lost connection callbacks
650 + -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
651 + end)
652 + mq.m:on("arrived", function() -- Registration for sending messages to callbacks
653 + print("msg arrived")
654 + end)
655 + else
656 + print("mqtt create failed:", err) -- Create object failed
657 + end
658 + else
659 + if mq.m:isconnected() then -- If online, post a message
660 + local phaseStatus ="unknow"
661 + if addr_getbit("@Standby")== 1 then
662 + phaseStatus = "Standby"
663 + elseif addr_getbit("@Pre-Freeze")==1 then
664 + phaseStatus= "Pre-Freeze"
665 + elseif addr_getbit("@Prepare")==1 then
666 + phaseStatus ="Prepare"
667 + elseif addr_getbit("@Primary Dry")==1 then
668 + phaseStatus = "Primary dry"
669 + elseif addr_getbit("@Secondary Dry")==1 then
670 + phaseStatus = "Secondary Dry"
671 + end
672 + --print(addr_getbit("@Primary Dry"))
332 332  -------------------------------------------------------------------------------------------------------------------------
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)  
674 + local activating ="unknow"
675 + if addr_getbit("@Compressor")==1 then
676 + activating = ",".."Compressor"
677 + end
678 + if addr_getbit("@Silicone Pump")==1 then
679 + activating = activating..",".."Silicone Pump"
680 + end
681 + if addr_getbit("@Vacuum Pump")==1 then
682 + activating = activating..",".."Vacuum Pump"
683 + end
684 + if addr_getbit("@Root Pump")==1 then
685 + activating = activating..",".."Root Pump"
686 + end
687 + if addr_getbit("@Heater")==1 then
688 + activating = activating..",".."Heater"
689 + end
690 + if addr_getbit("@Valve Silicone")==1 then
691 + activating = activating..",".."Valve Silicone"
692 + end
693 + if addr_getbit("@Valve Ice Condenser")==1 then
694 + activating = activating..",".."Valve Ice Condenser"
695 + end
696 + if addr_getbit("@Valve Vacuum Pump")==1 then
697 + activating = activating..",".."Valve Vacuum Pump"
698 + end
699 + local pr_activating =string.sub(activating,2)
700 + -- print(pr_activating)
701 + local status_text ="unknow"
702 + if addr_getbit("@Status Run")==1 then
703 + status_text = "RUNNING"
704 + else
705 + status_text = "STOP"
706 + end
707 +-------------------------------------------------------------------------------------------------------------------------
708 + local js = {type="status",
709 + mc_name ="FD300",
710 + status=status_text,
711 + elapsed_time={
712 + hour=addr_getword("@Elapsed Time (Hour)"),
713 + min=addr_getword("@Elapsed Time (Minute)"),
714 + sec=addr_getword("@Elapsed Time (Second)")
715 + },
716 + phase = phaseStatus,
717 + step = addr_getword("@Step"),
718 + activating_output = pr_activating,
719 + sv=addr_getshort("@SV Silicone")/10,
720 + pv=addr_getshort("@PV Silicone")/10,
721 + product1=addr_getshort("@Product 1")/10,
360 360  
723 + product2=addr_getshort("@Product 2")/10,
724 + product3=addr_getshort("@Product 3")/10,
725 + product4=addr_getshort("@Product 4")/10,
726 + ice1=addr_getshort("@Ice condenser 1")/10,
727 + ice2=addr_getshort("@Ice condenser 2")/10,
728 + vacuum=addr_getfloat("@Vacuum")
729 + }
730 + local jsAlarm = { HPC = addr_getbit("@B_25395#W0.00"),
731 + ODPC = addr_getbit("@B_25395#W0.01"),
732 + MTPC=addr_getbit("@B_25395#W0.02"),
733 + HTT = addr_getbit("@B_25395#W1.03"),
734 + CPC = addr_getbit("@B_25395#W0.08"),
735 + CPSP =addr_getbit("@B_25395#W1.00"),
736 + CPVP =addr_getbit("@B_25395#W0.10"),
737 + CPRP =addr_getbit("@B_25395#W0.11"),
738 + HP =addr_getbit("@B_25395#W1.01"),
739 + PP= addr_getbit("@B_25395#W1.02"),
740 + PO=addr_getbit("@B_25395#W0.07"),
741 + FSE=addr_getbit("@B_25395#W2.04"),
742 + AVVSVV=addr_getbit("@B_25395#W1.12"),
743 + ICHT=addr_getbit("@B_25395#W3.06")
744 + }
745 + -- ("@B_25395#CIO1.02")
746 + mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
747 + mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
748 + else
749 + local stat, err = mq.m:connect(mq.config) -- connection
750 + if stat == nil then --Determine whether to connect
751 + print("mqtt connect failed:", err)
752 + return -- Connection failed, return directly
753 + end
754 + mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
361 361  
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
756 + end
757 + -- mq.m:unsubscribe("stc/test")
758 + -- mq.m:disconnect() -- close matt
759 + -- mq.m:close() -- close clase
760 + end
427 427  end
428 428  {{/code}}
429 429  
... ... @@ -853,35 +853,20 @@
853 853  
854 854  {{code language="java"}}
855 855  {
856 -
857 857    "Version": "2012-10-17",
858 -
859 859    "Statement": [
860 -
861 861      {
862 -
863 863        "Effect": "Allow",
864 -
865 865        "Action": [
866 -
867 867          "iot:Connect",
868 -
869 869          "iot:Publish",
870 -
871 871          "iot:Subscribe",
872 -
873 873          "iot:Receive",
874 -
875 875          "greengrass:Discover"
876 -
877 877        ],
878 -
879 879        "Resource": "*"
880 -
881 881      }
882 -
883 883    ]
884 -
885 885  }
886 886  {{/code}}
887 887  
... ... @@ -946,185 +946,190 @@
946 946  
947 947  [[image:image-20220709165402-20.png]]
948 948  
1268 +{{info}}
1269 +**✎Note:** Before using the following demo script, please make sure the V-Box firmware is newer than 22110701
1270 +{{/info}}
1271 +
1272 +{{code language="lua"}}
949 949  sprint = print
950 950  
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)
1275 +--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)
952 952  
953 953  local MQTT_URL, MQTT_CLIENTID, MQTT_CFG, MQTT_LWT, MQTT_CART = mqtt.setup_cfg()
954 954  
955 -~-~-publish to topics
1279 +--publish to topics
956 956  
957 957  local pub_RE_TOPIC = string.format('TEST')
958 958  
959 -~-~-Subscribe topics
1283 +--Subscribe topics
960 960  
961 961  local Subscribe_RE_TOPIC1 = string.format('TEST')
962 962  
963 -~-~-variable
1287 +--variable
964 964  
965 965  local last_time = 0
966 966  
967 -~-~-Timing main function
1291 +--Timing main function
968 968  
969 969  function aws.main()
970 970  
971 - sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main start")
1295 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main start")
972 972  
973 - if g_mq then
1297 + if g_mq then
974 974  
975 - if g_mq:isconnected() then
1299 + if g_mq:isconnected() then
976 976  
977 - send_Data()
1301 + send_Data()
978 978  
979 - else
1303 + else
980 980  
981 - if os.time() - last_time > 5 then
1305 + if os.time() - last_time > 5 then
982 982  
983 - last_time = os.time()
1307 + last_time = os.time()
984 984  
985 - mymqtt_connect()
1309 + mymqtt_connect()
986 986  
1311 + end
1312 +
987 987   end
988 988  
989 - end
1315 + else
990 990  
991 - else
1317 + mymqtt_init()
992 992  
993 - mymqtt_init()
1319 + end
994 994  
995 - end
1321 + sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main end")
996 996  
997 - sprint(os.date("%Y-%m-%d %H:%M %S", os.time()) .. " aws.main end")
998 -
999 999  end
1000 1000  
1001 1001  
1002 -~-~- Initialize MQTT
1003 1003  
1327 +-- Initialize MQTT
1328 +
1004 1004  function mymqtt_init()
1005 1005  
1006 - sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
1331 + sprint(string.format("mqtt init mqtt_url:%s mqtt_clientid:%s", MQTT_URL, MQTT_CLIENTID))
1007 1007  
1008 - g_mq, err = mqtt.create(MQTT_URL, MQTT_CLIENTID) ~-~- Create the object and declare it as a global variable
1333 + 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
1009 1009  
1010 - if g_mq then
1335 + if g_mq then
1011 1011  
1012 - g_mq:on("message", mymqtt_msg_callback) ~-~- Register to receive message callbacks
1337 + g_mq:on("message", mymqtt_msg_callback) -- Register to receive message callbacks
1013 1013  
1014 - sprint("mqtt init success")
1339 + sprint("mqtt init success")
1015 1015  
1016 - else
1341 + else
1017 1017  
1018 - sprint("mqtt init failed:", err)
1343 + sprint("mqtt init failed:", err)
1019 1019  
1020 - end
1345 + end
1021 1021  
1022 1022  end
1023 1023  
1024 -~-~- Connect to MQTT server
1349 +-- Connect to MQTT server
1025 1025  
1026 1026  function mymqtt_connect()
1027 1027  
1028 - sprint("mqtt connecting...")
1353 + sprint("mqtt connecting...")
1029 1029  
1030 - local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
1355 + local stat, err = g_mq:connect(MQTT_CFG,MQTT_LWT, MQTT_CART)
1031 1031  
1032 - if stat == nil then
1357 + if stat == nil then
1033 1033  
1034 - sprint("mqtt connect failed:", err)
1359 + sprint("mqtt connect failed:", err)
1035 1035  
1036 - return
1361 + return
1037 1037  
1038 - else
1363 + else
1039 1039  
1040 - sprint("mqtt connected")
1365 + sprint("mqtt connected")
1041 1041  
1042 - end
1367 + end
1043 1043  
1044 - g_mq:subscribe(TEST, 0)
1369 + g_mq:subscribe(Subscribe_RE_TOPIC1, 0)
1045 1045  
1046 1046  end
1047 1047  
1048 -~-~- Receive MQTT message callback function
1373 +-- Receive MQTT message callback function
1049 1049  
1050 1050  function mymqtt_msg_callback(topic, msg)
1051 1051  
1052 - print("topic:",topic)
1377 + print("topic:",topic)
1053 1053  
1054 - print("revdata:",msg)
1379 + print("revdata:",msg)
1055 1055  
1056 - local revData = json.decode(msg)
1381 + local revData = json.decode(msg)
1057 1057  
1058 - print (revData)
1383 + print (revData)
1059 1059  
1060 - if topic == Subscribe_RE_TOPIC1 then ~-~-Process topic information subscribed from the cloud
1385 + if topic == Subscribe_RE_TOPIC1 then --Process topic information subscribed from the cloud
1061 1061  
1062 -if string.match(topic,Subscribe_RE_TOPIC1) then
1387 + if string.match(topic,Subscribe_RE_TOPIC1) then
1063 1063  
1064 - ~-~-if revData ~~= nil then
1389 + --if revData ~= nil then
1065 1065  
1066 - for k,v in pairs (revData) do
1391 + for k,v in pairs (revData) do
1067 1067  
1068 - print("printing revdata after kv here")
1393 + print("printing revdata after kv here")
1069 1069  
1070 - print (k,v)
1395 + print (k,v)
1071 1071  
1072 - end
1397 + end
1073 1073  
1074 - print ("current state is",fanstate)
1399 + print ("current state is",fanstate)
1075 1075  
1076 - ~-~-end
1401 + --end
1077 1077  
1078 -end
1403 + end
1079 1079  
1080 -end
1405 + end
1081 1081  
1082 1082  end
1083 1083  
1084 1084  
1085 -~-~-Get real-time data
1086 1086  
1411 +--Get real-time data
1412 +
1087 1087  function getData()
1088 1088  
1089 - local jdata = {}
1415 + local jdata = {}
1090 1090  
1091 - local addr = bns_get_alldata()
1417 + local addr = bns_get_alldata()
1092 1092  
1093 - print(json.encode(addr))
1419 + print(json.encode(addr))
1094 1094  
1095 - for i,v in pairs(addr) do
1421 + for i,v in pairs(addr) do
1096 1096  
1097 - if v[2] == 1 then
1423 + if v[2] == 1 then
1098 1098  
1099 - jdata[v[3]] = v[4]
1425 + jdata[v[3]] = v[4]
1100 1100  
1101 - end
1427 + end
1102 1102  
1103 - end
1429 + end
1104 1104  
1105 - return jdata
1431 + return jdata
1106 1106  
1107 1107  end
1108 1108  
1109 -~-~-send data
1435 +--send data
1110 1110  
1111 1111  function send_Data()
1112 1112  
1113 - local pub_data =
1439 + local pub_data =
1440 + {
1441 + 123
1442 + }
1114 1114  
1115 - {
1116 -
1117 -123
1118 -
1119 -}
1120 -
1121 1121  sprint(json.encode(pub_data))
1122 1122  
1123 1123  print("..........",pub_RE_TOPIC)
1124 1124  
1125 - return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
1448 + return g_mq:publish(pub_RE_TOPIC, json.encode(pub_data), 0, 0)
1126 1126  
1127 1127  end
1451 +{{/code}}
1128 1128  
1129 1129  Get message in AWS
1130 1130  
InputHTTPparameter.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Hunter
Size
... ... @@ -1,0 +1,1 @@
1 +17.9 KB
Content