THAI: add multi-instance .skt file

xml/menutab/menu_catalog_new.xml

@@ -11,59 +11,6 @@
 
 
 
-<Timeout> 1000 </Timeout>
-<EventTimeout> 
-    ;DEBUGVAR ICE_PROCESS_STATUS
-
-    If ICE_PROCESS_STATUS = 2 Then
-        Var ice_tab_process_show = "Enable"
-        Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
-    Else
-        Var ice_tab_process_show = "Invisible"
-    EndIf
-
-
-    GetVisible inst_show
-    ;DEBUGVAR inst_show
-
-    InstanceGetString SaveStringInst
-    ;DEBUGVAR SaveStringInst
-
-    If inst_show = 1 Then
-        If SaveStringInst = "RefreshNow" Then
-            GetXMLFileNameCurrentRunning CurrentOpenFile
-            Open CurrentOpenFile
-
-            If show_eng = "true" Then 
-                InstanceSetString "ShowEng"
-            Else
-                InstanceSetString "ShowThai"
-            EndIf
-       
-        EndIf
-    EndIf
-
-    ; setvarint SlientRefreshEnable 1
-    ;DEBUGVAR SlientRefreshEnable
-
-    If SlientRefreshEnable = 1 Then
-        If SaveStringInst = "RefreshNow" Then
-            GetXMLFileNameCurrentRunning CurrentOpenFile
-            Open CurrentOpenFile
-
-            If show_eng = "true" Then 
-                InstanceSetString "ShowEng"
-            Else
-                InstanceSetString "ShowThai"
-            EndIf
-       
-        EndIf
-    EndIf
-
-
-    TimerReset
-</EventTimeout> 
-
 <EventUnitTest1>
     SAVELOG " EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 EventUnitTest1 "
     RefreshAll

xml/menutab/page_catalog_group_coffee.skt

@@ -27,8 +27,76 @@
         #include=menu_catalog_new_menu.py
     ?>
 
+    DEBUGVAR SlientRefreshIndex
+
+	If SlientRefreshIndex = 2 Then
+		Var SlientRefreshIndex = 3
+
+	EndIf
+
 </EventOpen>
 
+<Timeout> 1000 </Timeout>
+<EventTimeout> 
+    ;DEBUGVAR ICE_PROCESS_STATUS
+
+    If ICE_PROCESS_STATUS = 2 Then
+        Var ice_tab_process_show = "Enable"
+        Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
+    Else
+        Var ice_tab_process_show = "Invisible"
+    EndIf
+
+
+     GetVisible inst_show2
+    ;DEBUGVAR inst_show2
+
+
+    If inst_show2 = 1 Then
+        InstanceGetString SaveStringInst
+        ;DEBUGVAR SaveStringInst
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+        EndIf
+    EndIf
+
+    ; setvarint SlientRefreshEnable 1
+    ;DEBUGVAR SlientRefreshEnable
+
+    If SlientRefreshEnable = 1 Then
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+	 If SlientRefreshIndex = 2 Then
+		If inst_show2 = 0 Then
+			GetXMLFileNameCurrentRunning CurrentOpenFile2
+			Open CurrentOpenFile2
+			
+		Else
+			Var SlientRefreshIndex = 3
+		EndIf
+    EndIf
+
+
+    TimerReset
+</EventTimeout> 
 
 <?hurr 
     #include=menu_catalog_new.py

xml/menutab/page_catalog_group_forkid.skt

@@ -36,8 +36,75 @@
         #include=menu_catalog_new_menu.py
     ?>
 
+    DEBUGVAR SlientRefreshIndex
+
+	If SlientRefreshIndex = 5 Then
+		Var SlientRefreshIndex = 6
+	EndIf
+
 </EventOpen>
 
+<Timeout> 1000 </Timeout>
+<EventTimeout> 
+    ;DEBUGVAR ICE_PROCESS_STATUS
+
+    If ICE_PROCESS_STATUS = 2 Then
+        Var ice_tab_process_show = "Enable"
+        Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
+    Else
+        Var ice_tab_process_show = "Invisible"
+    EndIf
+
+
+    GetVisible inst_show5
+    ;DEBUGVAR inst_show5
+
+
+    If inst_show5 = 1 Then
+        InstanceGetString SaveStringInst
+        ;DEBUGVAR SaveStringInst
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+        EndIf
+    EndIf
+
+    ; setvarint SlientRefreshEnable 1
+    ;DEBUGVAR SlientRefreshEnable
+
+    If SlientRefreshEnable = 1 Then
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+
+	If SlientRefreshIndex = 5 Then
+		If inst_show5 = 0 Then
+			GetXMLFileNameCurrentRunning CurrentOpenFile5
+			Open CurrentOpenFile5
+		Else
+			Var SlientRefreshIndex = 6
+		EndIf
+    EndIf
+
+
+    TimerReset
+</EventTimeout> 
 
 
 <?hurr 

xml/menutab/page_catalog_group_health.skt

@@ -27,10 +27,79 @@
         #include=menu_catalog_new_menu.py
     ?>
 
+    DEBUGVAR SlientRefreshIndex
+
+    If SlientRefreshIndex = 6 Then
+		Var SlientRefreshIndex = 7
+	EndIf
+
 </EventOpen>
 
 
 
+<Timeout> 1000 </Timeout>
+<EventTimeout> 
+    ;DEBUGVAR ICE_PROCESS_STATUS
+
+    If ICE_PROCESS_STATUS = 2 Then
+        Var ice_tab_process_show = "Enable"
+        Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
+    Else
+        Var ice_tab_process_show = "Invisible"
+    EndIf
+
+
+    GetVisible inst_show6
+    ;DEBUGVAR inst_show6
+
+    
+
+    If inst_show6 = 1 Then
+        InstanceGetString SaveStringInst
+        ;DEBUGVAR SaveStringInst
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+    ; setvarint SlientRefreshEnable 1
+    ;DEBUGVAR SlientRefreshEnable
+
+    If SlientRefreshEnable = 1 Then
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+	If SlientRefreshIndex = 6 Then
+		If inst_show6 = 0 Then
+			GetXMLFileNameCurrentRunning CurrentOpenFile6
+			Open CurrentOpenFile6
+		Else
+			Var SlientRefreshIndex = 7
+		EndIf
+    EndIf
+
+
+    TimerReset
+</EventTimeout> 
+
 <?hurr 
     #include=menu_catalog_new.py
 ?>

xml/menutab/page_catalog_group_milk.skt

@@ -25,9 +25,81 @@
         #include=menu_catalog_new_menu.py
     ?>
 
+    DEBUGVAR SlientRefreshIndex
+
+	If SlientRefreshIndex = 4 Then
+		Var SlientRefreshIndex = 5
+	EndIf
+
 </EventOpen>
 
 
+<Timeout> 1000 </Timeout>
+<EventTimeout> 
+    ;DEBUGVAR ICE_PROCESS_STATUS
+
+    If ICE_PROCESS_STATUS = 2 Then
+        Var ice_tab_process_show = "Enable"
+        Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
+    Else
+        Var ice_tab_process_show = "Invisible"
+    EndIf
+
+
+    GetVisible inst_show4
+    ;DEBUGVAR inst_show4
+
+    
+
+    If inst_show4 = 1 Then
+        InstanceGetString SaveStringInst
+        ;DEBUGVAR SaveStringInst
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+		
+        EndIf
+    EndIf
+
+    ; setvarint SlientRefreshEnable 1
+    ;DEBUGVAR SlientRefreshEnable
+
+    If SlientRefreshEnable = 1 Then
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+	If SlientRefreshIndex = 4 Then
+		If inst_show4 = 0 Then
+			GetXMLFileNameCurrentRunning CurrentOpenFile4
+			Open CurrentOpenFile4
+			
+		Else
+			Var SlientRefreshIndex = 5
+			
+		EndIf
+    EndIf
+
+
+    TimerReset
+</EventTimeout> 
+
+
 <?hurr 
     #include=menu_catalog_new.py
 ?>

xml/menutab/page_catalog_group_other.skt

@@ -27,9 +27,80 @@
         #include=menu_catalog_new_menu.py
     ?>
 
+    DEBUGVAR SlientRefreshIndex
+
+	If SlientRefreshIndex = 7 Then
+		Var SlientRefreshIndex = 8
+	EndIf
 </EventOpen>
 
 
+
+<Timeout> 1000 </Timeout>
+<EventTimeout> 
+    ;DEBUGVAR ICE_PROCESS_STATUS
+
+    If ICE_PROCESS_STATUS = 2 Then
+        Var ice_tab_process_show = "Enable"
+        Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
+    Else
+        Var ice_tab_process_show = "Invisible"
+    EndIf
+
+
+    GetVisible inst_show7
+    ;DEBUGVAR inst_show7
+
+    
+
+    If inst_show7 = 1 Then
+        InstanceGetString SaveStringInst
+        ;DEBUGVAR SaveStringInst
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+    ; setvarint SlientRefreshEnable 1
+    ;DEBUGVAR SlientRefreshEnable
+
+    If SlientRefreshEnable = 1 Then
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+
+	If SlientRefreshIndex = 7 Then
+		If inst_show7 = 0 Then
+			GetXMLFileNameCurrentRunning CurrentOpenFile7
+			Open CurrentOpenFile7
+		Else
+			Var SlientRefreshIndex = 8
+		EndIf
+    EndIf
+
+
+    TimerReset
+</EventTimeout> 
+
+
 <?hurr 
     #include=menu_catalog_new.py
 ?>

xml/menutab/page_catalog_group_tea.skt

@@ -27,9 +27,65 @@
         #include=menu_catalog_new_menu.py
     ?>
 
+    DEBUGVAR SlientRefreshIndex
+
+	If SlientRefreshIndex = 3 Then
+		Var SlientRefreshIndex = 4
+
+	EndIf
+
 </EventOpen>
 
+<Timeout> 1000 </Timeout>
+<EventTimeout> 
+    ;DEBUGVAR ICE_PROCESS_STATUS
 
+    If ICE_PROCESS_STATUS = 2 Then
+        Var ice_tab_process_show = "Enable"
+        Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
+    Else
+        Var ice_tab_process_show = "Invisible"
+    EndIf
+
+
+    GetVisible inst_show3
+    ;DEBUGVAR inst_show3
+
+    
+
+    If inst_show3 = 1 Then
+        InstanceGetString SaveStringInst
+        ;DEBUGVAR SaveStringInst
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+		
+    EndIf
+
+    ; setvarint SlientRefreshEnable 1
+    ;DEBUGVAR SlientRefreshEnable
+
+    If SlientRefreshIndex = 3 Then
+		If inst_show3 = 0 Then
+			GetXMLFileNameCurrentRunning CurrentOpenFile3
+			Open CurrentOpenFile3	
+		Else
+			Var SlientRefreshIndex = 4
+			
+		EndIf
+    EndIf
+
+
+    TimerReset
+</EventTimeout> 
 
 <?hurr 
     #include=menu_catalog_new.py

xml/menutab/page_catalog_group_whey.skt

@@ -32,9 +32,78 @@
         #include=menu_catalog_new_menu.py
     ?>
 
+    If SlientRefreshIndex = 8 Then
+		Var SlientRefreshIndex = 9
+	EndIf
+
+
 </EventOpen>
 
 
+<Timeout> 1000 </Timeout>
+<EventTimeout> 
+    ;DEBUGVAR ICE_PROCESS_STATUS
+
+    If ICE_PROCESS_STATUS = 2 Then
+        Var ice_tab_process_show = "Enable"
+        Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
+    Else
+        Var ice_tab_process_show = "Invisible"
+    EndIf
+
+
+    GetVisible inst_show8
+    ;DEBUGVAR inst_show8
+
+    InstanceGetString SaveStringInst
+    ;DEBUGVAR SaveStringInst
+
+    If inst_show8 = 1 Then
+        InstanceGetString SaveStringInst
+        ;DEBUGVAR SaveStringInst
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+    ; setvarint SlientRefreshEnable 1
+    ;DEBUGVAR SlientRefreshEnable
+
+    If SlientRefreshEnable = 1 Then
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+
+	If SlientRefreshIndex = 8 Then
+		If inst_show8 = 0 Then
+			GetXMLFileNameCurrentRunning CurrentOpenFile8
+			Open CurrentOpenFile8
+		Else
+			Var SlientRefreshIndex = 9
+		EndIf
+    EndIf
+
+
+    TimerReset
+</EventTimeout> 
 
 <?hurr 
     #include=menu_catalog_new.py