"Enable" 1080 1920 ; "0xeae6e1" SoundVolume OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml" TopView "show" ; On open DEBUGVAR ToppingNewShow 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 = 300 CoinVending OFF ; 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 ; 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 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 = "" If BoxID = 0 Then RebootWithCause "BoxID was zero" EndIf DEBUGVAR ShowButtonClick2 DEBUGVAR MenuKidButtonState ; test step 1 Var ArrayTestInt[0] = 1 DEBUGVAR ArrayTestInt[0] Var ArrayTestInt[0] = ArrayTestInt[0] + 2 DEBUGVAR ArrayTestInt[0] Var EngLangTest[0] = "hurr1" Var EngLangTest[1] = "hurr2" DEBUGVAR EngLangTest[0] DEBUGVAR EngLangTest[1] Var god_of_hurr = 0 Var EngLangTest[god_of_hurr] = "test1" Var god_of_hurr = god_of_hurr + 1 DEBUGVAR god_of_hurr Var EngLangTest[god_of_hurr] = "test2" Var god_of_hurr = god_of_hurr + 1 DEBUGVAR god_of_hurr Var EngLangTest[god_of_hurr] = "test3" Var EngLangTest[10] = "test-10" DEBUGVAR EngLangTest[0] DEBUGVAR EngLangTest[1] DEBUGVAR EngLangTest[2] DEBUGVAR EngLangTest[10] Var EngLangTest[10] = "test-10-10" DEBUGVAR EngLangTest[10] ; test step 2 Var Array2Test2Int[0][0] = "0A" Var Array2Test2Int[0][1] = "0B" Var Array2Test2Int[0][2] = "0C" Var Array2Test2Int[0][3] = "0D" DEBUGVAR Array2Test2Int[0][0] DEBUGVAR Array2Test2Int[0][1] DEBUGVAR Array2Test2Int[0][2] DEBUGVAR Array2Test2Int[0][3] Var Array2Test2Int[0][0] = "===> 0A" Var Array2Test2Int[0][1] = "===> 0B" Var Array2Test2Int[0][2] = "===> 0C" Var Array2Test2Int[0][3] = "===> 0D" DEBUGVAR Array2Test2Int[0][0] DEBUGVAR Array2Test2Int[0][1] DEBUGVAR Array2Test2Int[0][2] DEBUGVAR Array2Test2Int[0][3] Var Array2Test2Int[1][0] = "1A" Var Array2Test2Int[1][1] = "1B" Var Array2Test2Int[1][2] = "1C" Var Array2Test2Int[1][3] = "1D" DEBUGVAR Array2Test2Int[1][0] DEBUGVAR Array2Test2Int[1][1] DEBUGVAR Array2Test2Int[1][2] DEBUGVAR Array2Test2Int[1][3] DEBUGVAR Array2Test2Int[0][0] DEBUGVAR Array2Test2Int[0][1] DEBUGVAR Array2Test2Int[0][2] DEBUGVAR Array2Test2Int[0][3] Var Array2TestInt[0][0] = 1 Var Array2TestInt[1][0] = 2 Var Array2TestInt[2][0] = 3 Var Array2TestInt[3][0] = 4 DEBUGVAR Array2TestInt[0][0] DEBUGVAR Array2TestInt[1][0] DEBUGVAR Array2TestInt[2][0] DEBUGVAR Array2TestInt[3][0] Var PromotionIDCurrentOrder = 0 RootLayoutVisible 3 "show" 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 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 If LanguageShow = "ENG" 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" EndIf Play PlaySoundLag Var countDownRetrun = 300 Var LanguageButtonEnable = "Enable" Var ButtonLanguageCurrentXPosition = 990 Var ButtonLanguageCurrentYPosition = 438 Var ButtonLanguageListXPosition = 970 Var ButtonLanguageListYPosition = 430 OpenInst 3 "ROOT/taobin_project/xml/topview2.xml" Refresh ; back 70 591 940 85 000001 70 679 940 85 000002 ; menu row 1 ; menu row 2 ;############################################################### ;############################################################### 5 1880 24 Center 1080 RobotoRegular 0xFFFFFF ShowNetworkProblemText ; Cart 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 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