SNAP 9.66

inter/tha/xml/multi/page_catalog_group_coffee.skt

@@ -161,9 +161,11 @@
     GetFrameScrollBlockCount Inst5CountCurrentMenuEnable
     GetCurrentEnableBlockCount Inst5CountMenuEnable
 
-    ;DEBUGVAR Inst5CountMenuEnable
-    ;DEBUGVAR Inst5CountMenuEnablePrev
-    ;DEBUGVAR Inst5CountCurrentMenuEnable
+    If XMLMultiDebug = 1 Then
+        DEBUGVAR Inst5CountMenuEnable
+        DEBUGVAR Inst5CountMenuEnablePrev
+        DEBUGVAR Inst5CountCurrentMenuEnable
+    EndIf
 
     If Inst5CountMenuEnablePrev = "" Then
         Var Inst5CountMenuEnablePrev = Inst5CountMenuEnable

inter/tha/xml/multi/page_catalog_group_forkid.skt

@@ -20,6 +20,8 @@
 		Var SlientRefreshIndex = 6
 	EndIf
 
+    Var ForKidRefreshTimeOut = 0
+
 </EventOpen>
 
 <EventOnShow>
@@ -162,9 +164,11 @@
     GetFrameScrollBlockCount Inst8CountCurrentMenuEnable
     GetCurrentEnableBlockCount Inst8CountMenuEnable
 
-    ;DEBUGVAR Inst8CountMenuEnable
-    ;DEBUGVAR Inst8CountMenuEnablePrev
-    ;DEBUGVAR Inst8CountCurrentMenuEnable
+    If XMLMultiDebug = 1 Then
+        DEBUGVAR Inst8CountMenuEnable
+        DEBUGVAR Inst8CountMenuEnablePrev
+        DEBUGVAR Inst8CountCurrentMenuEnable
+    EndIf
 
     If Inst8CountMenuEnablePrev = "" Then
         Var Inst8CountMenuEnablePrev = Inst8CountMenuEnable
@@ -217,6 +221,14 @@
         EndIf
     EndIf
 
+
+    If ForKidRefreshTimeOut > 15 Then
+        Var ForKidRefreshTimeOut = 0
+        Script "-" "-"
+    EndIf
+
+    Var ForKidRefreshTimeOut = ForKidRefreshTimeOut + 1
+
     TimerReset
 </EventTimeout>
 

inter/tha/xml/multi/page_catalog_group_milk.skt

@@ -16,6 +16,8 @@
 	If SlientRefreshIndex = 4 Then
 		Var SlientRefreshIndex = 5
 	EndIf
+
+    Var MilkRefreshTimeOut = 0
 </EventOpen>
 
 <EventOnShow>
@@ -149,9 +151,11 @@
     GetFrameScrollBlockCount Inst7CountCurrentMenuEnable
     GetCurrentEnableBlockCount Inst7CountMenuEnable
     
-    ;DEBUGVAR Inst7CountMenuEnable
-    ;DEBUGVAR Inst7CountMenuEnablePrev
-    ;DEBUGVAR Inst7CountCurrentMenuEnable
+    If XMLMultiDebug = 1 Then
+        DEBUGVAR Inst7CountMenuEnable
+        DEBUGVAR Inst7CountMenuEnablePrev
+        DEBUGVAR Inst7CountCurrentMenuEnable
+    EndIf
 
     If Inst7CountMenuEnablePrev = "" Then
         Var Inst7CountMenuEnablePrev = Inst7CountMenuEnable
@@ -204,6 +208,15 @@
         EndIf
     EndIf
 
+
+    If MilkRefreshTimeOut > 15 Then
+        Var MilkRefreshTimeOut = 0
+        Script "-" "-"
+    EndIf
+
+    Var MilkRefreshTimeOut = MilkRefreshTimeOut + 1
+
+
     TimerReset
 </EventTimeout>
 

inter/tha/xml/multi/page_catalog_group_other_other.skt

@@ -17,6 +17,8 @@
 		Var SlientRefreshIndex = 8
 	EndIf
 
+    Var OtherOtherRefreshTimeOut = 0
+
 </EventOpen>
 
 <EventOnShow>
@@ -190,6 +192,12 @@
         Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_other_other.lxml"
     EndIf
     
+    If OtherOtherRefreshTimeOut > 15 Then
+        Var OtherOtherRefreshTimeOut = 0
+        Script "-" "-"
+    EndIf
+
+    Var OtherOtherRefreshTimeOut = OtherOtherRefreshTimeOut + 1
 
 
     TimerReset

inter/tha/xml/multi/page_catalog_group_pepsi_7up.skt

@@ -151,9 +151,11 @@
     GetFrameScrollBlockCount Inst10CountCurrentMenuEnable
     GetCurrentEnableBlockCount Inst10CountMenuEnable
 
-    ;DEBUGVAR Inst10CountMenuEnable
-    ;DEBUGVAR Inst10CountMenuEnablePrev
-    ;DEBUGVAR Inst10CountCurrentMenuEnable
+    If XMLMultiDebug = 1 Then
+        DEBUGVAR Inst10CountMenuEnable
+        DEBUGVAR Inst10CountMenuEnablePrev
+        DEBUGVAR Inst10CountCurrentMenuEnable
+    EndIf
 
     If Inst10CountMenuEnablePrev = "" Then
         Var Inst10CountMenuEnablePrev = Inst10CountMenuEnable

inter/tha/xml/multi/page_catalog_group_tea.skt

@@ -20,7 +20,7 @@
 
 	EndIf
 
-    
+    Var TeakRefreshTimeOut = 0
 </EventOpen>
 
 
@@ -123,9 +123,12 @@
     GetFrameScrollBlockCount Inst6CountCurrentMenuEnable
     GetCurrentEnableBlockCount Inst6CountMenuEnable
     
-    ;DEBUGVAR Inst6CountMenuEnable
-    ;DEBUGVAR Inst6CountMenuEnablePrev
-    ;DEBUGVAR Inst6CountCurrentMenuEnable
+    If XMLMultiDebug = 1 Then
+        DEBUGVAR Inst6CountMenuEnable
+        DEBUGVAR Inst6CountMenuEnablePrev
+        DEBUGVAR Inst6CountCurrentMenuEnable
+    EndIf
+
 
     If Inst6CountMenuEnablePrev = "" Then
         Var Inst6CountMenuEnablePrev = Inst6CountMenuEnable
@@ -177,6 +180,14 @@
             Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_tea.lxml"
         EndIf
     EndIf
+
+    If TeakRefreshTimeOut > 15 Then
+        Var TeakRefreshTimeOut = 0
+        Script "-" "-"
+    EndIf
+
+    Var TeakRefreshTimeOut = TeakRefreshTimeOut + 1
+
     
 
     TimerReset

inter/tha/xml/multi/page_catalog_group_whey.skt

@@ -159,9 +159,11 @@
     GetFrameScrollBlockCount Inst8CountCurrentMenuEnable
     GetCurrentEnableBlockCount Inst8CountMenuEnable
     
-    ;DEBUGVAR Inst8CountMenuEnable
-    ;DEBUGVAR Inst8CountMenuEnablePrev
-    ;DEBUGVAR Inst8CountCurrentMenuEnable
+    If XMLMultiDebug = 1 Then
+        DEBUGVAR Inst8CountMenuEnable
+        DEBUGVAR Inst8CountMenuEnablePrev
+        DEBUGVAR Inst8CountCurrentMenuEnable
+    EndIf
 
     If Inst8CountMenuEnablePrev = "" Then
         Var Inst8CountMenuEnablePrev = Inst8CountMenuEnable

inter/tha/xml/multi/v3/page_catalog_group_pro_kingdom_thai_tea.skt

@@ -0,0 +1,88 @@
+<?hurr 
+    #include=menu_head.py 
+?>
+
+<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 Timeout = 0
+
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
+
+    SetInstanceIgnoreTouch
+</EventOpen>
+
+<Timeout> 1000 </Timeout>
+<EventTimeout>
+    ;DEBUGVAR ICE_PROCESS_STATUS
+
+    If ICE_PROCESS_STATUS = 2 Then
+        Var ice_tab_process_show = "Enable"
+        Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
+    Else
+        Var ice_tab_process_show = "Invisible"
+    EndIf
+
+
+    
+
+    GetVisible inst_show
+    ;DEBUGVAR inst_show
+
+    InstanceGetString SaveStringInst
+    ;DEBUGVAR SaveStringInst
+
+    If inst_show = 1 Then
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+    ; setvarint SlientRefreshEnable 1
+    ;DEBUGVAR SlientRefreshEnable
+
+    If SlientRefreshEnable = 1 Then
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+    TimerReset
+</EventTimeout>
+
+;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
+
+
+
+<?hurr 
+    #include=menu_new_layout_gen_v3.py
+?>
+
+
+
+</Popup>

inter/tha/xml/multi/v3/page_catalog_group_pro_matcha_every_day.skt

@@ -0,0 +1,88 @@
+<?hurr 
+    #include=menu_head.py 
+?>
+
+<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 Timeout = 0
+
+
+    ;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
+
+    SetInstanceIgnoreTouch
+</EventOpen>
+
+<Timeout> 1000 </Timeout>
+<EventTimeout>
+    ;DEBUGVAR ICE_PROCESS_STATUS
+
+    If ICE_PROCESS_STATUS = 2 Then
+        Var ice_tab_process_show = "Enable"
+        Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
+    Else
+        Var ice_tab_process_show = "Invisible"
+    EndIf
+
+
+    
+
+    GetVisible inst_show
+    ;DEBUGVAR inst_show
+
+    InstanceGetString SaveStringInst
+    ;DEBUGVAR SaveStringInst
+
+    If inst_show = 1 Then
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+    ; setvarint SlientRefreshEnable 1
+    ;DEBUGVAR SlientRefreshEnable
+
+    If SlientRefreshEnable = 1 Then
+        If SaveStringInst = "RefreshNow" Then
+            GetXMLFileNameCurrentRunning CurrentOpenFile
+            Open CurrentOpenFile
+
+            If show_eng = "true" Then 
+                InstanceSetString "ShowEng"
+            Else
+                InstanceSetString "ShowThai"
+            EndIf
+       
+        EndIf
+    EndIf
+
+    TimerReset
+</EventTimeout>
+
+;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
+
+
+
+<?hurr 
+    #include=menu_new_layout_gen_v3.py
+?>
+
+
+
+</Popup>