Do inter + multi part hybirde promotion

This commit is contained in:
wanlop run 2024-11-26 21:56:59 +07:00
parent 6286e03248
commit bc20c55e74
21 changed files with 1337 additions and 1063 deletions

View file

@ -1318,149 +1318,84 @@
Var RoadShow = "false"
TRY "ROOT/taobin_project/xml/sometime/RoadShow.ev"
; New mode
; Inter + Multi-Instance available ./inter/tha/multi
; Below. Pendding from XMLProfile
DEBUGVAR MyanmarLangEnable
;Var MyanmarLangEnable = "true"
Var MyanmarLangEnable = "false"
;Var MyanmarLangEnable = ""
If MyanmarLangEnable = "true" Then
If CountryName = "Thailand" Then
Var InternationalEnable = 1
DEBUGVAR InternationalEnable
<<<<<<< HEAD
=======
;TRY "/mnt/sdcard/coffeevending/taobin_project/inter/tha/video/script_video.ev"
>>>>>>> 4d7e488313173bec282db0015199ea5afb5d2418
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"
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 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
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
<<<<<<< HEAD
If MyanmarLangEnable = "false" Then
If CountryName = "Thailand" Then
Var InternationalEnable = 1
DEBUGVAR InternationalEnable
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"
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 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
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 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"
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"
EndIf
EndIf
EndIf
>>>>>>> 4d7e488313173bec282db0015199ea5afb5d2418
If UsePepsiTheme = 1 Then
If InternationalEnable = 1 Then
; enable-color
@ -1630,7 +1565,7 @@ PRICE "Reset" "-"
</EventUnitTest3>
<EventUnitTest4>
If CountryName = "Thailand" Then
If CountryName = "-Thailand-" Then
Var InternationalEnable = 1
DEBUGVAR InternationalEnable
@ -1875,6 +1810,7 @@ PRICE "Reset" "-"
;DEBUGVAR MachineStage
;DEBUGVAR CountDownShowButton
;DEBUGVAR ShowButtonClick
;DEBUGVAR ShowButtonClickFull
;DEBUGVAR CountDownPauseVideo
@ -1904,11 +1840,7 @@ PRICE "Reset" "-"
If UsePepsiTheme = 1 Then
Var ShowButtonClickFull = "Enable"
EndIf
If InternationalEnable = 1 Then
If CountryName = "Thailand" Then
Var ShowButtonClickFull = "Enable"
EndIf
EndIf
Refresh
EndIf
@ -1947,15 +1879,18 @@ PRICE "Reset" "-"
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
@ -2114,17 +2049,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>