pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

Merged + MYS: update new promotion Melonzy

Browse source
This commit is contained in:
Pakin 2025-02-11 14:05:32 +07:00
parent 124a46b3d5
commit 7e0076614a
31 changed files with 30835 additions and 15687 deletions
Download patch file Download diff file Expand all files Collapse all files

6308
inter/tha/xml/multi/page_catalog_group_coffee.lxml
View file

File diff suppressed because it is too large Load diff

40
inter/tha/xml/multi/page_catalog_group_coffee.skt
View file

@ -1,5 +1,5 @@
<?hurr
#include=menu_head.py
<?hurr
#include=menu_head.py
?>
<Popup>
@ -10,7 +10,7 @@
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
If SlientRefreshIndex = 2 Then
Var SlientRefreshIndex = 3
@ -26,7 +26,7 @@
<EventOnShow>
SAVELOG "Onshow 1"
;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"
Var Menu2Selected = "PressForever"
SAVELOG "Onshow 2"
@ -39,7 +39,7 @@
SetInstanceIgnoreTouch
DEBUGVAR SlientRefreshIndex
</EventOnShow>
@ -54,7 +54,7 @@
Var ice_tab_process_show = "Invisible"
EndIf
GetVisible inst_show2
;DEBUGVAR inst_show2
@ -67,7 +67,7 @@
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
@ -84,12 +84,12 @@
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
@ -98,7 +98,7 @@
SAVELOG "OPEN slient 1"
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
Else
Var SlientRefreshIndex = 3
EndIf
@ -115,7 +115,7 @@
InstanceGetString SaveStringInst
If SaveStringInst = "RefreshNow" Then
Else
If LanguageShow = "ENG" Then
Var SaveStringInst = "ShowEng"
@ -132,7 +132,7 @@
EndIf
EndIf
@ -140,7 +140,7 @@
Var Inst5CountCurrentMenuEnable = 0
GetFrameScrollBlockCount Inst5CountCurrentMenuEnable
GetCurrentEnableBlockCount Inst5CountMenuEnable
;DEBUGVAR Inst5CountMenuEnable
;DEBUGVAR Inst5CountMenuEnablePrev
;DEBUGVAR Inst5CountCurrentMenuEnable
@ -169,7 +169,7 @@
EndIf
If Inst5CountCurrentMenuEnable = 0 Then
DEBUGVAR Inst5CountDownOpenXMLFromMenuZero
If Inst5CountDownOpenXMLFromMenuZero > 0 Then
@ -184,7 +184,7 @@
If Inst5CountMenuEnable = Inst5CountCurrentMenuEnable Then
If Inst5CountCurrentMenuEnable > 0 Then
Var Inst5MenuLoaded = "done"
Var Inst5MenuLoaded = "done"
EndIf
EndIf
@ -197,7 +197,7 @@
EndIf
InstanceGetString SaveStringInst
If SaveStringInst = "RefreshNow" Then
Else
If LanguageShow = "ENG" Then
Var SaveStringInst = "ShowEng"
@ -227,7 +227,7 @@
Var ScriptCoffeeMenu = 0
SAVELOG "Runscript 3"
Script "-" "-"
EndIf
EndIf
If CoffeeRefreshTimeOut > 15 Then
Var CoffeeRefreshTimeOut = 0
@ -235,7 +235,7 @@
EndIf
Var CoffeeRefreshTimeOut = CoffeeRefreshTimeOut + 1
TimerReset
</EventTimeout>
@ -245,10 +245,10 @@
<?hurr
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
<?hurr
#include=menu_new_layout_gen.py
?>

1466
inter/tha/xml/multi/page_catalog_group_forkid.lxml
View file

File diff suppressed because it is too large Load diff

38
inter/tha/xml/multi/page_catalog_group_forkid.skt
View file

@ -1,5 +1,5 @@
<?hurr
#include=menu_head.py
<?hurr
#include=menu_head.py
touch_less_gen = False
?>
@ -11,7 +11,7 @@
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
SetInstanceIgnoreTouch
DEBUGVAR SlientRefreshIndex
@ -23,14 +23,14 @@
</EventOpen>
<EventOnShow>
;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"
; protein
If AppFastEnable = "true" Then
Var Menu11Selected = "PressForever"
Var Menu11Selected = "PressForever"
Var Menu7Selected = "Invisible"
Var Menu21Selected = "Invisible"
Else
Var Menu11Selected = "Invisible"
Var Menu11Selected = "Invisible"
Var Menu7Selected = "Invisible"
Var Menu21Selected = "PressForever"
EndIf
@ -60,8 +60,8 @@
EndIf
GetVisible inst_show5
;DEBUGVAR inst_show5
@ -73,7 +73,7 @@
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
@ -89,12 +89,12 @@
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
@ -119,7 +119,7 @@
InstanceGetString SaveStringInst
If SaveStringInst = "RefreshNow" Then
Else
If LanguageShow = "ENG" Then
Var SaveStringInst = "ShowEng"
@ -142,7 +142,7 @@
Var Inst8CountCurrentMenuEnable = 0
GetFrameScrollBlockCount Inst8CountCurrentMenuEnable
GetCurrentEnableBlockCount Inst8CountMenuEnable
;DEBUGVAR Inst8CountMenuEnable
;DEBUGVAR Inst8CountMenuEnablePrev
;DEBUGVAR Inst8CountCurrentMenuEnable
@ -169,10 +169,10 @@
Var Inst8CountDownForOpenXML = 10
EndIf
EndIf
If Inst8CountCurrentMenuEnable = 0 Then
DEBUGVAR Inst8CountDownOpenXMLFromMenuZero
If Inst8CountDownOpenXMLFromMenuZero > 0 Then
@ -186,7 +186,7 @@
If Inst8CountMenuEnable = Inst8CountCurrentMenuEnable Then
If Inst8CountCurrentMenuEnable > 0 Then
Var Inst8MenuLoaded = "done"
Var Inst8MenuLoaded = "done"
EndIf
EndIf
@ -197,7 +197,7 @@
Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_forkid.lxml"
EndIf
EndIf
TimerReset
</EventTimeout>
@ -206,10 +206,10 @@
<?hurr
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
<?hurr
#include=menu_new_layout_gen.py
?>

400
inter/tha/xml/multi/page_catalog_group_pepsi_7up.lxml
View file

@ -1,198 +1,198 @@
<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 langnext9 = "true" Then
Var langnext9 = "false"
RefreshAll
EndIf
If inst_show9 = 1 Then
InstanceGetString SaveStringInst
If SaveStringInst = "RefreshNow" Then
Else
If LanguageShow = "ENG" Then
Var SaveStringInst = "ShowEng"
Var show_eng = "false"
EndIf
If LanguageShow = "THAI" Then
Var SaveStringInst = "ShowThai"
Var show_eng = "true"
EndIf
If LanguageShow = "MYANMAR" Then
Var show_eng = "false"
Var SaveStringInst = "ShowMYANMAR"
EndIf
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 langnext9 = "true" Then
Var langnext9 = "false"
RefreshAll
EndIf
If inst_show9 = 1 Then
InstanceGetString SaveStringInst
If SaveStringInst = "RefreshNow" Then
Else
If LanguageShow = "ENG" Then
Var SaveStringInst = "ShowEng"
Var show_eng = "false"
EndIf
If LanguageShow = "THAI" Then
Var SaveStringInst = "ShowThai"
Var show_eng = "true"
EndIf
If LanguageShow = "MYANMAR" Then
Var show_eng = "false"
Var SaveStringInst = "ShowMYANMAR"
EndIf
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>
@ -10869,8 +10869,8 @@
Open "ROOT/taobin_project/xml/page_payment_multi.xml"
</EventClick>
</Button>
</Popup>
</Popup>

38
inter/tha/xml/multi/page_catalog_group_pepsi_7up.skt
View file

@ -1,5 +1,5 @@
<?hurr
#include=menu_head.py
<?hurr
#include=menu_head.py
echo param
?>
@ -20,7 +20,7 @@
</EventOpen>
<EventOnShow>
;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_default_init.lxml"
Var Menu61Selected = "PressForever"
@ -29,7 +29,7 @@
;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
@ -50,12 +50,12 @@
EndIf
GetVisible inst_show9
;DEBUGVAR inst_show9
If inst_show9 = 1 Then
InstanceGetString SaveStringInst
@ -64,12 +64,12 @@
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
@ -81,12 +81,12 @@
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If show_eng = "true" Then
If show_eng = "true" Then
InstanceSetString "ShowEng"
Else
InstanceSetString "ShowThai"
EndIf
EndIf
EndIf
@ -109,7 +109,7 @@
InstanceGetString SaveStringInst
If SaveStringInst = "RefreshNow" Then
Else
If LanguageShow = "ENG" Then
Var SaveStringInst = "ShowEng"
@ -130,7 +130,7 @@
Var Inst10CountCurrentMenuEnable = 0
GetFrameScrollBlockCount Inst10CountCurrentMenuEnable
GetCurrentEnableBlockCount Inst10CountMenuEnable
;DEBUGVAR Inst10CountMenuEnable
;DEBUGVAR Inst10CountMenuEnablePrev
;DEBUGVAR Inst10CountCurrentMenuEnable
@ -148,7 +148,7 @@
Var Inst10CountDownForOpenXML = 10
Var Inst10CountMenuEnablePrev = CountMenuEnable
EndIf
If Inst10CountMenuEnable = Inst10CountCurrentMenuEnable Then
Else
@ -159,7 +159,7 @@
EndIf
If Inst10CountCurrentMenuEnable = 0 Then
DEBUGVAR Inst10CountDownOpenXMLFromMenuZero
If Inst10CountDownOpenXMLFromMenuZero > 0 Then
@ -173,7 +173,7 @@
If Inst10CountMenuEnable = Inst10CountCurrentMenuEnable Then
If Inst10CountCurrentMenuEnable > 0 Then
Var Inst10MenuLoaded = "done"
Var Inst10MenuLoaded = "done"
EndIf
EndIf
@ -184,7 +184,7 @@
Open "ROOT/taobin_project/inter/tha/xml/multi/page_catalog_group_pepsi_7up.lxml"
EndIf
EndIf
TimerReset
</EventTimeout>
@ -196,10 +196,10 @@
<?hurr
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
<?hurr
#include=menu_new_layout_gen.py
?>