Changes for page 2 Script

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

From version 19.1
edited by Hunter
on 2022/07/29 15:56
Change comment: There is no comment for this version
To version 18.1
edited by Stone Wu
on 2022/07/25 11:32
Change comment: Renamed back-links.

Summary

Details

Page properties
Author
... ... @@ -1,1 +1,1 @@
1 -XWiki.Hunter
1 +XWiki.Stone
Content
... ... @@ -160,148 +160,141 @@
160 160  
161 161  Demo1:
162 162  
163 -{{code language="lua"}}
164 --- Meta class
165 ---main
163 +(% class="box infomessage" %)
164 +(((
165 +~-~- Meta class
166 +~-~-main
166 166  function mq.main()
167 - if not mq.m then
168 -  local err = ""
168 + if not mq.m then
169 + local err = ""
170 +\\ mq.m, err = mqtt.create("tcp:~/~/grouprobotinfo.com:1883", "ClienID") ~-~- create connection
171 + if mq.m then
172 + mq.config = {
173 + username = "",~-~- ID
174 + password = "",~-~- password
175 + netway = 1, ~-~- Ethernet connection, WIFI=1
176 + ~-~- keepalive = 100, ~-~- Optional, set the connection heartbeat interval for 100 seconds.
177 + ~-~- cleansession = 0, ~-~- Optional, keep session
178 + }
179 + mq.m:on("message", function(topic, msg) ~-~- Register for receiving message callbacks
180 + local str = string.format("%s:%s", topic, msg)
181 + ~-~- print("mqtt msg:", str) ~-~- Print out the received topics and content
182 + end
183 + )
184 + mq.m:on("offline", function (cause) ~-~- Register for lost connection callbacks
185 + ~-~- addr_setstring("@xxx", "cause"..(cause or " got nil"))
186 + end)
187 + mq.m:on("arrived", function() ~-~- Registration for sending messages to callbacks 
188 + print("msg arrived")
189 + end)
190 + else
191 + print("mqtt create failed:", err) ~-~- Create object failed
192 + end
193 + else
194 + if mq.m:isconnected() then ~-~- If online, post a message
195 + local phaseStatus ="unknow"
196 + if addr_getbit("@Standby")== 1 then
197 + phaseStatus = "Standby"
198 + elseif addr_getbit("@Pre-Freeze")==1 then
199 + phaseStatus= "Pre-Freeze"
200 + elseif addr_getbit("@Prepare")==1 then
201 + phaseStatus ="Prepare"
202 + elseif addr_getbit("@Primary Dry")==1 then
203 + phaseStatus = "Primary dry"
204 + elseif addr_getbit("@Secondary Dry")==1 then
205 + phaseStatus = "Secondary Dry"
206 + end
207 +~-~- print(addr_getbit("@Primary Dry"))
208 +~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~--
209 + local activating ="unknow"
210 + if addr_getbit("@Compressor")==1 then
211 + activating = ",".."Compressor"
212 + end
213 + if addr_getbit("@Silicone Pump")==1 then
214 + activating = activating..",".."Silicone Pump"
215 + end
216 + if addr_getbit("@Vacuum Pump")==1 then
217 + activating = activating..",".."Vacuum Pump"
218 + end
219 + if addr_getbit("@Root Pump")==1 then
220 + activating = activating..",".."Root Pump"
221 + end
222 + if addr_getbit("@Heater")==1 then
223 + activating = activating..",".."Heater"
224 + end
225 + if addr_getbit("@Valve Silicone")==1 then
226 + activating = activating..",".."Valve Silicone"
227 + end
228 + if addr_getbit("@Valve Ice Condenser")==1 then
229 + activating = activating..",".."Valve Ice Condenser"
230 + end
231 + if addr_getbit("@Valve Vacuum Pump")==1 then
232 + activating = activating..",".."Valve Vacuum Pump"
233 + end
234 + local pr_activating =string.sub(activating,2)
235 + ~-~- print(pr_activating) 
169 169  
170 -  mq.m, err = mqtt.create("tcp://grouprobotinfo.com:1883", "ClienID")  -- create connection
171 -  if mq.m then
172 -   mq.config = {
173 -    username = "",-- ID
174 -    password = "",-- password
175 -    netway = 1, -- Ethernet connection, WIFI=1
176 -    -- keepalive = 100, -- Optional, set the connection heartbeat interval for 100 seconds.
177 -    -- cleansession = 0, -- Optional, keep session
178 -   }
179 -   mq.m:on("message", function(topic, msg) -- Register for receiving message callbacks
180 -    local str = string.format("%s:%s", topic, msg)
181 -    -- print("mqtt msg:", str) -- Print out the received topics and content
182 -   end
183 -   )
184 -   mq.m:on("offline", function (cause) -- Register for lost connection callbacks
185 -    -- addr_setstring("@xxx", "cause"..(cause or " got nil"))
186 -   end)
187 -   mq.m:on("arrived", function() -- Registration for sending messages to callbacks 
188 -    print("msg arrived")
189 -   end)
190 -  else
191 -   print("mqtt create failed:", err) -- Create object failed
192 -  end
193 - else
194 -  if mq.m:isconnected() then -- If online, post a message
195 -     local phaseStatus ="unknow"
196 -     if addr_getbit("@Standby")== 1 then
197 -         phaseStatus = "Standby"
198 -     elseif addr_getbit("@Pre-Freeze")==1 then
199 -         phaseStatus= "Pre-Freeze"
200 -     elseif addr_getbit("@Prepare")==1 then
201 -         phaseStatus ="Prepare"
202 -     elseif addr_getbit("@Primary Dry")==1 then
203 -         phaseStatus = "Primary dry"
204 -     elseif addr_getbit("@Secondary Dry")==1 then
205 -         phaseStatus = "Secondary Dry"
206 -     end
207 ---   print(addr_getbit("@Primary Dry"))
208 --------------------------------------------------------------------------------------------------------------------------
209 -     local activating ="unknow"
210 -     if addr_getbit("@Compressor")==1 then
211 -         activating = ",".."Compressor"
212 -     end
213 -     if addr_getbit("@Silicone Pump")==1 then
214 -         activating = activating..",".."Silicone Pump"
215 -     end
216 -     if addr_getbit("@Vacuum Pump")==1 then
217 -         activating = activating..",".."Vacuum Pump"
218 -     end
219 -     if addr_getbit("@Root Pump")==1 then
220 -         activating = activating..",".."Root Pump"
221 -     end
222 -     if addr_getbit("@Heater")==1 then
223 -         activating = activating..",".."Heater"
224 -     end
225 -     if addr_getbit("@Valve Silicone")==1 then
226 -         activating = activating..",".."Valve Silicone"
227 -     end
228 -     if addr_getbit("@Valve Ice Condenser")==1 then
229 -         activating = activating..",".."Valve Ice Condenser"
230 -     end
231 -     if addr_getbit("@Valve Vacuum Pump")==1 then
232 -         activating = activating..",".."Valve Vacuum Pump"
233 -     end
234 -     local pr_activating =string.sub(activating,2)
235 -    --  print(pr_activating)  
236 236  
237 -
238 -
239 -     local status_text ="unknow"
240 -     if addr_getbit("@Status Run")==1 then
241 -         status_text = "RUNNING"
242 -     else
243 -         status_text = "STOP"
244 -     end
245 --------------------------------------------------------------------------------------------------------------------------      
246 -
247 -     local js =  {type="status",
248 -                  mc_name ="FD300",
249 -                  status=status_text,
250 -                  elapsed_time={
251 -                                hour=addr_getword("@Elapsed Time (Hour)"),
252 -                                min=addr_getword("@Elapsed Time (Minute)"),
253 -                                sec=addr_getword("@Elapsed Time (Second)")
254 -                                },
255 -                   phase = phaseStatus,
256 -                   step = addr_getword("@Step"),
257 -                   activating_output = pr_activating,
258 -                   sv=addr_getshort("@SV Silicone")/10,
259 -                   pv=addr_getshort("@PV Silicone")/10,
260 -                   product1=addr_getshort("@Product 1")/10,
261 -
262 -                   product2=addr_getshort("@Product 2")/10,
263 -                   product3=addr_getshort("@Product 3")/10,
264 -                   product4=addr_getshort("@Product 4")/10,
265 -                   ice1=addr_getshort("@Ice condenser 1")/10,
266 -                   ice2=addr_getshort("@Ice condenser 2")/10,
267 -                   vacuum=addr_getfloat("@Vacuum")
268 -
269 -                }
270 -     local jsAlarm = {  HPC = addr_getbit("@B_25395#W0.00"),
271 -                        ODPC = addr_getbit("@B_25395#W0.01"),
272 -                        MTPC=addr_getbit("@B_25395#W0.02"),
273 -                        HTT = addr_getbit("@B_25395#W1.03"),
274 -                        CPC = addr_getbit("@B_25395#W0.08"),
275 -                        CPSP =addr_getbit("@B_25395#W1.00"),
276 -                        CPVP =addr_getbit("@B_25395#W0.10"),
277 -                        CPRP =addr_getbit("@B_25395#W0.11"),
278 -                        HP =addr_getbit("@B_25395#W1.01"),
279 -                        PP= addr_getbit("@B_25395#W1.02"),
280 -                        PO=addr_getbit("@B_25395#W0.07"),
281 -                        FSE=addr_getbit("@B_25395#W2.04"),
282 -                        AVVSVV=addr_getbit("@B_25395#W1.12"),
283 -                        ICHT=addr_getbit("@B_25395#W3.06")
284 -
285 -                }
286 -
287 -    -- ("@B_25395#CIO1.02")
288 -     mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
289 -     mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
290 -  else
291 -   local stat, err = mq.m:connect(mq.config) -- connection
292 -   if stat == nil then --Determine whether to connect
293 -    print("mqtt connect failed:", err)
294 -    return -- Connection failed, return directly
295 -   end
296 -   mq.m:subscribe("mqtt-v-box-epsilon", 0)-- Subscribe to topics
297 -
298 -  end
299 -  -- mq.m:unsubscribe("stc/test")
300 -  -- mq.m:disconnect() -- close matt
301 -  -- mq.m:close() -- close clase
302 - end
238 + local status_text ="unknow"
239 + if addr_getbit("@Status Run")==1 then
240 + status_text = "RUNNING"
241 + else
242 + status_text = "STOP"
243 + end
244 +~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~--
245 +\\ local js = {type="status",
246 + mc_name ="FD300",
247 + status=status_text,
248 + elapsed_time={
249 + hour=addr_getword("@Elapsed Time (Hour)"),
250 + min=addr_getword("@Elapsed Time (Minute)"),
251 + sec=addr_getword("@Elapsed Time (Second)")
252 + },
253 + phase = phaseStatus,
254 + step = addr_getword("@Step"),
255 + activating_output = pr_activating,
256 + sv=addr_getshort("@SV Silicone")/10,
257 + pv=addr_getshort("@PV Silicone")/10,
258 + product1=addr_getshort("@Product 1")/10,
259 +\\ product2=addr_getshort("@Product 2")/10,
260 + product3=addr_getshort("@Product 3")/10,
261 + product4=addr_getshort("@Product 4")/10,
262 + ice1=addr_getshort("@Ice condenser 1")/10,
263 + ice2=addr_getshort("@Ice condenser 2")/10,
264 + vacuum=addr_getfloat("@Vacuum")
265 +\\ }
266 + local jsAlarm = { HPC = addr_getbit("@B_25395#W0.00"),
267 + ODPC = addr_getbit("@B_25395#W0.01"),
268 + MTPC=addr_getbit("@B_25395#W0.02"),
269 + HTT = addr_getbit("@B_25395#W1.03"),
270 + CPC = addr_getbit("@B_25395#W0.08"),
271 + CPSP =addr_getbit("@B_25395#W1.00"),
272 + CPVP =addr_getbit("@B_25395#W0.10"),
273 + CPRP =addr_getbit("@B_25395#W0.11"),
274 + HP =addr_getbit("@B_25395#W1.01"),
275 + PP= addr_getbit("@B_25395#W1.02"),
276 + PO=addr_getbit("@B_25395#W0.07"),
277 + FSE=addr_getbit("@B_25395#W2.04"),
278 + AVVSVV=addr_getbit("@B_25395#W1.12"),
279 + ICHT=addr_getbit("@B_25395#W3.06")
280 +\\ }
281 +\\ ~-~- ("@B_25395#CIO1.02")
282 + mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
283 + mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
284 + else
285 + local stat, err = mq.m:connect(mq.config) ~-~- connection
286 + if stat == nil then ~-~-Determine whether to connect
287 + print("mqtt connect failed:", err)
288 + return ~-~- Connection failed, return directly
289 + end
290 + mq.m:subscribe("mqtt-v-box-epsilon", 0)~-~- Subscribe to topics
291 +\\ end
292 + ~-~- mq.m:unsubscribe("stc/test")
293 + ~-~- mq.m:disconnect() ~-~- close matt
294 + ~-~- mq.m:close() ~-~- close clase
295 + end
303 303  end
304 -{{/code}}
297 +)))
305 305  
306 306  == **2.2 V-Box connect with Azure platform** ==
307 307