THAI INTER: thai inter new-layout with 3 langs

This commit is contained in:
Ittipat Lusuk 2024-11-27 17:56:12 +07:00
commit c4135c748f
1324 changed files with 182160 additions and 281147 deletions

View file

@ -12,6 +12,8 @@
Var ToggleAfterEventProfileOff = 0
Var SetSpiralOnline = 0
;TopView "hide"
;OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/topview_blank_main.xml"
Var FileNumber = 1
@ -93,6 +95,7 @@
Var KanitRegularTTF = "ROOT/taobin_project/font/Kanit/Kanit-Regular.ttf"
Var KanitThinTTF = "ROOT/taobin_project/font/Kanit/Kanit-Thin.ttf"
Var KanitLightTTF = "ROOT/taobin_project/font/Kanit/Kanit-Light.ttf"
Var KanitSemiBold = "ROOT/taobin_project/font/Kanit/Kanit-SemiBold.ttf"
Var OpunMediumTTF = "ROOT/taobin_project/font/Opun/Opun-Medium.ttf"
Var OpunThinTTF = "ROOT/taobin_project/font/Opun/Opun-Thin.ttf"
@ -112,6 +115,8 @@
Var ChivoMonoBold = "ROOT/taobin_project/font/ChivoMono/ChivoMono-Bold.ttf"
Var ChivoMonoSemiBold = "ROOT/taobin_project/font/ChivoMono/ChivoMono-SemiBold.ttf"
Var MontserratBold = "ROOT/taobin_project/font/Montserrat/Montserrat-Bold.ttf"
Var InterRegular = "ROOT/taobin_project/font/Inter/Inter-Regular.ttf"
@ -1313,79 +1318,86 @@
Var RoadShow = "false"
TRY "ROOT/taobin_project/xml/sometime/RoadShow.ev"
;MyanmarLangEnable
;
;
If BoxID = 210699 Then
If CountryName = "Thailand" Then
Var InternationalEnable = 1
DEBUGVAR InternationalEnable
; New mode
; Inter + Multi-Instance available ./inter/tha/multi
; Below. Pendding from XMLProfile
DEBUGVAR MyanmarLangEnable
DEBUGVAR EnableMultiInstance
;Var MyanmarLangEnable = "true"
Var MyanmarLangEnable = "false"
;Var MyanmarLangEnable = ""
If MyanmarLangEnable = "" Then
Else
If EnableMultiInstance = "true" Then
If CountryName = "Thailand" Then
Var InternationalEnable = 1
DEBUGVAR InternationalEnable
;TRY "/mnt/sdcard/coffeevending/taobin_project/inter/tha/video/script_video.ev"
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/multi_ads/ads_path.ev"
;specified to unittest4
Var OpenFileXML = CountryRootPath + "xml/event/tricker.ev"
DEBUGVAR OpenFileXML
TRY OpenFileXML
Var WebAppShow = "Invisible"
EnableLanguage "ENG"
EnableLanguage "THAI"
;EnableLanguage "MYANMAR"
If MyanmarLangEnable = "true" Then
EnableLanguage "MYANMAR"
EndIf
SetLanguage "THAI"
LanguageControl "UpdateList" "-"
Var show_eng = "false"
;Var ShowNetworkProblemText = "Network error. Payment Cash only."
Var CountryRootPath = "ROOT/taobin_project/inter/tha/"
Var CountryShortName = "tha"
Var TextPriceMenuSize = 12
Var TextPriceMenuY = 266
Var TextPriceMenuBlendX = 180
Var TextPriceMenuHotX = 48
Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Enable"
Var PriceUnitText = ""
Var show_eng_button_stage = "Invisible"
Var XButtonMember = 384
Var YButtonMember = 1695
If Not#LanguageLoaded = "" Then
LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/tha/menu/lang.tsv"
EndIf
Var cups_sold_text = "Cups Sold Worldwide"
Var MinPhoneNumber = 10
Var MaxPhoneNumber = 10
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/sold_cup_count.xml"
;TRY "/mnt/sdcard/coffeevending/taobin_project/inter/tha/video/script_video.ev"
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/multi_ads/ads_path.ev"
;specified to unittest4
Var OpenFileXML = CountryRootPath + "xml/event/tricker.ev"
DEBUGVAR OpenFileXML
TRY OpenFileXML
Var WebAppShow = "Invisible"
EnableLanguage "ENG"
EnableLanguage "THAI"
EnableLanguage "MYANMAR"
Var ENABLE_UAE_DUBAI = "Invisible"
SetLanguage "THAI"
LanguageControl "UpdateList" "-"
Var show_eng = "false"
;Var img_press_main_page = "ROOT/taobin_project/image/main_page/bp_main_page_start.png"
;Var img_rest_main_page = ""
;Var img_reset_topup = ""
;ROOT/taobin_project/image/main_page/bn_main_page_topup.png
;Var ShowNetworkProblemText = "Network error. Payment Cash only."
Var CountryRootPath = "ROOT/taobin_project/inter/tha/"
Var CountryShortName = "tha"
Var TextPriceMenuSize = 12
Var TextPriceMenuY = 266
Var TextPriceMenuBlendX = 180
Var TextPriceMenuHotX = 48
Var ShowButtonClick = "Enable"
Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Enable"
Var LanguageObjectShow = "Enable"
Var NoLangObjectShow = "Invisible"
Var PriceUnitText = ""
;Var MemberButtonFileName = "ROOT/taobin_project/image/TermTempage2/bp_main_page_member.png"
;Var MemberButtonFileNameRest = "ROOT/taobin_project/image/TermTempage2/bn_main_page_member.png"
Var show_eng_button_stage = "Invisible"
Var CountDownShowButton = 35
Var XButtonMember = 384
Var YButtonMember = 1695
If Not#LanguageLoaded = "" Then
LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/tha/menu/lang.tsv"
EndIf
Var cups_sold_text = "Cups Sold Worldwide"
Var MinPhoneNumber = 10
Var MaxPhoneNumber = 10
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/sold_cup_count.xml"
EndIf
EndIf
If UsePepsiTheme = 1 Then
If InternationalEnable = 1 Then
; enable-color
@ -1435,9 +1447,11 @@
Machine DoorClose
Machine NewPaymentOpenBrewingXMLEnable
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_hide.lxml"
</EventOpen>
<EventActionOk>
@ -1553,10 +1567,10 @@ PRICE "Reset" "-"
</EventUnitTest3>
<EventUnitTest4>
If CountryName = "Thailand" Then
If CountryName = "-Thailand-" Then
Var InternationalEnable = 1
DEBUGVAR InternationalEnable
;TRY "/mnt/sdcard/coffeevending/taobin_project/inter/tha/video/script_video.ev"
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/multi_ads/ads_path.ev"
@ -1591,13 +1605,13 @@ PRICE "Reset" "-"
Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Enable"
Var PriceUnitText = ""
;Var MemberButtonFileName = "ROOT/taobin_project/image/TermTempage2/bp_main_page_member.png"
;Var MemberButtonFileNameRest = "ROOT/taobin_project/image/TermTempage2/bn_main_page_member.png"
Var show_eng_button_stage = "Invisible"
Var CountDownShowButton = 35
@ -1798,6 +1812,7 @@ PRICE "Reset" "-"
;DEBUGVAR MachineStage
;DEBUGVAR CountDownShowButton
;DEBUGVAR ShowButtonClick
;DEBUGVAR ShowButtonClickFull
;DEBUGVAR CountDownPauseVideo
@ -1828,12 +1843,7 @@ PRICE "Reset" "-"
If UsePepsiTheme = 1 Then
Var ShowButtonClickFull = "Enable"
EndIf
If InternationalEnable = 1 Then
If CountryName = "Thailand" Then
Var ShowButtonClick = "Enable"
Var ShowButtonClickFull = "Enable"
EndIf
EndIf
Refresh
EndIf
@ -1847,6 +1857,7 @@ PRICE "Reset" "-"
DEBUGVAR CountDownPauseVideo2
If CountDownPauseVideo = 2 Then
TapScreen 30 638
EndIf
@ -1869,17 +1880,21 @@ PRICE "Reset" "-"
Var OpenFromPageBoard = 1
DEBUGVAR InternationalEnable
DEBUGVAR CountryName
If InternationalEnable = 1 Then
; show language icon
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
RootLayoutVisible 3 "show"
If CountryName = "Thailand" Then
SAVELOG " Thailand Thailand Thailand Thailand Pooon Pooon Pooon Pooon Pooon"
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/script_common_for_open_promotion_xml.ev"
Else
; show language icon
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
RootLayoutVisible 3 "show"
Var OpenFileXML = CountryRootPath + "xml/event/script_common_for_open_promotion_xml.ev"
TRY OpenFileXML
;OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_group_recommend.lxml"
Var OpenFileXML = CountryRootPath + "xml/event/script_common_for_open_promotion_xml.ev"
TRY OpenFileXML
EndIf
Else
If BeerTrapEnable = "true" Then
@ -1906,7 +1921,7 @@ PRICE "Reset" "-"
Var CountUpReloadAll = CountUpReloadAll + 1
DEBUGVAR CountUpReloadAll
; setvarint CountUpReloadAll 49
; Original value is 40
If EnableMultiInstance = "true" Then
@ -1919,6 +1934,19 @@ PRICE "Reset" "-"
ReloadAll
EndIf
If CountUpReloadAll = 50 Then
Var SlientRefreshIndex = 2
EndIf
If CountUpReloadAll = 150 Then
Var SlientRefreshIndex = 2
EndIf
If CountUpReloadAll = 200 Then
Var SlientRefreshIndex = 2
EndIf
If CountUpReloadAll = 250 Then
Var SlientRefreshIndex = 2
EndIf
Else
If CountUpReloadAll > 100 Then
Var NeedReboot = "false"
@ -2025,17 +2053,18 @@ PRICE "Reset" "-"
If TaobinOnlineX = "true" Then
Var CountDownShowButton = 35
EndIf
If TermTemOnline = "true" Then
Var CountDownShowButton = 28
If EventTurnOn = 1 Then
Var CountDownShowButton = 30
EndIf
Var CountDownPauseVideo = 6
If TaobinOnlineX = "true" Then
;TouchTapClose
If EventTurnOn = 1 Then
Var CountDownPauseVideo = 12
EndIf
;Open CurrentXMLFileName0
Refresh
</EventEnd>
@ -2303,14 +2332,16 @@ PRICE "Reset" "-"
If InternationalEnable = 1 Then
; show language icon
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
RootLayoutVisible 3 "show"
Var OpenFileXML = CountryRootPath + "xml/event/script_common_for_open_promotion_xml.ev"
TRY OpenFileXML
;OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_group_recommend.lxml"
If CountryName = "Thailand" Then
SAVELOG " Thailand Thailand Thailand Thailand Pooon Pooon Pooon Pooon Pooon"
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/script_common_for_open_promotion_xml.ev"
Else ; show language icon
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
RootLayoutVisible 3 "show"
Var OpenFileXML = CountryRootPath + "xml/event/script_common_for_open_promotion_xml.ev"
TRY OpenFileXML
EndIf
Else
If CocktailShow = "true" Then