taobin_project/xml/page_board.xml
2024-07-16 14:15:55 +07:00

1903 lines
43 KiB
XML

<Page>
<X> 0 </X>
<Y> 608 </Y>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
;TopView "hide"
;OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/topview_blank_main.xml"
Var FileNumber = 1
Var img_press_main_page = "ROOT/taobin_project/image/main_page/bp_main_page_start.png"
Var img_rest_main_page = ""
Var MemberButtonFileNameRest = ""
Var img_reset_topup = ""
Var CNTDOWN_PROTECT_SCREEN_BLANK = 120
DEBUGVAR SoundVolume
Var credit_card_enable = ""
READ_FILE "/mnt/sdcard/credit_card_enable" credit_card_enable
Var eng_enable = "true"
Var thai_enable = "true"
Var show_eng = "false"
Var NextOrder = "false"
Var Seeker = "next"
Var Seeker.thankLidFlag = 0
Var Seeker.thankStrawFlag = 0
Var Seeker = "curr"
Var Seeker.thankLidFlag = 0
Var Seeker.thankStrawFlag = 0
DEBUGVAR web_ref
DEBUGVAR web_payment
DEBUGVAR web_telnum
DEBUGVAR web_code
DEBUGVAR web_pin
Var web_telnumOK = ""
Var web_readyOK = "false"
Var GetFreeFromError = 0
Cart "DeleteMenuID" "ALL"
Var MultiPayEnable = "false"
;Var MultiPayEnable = "true"
Var ShoppyPayEnable = "true"
Var WebAppEnable = "true"
Var WebAppShow = "Enable"
Var PayType = ""
Var Seeker.CurrCreditAmount = 0
Var Seeker.CurrCreditUse = 0
Var Seeker.CurrCreditTelNum = ""
Var Seeker.CurrCreditPinNum = ""
DEBUGVAR PaySuccessWithDaemonTask
Var PaidPaymentFromNextStage = 0
Var DrinkPaid = "-"
; On open
Var menu_back_to_main = "ROOT/taobin_project/xml/page_back_to_main.xml"
Var charOfBaht = "฿"
Var KanitTTF = "ROOT/taobin_project/font/Kanit/Kanit-Light.ttf"
Var KanitMediaTTF = "ROOT/taobin_project/font/Kanit/Kanit-Medium.ttf"
Var KanitBoldTTF = "ROOT/taobin_project/font/Kanit/Kanit-Bold.ttf"
Var RobotoBold = "ROOT/taobin_project/font/Roboto/Roboto-Bold.ttf"
Var RobotoBlack = "ROOT/taobin_project/font/Roboto/Roboto-Black.ttf"
Var RobotoRegular = "ROOT/taobin_project/font/Roboto/Roboto-Regular.ttf"
Var RobotoThin = "ROOT/taobin_project/font/Roboto/Roboto-Thin.ttf"
Var RobotoCondensedRegular = "ROOT/taobin_project/font/Roboto/RobotoCondensed-Regular.ttf"
Var KanitMediumTTF = "ROOT/taobin_project/font/Kanit/Kanit-Regular.ttf"
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 OpunMediumTTF = "ROOT/taobin_project/font/Opun/Opun-Medium.ttf"
Var OpunThinTTF = "ROOT/taobin_project/font/Opun/Opun-Thin.ttf"
Var OpunBoldTTF = "ROOT/taobin_project/font/Opun/Opun-Bold.ttf"
Var KanitSemiBoldTTF = "ROOT/taobin_project/font/Kanit/Kanit-Medium.ttf"
Var BlinkStar = "ROOT/taobin_project/image/animation/blink_star.gif"
Var MITRegularTTF = "ROOT/taobin_project/font/Mitr/Mitr-Regular.ttf"
Var DinCondensedRegular = "ROOT/taobin_project/font/Din/DIN-Regular.ttf"
Var DinCondensedBold = "ROOT/taobin_project/font/Din/DIN-Condensed-Bold.ttf"
Var ChivoMonoBold = "ROOT/taobin_project/font/ChivoMono/ChivoMono-Bold.ttf"
Var ChivoMonoSemiBold = "ROOT/taobin_project/font/ChivoMono/ChivoMono-SemiBold.ttf"
Var InterRegular = "ROOT/taobin_project/font/Inter/Inter-Regular.ttf"
Var countClick = 0
Var RoadShow = "false"
Var IgnorePoint = "true"
Var ShowButtonClick = "Enable"
Var ShowButtonClickFull = "Invisible"
Var ShowButtonClick2 = "Enable"
;SAVELOG DisplayType
If DisplayType = "2" Then
Var XPosiShowCountDownBrew = 693
Var WQR = 185
Var HQR = 185
Else
Var XPosiShowCountDownBrew = 768
Var WQR = 290
Var HQR = 290
EndIf
Var MinPhoneNumber = 10
Var MaxPhoneNumber = 10
Var TestLoopMakeDrink = 0
Var TestLoopSuccess = 0
Var TestLoopFailed = 0
Var cock_tail_str = ""
READ_FILE "/mnt/sdcard/coffeevending/cock_tail_enable" cock_tail_str
STRCONTAIN "1" cock_tail_str cock_tail_enable
If cock_tail_enable = "true" Then
Var WheyShow = "false"
Var CocktailShow = "true"
Var RoadShow = "true"
STRCONTAIN "1401" MaterialAvailable BeerTrapEnable
Else
Var WheyShow = "true"
Var CocktailShow = "false"
Var RoadShow = "false"
EndIf
; take a look file page_board_1.xml
If XMLProfile = "" Then
CacheVarStr "get" XMLProfile
Else
CacheVarStr "put" XMLProfile
EndIf
Var TermTemOnline = "false"
Var TaobinOnline = "false"
If MaterialAvailable = "" Then
CacheVarStr "get" MaterialAvailable
Else
CacheVarStr "put" MaterialAvailable
EndIf
DEBUGVAR MaterialAvailable
STRCONTAIN "9501" MaterialAvailable TaobinOnline
STRCONTAIN "9505" MaterialAvailable TermTemOnline
; App fast
STRCONTAIN "1063" MaterialAvailable AppFastEnable
STRCONTAIN "1046" MaterialAvailable WheyEnable
STRCONTAIN "1208" MaterialAvailable PromoteYuzuEnable
STRCONTAIN "1058" MaterialAvailable OreoEnable
STRCONTAIN "1068" MaterialAvailable JasmineTeaEnable
STRCONTAIN "1210" MaterialAvailable MelonSyrupEnable
STRCONTAIN "1212" MaterialAvailable MintSyrupEnable
STRCONTAIN "1213" MaterialAvailable PeachSyrupEnable
STRCONTAIN "1211" MaterialAvailable BananaSyrupEnable
STRCONTAIN "1215" MaterialAvailable SugarZeroCalEnable
STRCONTAIN "1206" MaterialAvailable EnergyDrinkEnable
STRCONTAIN "1216" MaterialAvailable CoconutSyrupEnable
STRCONTAIN "1042" MaterialAvailable CocoaPowderEnable
STRCONTAIN "1037" MaterialAvailable 7UpSyrupEnable
;Var AppFastEnable = "false"
If AppFastEnable = "true" Then
Var AppFastButtonState = "Enable"
Var WheyButtonState = "Invisible"
Var MenuKidButtonState ="Invisible"
Else
If WheyEnable = "true" Then
Var AppFastButtonState = "Invisible"
Var WheyButtonState = "Enable"
Var MenuKidButtonState ="Invisible"
Var MenuKidEnable = "false"
Else
Var MenuKidEnable = "true"
Var AppFastButtonState = "Invisible"
Var WheyButtonState = "Invisible"
Var MenuKidButtonState ="Enable"
EndIf
EndIf
If CocktailShow = "true" Then
Var WheyEnable = "false"
Var MenuKidEnable = "false"
Var MenuKidButtonState = "Invisible"
Var WheyShow = "false"
Var WheyButtonState = "Invisible"
Var WebAppShow = "Invisible"
EndIf
Var TaobinOnlineX = "true"
DEBUGVAR AppFastButtonState
DEBUGVAR MenuKidButtonState
DEBUGVAR TaobinOnline
DEBUGVAR WheyButtonState
DEBUGVAR WheyEnable
; Dtac.
Var CAMPAIGN1 = "false"
If TaobinOnlineX = "true" Then
Var EventTurnOn = 0
; CountDownShowButton must value 35
Var CountDownShowButton = 35
Var ShowButtonClickFull = "Invisible"
If LanguageInit = "ENG" Then
Var VideoMainPage = "ROOT/taobin_project/video/main_page_en.mp4"
Var show_eng = "true"
Else
Var VideoMainPage = "ROOT/taobin_project/video/main_page.mp4"
Var show_eng = "false"
EndIf
DEBUGVAR SystemDateMonthInt
DEBUGVAR SystemDateDayInt
EndIf
If TaobinOnlineX = "false" Then
If TermTemOnline = "false" Then
; TODO
Machine Initial
Open "/ROOT/xml/outservice.xml"
EndIf
EndIf
DEBUGVAR SELLSTATUS
DEBUGVAR NetworkStatus
If SELLSTATUS = "" Then
CacheVarStr "get" SELLSTATUS
Else
CacheVarStr "put" SELLSTATUS
EndIf
DEBUGVAR SELLSTATUS
DEBUGVAR AdvertiseProfile
Var SELLONLINE = 0
If SELLSTATUS = "SELLONLINE" Then
Var SELLONLINE = 1
EndIf
If SELLSTATUS = "SELLNOCASH" Then
Var SELLONLINE = 1
EndIf
If IgnoreNetCore = "true" Then
Var SELLONLINE = 1
Var ButtontoTopupMenu = "Enable"
Var ShowButtonClick2 = "Enable"
; for test press button
Var ShowNetworkProblem = "Enable"
EndIf
If SELLONLINE = 1 Then
Var ShowNetworkProblem = "Invisible"
Var ShowNetworkProblemText = ""
Machine NetworkUp
Var QRCODE99x = ""
GenHashWithTimeStamp QRCODE99x
Var QRCODE99 = "https://taobin-beverage.web.app/" + QRCODE99x
;Var QRCODE99 = "https://uat-taobin-beverage.firebaseapp.com/" + QRCODE99x
WEB "ENABLE"
Else
Var ShowNetworkProblem = "Enable"
Var ShowButtonClick2 = "Invisible"
Var ShowNetworkProblemText = "การสื่อสารขัดข้อง ชำระเงินได้เฉพาะเงินสด"
If NetworkStatus = "DOWN" Then
Machine NetworkDown
EndIf
Var QRCODE99 = ""
WEB "DISABLE"
EndIf
Var ShowPrice = "Enable"
If RoadShow = "true" Then
Var ShowPrice = "Invisible"
Var WebAppShow = "Invisible"
EndIf
;SAVELOG WheyShow
;SAVELOG CocktailShow
DEBUGVAR RoadShow
;SAVELOG ShowPrice
Var CountDownPauseVideo = 0
Var NextPage = "-"
If StartUpExt = "false" Then
Else
Var OreoGuarantee = 0
Machine Initial
Var StartUpExt = "false"
Var CameraSettingStatus = ""
;DEBUGVAR "FlushTxRef1"
;FlushTxRef1
;If JXMLVersionInt > 428 Then
; LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/ui/lang.tsv"
;EndIf
Var SoundThaiIndex = 0
EndIf
DEBUGVAR Not#LanguageLoaded
;DEBUGVAR "FlushTxRef1"
;FlushTxRef1
StopLongPlay
Var TimerFirst = "true"
Var buttonRemoveCup = "Invisible"
Var led_new = "0"
READ_FILE "/mnt/sdcard/coffeevending/led_new" led_new
DEBUGVAR led_new
If led_new = "1" Then
LEDv2 LedDoorCupV2 Off 255 194 166 20 6
LEDv2 LedDoorLidV2 Off 255 255 255 20 6
Else
LED LedDoorCup Off 255 255 255 255
LED LedDoorLid Off 255 255 255 255
EndIf
Var showCart = "Invisible"
Var LedLidBlink = "no"
Var EnableSelectMenuBetweenBrew = "Enable"
If JXMLVersionInt > 412 Then
Var ToppingNewShow = "true"
EndIf
DEBUGVAR XMLProfile
Machine CancelWepApp
StrLen AdvertiseProfile AdvertiseProfileLen
STRCONTAIN "taobin_notopup" XMLProfile taobin_notopup
DEBUGVAR taobin_notopup
If taobin_notopup = "true" Then
Var ButtontoTopupMenu = "Disable"
Else
If SELLSTATUS = "SELLNOCASH" Then
Var ButtontoTopupMenu = "Disable"
Else
Var ButtontoTopupMenu = "Enable"
EndIf
EndIf
If NetworkStatus = "DOWN" Then
Var WebAppShow = "Invisible"
EndIf
DEBUGVAR XMLPageVersionInt
; forever
Var new_layout = "true"
Machine MenuLayoutNew
DEBUGVAR SpiralOnline
Topping "ClearNextOrder" "-"
If AdvertiseProfileLen = 0 Then
CacheVarStr "get" AdvertiseProfile
Else
CacheVarStr "put" AdvertiseProfile
EndIf
DEBUGVAR AdvertiseProfile
Var show_lang = "THAI"
Var NETCORE_EVENT_CNT_TMP = NCIC07_EVENT_CNT
DEBUGVAR CameraCount
If CameraCount = 0 Then
CameraService "Start"
EndIf
If CameraCount = "" Then
CameraService "Start"
EndIf
DEBUGVAR CountryName
DEBUGVAR LanguageListEnable
DEBUGVAR DisplayFormat
DEBUGVAR ScaleValueForCalculation
DEBUGVAR PreScaleConvertShow
DEBUGVAR UnitPostDisplay
DEBUGVAR LanguageInit
Var TextPriceMenuSize = 14
Var TextPriceMenuY = 264
Var TextPriceMenuBlendX = 174
Var TextPriceMenuHotX = 50
; zone init lang
; CountryName
Var show_eng_button_stage = "Enable"
Var MemberButtonFileName = "ROOT/taobin_project/image/TermTempage2/bp_main_page_member.png"
Machine __arm_toggle
GetLongTimeInMinute CurrentTime
DEBUGVAR LastTimeClickOrder
DEBUGVAR CurrentTime
If LastTimeClickOrder = "" Then
GetLongTimeInMinute LastTimeClickOrder
EndIf
Var DiffTimeInMinute = CurrentTime - LastTimeClickOrder
DEBUGVAR DiffTimeInMinute
If DiffTimeInMinute > 120 Then
GetLongTimeInMinute LastTimeClickOrder
ScreenRefresh
EndIf
; zone config language
SetLanguage LanguageInit
Var InternationalEnable = 0
Var InternationalEnableStr = "false"
Var cups_sold_text = "เสิร์ฟแล้ว ( CUPS SOLD )"
Var XButtonMember = 212
Var YButtonMember = 1695
; CountryName
If CountryName = "" Then
READ_FILE "/mnt/sdcard/coffeevending/country/short" StrCountryShort
DEBUGVAR StrCountryShort
If StrCountryShort = "MYS" Then
Var CountryName = "Malaysia"
EndIf
If StrCountryShort = "MYR" Then
Var CountryName = "Malaysia"
EndIf
If StrCountryShort = "AUS" Then
Var CountryName = "Australia"
EndIf
If StrCountryShort = "SGP" Then
Var CountryName = "Singapore"
EndIf
If StrCountryShort = "UAE_DUBAI" Then
Var CountryName = "UnitedArabEmirates Dubai"
EndIf
If StrCountryShort = "" Then
Var CountryName = "Thailand"
EndIf
;
EndIf
; Zone set video main page.
; ignore collection point
Var SettingIgnoreCollectPoint = 0
Var SettingVideoBrewingUseCommon = 0
Var adver_brewing_en = 1
;inter-xml-open
If CountryName = "Australia" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/aus/video/script_video.ev"
EndIf
;inter-xml-open
If CountryName = "Malaysia" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/mys/video/script_video.ev"
EndIf
;inter-xml-open
If CountryName = "Thailand" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/video/script1.ev"
EndIf
;inter-xml-open
If CountryName = "USANewYork" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/usaNY/video/script_video.ev"
EndIf
;inter-xml-open
If CountryName = "Singapore" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/sgp/video/script_video.ev"
EndIf
DEBUGVAR CountDownShowButton
DEBUGVAR EventTurnOn
;inter-page-board
If CountryName = "Malaysia" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/mys/video/script_video.ev"
Var WebAppShow = "Invisible"
EnableLanguage "ENG"
EnableLanguage "MALAY"
SetLanguage "ENG"
LanguageControl "UpdateList" "-"
Var InternationalEnable = 1
Var show_eng = "true"
;Var VideoMainPage = "ROOT/taobin_project/inter/common/video/video_main.mp4"
Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"
Var ShowNetworkProblemText = "Network error. Payment Cash only."
Var CountryRootPath = "ROOT/taobin_project/inter/mys/"
Var CountryShortName = "mys"
Var PriceUnitText = "Prices in MYR"
Var TextPriceMenuSize = 12
Var TextPriceMenuY = 266
Var ShowButtonClick2 = "Enable"
Var ButtontoTopupMenu = "Invisible"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_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/mys/menu/lang.tsv"
EndIf
; load credit
If EnableCreditCard = "" Then
CacheVarStr "get" EnableCreditCard
Else
CacheVarStr "put" EnableCreditCard
EndIf
DEBUGVAR EnableCreditCard
STRCONTAIN "1215" MaterialAvailable SugarZeroCalEnable
Var MinPhoneNumber = 10
Var MaxPhoneNumber = 11
EndIf
;inter-page-board
If CountryName = "Indonesia" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/idr/video/script_video.ev"
Var TextPriceMenuSize = 14
Var show_eng_button_stage = "Invisible"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
Var CountryRootPath = "ROOT/taobin_project/inter/ids/"
Var CountDownShowButton = 35
Var CountryShortName = "ids"
If Not#LanguageLoaded = "" Then
LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/ids/menu/lang.tsv"
EndIf
Var PriceUnitText = ""
Var XButtonMember = 212
Var YButtonMember = 1695
Var MinPhoneNumber = 11
Var MaxPhoneNumber = 12
STRCONTAIN "1215" MaterialAvailable SugarZeroCalEnable
EndIf
;inter-page-board
If CountryName = "Australia" Then
Var SettingVideoBrewingUseCommon = 1
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/aus/video/script_video.ev"
Var WebAppShow = "Invisible"
EnableLanguage "ENG"
SetLanguage "ENG"
LanguageControl "UpdateList" "-"
Var InternationalEnable = 1
Var show_eng = "true"
;Var VideoMainPage = "ROOT/taobin_project/inter/aus/video/video_main.mp4"
Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"
Var ShowNetworkProblemText = "Network error. Payment Cash only."
Var CountryRootPath = "ROOT/taobin_project/inter/aus/"
Var CountryShortName = "aus"
Var TextPriceMenuSize = 12
Var TextPriceMenuY = 264
Var TextPriceMenuBlendX = 180
Var TextPriceMenuHotX = 48
Var ShowButtonClick2 = "Enable"
Var ButtontoTopupMenu = "Invisible"
Var PriceUnitText = ""
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_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/aus/menu/lang.tsv"
EndIf
DEBUGVAR MaterialAvailable
STRCONTAIN "511215" MaterialAvailable SugarZeroCalEnable
Var cups_sold_text = "CUPS SOLD"
Var MinPhoneNumber = 10
Var MaxPhoneNumber = 10
EndIf
;inter-page-board
If CountryName = "USANewYork" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/usaNY/video/script_video.ev"
Var WebAppShow = "Invisible"
EnableLanguage "ENG"
SetLanguage "ENG"
LanguageControl "UpdateList" "-"
Var InternationalEnable = 1
Var show_eng = "true"
;Var VideoMainPage = "ROOT/taobin_project/inter/usaNY/video/video_main.mp4"
Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"
Var ShowNetworkProblemText = "Network error. Payment Cash only."
Var CountryRootPath = "ROOT/taobin_project/inter/usaNY/"
Var CountryShortName = "usaNY"
Var TextPriceMenuSize = 12
Var TextPriceMenuY = 264
Var TextPriceMenuBlendX = 180
Var TextPriceMenuHotX = 48
Var ShowButtonClick2 = "Enable"
Var ButtontoTopupMenu = "Invisible"
Var PriceUnitText = ""
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
Var show_eng_button_stage = "Invisible"
Var CountDownShowButton = 35
Var XButtonMember = 212
Var YButtonMember = 1695
If Not#LanguageLoaded = "" Then
LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/usaNY/menu/lang.tsv"
EndIf
STRCONTAIN "1215" MaterialAvailable SugarZeroCalEnable
Var MinPhoneNumber = 10
Var MaxPhoneNumber = 11
EndIf
;inter-page-board
If CountryName = "Singapore" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/sgp/video/script_video.ev"
Var WebAppShow = "Invisible"
EnableLanguage "ENG"
SetLanguage "ENG"
LanguageControl "UpdateList" "-"
Var InternationalEnable = 1
Var show_eng = "true"
Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"
Var ShowNetworkProblemText = "Network error. Payment Cash only."
Var CountryRootPath = "ROOT/taobin_project/inter/sgp/"
Var CountryShortName = "sgp"
Var TextPriceMenuSize = 12
Var TextPriceMenuY = 264
Var TextPriceMenuBlendX = 180
Var TextPriceMenuHotX = 48
Var ShowButtonClick2 = "Enable"
Var ButtontoTopupMenu = "Invisible"
Var PriceUnitText = "Price in SGD"
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"
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/sgp/menu/lang.tsv"
EndIf
STRCONTAIN "521215" MaterialAvailable SugarZeroCalEnable
Var SettingDisableTaobinCredit = "true"
;Var SettingDisableTaobinCode = "false"
; Singapore disable point
;Var SettingIgnoreCollectPoint = 1
Var SettingVideoBrewingUseCommon = 1
Var MinPhoneNumber = 8
Var MaxPhoneNumber = 8
Var ShowCountDownAsPercent = 1
DEBUGVAR ShowButtonClick2
EndIf
;inter-page-board
; wait
If CountryName = "UnitedArabEmirates Dubai" Then
SAVELOG "UnitedArabEmirates Dubai UnitedArabEmirates Dubai UnitedArabEmirates Dubai"
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/uae_dubai/video/script_video.ev"
Var WebAppShow = "Invisible"
EnableLanguage "ENG"
EnableLanguage "UAE_DUBAI"
SetLanguage "ENG"
LanguageControl "UpdateList" "-"
Var InternationalEnable = 1
Var show_eng = "true"
Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"
Var ShowNetworkProblemText = "Network error. Payment Cash only."
Var CountryRootPath = "ROOT/taobin_project/inter/uae_dubai/"
Var CountryShortName = "uae_dubai"
Var TextPriceMenuSize = 12
Var TextPriceMenuY = 266
Var TextPriceMenuBlendX = 180
Var TextPriceMenuHotX = 48
Var ShowButtonClick2 = "Enable"
Var ButtontoTopupMenu = "Invisible"
Var PriceUnitText = "Price in DH"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_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/uae_dubai/menu/lang.tsv"
EndIf
Var SettingDisableTaobinCredit = "true"
Var SettingDisableTaobinCode = "false"
; Dubai disable point
Var SettingIgnoreCollectPoint = 1
Var SettingVideoBrewingUseCommon = 1
Var MinPhoneNumber = 9
Var MaxPhoneNumber = 9
EndIf
DEBUGVAR InternationalEnable
DEBUGVAR CountryRootPath
If InternationalEnable = 1 Then
Var LanguageObjectShow = "Enable"
Var NoLangObjectShow = "Invisible"
Var XMLLiveInfoEnable = 0
If Not#LanguageResult = "false" Then
LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/ui/lang.tsv"
EndIf
Var RootPath = "ROOT/taobin_project/inter/common/"
Var OpenFileXML = CountryRootPath + "xml/event/tricker.ev"
DEBUGVAR OpenFileXML
TRY OpenFileXML
Else
Var LanguageObjectShow = "Invisible"
Var NoLangObjectShow = "Enable"
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/tricker.ev"
Var RootPath = "ROOT/taobin_project/"
EndIf
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/multi_ads/ads_path.ev"
Var StrXMLPageVer = "ver=" + XMLPageVersionInt
WRITE_FILE "/mnt/sdcard/coffeevending/version/xml_page_version.int" StrXMLPageVer
If SELLONLINE = 1 Then
Else
Var ShowNetworkProblem = "Enable"
Var ShowButtonClick2 = "Invisible"
If NetworkStatus = "DOWN" Then
Machine NetworkDown
EndIf
Var QRCODE99 = ""
WEB "DISABLE"
EndIf
If GameInstalled = "" Then
CheckApp "com.NDF.taobin" GameInstalled
EndIf
Var CountDownCheckCamera = 10
;DEBUGVAR EnableLiveness
DEBUGVAR LivenessLicenseFailNumber
;DEBUGVAR LivenessControlVersion
;DEBUGVAR Not#CameraSettingStatus
RootLayoutVisible 3 "hide"
If SELLSTATUS = "DEACTIVE" Then
Open "/ROOT/xml/offline.xml"
EndIf
Var CheckCupStateDoorCupClose = ""
; zone cup on arm
If CupOnArm = "true" Then
If CheckCupStateDoorCupClose = "" Then
Var buttonRemoveCup = "Enable"
EndIf
If CheckCupStateDoorCupClose = "done" Then
Var buttonRemoveCup = "Enable"
EndIf
Else
If buttonRemoveCup = "Enable" Then
Var buttonRemoveCup = "Invisible"
EndIf
EndIf
TRY "ROOT/taobin_project/xml/profile/run.ev"
Var NETCORE_LOST_COUNT_UP = 0
Var NoWaitMachineEnable = 1
DEBUGVAR NeedUpgrade
If NoWaitMachineEnable = 1 Then
If stop_now = "true" Then
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
Else
If MachineStage = "close-maintenance" Then
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
EndIf
If MachineStage = "mcu-upgrade" Then
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
If NeedUpgrade = "true" Then
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
If RoadShow = "true" Then
Var ShowNetworkProblem = "Invisible"
Var ShowNetworkProblemText = ""
EndIf
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
If EnergyDrink1BathPro = 1 Then
If CurrentMainVideo = 1 Then
Var VideoMainPage = "ROOT/taobin_project/video/main_page_event_pro2.mp4"
Var CurrentMainVideoTemp = 2
EndIf
EndIf
If CoffeeDrink1BathPro = 1 Then
If CurrentMainVideo = 1 Then
Var VideoMainPage = "ROOT/taobin_project/video/main_page_event_pro3.mp4"
Var CurrentMainVideoTemp = 2
EndIf
EndIf
Var CurrentMainVideo = CurrentMainVideoTemp
DEBUGVAR SettingDisableTaobinCredit
If SettingDisableTaobinCredit = "true" Then
Var ShowButtonClick2 = "Invisible"
If CountryName = "Singapore" Then
If SELLONLINE = 1 Then
Var ShowButtonClick2 = "Enable"
EndIf
EndIf
EndIf
DEBUGVAR ShowButtonClick2
Machine OrderCheck
DEBUGVAR CLOSE_ORDER_NOW
; move to TRY actoin.
; Move to end of EventOpen for override war
Var RoadShow = "false"
TRY "ROOT/taobin_project/xml/sometime/RoadShow.ev"
</EventOpen>
<EventActionOk>
If GetNamHomCoconutRemainReward = 1 Then
If Ext1a = "" Then
SAVELOG "Get Nam hom coconut remain reward error Ext1a is empty."
Else
DEBUGVAR Ext1a
SPLIT2 Ext1a "/" RemainRewardSpl
Var SuperSetRemain = RemainRewardSpl[0]
Var BalanceEssenceTonerRemain = RemainRewardSpl[1]
Var CleansingGalRemain = RemainRewardSpl[2]
Var TumbleBottleRemain = RemainRewardSpl[3]
Var ClearGelRemain = RemainRewardSpl[4]
Var E_GiftCard100BathRemain = RemainRewardSpl[5]
Var ClearGel4mlRemain = RemainRewardSpl[6]
INT SuperSetRemain
INT BalanceEssenceTonerRemain
INT CleansingGalRemain
INT TumbleBottleRemain
INT ClearGelRemain
INT E_GiftCard100BathRemain
INT ClearGel4mlRemain
Var SumNamHomCoconutRemainReward = SuperSetRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + BalanceEssenceTonerRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + CleansingGalRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + TumbleBottleRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + ClearGelRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + E_GiftCard100BathRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + ClearGel4mlRemain
If ShouldShowNamHomCoconutRemainReward = 1 Then
Var ShowNamHomCoconutRemainReward = "Enable"
EndIf
;DEBUG
;Var SumNamHomCoconutRemainReward = 200
If SumNamHomCoconutRemainReward > 500 Then
Var ShowNamHomCoconutRemainReward = "Invisible"
Else
If SumNamHomCoconutRemainReward = 0 Then
SAVELOG "NamHomCoconutPro: All reward out of stock"
WRITE_FILE "/mnt/sdcard/nam_hom_coconut_reward_out_of_stock" "1"
EndIf
EndIf
Var NamHomCoconutRemainReward = SumNamHomCoconutRemainReward
DEBUGVAR NamHomCoconutRemainReward
Var GetNamHomCoconutRemainRewardLastTime = SystemTimeMinuteInt
EndIf
EndIf
</EventActionOk>
<EventActionError>
If GetNamHomCoconutRemainReward = 1 Then
SAVELOG "Get Nam hom coconut remain reward requet error."
EndIf
</EventActionError>
<EventUnitTest1>
Var XMLProfile = "AllPriceUp05"
Open CurrentXMLFileName0
</EventUnitTest1>
<EventUnitTest2>
Var NextPage = "ROOT/taobin_project/xml/page_back_to_main.xml"
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
Var OpenFromPageBoard = 1
If InternationalEnable = 1 Then
; show language icon
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
RootLayoutVisible 3 "show"
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_group_recommend.lxml"
Else
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/script_common_for_open_promotion_xml.ev"
EndIf
Machine DoorClose
TopView "show"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
</EventUnitTest2>
<EventUnitTest3>
;Var XMLProfile = "AllPriceUp10"
;Open CurrentXMLFileName0
__CMD "SetPay" "Coffee" "123456789123456789" "3000100617001201234"
;PRICE "Reload" "-"
</EventUnitTest3>
<EventUnitTest4>
Var XMLProfile = "$School"
PRICE "Load" "-"
PRICE "CheckAndApply" XMLProfile
DEBUGVAR ProfileIndex[0]
DEBUGVAR ProfileIndex[1]
DEBUGVAR ProfileIndex[2]
</EventUnitTest4>
<EventUnitTest6>
PushFile "/sdcard/" "RootManPicture" "scn_240703193755.png"
</EventUnitTest6>
<EventDrink>
SAVELOG "EventDrink EventDrink EventDrink EventDrink EventDrink "
</EventDrink>
<Timeout> 1000 </Timeout>
<EventTimeout>
If CNTDOWN_PROTECT_SCREEN_BLANK > 0 Then
Var CNTDOWN_PROTECT_SCREEN_BLANK = CNTDOWN_PROTECT_SCREEN_BLANK - 1
EndIf
If CNTDOWN_PROTECT_SCREEN_BLANK = 0 Then
SAVELOG "CNTDOWN_PROTECT_SCREEN_BLANK"
Open "ROOT/taobin_project/xml/page_board.xml"
EndIf
If IgnoreNetCore = "true" Then
Else
If NetworkStatus = "DOWN" Then
Var WebAppShow = "Invisible"
EndIf
If SELLSTATUS = "DEACTIVE" Then
Open "/ROOT/xml/offline.xml"
EndIf
If NoWaitMachineEnable = 1 Then
If RecoveryRunning = "true" Then
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
If stop_now = "true" Then
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
Else
If MachineStage = "close-maintenance" Then
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
EndIf
If CLOSE_ORDER_NOW = "true" Then
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
If MachineStage = "mcu-upgrade" Then
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
;stop_now
If NETCORE_LOST_CNT > 120 Then
Var stop_now = "true"
Var MachineErrorDetailAll = "???"
SAVELOG "NETCORE_LOST_CNT"
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
;DEBUGVAR NETCORE_EVENT_CNT_X
If NCIC07_EVENT_CNT = NETCORE_EVENT_CNT_TMP Then
If NETCORE_EVENT_CNT_X = "" Then
Var NETCORE_EVENT_CNT_X = 0
EndIf
Var NETCORE_EVENT_CNT_X = NETCORE_EVENT_CNT_X + 1
If NETCORE_EVENT_CNT_X = 30 Then
DEBUGVAR NETCORE_EVENT_CNT_X
EndIf
If NETCORE_EVENT_CNT_X = 90 Then
DEBUGVAR NETCORE_EVENT_CNT_X
EndIf
If NETCORE_EVENT_CNT_X > 3600 Then
Var stop_now = "true"
Var stop_now_from_netcore_event = 1
Var MachineErrorDetailAll = "Netcore Lost"
SAVELOG "Netcore Lost NCIC07_EVENT_CNT"
DEBUGVAR NCIC07_EVENT_CNT
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
Else
Var NETCORE_EVENT_CNT_X = 0
Var NETCORE_EVENT_CNT_TMP = NCIC07_EVENT_CNT
EndIf
EndIf
If MachineStage = "drink-failed" Then
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
If MachineStage = "remove-cup" Then
Open "ROOT/taobin_project/xml/page_remove_cup.xml"
EndIf
If BrewTimeoutExtend = 1 Then
DEBUGVAR BrewTimeoutExtend
DEBUGVAR DoorCupPosition
If DoorCupPosition = "bottom" Then
SAVELOG "BrewTimeoutExtend = 0 Clear Error Flag"
Var BrewTimeoutExtend = 0
; clear stage
Else
Var stop_now = "true"
Var stop_now_from_door_cup = 1
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
Else
If DoorCupPosition = "Bottom" Then
Var BrewTimeoutExtend = 0
Else
Var BrewTimeoutExtend = 0
EndIf
EndIf
If NeedUpgrade = "true" Then
TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
EndIf
If CountDownShowButton > 0 Then
Var CountDownShowButton = CountDownShowButton - 1
EndIf
;DEBUGVAR MachineStage
;SAVELOG CountDownShowButton
;SAVELOG ShowButtonClickFull
If TaobinOnlineX = "true" Then
If CountDownShowButton < 33 Then
If CountryName = "Singapore" Then
Var ShowButtonClick2 = "Invisible"
Refresh
EndIf
EndIf
If CountDownShowButton = 31 Then
Var ShowButtonClickFull = "Enable"
Var ShowButtonClick = "Invisible"
Refresh
EndIf
If CountDownShowButton = 3 Then
Var ShowButtonClick = "Enable"
If CountryName = "Singapore" Then
Var ShowButtonClick2 = "Enable"
EndIf
Var ShowButtonClickFull = "Invisible"
Refresh
EndIf
If CountDownPauseVideo > 0 Then
; ignore
Var CountDownPauseVideo = CountDownPauseVideo - 1
If CountDownPauseVideo = 2 Then
TapScreen 30 638
EndIf
If CountDownPauseVideo = 1 Then
TapScreen 860 1004
EndIf
If CountDownPauseVideo = 0 Then
Var NextPage = "ROOT/taobin_project/xml/page_back_to_main.xml"
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
Var OpenFromPageBoard = 1
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"
Else
If BeerTrapEnable = "true" Then
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"
Else
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/script_common_for_open_promotion_xml.ev"
EndIf
EndIf
Machine DoorClose
TopView "show"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
EndIf
EndIf
EndIf
If TimerFirst = "true" Then
Var TimerFirst = "false"
Var CountUpReloadAll = CountUpReloadAll + 1
DEBUGVAR CountUpReloadAll
; Original value is 40
If EnableMultiInstance = "true" Then
If CountUpReloadAll > 300 Then
Var NeedReboot = "false"
Var StartUpExt = "-"
Var CountUpReloadAll = 0
ReloadAll
EndIf
Else
If CountUpReloadAll > 100 Then
Var NeedReboot = "false"
Var StartUpExt = "-"
Var CountUpReloadAll = 0
ReloadAll
EndIf
EndIf
EndIf
If CupOnArm = "true" Then
If CheckCupStateDoorCupClose = "" Then
Var buttonRemoveCup = "Enable"
EndIf
If CheckCupStateDoorCupClose = "done" Then
Var buttonRemoveCup = "Enable"
EndIf
Else
If buttonRemoveCup = "Enable" Then
Var buttonRemoveCup = "Invisible"
EndIf
EndIf
If Seeker = "curr" Then
If DoorCupPosition = "bottom" Then
; It normal
Var EmergencyStop = "false"
Else
Var EmergencyStop = "true"
EndIf
EndIf
If MainPageEventWithTimeout = "" Then
Else
If MainPageEventWithTimeout > 0 Then
Var MainPageEventWithTimeout = MainPageEventWithTimeout - 1
EndIf
;DEBUGVAR MainPageEventWithTimeout
If MainPageEventWithTimeout = 1 Then
Var CountDownPauseVideo = 4
EndIf
EndIf
Refresh
TimerReset
</EventTimeout>
<EventEnd>
SAVELOG "EVENT END"
If TaobinOnlineX = "true" Then
Var CountDownShowButton = 35
EndIf
If TermTemOnline = "true" Then
Var CountDownShowButton = 28
EndIf
Var CountDownPauseVideo = 6
If TaobinOnlineX = "true" Then
;TouchTapClose
EndIf
;Open CurrentXMLFileName0
Refresh
</EventEnd>
<EventNetDown>
SAVELOG NetworkStatus
;Open "/mnt/sdcard/coffeevending/xml/main.xml"
</EventNetDown>
<EventNetDeactive>
SAVELOG NetworkStatus
If SELLSTATUS = "DEACTIVE" Then
Open "/mnt/sdcard/coffeevending/xml/main.xml"
EndIf
</EventNetDeactive>
<EventWebApp>
DEBUGVAR web_ready
If web_ready = "true" Then
If web_ref = QRCODE99x Then
Var web_readyOK = web_ready
Var web_telnumOK = web_telnum
Var web_app_prepar = "true"
; Handle penetrator
If Only18 = "true" Then
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
OpenInst 2 "ROOT/taobin_project/xml/page_identity18_verification.xml"
Else
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_payment.xml"
EndIf
TopView "show"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
EndIf
Else
EndIf
</EventWebApp>
<Video>
<X> 0 </X>
<Y> 0 </Y>
;<Loop>"true"</Loop>
;<Volume> 80 </Volume>
<Filename> VideoMainPage </Filename>
<FilenameAlternate> "ROOT/taobin_project/video/main_page_en.mp4" </FilenameAlternate>
</Video>
<Image>
<X> 224 </X>
<Y> NamHomCoconutRemainReward_Y </Y>
<State> ShowNamHomCoconutRemainReward </State>
<Filename> "ROOT/taobin_project/image/event/nam_hom_coconut/reward_remain.png" </Filename>
</Image>
<Text>
<X> 379 </X>
<Y> NamHomCoconutRemainRewardNumber_Y </Y>
<State> ShowNamHomCoconutRemainReward </State>
<Width> 224 </Width>
<Height> 112 </Height>
<Font> OpunBoldTTF </Font>
<Size> 100 </Size>
<Color> 0xFF0000 </Color>
<Align> center-vertical-horizontal </Align>
<Value> NamHomCoconutRemainReward </Value>
</Text>
<Button>
<X> 212 </X>
<Y> 1481 </Y>
<State> ShowButtonClick </State>
;<Color> "0x00BDFF" </Color>
<Filename> img_rest_main_page </Filename>
<FilenamePress> img_press_main_page </FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
;OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
If CocktailShow = "true" Then
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"
Else
If SpiralOnline = "true" Then
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_with_vending.xml"
Else
If InternationalEnable = 1 Then
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.lxml"
Else
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.xml"
EndIf
EndIf
EndIf
TopView "show"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
</EventClick>
</Button>
<Button>
<X> XButtonMember </X>
<Y> YButtonMember </Y>
<State> ShowButtonClick2 </State>
;<Color> "0x00BDFF" </Color>
<Filename> MemberButtonFileNameRest </Filename>
<FilenamePress> MemberButtonFileName </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
If InternationalEnable = 1 Then
;inter-xml-open
DEBUGVAR CountryName
If CountryName = "UnitedArabEmirates Dubai" Then
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_check_member.xml"
Else
Var ChackMemberPage = CountryRootPath + "xml/page_check_member.lxml"
OpenInst 2 ChackMemberPage
EndIf
Else
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_before_check_member.xml"
EndIf
TopView "show"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
</EventClick>
</Button>
<Button>
<X> 556 </X>
<Y> 1695 </Y>
<State> ButtontoTopupMenu </State>
;<Color> "0x00BDFF" </Color>
<Filename> img_reset_topup </Filename>
<FilenamePress> "ROOT/taobin_project/image/main_page/bp_main_page_topup.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var PayDetail=""
Var NextPage = "-"
Open "ROOT/xml/service_menu.xml"
</EventClick>
</Button>
<Button>
<X> 2 </X>
<Y> 609 </Y>
<State> ShowButtonClickFull </State>
;<Color> "0x00BDFF" </Color>
<Width> 1070 </Width>
<Height> 1310 </Height>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
SAVELOG "click ShowButtonClickFull"
Var NextPage = "-"
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
If SpiralOnline = "true" Then
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_with_vending.xml"
Else
If InternationalEnable = 1 Then
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.lxml"
Else
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.xml"
EndIf
EndIf
If TermTemOnline = "true" Then
OpenInst 2 "/mnt/sdcard/coffeevending/termtem_project/xml/page_tt_catalog.xml"
EndIf
TopView "show"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
</EventClick>
</Button>
<Image>
<X> 778 </X>
<Y> 632 </Y>
<State>WebAppShow</State>
<Filename> "ROOT/taobin_project/image/home/home/qr_bg.png" </Filename>
</Image>
<QRCode>
<X> 843 </X>
<Y> 98 </Y>
<Width> 150 </Width>
<Color> "0xeae6e1" </Color>
<QRColor> "0x000000" </QRColor>
<Height> 150 </Height>
<State> WebAppShow </State>
<Service> testservice </Service>
</QRCode>
<Button>
<X> 780 </X>
<Y> 630 </Y>
<State> buttonRemoveCup </State>
;<Color> "0x00BDFF" </Color>
<Interval> 500 </Interval>
<Filename> Var(RootPath + "image/main_page/bn_remove_cup.png") </Filename>
<Filename> Var(RootPath + "image/main_page/bp_remove_cup.png") </Filename>
<EventClick>
Machine RemoveCup
Machine DoorLidOpen
Var CheckCupStateDoorCupClose = "reset"
Var buttonRemoveCup = "Invisible"
</EventClick>
</Button>
<Button>
<X> 0 </X>
<Y> 1870 </Y>
<State> ShowNetworkProblem </State>
<Color> "0xFF0000" </Color>
<Width> 1080 </Width>
<Height> 60 </Height>
<EventClick>
If IgnoreNetCore = "true" Then
Var NextPage = "-"
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.lxml"
TopView "show"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 0 </X>
<Y> 608 </Y>
<State> "Enable" </State>
<Width> 120 </Width>
<Height> 120 </Height>
<EventClick>
Var NextPage = "ROOT/taobin_project/xml/page_back_to_main.xml"
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
Var OpenFromPageBoard = 1
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"
Else
If BeerTrapEnable = "true" Then
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"
Else
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/script_common_for_open_promotion_xml.ev"
EndIf
EndIf
Machine DoorClose
TopView "show"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
</EventClick>
</Button>
<Text>
<State> ShowNetworkProblem </State>
<X> 5 </X>
<Y> 1880 </Y>
<Size> 24 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Font> RobotoRegular </Font>
<Color> 0xFFFFFF </Color>
<Value> ShowNetworkProblemText </Value>
</Text>
</Page>