"Enable" 1080 1920
; "0xeae6e1" SoundVolume
SAVELOG "======================================= catalog inter multi instance ================================"
; On open
TopView "show"
; On open
Machine WakeUp
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_hide.lxml"
DEBUGVAR ToppingNewShow
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/sometime/campaign_sound.ev"
DEBUGVAR OpenFromPageBoard
If OpenFromPageBoard = 1 Then
Var OpenFromPageBoard = 0
Var langnext1 = "true"
Var langnext2 = "true"
Var langnext3 = "true"
Var langnext4 = "true"
Var langnext5 = "true"
Var langnext6 = "true"
Var langnext7 = "true"
Var langnext8 = "true"
Var langnext9 = "true"
SAVELOG "======================================= RefreshAll Languages ================================"
EndIf
Var NextPage = "-"
Var Seeker.thankLidFlag = 0
Var Seeker.thankStrawFlag = 0
WEB "DISABLE"
Var web_readyOK = "false"
Var web_telnumOK = ""
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/image/page_doing/"
If CocktailShow = "true" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"
EndIf
If TermTemOnline = "true" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_tt_catalog.xml"
EndIf
If Seeker = "curr" Then
Machine DoorLidClose
EndIf
Var GetPayInfoFlag = 0
Var countDownRetrun = 120
Var OpenRouteManTest = 0
CoinVending OFF
DEBUGVAR MAT_ID_2301
Var SpiralModeFrozenFruit = 0
Var SpiralModeGoods = 0
Var ButtonFrozenSmoothie = "Invisible"
If SpiralOnline = "true" Then
If MAT_ID_2301 = "Enable" Then
Var SpiralModeFrozenFruit = 1
Var ButtonFrozenSmoothie = "Enable"
EndIf
If BoxID = 123456 Then
Var SpiralModeGoods = 1
Var ButtonSpiralStage = "Enable"
EndIf
EndIf
DEBUGVAR SpiralModeGoods
DEBUGVAR SpiralModeFrozenFruit
; Clear value
Topping "clear" "-"
Var DirImage = "ROOT/taobin_project/image/page2_inter/"
Var StrawAutoRelease1 = "false"
Var StrawAutoRelease2 = "false"
Var SELLONLINE = 0
If SELLSTATUS = "SELLONLINE" Then
Var SELLONLINE = 1
EndIf
If SELLSTATUS = "SELLNOCASH" Then
Var SELLONLINE = 1
EndIf
If SELLONLINE = 1 Then
Var ShowButtonClick2 = "Enable"
Else
Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Invisible"
EndIf
If SELLONLINE = 1 Then
Var ShowNetworkProblem = "Invisible"
Var ShowNetworkProblemText = ""
;GenHashWithTimeStamp QRCODE99x
WEB "ENABLE"
Else
Var ShowNetworkProblem = "Enable"
Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Invisible"
;Var ShowNetworkProblemText = "การสื่อสารขัดข้อง ชำระเงินได้เฉพาะเงินสด"
Var QRCODE99 = ""
WEB "DISABLE"
EndIf
If RoadShow = "true" Then
Var ShowNetworkProblem = "Invisible"
Var ShowNetworkProblemText = ""
EndIf
; 1035 is Coke.
STRCONTAIN "1035" MaterialAvailable CokeUI
Var bnSodaAndOther = DirImage + "/bn_soda_coke.png"
Var bpSodaAndOther = DirImage + "/bp_soda_coke.png"
Var countClick = 0
DEBUGVAR CART_COUNT
Var QRCODE99_Y = 1718
Var showCart = "Invisible"
If MultiPayEnable = "true" Then
If CART_COUNT = 1 Then
Var showCart = "Enable"
Var cart_image_bn = DirImageCart + "/bn_cart1.png"
Var cart_image_bp = DirImageCart + "/bp_cart1.png"
Var QRCODE99_Y = 1580
EndIf
If CART_COUNT = 2 Then
Var showCart = "Enable"
Var cart_image_bn = DirImageCart + "/bn_cart2.png"
Var cart_image_bp = DirImageCart + "/bp_cart2.png"
Var QRCODE99_Y = 1580
EndIf
If CART_COUNT = 3 Then
Open "ROOT/taobin_project/xml/page_payment_multi.xml"
EndIf
EndIf
DEBUGVAR Seeker
If Seeker = "next" Then
Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Invisible"
EndIf
If XMLProfile = "taobin_notopup" Then
Var ButtontoTopupMenu = "Disable"
EndIf
Var menu_name_eng_hot = ""
Var menu_desc_eng_hot = ""
Var menu_name_thai_hot = ""
Var menu_desc_thai_hot = ""
Var menu_name_eng_cold = ""
Var menu_desc_eng_cold = ""
Var menu_name_thai_cold = ""
Var menu_desc_thai_cold = ""
Var menu_name_eng_blender = ""
Var menu_desc_eng_blender = ""
Var menu_name_thai_blender = ""
Var menu_desc_thai_blender = ""
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/tricker.ev"
TRY "ROOT/taobin_project/xml/sometime/RoadShow.ev"
If BoxID = 0 Then
RebootWithCause "BoxID was zero"
EndIf
DEBUGVAR ShowButtonClick2
DEBUGVAR MenuKidButtonState
DEBUGVAR New_Payment
Var PromotionIDCurrentOrder = 0
RootLayoutVisible 3 "show"
Var ButtonLanguageCurrentXPosition = 1005
Var ButtonLanguageCurrentYPosition = 458 - 38
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
Var SelectedMenu = ""
Var MultiProcess = "Invisible"
; setvar SpiralOnline true
Var ButtonSpiralStage = "Invisible"
If SpiralOnline = "true" Then
Var ButtonSpiralStage = "Enable"
EndIf
DEBUGVAR SpiralOnline
RootLayoutVisible 13 "hide"
1000
;SAVELOG SoundPlaying
If countDownRetrun > 0 Then
Var countDownRetrun = countDownRetrun - 1
EndIf
If countDownRetrun = 0 Then
If Seeker = "next" Then
RootLayoutVisible 3 "hide"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
; 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
DEBUGVAR MultiProcess
DEBUGVAR MultiProcessTimer
DEBUGVAR CatalogLayoutV3
If CatalogLayoutV3Loaded = 1 Then
Var Inst5MenuLoaded = "done"
Var Inst6MenuLoaded = "done"
Var Inst7MenuLoaded = "done"
Var Inst8MenuLoaded = "done"
Var Inst9MenuLoaded = "done"
Var Inst10MenuLoaded = "done"
Var Inst11MenuLoaded = "done"
EndIf
If MultiProcess = "Enable" Then
If SelectedMenu = "coffee" Then
Var MultiProcessTimer = MultiProcessTimer + 1
If Inst5MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 2
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
If MultiProcessTimer >= 20 Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 2
Var MultiProcessTimer = 0
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
EndIf
EndIf
EndIf
If SelectedMenu = "tea" Then
Var MultiProcessTimer = MultiProcessTimer + 1
If Inst6MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 3
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
If MultiProcessTimer >= 20 Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 3
Var MultiProcessTimer = 0
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
EndIf
EndIf
EndIf
If SelectedMenu = "caramel" Then
Var MultiProcessTimer = MultiProcessTimer + 1
If Inst7MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 4
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
If MultiProcessTimer >= 20 Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 4
Var MultiProcessTimer = 0
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
EndIf
EndIf
EndIf
If SelectedMenu = "kidmenu" Then
Var MultiProcessTimer = MultiProcessTimer + 1
If Inst8MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 5
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
If MultiProcessTimer >= 20 Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 5
Var MultiProcessTimer = 0
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
EndIf
EndIf
EndIf
If SelectedMenu = "healthy" Then
Var MultiProcessTimer = MultiProcessTimer + 1
If Inst9MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 6
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
If MultiProcessTimer >= 20 Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 6
Var MultiProcessTimer = 0
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
EndIf
EndIf
EndIf
If SelectedMenu = "pepsi" Then
Var MultiProcessTimer = MultiProcessTimer + 1
If Inst10MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 8
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
If MultiProcessTimer >= 20 Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 8
Var MultiProcessTimer = 0
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
EndIf
EndIf
EndIf
If SelectedMenu = "soda" Then
Var MultiProcessTimer = MultiProcessTimer + 1
If Inst11MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 7
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
If MultiProcessTimer >= 20 Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 7
Var MultiProcessTimer = 0
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
EndIf
EndIf
EndIf
EndIf
Refresh
TimerReset
;If ChangeStatus = "payout-end" Then
; Var ChangeOK = 1
;EndIf
DEBUGVAR web_ready
If web_ready = "true" Then
If web_ref = QRCODE99 Then
Cart "DeleteMenuID" "ALL"
Var web_readyOK = web_ready
Var web_telnumOK = web_telnum
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_payment.xml"
EndIf
Else
EndIf
0 380 1080 1540 "0xeae6e1"
DEBUGVAR LanguageShow
;inter-image
If LanguageShow = "ENG" Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_eng/What_would_you_like_to_drink_today.mp3"
Var DirImage2 = "ROOT/taobin_project/image/drink_option_en/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
EndIf
If LanguageShow = "MALAY" Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_eng/What_would_you_like_to_drink_today.mp3"
EndIf
If LanguageShow = "THAI" Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/taobin_sawade.mp3"
Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
If SongkranSoundCampaign = 1 Then
Var PlaySoundLag = GreetingSound[SoundCampaignIndex]
EndIf
EndIf
If LanguageShow = "MYANMAR" Then
Var show_eng = "true"
Var DirImage2 = "ROOT/taobin_project/image/drink_option_mmr/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2_mmr/"
EndIf
If LanguageShow = "MSC" Then
Var show_eng = "true"
Var DirImage2 = "ROOT/taobin_project/inter/hkg/image/drink_option_msc/"
Var DirImageAlter = "ROOT/taobin_project/inter/hkg/image/page3_2_msc/"
EndIf
Play PlaySoundLag
Var countDownRetrun = 120
Var LanguageButtonEnable = "Enable"
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
RefreshAll
; back
70 591 940 85 000001 70 679 940 85 000002 1 844 1080 "auto" "Vertical" 3 "EnableAdjust" 296 344 42 ButtonFrozenSmoothie
; menu row 1
296 344 42 "Enable"
; menu row 1
296 344 42 ButtonSpiralStage
; menu row 1
296 344 42 "Enable" 296 344 42 "Enable"
; menu row 2
296 344 42 "Enable" 296 344 42 "Enable" 296 344 42 "Enable" 296 344 42 MenuKidButtonState 296 344 42 AppFastButtonState 296 344 42 WheyButtonState 296 344 42 "Enable" 5 1880 24 Center 1080
RobotoRegular
0xFFFFFF ShowNetworkProblemText
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"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_payment.xml"
EndIf
Else
EndIf
;include="ROOT/taobin_project/inc/button_remove_cup.inc"
0 380 MultiProcess "ROOT/taobin_project/image/collectiing/alpha.png" 493 968 94 94 MultiProcess "ROOT/taobin_project/image/page_payment/loading.gif" 0 1820 100 100 "/mnt/sdcard/coffeevending/wav/click.wav" SoundVolume
Var ClickCountMainTe = ClickCountMainTe + 1
DEBUGVAR ClickCountMainTe
If ClickCountMainTe = 2 Then
Var OpenRouteManTest = 1
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
Var ClickCountMainTe = 0
EndIf
1 1
KanitTTF
22 1080 end 0xFF0000 "MT2 "
Var StrawGetMoreState = "Invisible"
Var bg_lidProblem_ST = "Invisible"
Var GetLidButtonState2 = "Enable"
Var bg_lidProblem_ST2 ="Invisible"
Var EnableGetMoreStrawFileName2 = "Enable"
Var bg_strawProblem_ST2 ="Invisible"
Var StrawGetMoreState = "Invisible"
Var bg_lidProblem_ST = "Enable"
Var GetLidButtonState2 = "Invisible"
Var bg_lidProblem_ST2 ="Enable"
Var XStraw = 376
Var EnableGetMoreStrawFileName2 = "Invisible"
Var bg_strawProblem_ST2 ="Enable"
Var MachineState_Result = 0
Var waitAckPay = 1
Var BREW_COUNT_DOWN_FROM_APP = "on"
Var CountDownBrewing = 122
Var MachineStage = "testing"
Var BREW_CNT = 122
Var InternationalEnable = 1
DEBUGVAR InternationalEnable
Var LanguageObjectShow = "Enable"
Var NoLangObjectShow = "Invisible"
Var Top2Timeout = 19
DEBUGVAR CountDownBrewing
;Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_lid_straw.xml"
; Initial for jump to page_brewing3.xml
;Open "ROOT/taobin_project/inter/tha/xml/page_collect_point_1.lxml"
Open "ROOT/taobin_project/xml/page_check_member2.xml"
Open "ROOT/taobin_project/xml/page_check_member2_campaign.xml"
Open "ROOT/taobin_project/xml/page_before_check_member.xml"
Open "ROOT/taobin_project/xml/page_topup_credit3-TopupSuccess.xml"
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupSuccess.xml"