Change

2024-12-09 13:10:00 +07:00 · 2024-12-09 13:10:00 +07:00 · 3ee5dd2a9e
commit 3ee5dd2a9e
parent 2cb72fc7b1
31 changed files with 4342 additions and 2478 deletions
--- a/inter/tha/xml/multi/page_catalog_group_coffee.lxml
+++ b/inter/tha/xml/multi/page_catalog_group_coffee.lxml
@ -1,177 +1,177 @@
-
-
-<Popup>
-<Cache> "Enable" </Cache>
-<Width> 1080 </Width>
-<Height> 1920 </Height>
-;<Background> "0xeae6e1" </Background>
-<Volume> SoundVolume </Volume>
-<EventOpen>
-	; On open
-	
-
-	If SlientRefreshIndex = 2 Then
-		Var SlientRefreshIndex = 3
-
-	EndIf
-
-</EventOpen>
-
-
-
-<EventOnShow>
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
-    Var Menu2Selected = "PressForever"
-
-
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
-
-    Var Timeout = 0
-
-
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
-
-    SetInstanceIgnoreTouch
-
-    
-	DEBUGVAR SlientRefreshIndex
-</EventOnShow>
-
-<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
-
-     If inst_show2 = 1 Then
-        If langnext1 = "true" Then
-            Var langnext1 = "false"
-            DEBUGVAR langnext
-        EndIf
-    EndIf
-
-            
-
-
-
-    Var Inst5CountMenuEnable = 0
-    Var Inst5CountCurrentMenuEnable = 0
-    GetFrameScrollBlockCount Inst5CountCurrentMenuEnable
-    GetCurrentEnableBlockCount Inst5CountMenuEnable
-    
-    ;DEBUGVAR Inst5CountMenuEnable
-    ;DEBUGVAR Inst5CountMenuEnablePrev
-    ;DEBUGVAR Inst5CountCurrentMenuEnable
-
-    If Inst5CountMenuEnablePrev = "" Then
-        Var Inst5CountMenuEnablePrev = Inst5CountMenuEnable
-        Var Inst5CountDownForOpenXML = 0
-        Var Inst5CountDownOpenXMLFromMenuZero = 20
-    EndIf
-
-    If Inst5CountMenuEnable = Inst5CountMenuEnablePrev Then
-
-    Else
-        SAVELOG "Inst5 Refresh ===================================================================== Refresh"
-        Var Inst5CountDownForOpenXML = 10
-        Var Inst5CountMenuEnablePrev = CountMenuEnable
-    EndIf
-
-    If Inst5CountMenuEnable = Inst5CountCurrentMenuEnable Then
-
-    Else
-        If Inst5CountDownForOpenXML = 0 Then
-            SAVELOG "Inst5 Refresh =======================Inst5CountMenuEnable / Inst5CountCurrentMenuEnable ============================================== Refresh"
-            Var Inst5CountDownForOpenXML = 10
-        EndIf
-    EndIf
-
-    If Inst5CountCurrentMenuEnable = 0 Then
-        
-        DEBUGVAR Inst5CountDownOpenXMLFromMenuZero
-
-        If Inst5CountDownOpenXMLFromMenuZero > 0 Then
-            Var Inst5CountDownOpenXMLFromMenuZero = Inst5CountDownOpenXMLFromMenuZero - 1
-            If Inst5CountDownOpenXMLFromMenuZero = 0 Then
-                Var Inst5CountDownOpenXMLFromMenuZero = 20
-                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_coffee.lxml"
-            EndIf
-        EndIf
-    EndIf
-
-	If Inst5CountMenuEnable = Inst5CountCurrentMenuEnable Then
-        If Inst5CountCurrentMenuEnable > 0 Then
-            Var Inst5MenuLoaded = "done"  
-        EndIf
-    EndIf
-
-    If Inst5CountDownForOpenXML > 0 Then
-        Var Inst5CountDownForOpenXML = Inst5CountDownForOpenXML - 1
-        DEBUGVAR Inst5CountDownForOpenXML
-        If Inst5CountDownForOpenXML = 0 Then
-            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_coffee.lxml"
-        EndIf
-    EndIf
-    
-    TimerReset
-</EventTimeout>
-
-;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
-
-
-
+
+
+<Popup>
+<Cache> "Enable" </Cache>
+<Width> 1080 </Width>
+<Height> 1920 </Height>
+;<Background> "0xeae6e1" </Background>
+<Volume> SoundVolume </Volume>
+<EventOpen>
+	; On open
+	
+
+	If SlientRefreshIndex = 2 Then
+		Var SlientRefreshIndex = 3
+
+	EndIf
+
+</EventOpen>
+
+
+
+<EventOnShow>
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
+    Var Menu2Selected = "PressForever"
+
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
+
+    Var Timeout = 0
+
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
+
+    SetInstanceIgnoreTouch
+
+    
+	DEBUGVAR SlientRefreshIndex
+</EventOnShow>
+
+<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
+
+     If inst_show2 = 1 Then
+        If langnext1 = "true" Then
+            Var langnext1 = "false"
+            DEBUGVAR langnext
+        EndIf
+    EndIf
+
+            
+
+
+
+    Var Inst5CountMenuEnable = 0
+    Var Inst5CountCurrentMenuEnable = 0
+    GetFrameScrollBlockCount Inst5CountCurrentMenuEnable
+    GetCurrentEnableBlockCount Inst5CountMenuEnable
+    
+    ;DEBUGVAR Inst5CountMenuEnable
+    ;DEBUGVAR Inst5CountMenuEnablePrev
+    ;DEBUGVAR Inst5CountCurrentMenuEnable
+
+    If Inst5CountMenuEnablePrev = "" Then
+        Var Inst5CountMenuEnablePrev = Inst5CountMenuEnable
+        Var Inst5CountDownForOpenXML = 0
+        Var Inst5CountDownOpenXMLFromMenuZero = 20
+    EndIf
+
+    If Inst5CountMenuEnable = Inst5CountMenuEnablePrev Then
+
+    Else
+        SAVELOG "Inst5 Refresh ===================================================================== Refresh"
+        Var Inst5CountDownForOpenXML = 10
+        Var Inst5CountMenuEnablePrev = CountMenuEnable
+    EndIf
+
+    If Inst5CountMenuEnable = Inst5CountCurrentMenuEnable Then
+
+    Else
+        If Inst5CountDownForOpenXML = 0 Then
+            SAVELOG "Inst5 Refresh =======================Inst5CountMenuEnable / Inst5CountCurrentMenuEnable ============================================== Refresh"
+            Var Inst5CountDownForOpenXML = 10
+        EndIf
+    EndIf
+
+    If Inst5CountCurrentMenuEnable = 0 Then
+        
+        DEBUGVAR Inst5CountDownOpenXMLFromMenuZero
+
+        If Inst5CountDownOpenXMLFromMenuZero > 0 Then
+            Var Inst5CountDownOpenXMLFromMenuZero = Inst5CountDownOpenXMLFromMenuZero - 1
+            If Inst5CountDownOpenXMLFromMenuZero = 0 Then
+                Var Inst5CountDownOpenXMLFromMenuZero = 20
+                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_coffee.lxml"
+            EndIf
+        EndIf
+    EndIf
+
+    If Inst5CountMenuEnable = Inst5CountCurrentMenuEnable Then
+        If Inst5CountCurrentMenuEnable > 0 Then
+            Var Inst5MenuLoaded = "done"  
+        EndIf
+    EndIf
+
+    If Inst5CountDownForOpenXML > 0 Then
+        Var Inst5CountDownForOpenXML = Inst5CountDownForOpenXML - 1
+        DEBUGVAR Inst5CountDownForOpenXML
+        If Inst5CountDownForOpenXML = 0 Then
+            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_coffee.lxml"
+        EndIf
+    EndIf
+    
+    TimerReset
+</EventTimeout>
+
+;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
+
+
+
 <FrameScroll> 
 <X> 10 </X>
 <Y> 497 </Y>
@ -30194,10 +30194,10 @@
 	Open "ROOT/taobin_project/xml/page_payment_multi.xml"
 </EventClick>
 </Button>
-
-
-
-
-
-
-</Popup>
+
+
+
+
+
+
+</Popup>
--- a/inter/tha/xml/multi/page_catalog_group_forkid.lxml
+++ b/inter/tha/xml/multi/page_catalog_group_forkid.lxml
@ -1,185 +1,186 @@
-
-
-<Popup>
-<Cache> "Enable" </Cache>
-<Width> 1080 </Width>
-<Height> 1920 </Height>
-;<Background> "0xeae6e1" </Background>
-<Volume> SoundVolume </Volume>
-<EventOpen>
-	; On open
-	
-    SetInstanceIgnoreTouch
-
-	DEBUGVAR SlientRefreshIndex
-
-	If SlientRefreshIndex = 5 Then
-		Var SlientRefreshIndex = 6
-	EndIf
-
-</EventOpen>
-
-<EventOnShow>
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
-           ; protein
-    If AppFastEnable = "true" Then
-        Var Menu11Selected = "PressForever" 
-        Var Menu7Selected = "Invisible"
-        Var Menu21Selected = "Invisible"
-    Else
-        Var Menu11Selected = "Invisible" 
-        Var Menu7Selected = "Invisible"
-        Var Menu21Selected = "PressForever"
-    EndIf
-
-    RootLayoutVisible 12 "show"
-
-    Var Timeout = 0
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
-
-    SetInstanceIgnoreTouch
-
-
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
-
-	DEBUGVAR SlientRefreshIndex
-</EventOnShow>
-
-<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
-
-    If inst_show5 = 1 Then
-        If langnext4 = "true" Then
-            Var langnext4 = "false"
-            DEBUGVAR langnext
-            RefreshAll
-        EndIf
-    EndIf
-
-
-    Var Inst8CountMenuEnable = 0
-    Var Inst8CountCurrentMenuEnable = 0
-    GetFrameScrollBlockCount Inst8CountCurrentMenuEnable
-    GetCurrentEnableBlockCount Inst8CountMenuEnable
-    
-    ;DEBUGVAR Inst8CountMenuEnable
-    ;DEBUGVAR Inst8CountMenuEnablePrev
-    ;DEBUGVAR Inst8CountCurrentMenuEnable
-
-    If Inst8CountMenuEnablePrev = "" Then
-        Var Inst8CountMenuEnablePrev = Inst8CountMenuEnable
-        Var Inst8CountDownForOpenXML = 0
-        Var Inst8CountDownOpenXMLFromMenuZero = 20
-    EndIf
-
-    If Inst8CountMenuEnable = Inst8CountMenuEnablePrev Then
-
-    Else
-        SAVELOG "Inst8 Refresh ===================================================================== Refresh"
-        Var Inst8CountDownForOpenXML = 10
-        Var Inst8CountMenuEnablePrev = CountMenuEnable
-    EndIf
-
-   If Inst8CountMenuEnable = Inst8CountCurrentMenuEnable Then
-
-    Else
-        If Inst8CountDownForOpenXML = 0 Then
-            SAVELOG "Inst8 Refresh =======================Inst8CountMenuEnable / Inst8CountCurrentMenuEnable ============================================== Refresh"
-            Var Inst8CountDownForOpenXML = 10
-        EndIf
-    EndIf
-
-    If Inst8CountCurrentMenuEnable = 0 Then
-        
-        DEBUGVAR Inst8CountDownOpenXMLFromMenuZero
-
-        If Inst8CountDownOpenXMLFromMenuZero > 0 Then
-            Var Inst8CountDownOpenXMLFromMenuZero = Inst8CountDownOpenXMLFromMenuZero - 1
-            If Inst8CountDownOpenXMLFromMenuZero = 0 Then
-                Var Inst8CountDownOpenXMLFromMenuZero = 20
-                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_forkid.lxml"
-            EndIf
-        EndIf
-    EndIf
-
-	If Inst8CountMenuEnable = Inst8CountCurrentMenuEnable Then
-        If Inst8CountCurrentMenuEnable > 0 Then
-            Var Inst8MenuLoaded = "done"  
-        EndIf
-    EndIf
-
-    If Inst8CountDownForOpenXML > 0 Then
-        Var Inst8CountDownForOpenXML = Inst8CountDownForOpenXML - 1
-        DEBUGVAR Inst8CountDownForOpenXML
-        If Inst8CountDownForOpenXML = 0 Then
-            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_forkid.lxml"
-        EndIf
-    EndIf
-    
-    TimerReset
-</EventTimeout>
-
-;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
-
-
-
+
+
+<Popup>
+<Cache> "Enable" </Cache>
+<Width> 1080 </Width>
+<Height> 1920 </Height>
+;<Background> "0xeae6e1" </Background>
+<Volume> SoundVolume </Volume>
+<EventOpen>
+	; On open
+	
+    SetInstanceIgnoreTouch
+
+	DEBUGVAR SlientRefreshIndex
+
+	If SlientRefreshIndex = 5 Then
+		Var SlientRefreshIndex = 6
+	EndIf
+
+</EventOpen>
+
+<EventOnShow>
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
+           ; protein
+    If AppFastEnable = "true" Then
+        Var Menu11Selected = "PressForever" 
+        Var Menu7Selected = "Invisible"
+        Var Menu21Selected = "Invisible"
+    Else
+        Var Menu11Selected = "Invisible" 
+        Var Menu7Selected = "Invisible"
+        Var Menu21Selected = "PressForever"
+    EndIf
+
+    RootLayoutVisible 12 "show"
+
+    Var Timeout = 0
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
+
+    SetInstanceIgnoreTouch
+
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
+
+	DEBUGVAR SlientRefreshIndex
+</EventOnShow>
+
+<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
+
+    If inst_show5 = 1 Then
+        If langnext4 = "true" Then
+            Var langnext4 = "false"
+            DEBUGVAR langnext
+            RefreshAll
+        EndIf
+    EndIf
+
+
+    Var Inst8CountMenuEnable = 0
+    Var Inst8CountCurrentMenuEnable = 0
+    GetFrameScrollBlockCount Inst8CountCurrentMenuEnable
+    GetCurrentEnableBlockCount Inst8CountMenuEnable
+    
+    ;DEBUGVAR Inst8CountMenuEnable
+    ;DEBUGVAR Inst8CountMenuEnablePrev
+    ;DEBUGVAR Inst8CountCurrentMenuEnable
+
+    If Inst8CountMenuEnablePrev = "" Then
+        Var Inst8CountMenuEnablePrev = Inst8CountMenuEnable
+        Var Inst8CountDownForOpenXML = 0
+        Var Inst8CountDownOpenXMLFromMenuZero = 20
+    EndIf
+
+    If Inst8CountMenuEnable = Inst8CountMenuEnablePrev Then
+
+    Else
+        SAVELOG "Inst8 Refresh ===================================================================== Refresh"
+        Var Inst8CountDownForOpenXML = 10
+        Var Inst8CountMenuEnablePrev = CountMenuEnable
+    EndIf
+
+   If Inst8CountMenuEnable = Inst8CountCurrentMenuEnable Then
+
+    Else
+        If Inst8CountDownForOpenXML = 0 Then
+            SAVELOG "Inst8 Refresh =======================Inst8CountMenuEnable / Inst8CountCurrentMenuEnable ============================================== Refresh"
+            Var Inst8CountDownForOpenXML = 10
+        EndIf
+    EndIf
+    
+
+    If Inst8CountCurrentMenuEnable = 0 Then
+        
+        DEBUGVAR Inst8CountDownOpenXMLFromMenuZero
+
+        If Inst8CountDownOpenXMLFromMenuZero > 0 Then
+            Var Inst8CountDownOpenXMLFromMenuZero = Inst8CountDownOpenXMLFromMenuZero - 1
+            If Inst8CountDownOpenXMLFromMenuZero = 0 Then
+                Var Inst8CountDownOpenXMLFromMenuZero = 20
+                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_forkid.lxml"
+            EndIf
+        EndIf
+    EndIf
+
+    If Inst8CountMenuEnable = Inst8CountCurrentMenuEnable Then
+        If Inst8CountCurrentMenuEnable > 0 Then
+            Var Inst8MenuLoaded = "done"  
+        EndIf
+    EndIf
+
+    If Inst8CountDownForOpenXML > 0 Then
+        Var Inst8CountDownForOpenXML = Inst8CountDownForOpenXML - 1
+        DEBUGVAR Inst8CountDownForOpenXML
+        If Inst8CountDownForOpenXML = 0 Then
+            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_forkid.lxml"
+        EndIf
+    EndIf
+    
+    TimerReset
+</EventTimeout>
+
+;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
+
+
+
 <FrameScroll> 
 <X> 10 </X>
 <Y> 497 </Y>
@ -5283,8 +5284,8 @@
 	Open "ROOT/taobin_project/xml/page_payment_multi.xml"
 </EventClick>
 </Button>
-
-
-
-
-</Popup>
+
+
+
+
+</Popup>
--- a/inter/tha/xml/multi/page_catalog_group_health.lxml
+++ b/inter/tha/xml/multi/page_catalog_group_health.lxml
@ -1,173 +1,173 @@
-
-
-<Popup>
-<Cache> "Enable" </Cache>
-<Width> 1080 </Width>
-<Height> 1920 </Height>
-;<Background> "0xeae6e1" </Background>
-<Volume> SoundVolume </Volume>
-<EventOpen>
-
-	DEBUGVAR SlientRefreshIndex
-
-	If SlientRefreshIndex = 6 Then
-		Var SlientRefreshIndex = 7
-	EndIf
-</EventOpen>
-
-<EventOnShow>
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
-    
-    Var Menu22Selected = "PressForever"
-
-    RootLayoutVisible 12 "show"
-
-    Var Timeout = 0
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
-
-    SetInstanceIgnoreTouch
-
-
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
-
-	DEBUGVAR SlientRefreshIndex
-</EventOnShow>
-
-<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
-
-    If inst_show6 = 1 Then
-        If langnext5 = "true" Then
-            Var langnext5 = "false"
-            RefreshAll
-        EndIf
-    EndIf
-
-
-    Var Inst9CountMenuEnable = 0
-    Var Inst9CountCurrentMenuEnable = 0
-    GetFrameScrollBlockCount Inst9CountCurrentMenuEnable
-    GetCurrentEnableBlockCount Inst9CountMenuEnable
-    
-    ;DEBUGVAR Inst9CountMenuEnable
-    ;DEBUGVAR Inst9CountMenuEnablePrev
-    ;DEBUGVAR Inst9CountCurrentMenuEnable
-
-    If Inst9CountMenuEnablePrev = "" Then
-        Var Inst9CountMenuEnablePrev = Inst9CountMenuEnable
-        Var Inst9CountDownForOpenXML = 0
-        Var Inst9CountDownOpenXMLFromMenuZero = 20
-    EndIf
-
-    If Inst9CountMenuEnable = Inst9CountMenuEnablePrev Then
-
-    Else
-        SAVELOG "Inst9 Refresh ===================================================================== Refresh"
-        Var Inst9CountDownForOpenXML = 10
-        Var Inst9CountMenuEnablePrev = CountMenuEnable
-    EndIf
-    
-    If Inst9CountMenuEnable = Inst9CountCurrentMenuEnable Then
-
-    Else
-        If Inst9CountDownForOpenXML = 0 Then
-            SAVELOG "Inst9 Refresh =======================Inst9CountMenuEnable / Inst9CountCurrentMenuEnable ============================================== Refresh"
-            Var Inst9CountDownForOpenXML = 10
-        EndIf
-    EndIf
-
-    If Inst9CountCurrentMenuEnable = 0 Then
-        
-        DEBUGVAR Inst9CountDownOpenXMLFromMenuZero
-
-        If Inst9CountDownOpenXMLFromMenuZero > 0 Then
-            Var Inst9CountDownOpenXMLFromMenuZero = Inst9CountDownOpenXMLFromMenuZero - 1
-            If Inst9CountDownOpenXMLFromMenuZero = 0 Then
-                Var Inst9CountDownOpenXMLFromMenuZero = 20
-                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_health.lxml"
-            EndIf
-        EndIf
-    EndIf
-
-	If Inst9CountMenuEnable = Inst9CountCurrentMenuEnable Then
-        If Inst9CountCurrentMenuEnable > 0 Then
-            Var Inst9MenuLoaded = "done"  
-        EndIf
-    EndIf
-
-    If Inst9CountDownForOpenXML > 0 Then
-        Var Inst9CountDownForOpenXML = Inst9CountDownForOpenXML - 1
-        DEBUGVAR Inst9CountDownForOpenXML
-        If Inst9CountDownForOpenXML = 0 Then
-            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_health.lxml"
-        EndIf
-    EndIf
-    
-
-
-    TimerReset
-</EventTimeout>
-
-;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
-
+
+
+<Popup>
+<Cache> "Enable" </Cache>
+<Width> 1080 </Width>
+<Height> 1920 </Height>
+;<Background> "0xeae6e1" </Background>
+<Volume> SoundVolume </Volume>
+<EventOpen>
+
+	DEBUGVAR SlientRefreshIndex
+
+	If SlientRefreshIndex = 6 Then
+		Var SlientRefreshIndex = 7
+	EndIf
+</EventOpen>
+
+<EventOnShow>
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
+    
+    Var Menu22Selected = "PressForever"
+
+    RootLayoutVisible 12 "show"
+
+    Var Timeout = 0
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
+
+    SetInstanceIgnoreTouch
+
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
+
+	DEBUGVAR SlientRefreshIndex
+</EventOnShow>
+
+<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
+
+    If inst_show6 = 1 Then
+        If langnext5 = "true" Then
+            Var langnext5 = "false"
+            RefreshAll
+        EndIf
+    EndIf
+
+
+    Var Inst9CountMenuEnable = 0
+    Var Inst9CountCurrentMenuEnable = 0
+    GetFrameScrollBlockCount Inst9CountCurrentMenuEnable
+    GetCurrentEnableBlockCount Inst9CountMenuEnable
+    
+    ;DEBUGVAR Inst9CountMenuEnable
+    ;DEBUGVAR Inst9CountMenuEnablePrev
+    ;DEBUGVAR Inst9CountCurrentMenuEnable
+
+    If Inst9CountMenuEnablePrev = "" Then
+        Var Inst9CountMenuEnablePrev = Inst9CountMenuEnable
+        Var Inst9CountDownForOpenXML = 0
+        Var Inst9CountDownOpenXMLFromMenuZero = 20
+    EndIf
+
+    If Inst9CountMenuEnable = Inst9CountMenuEnablePrev Then
+
+    Else
+        SAVELOG "Inst9 Refresh ===================================================================== Refresh"
+        Var Inst9CountDownForOpenXML = 10
+        Var Inst9CountMenuEnablePrev = CountMenuEnable
+    EndIf
+    
+    If Inst9CountMenuEnable = Inst9CountCurrentMenuEnable Then
+
+    Else
+        If Inst9CountDownForOpenXML = 0 Then
+            SAVELOG "Inst9 Refresh =======================Inst9CountMenuEnable / Inst9CountCurrentMenuEnable ============================================== Refresh"
+            Var Inst9CountDownForOpenXML = 10
+        EndIf
+    EndIf
+
+    If Inst9CountMenuEnable = Inst9CountCurrentMenuEnable Then
+        If Inst9CountCurrentMenuEnable > 0 Then
+            Var Inst9MenuLoaded = "done"  
+        EndIf
+    EndIf
+
+    If Inst9CountCurrentMenuEnable = 0 Then
+        
+        DEBUGVAR Inst9CountDownOpenXMLFromMenuZero
+
+        If Inst9CountDownOpenXMLFromMenuZero > 0 Then
+            Var Inst9CountDownOpenXMLFromMenuZero = Inst9CountDownOpenXMLFromMenuZero - 1
+            If Inst9CountDownOpenXMLFromMenuZero = 0 Then
+                Var Inst9CountDownOpenXMLFromMenuZero = 20
+                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_health.lxml"
+            EndIf
+        EndIf
+    EndIf
+
+    If Inst9CountDownForOpenXML > 0 Then
+        Var Inst9CountDownForOpenXML = Inst9CountDownForOpenXML - 1
+        DEBUGVAR Inst9CountDownForOpenXML
+        If Inst9CountDownForOpenXML = 0 Then
+            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_health.lxml"
+        EndIf
+    EndIf
+    
+
+
+    TimerReset
+</EventTimeout>
+
+;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
+
 <FrameScroll> 
 <X> 10 </X>
 <Y> 497 </Y>
@ -10681,8 +10681,8 @@
 	Open "ROOT/taobin_project/xml/page_payment_multi.xml"
 </EventClick>
 </Button>
-
-
-
-
-</Popup>
+
+
+
+
+</Popup>
--- a/inter/tha/xml/multi/page_catalog_group_milk.lxml
+++ b/inter/tha/xml/multi/page_catalog_group_milk.lxml
@ -1,175 +1,175 @@
-
-
-<Popup>
-<Cache> "Enable" </Cache>
-<Width> 1080 </Width>
-<Height> 1920 </Height>
-;<Background> "0xeae6e1" </Background>
-<Volume> SoundVolume </Volume>
-<EventOpen>
-	; On open
-
-	DEBUGVAR SlientRefreshIndex
-
-	If SlientRefreshIndex = 4 Then
-		Var SlientRefreshIndex = 5
-	EndIf
-</EventOpen>
-
-<EventOnShow>
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
-    Var Menu4Selected = "PressForever"
-
-    RootLayoutVisible 12 "show"
-
-    Var Timeout = 0
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
-
-    SetInstanceIgnoreTouch
-
-
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
-
-	DEBUGVAR SlientRefreshIndex
-</EventOnShow>
-
-<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
-
-    If inst_show4 = 1 Then
-        If langnext3 = "true" Then
-            Var langnext3 = "false"
-            DEBUGVAR langnext
-            RefreshAll
-        EndIf
-    EndIf
-
-
-    Var Inst7CountMenuEnable = 0
-    Var Inst7CountCurrentMenuEnable = 0
-    GetFrameScrollBlockCount Inst7CountCurrentMenuEnable
-    GetCurrentEnableBlockCount Inst7CountMenuEnable
-    
-    ;DEBUGVAR Inst7CountMenuEnable
-    ;DEBUGVAR Inst7CountMenuEnablePrev
-    ;DEBUGVAR Inst7CountCurrentMenuEnable
-
-    If Inst7CountMenuEnablePrev = "" Then
-        Var Inst7CountMenuEnablePrev = Inst7CountMenuEnable
-        Var Inst7CountDownForOpenXML = 0
-        Var Inst7CountDownOpenXMLFromMenuZero = 20
-    EndIf
-
-    If Inst7CountMenuEnable = Inst7CountMenuEnablePrev Then
-
-    Else
-        SAVELOG "Inst7 Refresh ===================================================================== Refresh"
-        Var Inst7CountDownForOpenXML = 10
-        Var Inst7CountMenuEnablePrev = CountMenuEnable
-    EndIf
-
-    If Inst7CountMenuEnable = Inst7CountCurrentMenuEnable Then
-
-    Else
-        If Inst7CountDownForOpenXML = 0 Then
-            SAVELOG "Inst7 Refresh =======================Inst7CountMenuEnable / Inst7CountCurrentMenuEnable ============================================== Refresh"
-            Var Inst7CountDownForOpenXML = 10
-        EndIf
-    EndIf
-
-	If Inst7CountMenuEnable = Inst7CountCurrentMenuEnable Then
-        If Inst7CountCurrentMenuEnable > 0 Then
-            Var Inst7MenuLoaded = "done"  
-        EndIf
-    EndIf
-    
-
-    If Inst7CountCurrentMenuEnable = 0 Then
-        
-        DEBUGVAR Inst7CountDownOpenXMLFromMenuZero
-
-        If Inst7CountDownOpenXMLFromMenuZero > 0 Then
-            Var Inst7CountDownOpenXMLFromMenuZero = Inst7CountDownOpenXMLFromMenuZero - 1
-            If Inst7CountDownOpenXMLFromMenuZero = 0 Then
-                Var Inst7CountDownOpenXMLFromMenuZero = 20
-                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_milk.lxml"
-            EndIf
-        EndIf
-    EndIf
-
-    If Inst7CountDownForOpenXML > 0 Then
-        Var Inst7CountDownForOpenXML = Inst7CountDownForOpenXML - 1
-        DEBUGVAR Inst7CountDownForOpenXML
-        If Inst7CountDownForOpenXML = 0 Then
-            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_milk.lxml"
-        EndIf
-    EndIf
-
-    TimerReset
-</EventTimeout>
-
-;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
-
-
-
+
+
+<Popup>
+<Cache> "Enable" </Cache>
+<Width> 1080 </Width>
+<Height> 1920 </Height>
+;<Background> "0xeae6e1" </Background>
+<Volume> SoundVolume </Volume>
+<EventOpen>
+	; On open
+
+	DEBUGVAR SlientRefreshIndex
+
+	If SlientRefreshIndex = 4 Then
+		Var SlientRefreshIndex = 5
+	EndIf
+</EventOpen>
+
+<EventOnShow>
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
+    Var Menu4Selected = "PressForever"
+
+    RootLayoutVisible 12 "show"
+
+    Var Timeout = 0
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
+
+    SetInstanceIgnoreTouch
+
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
+
+	DEBUGVAR SlientRefreshIndex
+</EventOnShow>
+
+<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
+
+    If inst_show4 = 1 Then
+        If langnext3 = "true" Then
+            Var langnext3 = "false"
+            DEBUGVAR langnext
+            RefreshAll
+        EndIf
+    EndIf
+
+
+    Var Inst7CountMenuEnable = 0
+    Var Inst7CountCurrentMenuEnable = 0
+    GetFrameScrollBlockCount Inst7CountCurrentMenuEnable
+    GetCurrentEnableBlockCount Inst7CountMenuEnable
+    
+    ;DEBUGVAR Inst7CountMenuEnable
+    ;DEBUGVAR Inst7CountMenuEnablePrev
+    ;DEBUGVAR Inst7CountCurrentMenuEnable
+
+    If Inst7CountMenuEnablePrev = "" Then
+        Var Inst7CountMenuEnablePrev = Inst7CountMenuEnable
+        Var Inst7CountDownForOpenXML = 0
+        Var Inst7CountDownOpenXMLFromMenuZero = 20
+    EndIf
+
+    If Inst7CountMenuEnable = Inst7CountMenuEnablePrev Then
+
+    Else
+        SAVELOG "Inst7 Refresh ===================================================================== Refresh"
+        Var Inst7CountDownForOpenXML = 10
+        Var Inst7CountMenuEnablePrev = CountMenuEnable
+    EndIf
+
+    If Inst7CountMenuEnable = Inst7CountCurrentMenuEnable Then
+
+    Else
+        If Inst7CountDownForOpenXML = 0 Then
+            SAVELOG "Inst7 Refresh =======================Inst7CountMenuEnable / Inst7CountCurrentMenuEnable ============================================== Refresh"
+            Var Inst7CountDownForOpenXML = 10
+        EndIf
+    EndIf
+    
+
+    If Inst7CountCurrentMenuEnable = 0 Then
+        
+        DEBUGVAR Inst7CountDownOpenXMLFromMenuZero
+
+        If Inst7CountDownOpenXMLFromMenuZero > 0 Then
+            Var Inst7CountDownOpenXMLFromMenuZero = Inst7CountDownOpenXMLFromMenuZero - 1
+            If Inst7CountDownOpenXMLFromMenuZero = 0 Then
+                Var Inst7CountDownOpenXMLFromMenuZero = 20
+                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_milk.lxml"
+            EndIf
+        EndIf
+    EndIf
+
+    If Inst7CountMenuEnable = Inst7CountCurrentMenuEnable Then
+        If Inst7CountCurrentMenuEnable > 0 Then
+            Var Inst7MenuLoaded = "done"  
+        EndIf
+    EndIf
+
+    If Inst7CountDownForOpenXML > 0 Then
+        Var Inst7CountDownForOpenXML = Inst7CountDownForOpenXML - 1
+        DEBUGVAR Inst7CountDownForOpenXML
+        If Inst7CountDownForOpenXML = 0 Then
+            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_milk.lxml"
+        EndIf
+    EndIf
+
+    TimerReset
+</EventTimeout>
+
+;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
+
+
+
 <FrameScroll> 
 <X> 10 </X>
 <Y> 497 </Y>
@ -11237,15 +11237,15 @@
 	Open "ROOT/taobin_project/xml/page_payment_multi.xml"
 </EventClick>
 </Button>
-
-
-
-
-
-
-<EventUnitTest4>
-    RefreshAll
-</EventUnitTest4>
-
-
-</Popup>
+
+
+
+
+
+
+<EventUnitTest4>
+    RefreshAll
+</EventUnitTest4>
+
+
+</Popup>
--- a/inter/tha/xml/multi/page_catalog_group_other_other.lxml
+++ b/inter/tha/xml/multi/page_catalog_group_other_other.lxml
@ -1,169 +1,170 @@
-
-
-<Popup>
-<Cache> "Enable" </Cache>
-<Width> 1080 </Width>
-<Height> 1920 </Height>
-;<Background> "0xeae6e1" </Background>
-<Volume> SoundVolume </Volume>
-<EventOpen>
-	
-	DEBUGVAR SlientRefreshIndex
-
-	If SlientRefreshIndex = 7 Then
-		Var SlientRefreshIndex = 8
-	EndIf
-
-</EventOpen>
-
-<EventOnShow>
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
-     ; soda and other
-    Var Menu62Selected = "PressForever"
-
-    RootLayoutVisible 12 "show"
-
-    Var Timeout = 0
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
-
-    SetInstanceIgnoreTouch
-
-
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
-
-	DEBUGVAR SlientRefreshIndex
-</EventOnShow>
-
-<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
-
-	If SlientRefreshIndex = 7 Then
-		If inst_show9 = 0 Then
-			GetXMLFileNameCurrentRunning CurrentOpenFile5
-			Open CurrentOpenFile5
-		Else
-			Var SlientRefreshIndex = 8
-		EndIf
-    EndIf
-    
-
-    Var Inst11CountMenuEnable = 0
-    Var Inst11CountCurrentMenuEnable = 0
-    GetFrameScrollBlockCount Inst11CountCurrentMenuEnable
-    GetCurrentEnableBlockCount Inst11CountMenuEnable
-    
-    ;DEBUGVAR Inst11CountMenuEnable
-    ;DEBUGVAR Inst11CountMenuEnablePrev
-    ;DEBUGVAR Inst11CountCurrentMenuEnable
-
-    If Inst11CountMenuEnablePrev = "" Then
-        Var Inst11CountMenuEnablePrev = Inst11CountMenuEnable
-        Var Inst11CountDownForOpenXML = 0
-        Var Inst11CountDownOpenXMLFromMenuZero = 20
-    EndIf
-
-    If Inst11CountMenuEnable = Inst11CountMenuEnablePrev Then
-
-    Else
-        SAVELOG "Inst11 Refresh ===================================================================== Refresh"
-        Var Inst11CountDownForOpenXML = 10
-        Var Inst11CountMenuEnablePrev = CountMenuEnable
-    EndIf
-
-    If Inst11CountMenuEnable = Inst11CountCurrentMenuEnable Then
-
-    Else
-        If Inst11CountDownForOpenXML = 0 Then
-            SAVELOG "Inst11 Refresh =======================Inst11CountMenuEnable / Inst11CountCurrentMenuEnable ============================================== Refresh"
-            Var Inst11CountDownForOpenXML = 10
-        EndIf
-    EndIf
-
-    If Inst11CountCurrentMenuEnable = 0 Then
-        
-        DEBUGVAR Inst11CountDownOpenXMLFromMenuZero
-
-        If Inst11CountDownOpenXMLFromMenuZero > 0 Then
-            Var Inst11CountDownOpenXMLFromMenuZero = Inst11CountDownOpenXMLFromMenuZero - 1
-            If Inst11CountDownOpenXMLFromMenuZero = 0 Then
-                Var Inst11CountDownOpenXMLFromMenuZero = 20
-                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_other_other.lxml"
-            EndIf
-        EndIf
-    EndIf
-
-	If Inst11CountMenuEnable = Inst11CountCurrentMenuEnable Then
-        If Inst11CountCurrentMenuEnable > 0 Then
-            Var Inst11MenuLoaded = "done"  
-        EndIf
-    EndIf
-
-    If Inst11CountDownForOpenXML > 0 Then
-        Var Inst11CountDownForOpenXML = Inst11CountDownForOpenXML - 1
-        DEBUGVAR Inst11CountDownForOpenXML
-        If Inst11CountDownForOpenXML = 0 Then
-            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_other_other.lxml"
-        EndIf
-    EndIf
-    
-
-
-    TimerReset
-</EventTimeout>
-
-;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
-
-
-
-
+
+
+<Popup>
+<Cache> "Enable" </Cache>
+<Width> 1080 </Width>
+<Height> 1920 </Height>
+;<Background> "0xeae6e1" </Background>
+<Volume> SoundVolume </Volume>
+<EventOpen>
+	
+	DEBUGVAR SlientRefreshIndex
+
+	If SlientRefreshIndex = 7 Then
+		Var SlientRefreshIndex = 8
+	EndIf
+
+</EventOpen>
+
+<EventOnShow>
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
+     ; soda and other
+    Var Menu62Selected = "PressForever"
+
+    RootLayoutVisible 12 "show"
+
+    Var Timeout = 0
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
+
+    SetInstanceIgnoreTouch
+
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
+
+	DEBUGVAR SlientRefreshIndex
+</EventOnShow>
+
+<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
+
+	If SlientRefreshIndex = 7 Then
+		If inst_show9 = 0 Then
+			GetXMLFileNameCurrentRunning CurrentOpenFile5
+			Open CurrentOpenFile5
+		Else
+			Var SlientRefreshIndex = 8
+		EndIf
+    EndIf
+    
+
+    Var Inst11CountMenuEnable = 0
+    Var Inst11CountCurrentMenuEnable = 0
+    GetFrameScrollBlockCount Inst11CountCurrentMenuEnable
+    GetCurrentEnableBlockCount Inst11CountMenuEnable
+    
+    ;DEBUGVAR Inst11CountMenuEnable
+    ;DEBUGVAR Inst11CountMenuEnablePrev
+    ;DEBUGVAR Inst11CountCurrentMenuEnable
+
+    If Inst11CountMenuEnablePrev = "" Then
+        Var Inst11CountMenuEnablePrev = Inst11CountMenuEnable
+        Var Inst11CountDownForOpenXML = 0
+        Var Inst11CountDownOpenXMLFromMenuZero = 20
+    EndIf
+
+    If Inst11CountMenuEnable = Inst11CountMenuEnablePrev Then
+
+    Else
+        SAVELOG "Inst11 Refresh ===================================================================== Refresh"
+        Var Inst11CountDownForOpenXML = 10
+        Var Inst11CountMenuEnablePrev = CountMenuEnable
+    EndIf
+
+    If Inst11CountMenuEnable = Inst11CountCurrentMenuEnable Then
+
+    Else
+        If Inst11CountDownForOpenXML = 0 Then
+            SAVELOG "Inst11 Refresh =======================Inst11CountMenuEnable / Inst11CountCurrentMenuEnable ============================================== Refresh"
+            Var Inst11CountDownForOpenXML = 10
+        EndIf
+    EndIf
+
+    If Inst11CountCurrentMenuEnable = 0 Then
+        
+        DEBUGVAR Inst11CountDownOpenXMLFromMenuZero
+
+        If Inst11CountDownOpenXMLFromMenuZero > 0 Then
+            Var Inst11CountDownOpenXMLFromMenuZero = Inst11CountDownOpenXMLFromMenuZero - 1
+            If Inst11CountDownOpenXMLFromMenuZero = 0 Then
+                Var Inst11CountDownOpenXMLFromMenuZero = 20
+                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_other_other.lxml"
+            EndIf
+        EndIf
+    EndIf
+
+
+    If Inst11CountMenuEnable = Inst11CountCurrentMenuEnable Then
+        If Inst11CountCurrentMenuEnable > 0 Then
+            Var Inst11MenuLoaded = "done"  
+        EndIf
+    EndIf
+
+    If Inst11CountDownForOpenXML > 0 Then
+        Var Inst11CountDownForOpenXML = Inst11CountDownForOpenXML - 1
+        DEBUGVAR Inst11CountDownForOpenXML
+        If Inst11CountDownForOpenXML = 0 Then
+            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_other_other.lxml"
+        EndIf
+    EndIf
+    
+
+
+    TimerReset
+</EventTimeout>
+
+;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
+
+
+
+
 <FrameScroll> 
 <X> 10 </X>
 <Y> 497 </Y>
@ -14165,8 +14166,8 @@
 	Open "ROOT/taobin_project/xml/page_payment_multi.xml"
 </EventClick>
 </Button>
-
-
-
-
-</Popup>
+
+
+
+
+</Popup>
--- a/inter/tha/xml/multi/page_catalog_group_pepsi_7up.lxml
+++ b/inter/tha/xml/multi/page_catalog_group_pepsi_7up.lxml
@ -1,178 +1,178 @@
-
-
-<Popup>
-<Cache> "Enable" </Cache>
-<Width> 1080 </Width>
-<Height> 1920 </Height>
-;<Background> "0xeae6e1" </Background>
-<Volume> SoundVolume </Volume>
-<EventOpen>
-	; On open
-
-	DEBUGVAR SlientRefreshIndex
-
-	If SlientRefreshIndex = 8 Then
-		Var SlientRefreshIndex = 9
-	EndIf
-</EventOpen>
-
-<EventOnShow>
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
-    Var Menu61Selected = "PressForever"
-
-
-
-    Var Timeout = 0
-
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
-
-    
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
-
-    SetInstanceIgnoreTouch
-
-
-	DEBUGVAR SlientRefreshIndex
-</EventOnShow>
-
-<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_show9
-    ;DEBUGVAR inst_show9
-
-    
-
-    If inst_show9 = 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_show9 = 0 Then
-			GetXMLFileNameCurrentRunning CurrentOpenFile5
-			Open CurrentOpenFile5
-		Else
-			Var SlientRefreshIndex = 9
-		EndIf
-    EndIf
-
-    If inst_show9 = 1 Then
-        If langnext8 = "true" Then
-            Var langnext8 = "false"
-            DEBUGVAR langnext
-            RefreshAll
-        EndIf
-    EndIf
-
-    Var Inst10CountMenuEnable = 0
-    Var Inst10CountCurrentMenuEnable = 0
-    GetFrameScrollBlockCount Inst10CountCurrentMenuEnable
-    GetCurrentEnableBlockCount Inst10CountMenuEnable
-    
-    ;DEBUGVAR Inst10CountMenuEnable
-    ;DEBUGVAR Inst10CountMenuEnablePrev
-    ;DEBUGVAR Inst10CountCurrentMenuEnable
-
-    If Inst10CountMenuEnablePrev = "" Then
-        Var Inst10CountMenuEnablePrev = Inst10CountMenuEnable
-        Var Inst10CountDownForOpenXML = 0
-        Var Inst10CountDownOpenXMLFromMenuZero = 20
-    EndIf
-
-    If Inst10CountMenuEnable = Inst10CountMenuEnablePrev Then
-
-    Else
-        SAVELOG "Inst10 Refresh ===================================================================== Refresh"
-        Var Inst10CountDownForOpenXML = 10
-        Var Inst10CountMenuEnablePrev = CountMenuEnable
-    EndIf
-    
-    If Inst10CountMenuEnable = Inst10CountCurrentMenuEnable Then
-
-    Else
-        If Inst10CountDownForOpenXML = 0 Then
-            SAVELOG "Inst10 Refresh =======================Inst10CountMenuEnable / Inst10CountCurrentMenuEnable ============================================== Refresh"
-            Var Inst10CountDownForOpenXML = 10
-        EndIf
-    EndIf
-
-    If Inst10CountCurrentMenuEnable = 0 Then
-        
-        DEBUGVAR Inst10CountDownOpenXMLFromMenuZero
-
-        If Inst10CountDownOpenXMLFromMenuZero > 0 Then
-            Var Inst10CountDownOpenXMLFromMenuZero = Inst10CountDownOpenXMLFromMenuZero - 1
-            If Inst10CountDownOpenXMLFromMenuZero = 0 Then
-                Var Inst10CountDownOpenXMLFromMenuZero = 20
-                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_pepsi_7up.lxml"
-            EndIf
-        EndIf
-    EndIf
-
-	If Inst10CountMenuEnable = Inst10CountCurrentMenuEnable Then
-        If Inst10CountCurrentMenuEnable > 0 Then
-            Var Inst10MenuLoaded = "done"  
-        EndIf
-    EndIf
-
-    If Inst10CountDownForOpenXML > 0 Then
-        Var Inst10CountDownForOpenXML = Inst10CountDownForOpenXML - 1
-        DEBUGVAR Inst10CountDownForOpenXML
-        If Inst10CountDownForOpenXML = 0 Then
-            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_pepsi_7up.lxml"
-        EndIf
-    EndIf
-    
-
-    TimerReset
-</EventTimeout>
-
-;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
-
-
-
-
+
+
+<Popup>
+<Cache> "Enable" </Cache>
+<Width> 1080 </Width>
+<Height> 1920 </Height>
+;<Background> "0xeae6e1" </Background>
+<Volume> SoundVolume </Volume>
+<EventOpen>
+	; On open
+
+	DEBUGVAR SlientRefreshIndex
+
+	If SlientRefreshIndex = 8 Then
+		Var SlientRefreshIndex = 9
+	EndIf
+</EventOpen>
+
+<EventOnShow>
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
+    Var Menu61Selected = "PressForever"
+
+
+
+    Var Timeout = 0
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
+
+    
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
+
+    SetInstanceIgnoreTouch
+
+
+	DEBUGVAR SlientRefreshIndex
+</EventOnShow>
+
+<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_show9
+    ;DEBUGVAR inst_show9
+
+    
+
+    If inst_show9 = 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_show9 = 0 Then
+			GetXMLFileNameCurrentRunning CurrentOpenFile5
+			Open CurrentOpenFile5
+		Else
+			Var SlientRefreshIndex = 9
+		EndIf
+    EndIf
+
+    If inst_show9 = 1 Then
+        If langnext8 = "true" Then
+            Var langnext8 = "false"
+            DEBUGVAR langnext
+            RefreshAll
+        EndIf
+    EndIf
+
+    Var Inst10CountMenuEnable = 0
+    Var Inst10CountCurrentMenuEnable = 0
+    GetFrameScrollBlockCount Inst10CountCurrentMenuEnable
+    GetCurrentEnableBlockCount Inst10CountMenuEnable
+    
+    ;DEBUGVAR Inst10CountMenuEnable
+    ;DEBUGVAR Inst10CountMenuEnablePrev
+    ;DEBUGVAR Inst10CountCurrentMenuEnable
+
+    If Inst10CountMenuEnablePrev = "" Then
+        Var Inst10CountMenuEnablePrev = Inst10CountMenuEnable
+        Var Inst10CountDownForOpenXML = 0
+        Var Inst10CountDownOpenXMLFromMenuZero = 20
+    EndIf
+
+    If Inst10CountMenuEnable = Inst10CountMenuEnablePrev Then
+
+    Else
+        SAVELOG "Inst10 Refresh ===================================================================== Refresh"
+        Var Inst10CountDownForOpenXML = 10
+        Var Inst10CountMenuEnablePrev = CountMenuEnable
+    EndIf
+    
+    If Inst10CountMenuEnable = Inst10CountCurrentMenuEnable Then
+
+    Else
+        If Inst10CountDownForOpenXML = 0 Then
+            SAVELOG "Inst10 Refresh =======================Inst10CountMenuEnable / Inst10CountCurrentMenuEnable ============================================== Refresh"
+            Var Inst10CountDownForOpenXML = 10
+        EndIf
+    EndIf
+
+    If Inst10CountCurrentMenuEnable = 0 Then
+        
+        DEBUGVAR Inst10CountDownOpenXMLFromMenuZero
+
+        If Inst10CountDownOpenXMLFromMenuZero > 0 Then
+            Var Inst10CountDownOpenXMLFromMenuZero = Inst10CountDownOpenXMLFromMenuZero - 1
+            If Inst10CountDownOpenXMLFromMenuZero = 0 Then
+                Var Inst10CountDownOpenXMLFromMenuZero = 20
+                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_pepsi_7up.lxml"
+            EndIf
+        EndIf
+    EndIf
+
+    If Inst10CountMenuEnable = Inst10CountCurrentMenuEnable Then
+        If Inst10CountCurrentMenuEnable > 0 Then
+            Var Inst10MenuLoaded = "done"  
+        EndIf
+    EndIf
+
+    If Inst10CountDownForOpenXML > 0 Then
+        Var Inst10CountDownForOpenXML = Inst10CountDownForOpenXML - 1
+        DEBUGVAR Inst10CountDownForOpenXML
+        If Inst10CountDownForOpenXML = 0 Then
+            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_pepsi_7up.lxml"
+        EndIf
+    EndIf
+    
+
+    TimerReset
+</EventTimeout>
+
+;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
+
+
+
+
 <FrameScroll> 
 <X> 10 </X>
 <Y> 497 </Y>
@ -8812,8 +8812,8 @@
 	Open "ROOT/taobin_project/xml/page_payment_multi.xml"
 </EventClick>
 </Button>
-
-
-
-
-</Popup>
+
+
+
+
+</Popup>
--- a/inter/tha/xml/multi/page_catalog_group_recommend.lxml
+++ b/inter/tha/xml/multi/page_catalog_group_recommend.lxml
@ -1,200 +1,200 @@
-
-
-<Popup>
-<Cache> "Enable" </Cache>
-<Width> 1080 </Width>
-<Height> 1920 </Height>
-;<Background> "0xeae6e1" </Background>
-<Volume> SoundVolume </Volume>
-<EventOpen>
-	; On open
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"
-    
-    Var Menu1Selected = "PressForever"
-
-    Var OreoBigButtonEnable = "Enable"
-
-    If $12-01-01-0001.Button = "Invisible" Then
-        Var esp102101001Enable = "Invisible"
-        Var esp122101001Enable = "Enable"
-
-    Else
-        Var esp102101001Enable = "Enable"
-        Var esp122101001Enable = "Invisible"
-
-    EndIf
-    
-    SAVELOG PreviseXMLFileName2
-
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
-
-    Var Timeout = 0
-
-    If show_eng = "true" Then 
-    
-        Var text_unavailable = "UNAVAILABLE###size=16"
-    Else
-        Var text_unavailable = "หมด###size=32"
-    
-    EndIf
-
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
-     RootLayoutVisible 13 "show"
-    
-    
-    SetInstanceIgnoreTouch
-
-</EventOpen>
-
-<EventLanguageOnChange>
-    DEBUGVAR LanguageShow
-    If LanguageShow = "ENG" Then
-        Var DirImage2 = "ROOT/taobin_project/image/drink_option_en/"
-        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
-
-    EndIf
-    If LanguageShow = "THAI" Then
-        Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
-        Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
-    EndIf
-    If LanguageShow = "MYANMAR" Then 
-		Var show_eng = "true"
-		DEBUGVAR show_eng
-        Var DirImage2 = "ROOT/taobin_project/image/drink_option_mmr/"
-        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_mmr/"
-	EndIf
-    ;inter-image
-   If CountryName = "Malaysia" Then
-        Var DirImage2 = "ROOT/taobin_project/image/drink_option_myr/"
-        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
-        Var DirImage = "ROOT/taobin_project/image/page3_en"
-        Var ice_tab_text =  "Ice will be ready at "
-    EndIf
-    ;inter-image
-   If CountryName = "australia" Then
-        Var DirImage2 = "ROOT/taobin_project/image/drink_option_aus/"
-        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
-        Var DirImageAlterMilk = "ROOT/taobin_project/inter/aus/image/page3_2_en/"
-        Var DirImage = "ROOT/taobin_project/image/page3_en"
-        Var ice_tab_text =  "Ice will be ready at "
-    EndIf
-
-    ;SAVELOG "EventLanguageOnChange menu -list"
-
-    
-
-    Var LanguageButtonEnable = "Enable"
-    
-    OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
-    RefreshAll
-
-</EventLanguageOnChange>
-
-<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
-
-    Var Timeout  = Timeout + 1
-
-	;include="ROOT/taobin_project/inter/tha/xml/multi/EventTimeOutWihtOutMultiInstance.ev"
-
-    TimerReset
-</EventTimeout>
-
-;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
-
-<EventLanguageOnChange>
-    DEBUGVAR LanguageShow
-    If LanguageShow = "ENG" Then
-        Var DirImage2 = "ROOT/taobin_project/image/drink_option_en/"
-        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
-
-    EndIf
-    If LanguageShow = "THAI" Then
-        Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
-        Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
-    EndIf
-    If LanguageShow = "MYANMAR" Then 
-		Var show_eng = "true"
-		DEBUGVAR show_eng
-        Var DirImage2 = "ROOT/taobin_project/image/drink_option_mmr/"
-        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_mmr/"
-	EndIf
-    ;inter-image
-   If CountryName = "Malaysia" Then
-        Var DirImage2 = "ROOT/taobin_project/image/drink_option_myr/"
-        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
-        Var DirImage = "ROOT/taobin_project/image/page3_en"
-        Var ice_tab_text =  "Ice will be ready at "
-    EndIf
-    ;inter-image
-   If CountryName = "australia" Then
-        Var DirImage2 = "ROOT/taobin_project/image/drink_option_aus/"
-        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
-        Var DirImageAlterMilk = "ROOT/taobin_project/inter/aus/image/page3_2_en/"
-        Var DirImage = "ROOT/taobin_project/image/page3_en"
-        Var ice_tab_text =  "Ice will be ready at "
-    EndIf
-
-    ;SAVELOG "EventLanguageOnChange menu -list"
-
-    
-
-    Var LanguageButtonEnable = "Enable"
-
-
-    
-    OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
-    
-</EventLanguageOnChange>
-
+
+
+<Popup>
+<Cache> "Enable" </Cache>
+<Width> 1080 </Width>
+<Height> 1920 </Height>
+;<Background> "0xeae6e1" </Background>
+<Volume> SoundVolume </Volume>
+<EventOpen>
+	; On open
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"
+    
+    Var Menu1Selected = "PressForever"
+
+    Var OreoBigButtonEnable = "Enable"
+
+    If $12-01-01-0001.Button = "Invisible" Then
+        Var esp102101001Enable = "Invisible"
+        Var esp122101001Enable = "Enable"
+
+    Else
+        Var esp102101001Enable = "Enable"
+        Var esp122101001Enable = "Invisible"
+
+    EndIf
+    
+    SAVELOG PreviseXMLFileName2
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
+
+    Var Timeout = 0
+
+    If show_eng = "true" Then 
+    
+        Var text_unavailable = "UNAVAILABLE###size=16"
+    Else
+        Var text_unavailable = "หมด###size=32"
+    
+    EndIf
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
+     RootLayoutVisible 13 "show"
+    
+    
+    SetInstanceIgnoreTouch
+
+</EventOpen>
+
+<EventLanguageOnChange>
+    DEBUGVAR LanguageShow
+    If LanguageShow = "ENG" Then
+        Var DirImage2 = "ROOT/taobin_project/image/drink_option_en/"
+        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
+
+    EndIf
+    If LanguageShow = "THAI" Then
+        Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
+        Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
+    EndIf
+    If LanguageShow = "MYANMAR" Then 
+		Var show_eng = "true"
+		DEBUGVAR show_eng
+        Var DirImage2 = "ROOT/taobin_project/image/drink_option_mmr/"
+        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_mmr/"
+	EndIf
+    ;inter-image
+   If CountryName = "Malaysia" Then
+        Var DirImage2 = "ROOT/taobin_project/image/drink_option_myr/"
+        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
+        Var DirImage = "ROOT/taobin_project/image/page3_en"
+        Var ice_tab_text =  "Ice will be ready at "
+    EndIf
+    ;inter-image
+   If CountryName = "australia" Then
+        Var DirImage2 = "ROOT/taobin_project/image/drink_option_aus/"
+        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
+        Var DirImageAlterMilk = "ROOT/taobin_project/inter/aus/image/page3_2_en/"
+        Var DirImage = "ROOT/taobin_project/image/page3_en"
+        Var ice_tab_text =  "Ice will be ready at "
+    EndIf
+
+    ;SAVELOG "EventLanguageOnChange menu -list"
+
+    
+
+    Var LanguageButtonEnable = "Enable"
+    
+    OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
+    RefreshAll
+
+</EventLanguageOnChange>
+
+<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
+
+    Var Timeout  = Timeout + 1
+
+	;include="ROOT/taobin_project/inter/tha/xml/multi/EventTimeOutWihtOutMultiInstance.ev"
+
+    TimerReset
+</EventTimeout>
+
+;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
+
+<EventLanguageOnChange>
+    DEBUGVAR LanguageShow
+    If LanguageShow = "ENG" Then
+        Var DirImage2 = "ROOT/taobin_project/image/drink_option_en/"
+        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
+
+    EndIf
+    If LanguageShow = "THAI" Then
+        Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
+        Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
+    EndIf
+    If LanguageShow = "MYANMAR" Then 
+		Var show_eng = "true"
+		DEBUGVAR show_eng
+        Var DirImage2 = "ROOT/taobin_project/image/drink_option_mmr/"
+        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_mmr/"
+	EndIf
+    ;inter-image
+   If CountryName = "Malaysia" Then
+        Var DirImage2 = "ROOT/taobin_project/image/drink_option_myr/"
+        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
+        Var DirImage = "ROOT/taobin_project/image/page3_en"
+        Var ice_tab_text =  "Ice will be ready at "
+    EndIf
+    ;inter-image
+   If CountryName = "australia" Then
+        Var DirImage2 = "ROOT/taobin_project/image/drink_option_aus/"
+        Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
+        Var DirImageAlterMilk = "ROOT/taobin_project/inter/aus/image/page3_2_en/"
+        Var DirImage = "ROOT/taobin_project/image/page3_en"
+        Var ice_tab_text =  "Ice will be ready at "
+    EndIf
+
+    ;SAVELOG "EventLanguageOnChange menu -list"
+
+    
+
+    Var LanguageButtonEnable = "Enable"
+
+
+    
+    OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
+    
+</EventLanguageOnChange>
+
 <FrameScroll> 
 <Max> 16 </Max>
 <X> 10 </X>
@ -16958,28 +16958,120 @@
 	Open "ROOT/taobin_project/xml/page_payment_multi.xml"
 </EventClick>
 </Button>
-
-
-
-<Button>
-<X> 780 </X>
-<Y> 500 </Y>
-<State> buttonRemoveCup </State>
-;<Color> "0x00BDFF" </Color>
-<Interval> 500 </Interval>
-<Filename> "ROOT/taobin_project/image/main_page_inter/bn_remove_cup.png" </Filename>
-<Filename> "ROOT/taobin_project/image/main_page_inter/bp_remove_cup.png" </Filename>
-<EventClick> 
-    Machine RemoveCup
-    Machine DoorLidOpen
-    Var buttonRemoveCup = "Invisible"
-</EventClick>
-</Button>
-
-
-
-;BigLogoLayout
-
-</Popup>
-
-
+
+
+
+<Button>
+<X> 780 </X>
+<Y> 500 </Y>
+<State> buttonRemoveCup </State>
+;<Color> "0x00BDFF" </Color>
+<Interval> 500 </Interval>
+<Filename> "ROOT/taobin_project/image/main_page_inter/bn_remove_cup.png" </Filename>
+<Filename> "ROOT/taobin_project/image/main_page_inter/bp_remove_cup.png" </Filename>
+<EventClick> 
+    Machine RemoveCup
+    Machine DoorLidOpen
+    Var buttonRemoveCup = "Invisible"
+</EventClick>
+</Button>
+
+
+
+;BigLogoLayout
+
+
+
+
+<EventUnitTest1>
+
+Var NameDrink = "ICED  SANTA GINGER"
+		Var NameDrinkTH = "ซานต้าจินเจอร์"
+		Var DrinkDescriptionTH = "ขิง นม น้ำเชื่อมคาราเมล และน้ำ"
+		Var DrinkDescription = "GINGER , MILK, CARAMEL SYRUP AND WATER"
+		Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_santa_ginger.png"
+		Var OpenFromXML = CurrentXMLFileName2
+		Var PriceD1 = $-.Price
+		Var PriceD2 = $12-23-02-0081.Price
+		Var PriceD3 = $-.Price
+		Var PD_CODE1 = "##-##-##-####"
+		Var PD_CODE2 = "12-23-02-0081"
+		Var PD_CODE3 = "##-##-##-####"
+		Var PD_STAGE_1 = "Disable2"
+		Var PD_STAGE_2 = $12-23-02-0081.Button
+		Var PD_STAGE_3 = "Disable2"
+		Var OverlayMenuFilter !assigned xmlpro( 12-23-02-0081, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_pic_%s_posi1.png")
+		DEBUGVAR OverlayMenuFilter
+		Var SelectCountDrinkType = 0
+		Var DefaultDrinkType = 0
+		If PD_STAGE_1 = "Enable" Then
+			Var SelectCountDrinkType = SelectCountDrinkType + 1
+			Var DefaultDrinkType = 1
+		EndIf
+		If PD_STAGE_2 = "Enable" Then
+			Var SelectCountDrinkType = SelectCountDrinkType + 1
+			Var DefaultDrinkType = 2
+		EndIf
+		If PD_STAGE_3 = "Enable" Then
+			Var SelectCountDrinkType = SelectCountDrinkType + 1
+			Var DefaultDrinkType = 3
+		EndIf
+		Topping "Load" "12-23-02-0081"
+
+
+		Var menu_name_eng_hot = $##-##-##-####.NameE
+		Var menu_desc_eng_hot = $##-##-##-####.descriptionE
+		Var menu_name_thai_hot = $##-##-##-####.Name
+		Var menu_desc_thai_hot = $##-##-##-####.description
+		
+		Var menu_name_eng_cold = $12-23-02-0081.NameE
+		Var menu_desc_eng_cold = $12-23-02-0081.descriptionE
+		Var menu_name_thai_cold = $12-23-02-0081.Name
+		Var menu_desc_thai_cold = $12-23-02-0081.description
+		
+		Var menu_name_eng_blender = $##-##-##-####.NameE
+		Var menu_desc_eng_blender = $##-##-##-####.descriptionE
+		Var menu_name_thai_blender = $##-##-##-####.Name
+		Var menu_desc_thai_blender = $##-##-##-####.description
+		
+		DEBUGVAR PD_STAGE_1
+		DEBUGVAR PD_STAGE_2
+		DEBUGVAR PD_STAGE_3
+		Var SelectDrinkType = 0
+		
+		DEBUGVAR NameDrink
+        DEBUGVAR $12-23-02-0081.Button
+        
+				TabMenuVisibleInst 99
+		If RedirectToNormalVersion = 1 Then
+			Var menu_name_eng_hot = NameLang[0][0]
+			Var menu_desc_eng_hot = DescLang[0][0]
+			Var menu_name_thai_hot = NameLang[0][1]
+			Var menu_desc_thai_hot = DescLang[0][1]
+			Var menu_name_eng_cold = NameLang[1][0]
+			Var menu_desc_eng_cold = DescLang[1][0]
+			Var menu_name_thai_cold = NameLang[1][1]
+			Var menu_desc_thai_cold = DescLang[1][1]
+			Var menu_name_eng_blender = NameLang[2][0]
+			Var menu_desc_eng_blender = DescLang[2][0]
+			Var menu_name_thai_blender = NameLang[2][1]
+			Var menu_desc_thai_blender = DescLang[2][1]
+			If show_eng = "true" then
+				Var NameDrink = aliasName[0]
+				Var DrinkDescription =  aliasDesc[0]
+			Else
+				Var NameDrinkTH = aliasName[1]
+				Var DrinkDescriptionTH = aliasDesc[1]
+			EndIf
+			OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_topping_select7.xml"
+		Else
+			OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/page_topping_select6.lxml"
+		EndIf
+		
+		
+
+</EventUnitTest1>
+
+</Popup>
+
+
--- a/inter/tha/xml/multi/page_catalog_group_recommend.skt
+++ b/inter/tha/xml/multi/page_catalog_group_recommend.skt
@ -223,6 +223,7 @@

 ;BigLogoLayout

+
 </Popup>


--- a/inter/tha/xml/multi/page_catalog_group_tea.lxml
+++ b/inter/tha/xml/multi/page_catalog_group_tea.lxml
@ -1,174 +1,174 @@
-
-
-<Popup>
-<Cache> "Enable" </Cache>
-<Width> 1080 </Width>
-<Height> 1920 </Height>
-;<Background> "0xeae6e1" </Background>
-<Volume> SoundVolume </Volume>
-<EventOpen>
-	
-    SetInstanceIgnoreTouch
-
-	DEBUGVAR SlientRefreshIndex
-
-	If SlientRefreshIndex = 3 Then
-		Var SlientRefreshIndex = 4
-
-	EndIf
-
-    
-</EventOpen>
-
-
-<EventOnShow>
-    ; On open
-	;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"   
-    Var Menu3Selected = "PressForever"
-
-    
-    SAVELOG PreviseXMLFileName2
-     ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
-
-    Var Timeout = 0
-
-    RootLayoutVisible 10 "show"
-
-
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
-
-</EventOnShow>
-
-<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
-
-    If inst_show3 = 1 Then
-        If langnext2 = "true" Then
-            Var langnext2 = "false"
-            DEBUGVAR langnext
-            RefreshAll
-        EndIf
-    EndIf
-
-    Var Inst6CountMenuEnable = 0
-    Var Inst6CountCurrentMenuEnable = 0
-    GetFrameScrollBlockCount Inst6CountCurrentMenuEnable
-    GetCurrentEnableBlockCount Inst6CountMenuEnable
-    
-    ;DEBUGVAR Inst6CountMenuEnable
-    ;DEBUGVAR Inst6CountMenuEnablePrev
-    ;DEBUGVAR Inst6CountCurrentMenuEnable
-
-    If Inst6CountMenuEnablePrev = "" Then
-        Var Inst6CountMenuEnablePrev = Inst6CountMenuEnable
-        Var Inst6CountDownForOpenXML = 0
-        Var Inst6CountDownOpenXMLFromMenuZero = 20
-    EndIf
-
-    If Inst6CountMenuEnable = Inst6CountMenuEnablePrev Then
-
-    Else
-        SAVELOG "Inst6 Refresh ===================================================================== Refresh"
-        Var Inst6CountDownForOpenXML = 10
-        Var Inst6CountMenuEnablePrev = CountMenuEnable
-    EndIf
-
-    If Inst6CountMenuEnable = Inst6CountCurrentMenuEnable Then
-
-    Else
-        If Inst6CountDownForOpenXML = 0 Then
-            SAVELOG "Inst6 Refresh =======================Inst6CountMenuEnable / Inst6CountCurrentMenuEnable ============================================== Refresh"
-            Var Inst6CountDownForOpenXML = 10
-        EndIf
-    EndIf
-
-
-    If Inst6CountCurrentMenuEnable = 0 Then
-        
-        DEBUGVAR Inst6CountDownOpenXMLFromMenuZero
-
-        If Inst6CountDownOpenXMLFromMenuZero > 0 Then
-            Var Inst6CountDownOpenXMLFromMenuZero = Inst6CountDownOpenXMLFromMenuZero - 1
-            If Inst6CountDownOpenXMLFromMenuZero = 0 Then
-                Var Inst6CountDownOpenXMLFromMenuZero = 20
-                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_tea.lxml"
-            EndIf
-        EndIf
-    EndIf
-
-	If Inst6CountMenuEnable = Inst6CountCurrentMenuEnable Then
-        If Inst6CountCurrentMenuEnable > 0 Then
-            Var Inst6MenuLoaded = "done"  
-        EndIf
-    EndIf
-
-    If Inst6CountDownForOpenXML > 0 Then
-        Var Inst6CountDownForOpenXML = Inst6CountDownForOpenXML - 1
-        DEBUGVAR Inst6CountDownForOpenXML
-        If Inst6CountDownForOpenXML = 0 Then
-            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_tea.lxml"
-        EndIf
-    EndIf
-    
-
-    TimerReset
-</EventTimeout>
-
-
-;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
-
-
-
-
-
-
-
+
+
+<Popup>
+<Cache> "Enable" </Cache>
+<Width> 1080 </Width>
+<Height> 1920 </Height>
+;<Background> "0xeae6e1" </Background>
+<Volume> SoundVolume </Volume>
+<EventOpen>
+	
+    SetInstanceIgnoreTouch
+
+	DEBUGVAR SlientRefreshIndex
+
+	If SlientRefreshIndex = 3 Then
+		Var SlientRefreshIndex = 4
+
+	EndIf
+
+    
+</EventOpen>
+
+
+<EventOnShow>
+    ; On open
+	;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"   
+    Var Menu3Selected = "PressForever"
+
+    
+    SAVELOG PreviseXMLFileName2
+     ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
+
+    Var Timeout = 0
+
+    RootLayoutVisible 10 "show"
+
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
+
+</EventOnShow>
+
+<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
+
+    If inst_show3 = 1 Then
+        If langnext2 = "true" Then
+            Var langnext2 = "false"
+            DEBUGVAR langnext
+            RefreshAll
+        EndIf
+    EndIf
+
+    Var Inst6CountMenuEnable = 0
+    Var Inst6CountCurrentMenuEnable = 0
+    GetFrameScrollBlockCount Inst6CountCurrentMenuEnable
+    GetCurrentEnableBlockCount Inst6CountMenuEnable
+    
+    ;DEBUGVAR Inst6CountMenuEnable
+    ;DEBUGVAR Inst6CountMenuEnablePrev
+    ;DEBUGVAR Inst6CountCurrentMenuEnable
+
+    If Inst6CountMenuEnablePrev = "" Then
+        Var Inst6CountMenuEnablePrev = Inst6CountMenuEnable
+        Var Inst6CountDownForOpenXML = 0
+        Var Inst6CountDownOpenXMLFromMenuZero = 20
+    EndIf
+
+    If Inst6CountMenuEnable = Inst6CountMenuEnablePrev Then
+
+    Else
+        SAVELOG "Inst6 Refresh ===================================================================== Refresh"
+        Var Inst6CountDownForOpenXML = 10
+        Var Inst6CountMenuEnablePrev = CountMenuEnable
+    EndIf
+
+    If Inst6CountMenuEnable = Inst6CountCurrentMenuEnable Then
+
+    Else
+        If Inst6CountDownForOpenXML = 0 Then
+            SAVELOG "Inst6 Refresh =======================Inst6CountMenuEnable / Inst6CountCurrentMenuEnable ============================================== Refresh"
+            Var Inst6CountDownForOpenXML = 10
+        EndIf
+    EndIf
+
+    If Inst6CountMenuEnable = Inst6CountCurrentMenuEnable Then
+        If Inst6CountCurrentMenuEnable > 0 Then
+            Var Inst6MenuLoaded = "done"  
+        EndIf
+    EndIf
+
+
+    If Inst6CountCurrentMenuEnable = 0 Then
+        
+        DEBUGVAR Inst6CountDownOpenXMLFromMenuZero
+
+        If Inst6CountDownOpenXMLFromMenuZero > 0 Then
+            Var Inst6CountDownOpenXMLFromMenuZero = Inst6CountDownOpenXMLFromMenuZero - 1
+            If Inst6CountDownOpenXMLFromMenuZero = 0 Then
+                Var Inst6CountDownOpenXMLFromMenuZero = 20
+                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_tea.lxml"
+            EndIf
+        EndIf
+    EndIf
+
+    If Inst6CountDownForOpenXML > 0 Then
+        Var Inst6CountDownForOpenXML = Inst6CountDownForOpenXML - 1
+        DEBUGVAR Inst6CountDownForOpenXML
+        If Inst6CountDownForOpenXML = 0 Then
+            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_tea.lxml"
+        EndIf
+    EndIf
+    
+
+    TimerReset
+</EventTimeout>
+
+
+;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
+
+
+
+
+
+
+
 <FrameScroll> 
 <X> 10 </X>
 <Y> 497 </Y>
@ -13110,8 +13110,8 @@
 	Open "ROOT/taobin_project/xml/page_payment_multi.xml"
 </EventClick>
 </Button>
-
-
-
-
-</Popup>
+
+
+
+
+</Popup>
--- a/inter/tha/xml/multi/page_catalog_group_whey.lxml
+++ b/inter/tha/xml/multi/page_catalog_group_whey.lxml
@ -1,185 +1,185 @@
-
-
-<Popup>
-<Cache> "Enable" </Cache>
-<Width> 1080 </Width>
-<Height> 1920 </Height>
-;<Background> "0xeae6e1" </Background>
-<Volume> SoundVolume </Volume>
-<EventOpen>
-
-	DEBUGVAR SlientRefreshIndex
-
-	If SlientRefreshIndex = 5 Then
-		Var SlientRefreshIndex = 6
-	EndIf
-
-</EventOpen>
-
-<EventOnShow>
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
-    If AppFastEnable = "true" Then
-        Var Menu11Selected = "PressForever" 
-        Var Menu7Selected = "Invisible"
-    Else
-        Var Menu11Selected = "Invisible" 
-        Var Menu7Selected = "PressForever"
-    EndIf
-
-    RootLayoutVisible 12 "show"
-
-    Var Timeout = 0
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
-
-    SetInstanceIgnoreTouch
-
-
-    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
-
-	DEBUGVAR SlientRefreshIndex
-</EventOnShow>
-
-<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 = 5 Then
-		If inst_show8 = 0 Then
-			GetXMLFileNameCurrentRunning CurrentOpenFile8
-			Open CurrentOpenFile8
-		Else
-			Var SlientRefreshIndex = 6
-		EndIf
-    EndIf
-
-    If inst_show8 = 1 Then
-        If langnext7 = "true" Then
-            Var langnext7 = "false"
-            DEBUGVAR langnext
-            RefreshAll
-        EndIf
-    EndIf
-
-
-    Var Inst8CountMenuEnable = 0
-    Var Inst8CountCurrentMenuEnable = 0
-    GetFrameScrollBlockCount Inst8CountCurrentMenuEnable
-    GetCurrentEnableBlockCount Inst8CountMenuEnable
-    
-    ;DEBUGVAR Inst8CountMenuEnable
-    ;DEBUGVAR Inst8CountMenuEnablePrev
-    ;DEBUGVAR Inst8CountCurrentMenuEnable
-
-    If Inst8CountMenuEnablePrev = "" Then
-        Var Inst8CountMenuEnablePrev = Inst8CountMenuEnable
-        Var Inst8CountDownForOpenXML = 0
-        Var Inst8CountDownOpenXMLFromMenuZero = 20
-    EndIf
-
-    If Inst8CountMenuEnablePrev = "" Then
-        Var Inst8CountMenuEnablePrev = Inst8CountMenuEnable
-        Var Inst8CountDownForOpenXML = 0
-        Var Inst8CountDownOpenXMLFromMenuZero = 20
-    EndIf
-
-    If Inst8CountMenuEnable = Inst8CountMenuEnablePrev Then
-
-    Else
-        SAVELOG "Inst8 Refresh ===================================================================== Refresh"
-        Var Inst8CountDownForOpenXML = 10
-        Var Inst8CountMenuEnablePrev = CountMenuEnable
-    EndIf
-    
-    If Inst6CountMenuEnable = Inst6CountCurrentMenuEnable Then
-
-    Else
-        If Inst6CountDownForOpenXML = 0 Then
-            SAVELOG "Inst6 Refresh =======================Inst6CountMenuEnable / Inst6CountCurrentMenuEnable ============================================== Refresh"
-            Var Inst6CountDownForOpenXML = 10
-        EndIf
-    EndIf
-
-    If Inst8CountCurrentMenuEnable = 0 Then
-        
-        DEBUGVAR Inst8CountDownOpenXMLFromMenuZero
-
-        If Inst8CountDownOpenXMLFromMenuZero > 0 Then
-            Var Inst8CountDownOpenXMLFromMenuZero = Inst8CountDownOpenXMLFromMenuZero - 1
-            If Inst8CountDownOpenXMLFromMenuZero = 0 Then
-                Var Inst8CountDownOpenXMLFromMenuZero = 20
-                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_whey.lxml"
-            EndIf
-        EndIf
-    EndIf
-
-    If Inst8CountDownForOpenXML > 0 Then
-        Var Inst8CountDownForOpenXML = Inst8CountDownForOpenXML - 1
-        DEBUGVAR Inst8CountDownForOpenXML
-        If Inst8CountDownForOpenXML = 0 Then
-            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_whey.lxml"
-        EndIf
-    EndIf
-    
-
-
-    TimerReset
-</EventTimeout>
-
-;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
-
-
-
-
+
+
+<Popup>
+<Cache> "Enable" </Cache>
+<Width> 1080 </Width>
+<Height> 1920 </Height>
+;<Background> "0xeae6e1" </Background>
+<Volume> SoundVolume </Volume>
+<EventOpen>
+
+	DEBUGVAR SlientRefreshIndex
+
+	If SlientRefreshIndex = 5 Then
+		Var SlientRefreshIndex = 6
+	EndIf
+
+</EventOpen>
+
+<EventOnShow>
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"    
+    If AppFastEnable = "true" Then
+        Var Menu11Selected = "PressForever" 
+        Var Menu7Selected = "Invisible"
+    Else
+        Var Menu11Selected = "Invisible" 
+        Var Menu7Selected = "PressForever"
+    EndIf
+
+    RootLayoutVisible 12 "show"
+
+    Var Timeout = 0
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
+
+    SetInstanceIgnoreTouch
+
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
+
+	DEBUGVAR SlientRefreshIndex
+</EventOnShow>
+
+<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 = 5 Then
+		If inst_show8 = 0 Then
+			GetXMLFileNameCurrentRunning CurrentOpenFile8
+			Open CurrentOpenFile8
+		Else
+			Var SlientRefreshIndex = 6
+		EndIf
+    EndIf
+
+    If inst_show8 = 1 Then
+        If langnext7 = "true" Then
+            Var langnext7 = "false"
+            DEBUGVAR langnext
+            RefreshAll
+        EndIf
+    EndIf
+
+
+    Var Inst8CountMenuEnable = 0
+    Var Inst8CountCurrentMenuEnable = 0
+    GetFrameScrollBlockCount Inst8CountCurrentMenuEnable
+    GetCurrentEnableBlockCount Inst8CountMenuEnable
+    
+    ;DEBUGVAR Inst8CountMenuEnable
+    ;DEBUGVAR Inst8CountMenuEnablePrev
+    ;DEBUGVAR Inst8CountCurrentMenuEnable
+
+    If Inst8CountMenuEnablePrev = "" Then
+        Var Inst8CountMenuEnablePrev = Inst8CountMenuEnable
+        Var Inst8CountDownForOpenXML = 0
+        Var Inst8CountDownOpenXMLFromMenuZero = 20
+    EndIf
+
+    If Inst8CountMenuEnablePrev = "" Then
+        Var Inst8CountMenuEnablePrev = Inst8CountMenuEnable
+        Var Inst8CountDownForOpenXML = 0
+        Var Inst8CountDownOpenXMLFromMenuZero = 20
+    EndIf
+
+    If Inst8CountMenuEnable = Inst8CountMenuEnablePrev Then
+
+    Else
+        SAVELOG "Inst8 Refresh ===================================================================== Refresh"
+        Var Inst8CountDownForOpenXML = 10
+        Var Inst8CountMenuEnablePrev = CountMenuEnable
+    EndIf
+    
+    If Inst6CountMenuEnable = Inst6CountCurrentMenuEnable Then
+
+    Else
+        If Inst6CountDownForOpenXML = 0 Then
+            SAVELOG "Inst6 Refresh =======================Inst6CountMenuEnable / Inst6CountCurrentMenuEnable ============================================== Refresh"
+            Var Inst6CountDownForOpenXML = 10
+        EndIf
+    EndIf
+
+    If Inst8CountCurrentMenuEnable = 0 Then
+        
+        DEBUGVAR Inst8CountDownOpenXMLFromMenuZero
+
+        If Inst8CountDownOpenXMLFromMenuZero > 0 Then
+            Var Inst8CountDownOpenXMLFromMenuZero = Inst8CountDownOpenXMLFromMenuZero - 1
+            If Inst8CountDownOpenXMLFromMenuZero = 0 Then
+                Var Inst8CountDownOpenXMLFromMenuZero = 20
+                Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_whey.lxml"
+            EndIf
+        EndIf
+    EndIf
+
+    If Inst8CountDownForOpenXML > 0 Then
+        Var Inst8CountDownForOpenXML = Inst8CountDownForOpenXML - 1
+        DEBUGVAR Inst8CountDownForOpenXML
+        If Inst8CountDownForOpenXML = 0 Then
+            Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_whey.lxml"
+        EndIf
+    EndIf
+    
+
+
+    TimerReset
+</EventTimeout>
+
+;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
+
+
+
+
 <FrameScroll> 
 <X> 10 </X>
 <Y> 497 </Y>
@ -4958,8 +4958,8 @@
 	Open "ROOT/taobin_project/xml/page_payment_multi.xml"
 </EventClick>
 </Button>
-
-
-
-
-</Popup>
+
+
+
+
+</Popup>
--- a/inter/tha/xml/multi/tab_menu.lxml
+++ b/inter/tha/xml/multi/tab_menu.lxml
@ -30,6 +30,12 @@

    DEBUGVAR DirImageAlter

+    If SpiralOnline = "true" Then 
+        If Seeker =  "curr" Then
+            Var MenuVSelected2 = "Enable"
+        EndIf
+    EndIf 
+    
 </EventOpen>
 <Timeout> 10000 </Timeout>
 <EventTimeout>