push file

This commit is contained in:
wanlop run 2025-02-03 10:04:00 +07:00
parent b433d3e3e4
commit a118f1a73a
52 changed files with 1394 additions and 21503 deletions

View file

@ -1101,8 +1101,9 @@
; Below. Pendding from XMLProfile
DEBUGVAR MyanmarLangEnable
DEBUGVAR EnableMultiInstance
;Var MyanmarLangEnable = "true"
Var MyanmarLangEnable = "false"
STRCONTAIN "MyanmarLang" XMLProfile MyanmarLangEnable
;Var MyanmarLangEnable = "false"
;Var MyanmarLangEnable = ""
@ -1324,44 +1325,6 @@
Var SlientRefreshEnable = 0
Var ShouldShowNamHomCoconutRemainReward = 0
Var ShowNamHomCoconutRemainReward = "Invisible"
Var GetNamHomCoconutRemainReward = 0
Var NamHomCoconutRemainReward_Y = 1071
Var NamHomCoconutRemainRewardNumber_Y = 1130
Var dummyPhone = "089999999"
If GetNamHomCoconutRemainRewardLastTime = "" Then
Var GetNamHomCoconutRemainRewardLastTime = 0
EndIf
DEBUGVAR NamHomCoconutPro
DEBUGVAR CurrentMainVideo
If NamHomCoconutPro = 1 Then
If CurrentMainVideo = 2 Then
Var ShouldShowNamHomCoconutRemainReward = 1
DEBUGVAR GetNamHomCoconutRemainRewardLastTime
DEBUGVAR SystemTimeMinuteInt
Var TimeDiff = SystemTimeMinuteInt - GetNamHomCoconutRemainRewardLastTime
DEBUGVAR TimeDiff
If TimeDiff >= 15 Then
DEBUGVAR "update nam hom coconut remain reward!!!"
DEBUGVAR GetNamHomCoconutRemainReward
If GetNamHomCoconutRemainReward = 0 Then
GETACCEXT dummyPhone 34
Var GetNamHomCoconutRemainReward = 1
EndIf
Else
If TimeDiff <= -15 Then
DEBUGVAR "update nam hom coconut remain reward!!!"
If GetNamHomCoconutRemainReward = 0 Then
GETACCEXT dummyPhone 34
Var GetNamHomCoconutRemainReward = 1
EndIf
EndIf
EndIf
EndIf
EndIf
Var CurrentMainVideo = CurrentMainVideoTemp
@ -1389,87 +1352,6 @@
Var RedirectToNormalVersion = 0
READ_FILE "/mnt/sdcard/coffeevending/MyanmarLangEnable" MyanmarLangEnable
DEBUGVAR MyanmarLangEnable
If MyanmarLangEnable = "" Then
Else
If EnableMultiInstance = "true" Then
If MyanmarLangEnable = "" Then
Var MyanmarLangEnable = "false"
EndIf
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
EnableLanguage "ENG"
EnableLanguage "THAI"
;EnableLanguage "MYANMAR"
Var RedirectToNormalVersion = 1
If MyanmarLangEnable = "true" Then
EnableLanguage "MYANMAR"
Var RedirectToNormalVersion = 0
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 MemberButtonFileName = "ROOT/taobin_project/image/main_page/bp_main_page_member.png"
;Var MemberButtonFileNameRest = "ROOT/taobin_project/image/main_page/bn_main_page_member.png"
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
If UsePepsiTheme = 1 Then
If InternationalEnable = 1 Then
; enable-color