Skip to Content

Changes for page 2 Script

Last modified by Devin Chen on 2025/06/06 14:03
From version 12.1
edited by Jim(Forgotten)
on 2022/07/09 17:02
Change comment: There is no comment for this version
To version 19.1
edited by Hunter
on 2022/07/29 15:56
Change comment: There is no comment for this version

Summary

Details

Page properties
Author
... ... @@ -1,1 +1,1 @@
1 -XWiki.Jim
1 +XWiki.Hunter
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.1\.User Manual.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.04 Lua Script.01 Lua Functions.WebHome]]
17 17  
18 18  == **1.2 Arithmetic** ==
19 19  
... ... @@ -160,142 +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 - }
282 -\\ ~-~- ("@B_25395#CIO1.02")
283 - mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
284 - mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
285 - else
286 - local stat, err = mq.m:connect(mq.config) ~-~- connection
287 - if stat == nil then ~-~-Determine whether to connect
288 - print("mqtt connect failed:", err)
289 - return ~-~- Connection failed, return directly
290 - end
291 - mq.m:subscribe("mqtt-v-box-epsilon", 0)~-~- Subscribe to topics
292 -\\ end
293 - ~-~- mq.m:unsubscribe("stc/test")
294 - ~-~- mq.m:disconnect() ~-~- close matt
295 - ~-~- mq.m:close() ~-~- close clase
296 - 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
297 297  end
298 -)))
304 +{{/code}}
299 299  
300 300  == **2.2 V-Box connect with Azure platform** ==
301 301  
... ... @@ -755,115 +755,67 @@
755 755  }
756 756  {{/code}}
757 757  
758 -1. **Create things**
764 +=== **Create things** ===
759 759  
760 760  Click “Manage”~-~-->“Things”~-~-->“Create things”~-~-->“Create single thing”
761 761  
768 +[[image:image-20220709165402-6.png]]
762 762  
763 -|
764 -| |[[image:image-20220709165402-6.png]]
770 +[[image:image-20220709165402-7.png]]
765 765  
766 -|
767 -| |[[image:image-20220709165402-7.png]]
768 -
769 -|
770 -| |[[image:image-20220709165402-8.png]]
771 -
772 772  Name the thing~-~-->Click “Next”
773 773  
774 +[[image:image-20220709165402-8.png]]
774 774  
775 775  Select the way to create certificate
776 776  
778 +[[image:image-20220709165402-9.png]]
777 777  
778 -|
779 -| |[[image:image-20220709165402-9.png]]
780 -
781 781  Select policy
782 782  
782 +[[image:image-20220709165402-10.png]]
783 783  
784 -|
785 -| |[[image:image-20220709165402-10.png]]
784 +[[image:image-20220709165402-11.png]]
786 786  
787 787  
787 +=== **Test with MQTT.fx tool** ===
788 788  
789 -
790 -
791 -
792 -
793 -
794 -
795 -|
796 -| |[[image:image-20220709165402-11.png]]
797 -
798 -
799 -
800 -
801 -
802 -
803 -1. **Test with MQTT.fx tool**
804 -
805 805  Click “View Setting” to get the “Broker Adress”
806 806  
791 +[[image:image-20220709165402-13.png]]
807 807  
808 -|
809 -| |[[image:image-20220709165402-12.png]]
793 +[[image:image-20220709165402-12.png]]
810 810  
811 -|
812 -| |[[image:image-20220709165402-13.png]]
813 -
814 -
815 -
816 -
817 -
818 -
819 -
820 -
821 -|
822 -| |[[image:image-20220709165402-14.png]]
823 -
824 824  Create one connection in MQTT.fx tool, set broker port as 8883.
825 825  
797 +[[image:image-20220709165402-14.png]]
798 +
826 826  Upload the CA File, Client Certificate File, Client Key File
827 827  
801 +[[image:image-20220709165402-15.png]]
828 828  
829 -|
830 -| |[[image:image-20220709165402-15.png]]
831 -
832 -
833 833  Publish message to topic “TEST”
834 834  
805 +[[image:image-20220709165402-17.png]]
835 835  
836 -|
837 -| |[[image:image-20220709165402-16.png]]
838 -
839 -|
840 -| |[[image:image-20220709165402-17.png]]
841 -
842 842  Click”Test”~-~-->”MQTT test client”~-~-->”Subscrible to a topic”, to get message publish from MQTT.fx tool.
843 843  
809 +[[image:image-20220709173500-1.png]]
810 +
844 844  And we can also send message form AWS platform to MQTT.fx tool.
845 845  
813 +[[image:image-20220709165402-18.png]]
846 846  
847 -|
848 -| |[[image:image-20220709165402-18.png]]
815 +=== **Configurate in CloudTool** ===
849 849  
850 -
851 -1. **Configurate in CloudTool**
852 -
853 853  Copy the same setting in MQTT.fx to MQTT configuration
854 854  
819 +[[image:image-20220709165402-19.png]]
855 855  
856 -|
857 -| |[[image:image-20220709165402-19.png]]
858 -
859 859   Add a lua script and copy the lua demo into it.
860 860  
823 +[[image:image-20220709165402-20.png]]
861 861  
862 -|
863 -| |[[image:image-20220709165402-20.png]]
864 -
865 -
866 -
867 867  sprint = print
868 868  
869 869  ~-~-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)
... ... @@ -1044,10 +1044,6 @@
1044 1044  
1045 1045  end
1046 1046  
1047 -
1048 -
1049 1049  Get message in AWS
1050 1050  
1051 -
1052 -|
1053 -| |[[image:image-20220709165402-21.png]]
1007 +[[image:image-20220709165402-21.png]]
image-20220709173500-1.png
Author
... ... @@ -1,0 +1,1 @@
1 +XWiki.Jim
Size
... ... @@ -1,0 +1,1 @@
1 +1.5 MB
Content