Skip to Content

Changes for page 2 Script

Last modified by Devin Chen on 2025/06/06 14:03
From version 11.1
edited by Jim(Forgotten)
on 2022/07/09 17:01
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,144 +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 -
260 - product2=addr_getshort("@Product 2")/10,
261 - product3=addr_getshort("@Product 3")/10,
262 - product4=addr_getshort("@Product 4")/10,
263 - ice1=addr_getshort("@Ice condenser 1")/10,
264 - ice2=addr_getshort("@Ice condenser 2")/10,
265 - vacuum=addr_getfloat("@Vacuum")
266 -
267 - }
268 - local jsAlarm = { HPC = addr_getbit("@B_25395#W0.00"),
269 - ODPC = addr_getbit("@B_25395#W0.01"),
270 - MTPC=addr_getbit("@B_25395#W0.02"),
271 - HTT = addr_getbit("@B_25395#W1.03"),
272 - CPC = addr_getbit("@B_25395#W0.08"),
273 - CPSP =addr_getbit("@B_25395#W1.00"),
274 - CPVP =addr_getbit("@B_25395#W0.10"),
275 - CPRP =addr_getbit("@B_25395#W0.11"),
276 - HP =addr_getbit("@B_25395#W1.01"),
277 - PP= addr_getbit("@B_25395#W1.02"),
278 - PO=addr_getbit("@B_25395#W0.07"),
279 - FSE=addr_getbit("@B_25395#W2.04"),
280 - AVVSVV=addr_getbit("@B_25395#W1.12"),
281 - ICHT=addr_getbit("@B_25395#W3.06")
282 -
283 - }
284 -\\ ~-~- ("@B_25395#CIO1.02")
285 - mq.m:publish("mqtt-v-box-epsilon-fd300", json.encode(js) , 0, 0)
286 - mq.m:publish("mqtt-v-box-epsilon-alarm-fd300", json.encode(jsAlarm) , 0, 0)
287 - else
288 - local stat, err = mq.m:connect(mq.config) ~-~- connection
289 - if stat == nil then ~-~-Determine whether to connect
290 - print("mqtt connect failed:", err)
291 - return ~-~- Connection failed, return directly
292 - end
293 - mq.m:subscribe("mqtt-v-box-epsilon", 0)~-~- Subscribe to topics
294 -\\ end
295 - ~-~- mq.m:unsubscribe("stc/test")
296 - ~-~- mq.m:disconnect() ~-~- close matt
297 - ~-~- mq.m:close() ~-~- close clase
298 - 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
299 299  end
300 -)))
304 +{{/code}}
301 301  
302 302  == **2.2 V-Box connect with Azure platform** ==
303 303  
... ... @@ -723,7 +723,7 @@
723 723  
724 724  [[image:image-20220709165402-4.png]]
725 725  
726 -{{code language="LUA"}}
730 +{{code language="java"}}
727 727  {
728 728  
729 729    "Version": "2012-10-17",
... ... @@ -757,122 +757,67 @@
757 757  }
758 758  {{/code}}
759 759  
760 -1. **Create things**
764 +=== **Create things** ===
761 761  
762 762  Click “Manage”~-~-->“Things”~-~-->“Create things”~-~-->“Create single thing”
763 763  
768 +[[image:image-20220709165402-6.png]]
764 764  
765 -|
766 -| |[[image:image-20220709165402-6.png]]
770 +[[image:image-20220709165402-7.png]]
767 767  
768 -
769 -|
770 -| |[[image:image-20220709165402-7.png]]
771 -
772 -|
773 -| |[[image:image-20220709165402-8.png]]
774 -
775 775  Name the thing~-~-->Click “Next”
776 776  
774 +[[image:image-20220709165402-8.png]]
777 777  
778 778  Select the way to create certificate
779 779  
778 +[[image:image-20220709165402-9.png]]
780 780  
781 -|
782 -| |[[image:image-20220709165402-9.png]]
783 -
784 784  Select policy
785 785  
782 +[[image:image-20220709165402-10.png]]
786 786  
787 -|
788 -| |[[image:image-20220709165402-10.png]]
784 +[[image:image-20220709165402-11.png]]
789 789  
790 790  
787 +=== **Test with MQTT.fx tool** ===
791 791  
792 -
793 -
794 -
795 -
796 -
797 -
798 -
799 -|
800 -| |[[image:image-20220709165402-11.png]]
801 -
802 -
803 -
804 -
805 -
806 -
807 -
808 -1. **Test with MQTT.fx tool**
809 -
810 810  Click “View Setting” to get the “Broker Adress”
811 811  
791 +[[image:image-20220709165402-13.png]]
812 812  
813 -|
814 -| |[[image:image-20220709165402-12.png]]
793 +[[image:image-20220709165402-12.png]]
815 815  
816 -|
817 -| |[[image:image-20220709165402-13.png]]
818 -
819 -
820 -
821 -
822 -
823 -
824 -
825 -
826 -
827 -|
828 -| |[[image:image-20220709165402-14.png]]
829 -
830 830  Create one connection in MQTT.fx tool, set broker port as 8883.
831 831  
797 +[[image:image-20220709165402-14.png]]
798 +
832 832  Upload the CA File, Client Certificate File, Client Key File
833 833  
801 +[[image:image-20220709165402-15.png]]
834 834  
835 -|
836 -| |[[image:image-20220709165402-15.png]]
837 -
838 -
839 -
840 840  Publish message to topic “TEST”
841 841  
805 +[[image:image-20220709165402-17.png]]
842 842  
843 -|
844 -| |[[image:image-20220709165402-16.png]]
845 -
846 -|
847 -| |[[image:image-20220709165402-17.png]]
848 -
849 849  Click”Test”~-~-->”MQTT test client”~-~-->”Subscrible to a topic”, to get message publish from MQTT.fx tool.
850 850  
809 +[[image:image-20220709173500-1.png]]
810 +
851 851  And we can also send message form AWS platform to MQTT.fx tool.
852 852  
813 +[[image:image-20220709165402-18.png]]
853 853  
854 -|
855 -| |[[image:image-20220709165402-18.png]]
815 +=== **Configurate in CloudTool** ===
856 856  
857 -
858 -
859 -1. **Configurate in CloudTool**
860 -
861 861  Copy the same setting in MQTT.fx to MQTT configuration
862 862  
819 +[[image:image-20220709165402-19.png]]
863 863  
864 -|
865 -| |[[image:image-20220709165402-19.png]]
866 -
867 867   Add a lua script and copy the lua demo into it.
868 868  
823 +[[image:image-20220709165402-20.png]]
869 869  
870 -|
871 -| |[[image:image-20220709165402-20.png]]
872 -
873 -
874 -
875 -
876 876  sprint = print
877 877  
878 878  ~-~-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)
... ... @@ -1053,12 +1053,6 @@
1053 1053  
1054 1054  end
1055 1055  
1056 -
1057 -
1058 1058  Get message in AWS
1059 1059  
1060 -
1061 -|
1062 -| |[[image:image-20220709165402-21.png]]
1063 -
1064 -
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