Changes for page 2 Script
Last modified by Devin Chen on 2025/06/06 14:03
Summary
-
Page properties (2 modified, 0 added, 0 removed)
Details
- Page properties
-
- Author
-
... ... @@ -1,1 +1,1 @@ 1 -XWiki. Stone1 +XWiki.Hunter - Content
-
... ... @@ -160,141 +160,148 @@ 160 160 161 161 Demo1: 162 162 163 -(% class="box infomessage" %) 164 -((( 165 -~-~- Meta class 166 -~-~-main 163 +{{code language="lua"}} 164 +-- Meta class 165 +--main 167 167 function mq.main() 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) 167 + if not mq.m then 168 + local err = "" 236 236 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) 237 237 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 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 296 296 end 297 - )))304 +{{/code}} 298 298 299 299 == **2.2 V-Box connect with Azure platform** == 300 300