HKG: Fix bug langs flag, Upscale flag image 20 pers

This commit is contained in:
Ittipat Lusuk 2025-04-02 10:54:11 +07:00
parent 3c05684c63
commit 1209d34c42
27 changed files with 6495 additions and 6487 deletions

Binary file not shown.

Before

Width:  |  Height:  |  Size: 2.4 KiB

After

Width:  |  Height:  |  Size: 2.4 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 2.4 KiB

After

Width:  |  Height:  |  Size: 2.5 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 2.4 KiB

After

Width:  |  Height:  |  Size: 2.5 KiB

Before After
Before After

View file

@ -263,7 +263,7 @@
Refresh
Var LanguageButtonEnable = "Enable"
Var LanguageButtonEnable = "Invisible"
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 438 - 38

View file

@ -263,7 +263,7 @@
Refresh
Var LanguageButtonEnable = "Enable"
Var LanguageButtonEnable = "Invisible"
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 438 - 38

View file

@ -263,7 +263,7 @@
Refresh
Var LanguageButtonEnable = "Enable"
Var LanguageButtonEnable = "Invisible"
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 438 - 38

View file

@ -123,7 +123,7 @@
Refresh
Var LanguageButtonEnable = "Enable"
Var LanguageButtonEnable = "Invisible"
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 438 - 38

View file

@ -263,7 +263,7 @@
Refresh
Var LanguageButtonEnable = "Enable"
Var LanguageButtonEnable = "Invisible"
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 438 - 38

View file

@ -263,7 +263,7 @@
Refresh
Var LanguageButtonEnable = "Enable"
Var LanguageButtonEnable = "Invisible"
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 438 - 38

View file

@ -263,7 +263,7 @@
Refresh
Var LanguageButtonEnable = "Enable"
Var LanguageButtonEnable = "Invisible"
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 438 - 38

View file

@ -116,7 +116,7 @@
Var LanguageButtonEnable = "Enable"
Var LanguageButtonEnable = "Invisible"
Var ButtonLanguageCurrentXPosition = 1005
Var ButtonLanguageCurrentYPosition = 458 - 38

View file

@ -479,7 +479,7 @@
Play PlaySoundLag
Var countDownRetrun = 120
Var LanguageButtonEnable = "Enable"
Var LanguageButtonEnable = "Invisible"
Var ButtonLanguageCurrentXPosition = 1005
Var ButtonLanguageCurrentYPosition = 458 - 38

View file

@ -1,234 +1,234 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
;include="ROOT/taobin_project/inter/hkg/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/hkg/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/hkg/xml/multi/menu_catalog_new_menu.lxml"
RootLayoutVisible 13 "show"
RootLayoutVisible 3 "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
If LanguageShow = "MTC" Then
Var DirImage2 = "ROOT/taobin_project/inter/hkg/image/drink_option_mtc/"
Var DirImageAlter = "ROOT/taobin_project/inter/hkg/image/page3_2_mtc/"
Var ice_tab_text = "冰塊及時準備好了。 "
EndIf
If LanguageShow = "MSC" Then
Var DirImage2 = "ROOT/taobin_project/inter/hkg/image/drink_option_msc/"
Var DirImageAlter = "ROOT/taobin_project/inter/hkg/image/page3_2_msc/"
Var ice_tab_text = "冰块及时准备好了。 "
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 LanguageShow = "ENG" Then
InstanceSetString "ShowEng"
EndIf
If LanguageShow = "MTC" Then
InstanceSetString "ShowMTC"
EndIf
If LanguageShow = "MSC" Then
InstanceSetString "ShowMSC"
EndIf
EndIf
EndIf
; setvarint SlientRefreshEnable 1
;DEBUGVAR SlientRefreshEnable
If SlientRefreshEnable = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If LanguageShow = "ENG" Then
InstanceSetString "ShowEng"
EndIf
If LanguageShow = "MTC" Then
InstanceSetString "ShowMTC"
EndIf
If LanguageShow = "MSC" Then
InstanceSetString "ShowMSC"
EndIf
EndIf
EndIf
Var Timeout = Timeout + 1
;include="ROOT/taobin_project/inter/hkg/xml/multi/EventTimeOutWihtOutMultiInstance.ev"
TimerReset
</EventTimeout>
;include="ROOT/taobin_project/inter/hkg/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
If LanguageShow = "MTC" Then
Var DirImage2 = "ROOT/taobin_project/inter/hkg/image/drink_option_mtc/"
Var DirImageAlter = "ROOT/taobin_project/inter/hkg/image/page3_2_mtc/"
Var ice_tab_text = "冰塊及時準備好了。 "
EndIf
If LanguageShow = "MSC" Then
Var DirImage2 = "ROOT/taobin_project/inter/hkg/image/drink_option_msc/"
Var DirImageAlter = "ROOT/taobin_project/inter/hkg/image/page3_2_msc/"
Var ice_tab_text = "冰块及时准备好了。 "
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/hkg/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/hkg/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/hkg/xml/multi/menu_catalog_new_menu.lxml"
RootLayoutVisible 13 "show"
RootLayoutVisible 3 "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
If LanguageShow = "MTC" Then
Var DirImage2 = "ROOT/taobin_project/inter/hkg/image/drink_option_mtc/"
Var DirImageAlter = "ROOT/taobin_project/inter/hkg/image/page3_2_mtc/"
Var ice_tab_text = "冰塊及時準備好了。 "
EndIf
If LanguageShow = "MSC" Then
Var DirImage2 = "ROOT/taobin_project/inter/hkg/image/drink_option_msc/"
Var DirImageAlter = "ROOT/taobin_project/inter/hkg/image/page3_2_msc/"
Var ice_tab_text = "冰块及时准备好了。 "
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 = "Invisible"
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 LanguageShow = "ENG" Then
InstanceSetString "ShowEng"
EndIf
If LanguageShow = "MTC" Then
InstanceSetString "ShowMTC"
EndIf
If LanguageShow = "MSC" Then
InstanceSetString "ShowMSC"
EndIf
EndIf
EndIf
; setvarint SlientRefreshEnable 1
;DEBUGVAR SlientRefreshEnable
If SlientRefreshEnable = 1 Then
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
If LanguageShow = "ENG" Then
InstanceSetString "ShowEng"
EndIf
If LanguageShow = "MTC" Then
InstanceSetString "ShowMTC"
EndIf
If LanguageShow = "MSC" Then
InstanceSetString "ShowMSC"
EndIf
EndIf
EndIf
Var Timeout = Timeout + 1
;include="ROOT/taobin_project/inter/hkg/xml/multi/EventTimeOutWihtOutMultiInstance.ev"
TimerReset
</EventTimeout>
;include="ROOT/taobin_project/inter/hkg/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
If LanguageShow = "MTC" Then
Var DirImage2 = "ROOT/taobin_project/inter/hkg/image/drink_option_mtc/"
Var DirImageAlter = "ROOT/taobin_project/inter/hkg/image/page3_2_mtc/"
Var ice_tab_text = "冰塊及時準備好了。 "
EndIf
If LanguageShow = "MSC" Then
Var DirImage2 = "ROOT/taobin_project/inter/hkg/image/drink_option_msc/"
Var DirImageAlter = "ROOT/taobin_project/inter/hkg/image/page3_2_msc/"
Var ice_tab_text = "冰块及时准备好了。 "
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 = "Invisible"
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
</EventLanguageOnChange>
<FrameScroll>
<Max> 16 </Max>
<X> 10 </X>
@ -12946,29 +12946,29 @@
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
</Popup>

View file

@ -97,7 +97,7 @@
Var LanguageButtonEnable = "Enable"
Var LanguageButtonEnable = "Invisible"
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
RefreshAll
@ -223,7 +223,7 @@
Var LanguageButtonEnable = "Enable"
Var LanguageButtonEnable = "Invisible"

File diff suppressed because it is too large Load diff

View file

@ -246,7 +246,7 @@
Refresh
Var LanguageButtonEnable = "Enable"
Var LanguageButtonEnable = "Invisible"
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 438 - 38

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

View file

@ -1083,7 +1083,10 @@
If CountryName = "HongKong" Then
If EnableMultiInstance = "true" Then
; Change lang icon for hkg
Var LanguageButtonEnable = "Invisible"
Var BtnLangToggleIndex = "Enable"
Var InternationalEnable = 1
Var CurrentPageShowError = 0
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/hkg/video/script_video.ev"
@ -1111,7 +1114,7 @@
Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Invisible"
Var PriceUnitText = "HKG$"
Var PriceUnitText = "HK$"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
Var MemberButtonFileNameRest = "ROOT/taobin_project/image/main_page_en/bn_main_page_member.png"

View file

@ -206,7 +206,12 @@
<EventLanguageOnChange>
DEBUGVAR LanguageShow
Var LanguageButtonEnable = "Enable"
If CountryName = "HongKong" Then
Var LanguageButtonEnable = "Invisible"
Else
Var LanguageButtonEnable = "Enable"
EndIf
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 648

View file

@ -95,8 +95,8 @@
Var BtnLangCurrentXPosition = 990
Var BtnLangCurrentYPosition = 648
Else
Var BtnLangCurrentXPosition = 1005
Var BtnLangCurrentYPosition = 458 - 48
Var BtnLangCurrentXPosition = 990
Var BtnLangCurrentYPosition = 458 - 65
EndIf
If LanguageShowByIndex = 0 Then