"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"