0 608 "Enable" 1080 1312 "0xEFEDEA" SoundVolume TopView "hide" OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/topview_button_back_main.xml" Var FileNumber = 1 Var taobin_version = "1.32" ; 1.00 is ; 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 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 KanitSemiBoldTTF = "ROOT/taobin_project/font/Kanit/Kanit-Medium.ttf" Var BlinkStar = "ROOT/taobin_project/image/animation/blink_star.gif" Var countClick = 0 Var RoadShow = "false" Var IgnorePoint = "true" Var ShowButtonClick = "Enable" Var ShowButtonClickFull = "Invisible" ;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 If MachineStage = "close-maintenance" Then Open "ROOT/taobin_project/xml/page_show_error.xml" EndIf If MachineStage = "mcu-upgrade" Then Open "ROOT/taobin_project/xml/page_show_error.xml" EndIf If NeedUpgrade = "true" Then Open "ROOT/taobin_project/xml/page_show_error.xml" EndIf Var TestLoopMakeDrink = 0 Var TestLoopSuccess = 0 Var TestLoopFailed = 0 ;Var IgnoreNetCore = "false" ;SAVELOG SaleProfile STRCONTAIN "whey" SaleProfile WheyShow STRCONTAIN "cocktail" SaleProfile CocktailShow STRCONTAIN "roadshow" SaleProfile RoadShow Var TermTemOnline = "false" Var TaobinOnline = "false" STRCONTAIN "9501" MaterialAvailable TaobinOnline STRCONTAIN "9505" MaterialAvailable TermTemOnline DEBUGVAR TaobinOnline DEBUGVAR TermTemOnline Var ShowPrice = "Enable" If RoadShow = "true" Then Var ShowPrice = "Invisible" EndIf ;SAVELOG WheyShow ;SAVELOG CocktailShow ;SAVELOG RoadShow ;SAVELOG ShowPrice Var CountDownShowButton = 35 Var CountDownPauseVideo = 0 Var NextPage = "-" If StartUpExt = "false" Then Else Machine Initial Var StartUpExt = "false" EndIf StopLongPlay Var TimerFirst = "true" Var buttonRemoveCup = "Invisible" 1000 If IgnoreNetCore = "true" Then Else If NetworkStatus = "DOWN" Then Open "/ROOT/xml/outservice.xml" EndIf If NetworkStatus = "DEACTIVE" Then Open "/ROOT/xml/offline.xml" EndIf If MachineStage = "close-maintenance" Then Open "ROOT/taobin_project/xml/page_show_error.xml" EndIf If MachineStage = "mcu-upgrade" Then Open "ROOT/taobin_project/xml/page_show_error.xml" EndIf EndIf If MachineStage = "drink-failed" Then Open "ROOT/taobin_project/xml/page_show_error.xml" EndIf If MachineStage = "remove-cup" Then Open "ROOT/taobin_project/xml/page_remove_cup.xml" EndIf If NeedUpgrade = "true" Then Open "ROOT/taobin_project/xml/page_show_error.xml" EndIf If CountDownShowButton > 0 Then Var CountDownShowButton = CountDownShowButton - 1 EndIf ;SAVELOG MachineStage ;SAVELOG CountDownShowButton ;SAVELOG ShowButtonClickFull If CountDownShowButton = 31 Then Var ShowButtonClickFull = "Enable" Var ShowButtonClick = "Invisible" Refresh EndIf If CountDownShowButton = 3 Then Var ShowButtonClick = "Enable" Var ShowButtonClickFull = "Invisible" Refresh EndIf If CountDownPauseVideo > 0 Then ; ignore ;Var CountDownPauseVideo = CountDownPauseVideo - 1 If CountDownPauseVideo = 0 Then Var NextPage = "ROOT/taobin_project/xml/page_back_to_main.xml" OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml" OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_choose_drink1.xml" TopView "show" Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml" EndIf EndIf If TimerFirst = "true" Then Var TimerFirst = "false" Var CountUpReloadAll = CountUpReloadAll + 1 DEBUGVAR CountUpReloadAll If CountUpReloadAll > 180 Then Var StartUpExt = "-" Var CountUpReloadAll = 0 ReloadAll EndIf EndIf If CupOnArm = "true" Then Var buttonRemoveCup = "Enable" Else Var buttonRemoveCup = "Invisible" EndIf TimerReset ;SAVELOG ShowButtonClick Var CountDownShowButton = 35 Var CountDownPauseVideo = 6 TouchTapClose Open CurrentXMLFileName0 Refresh SAVELOG NetworkStatus Open "/mnt/sdcard/coffeevending/xml/main.xml" SAVELOG NetworkStatus Open "/mnt/sdcard/coffeevending/xml/main.xml" 0 1860 200 50 SoundVolume Var countClick = countClick + 1 If countClick = 3 Then ;Var TestLoopMakeDrink = 1 EndIf If countClick = 5 Then Var countClick = 0 MainMenu EndIf Refresh 212 1481 ShowButtonClick ; "0x00BDFF" "ROOT/taobin_project/image/main_page/bp_main_page_start.png" "/mnt/sdcard/coffeevending/wav/click.wav" SoundVolume 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 TaobinOnline = "true" Then OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.xml" EndIf If TermTemOnline = "true" Then OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_tt_catalog.xml" EndIf EndIf TopView "show" Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml" 212 1695 ShowButtonClick ; "0x00BDFF" "ROOT/taobin_project/image/main_page/bp_main_page_member.png" "/mnt/sdcard/coffeevending/wav/click.wav" SoundVolume OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml" OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_check_member.xml" TopView "show" Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml" 556 1695 ShowButtonClick ; "0x00BDFF" "ROOT/taobin_project/image/main_page/bp_main_page_topup.png" "/mnt/sdcard/coffeevending/wav/click.wav" SoundVolume Open "ROOT/xml/service_menu.xml" 2 609 ShowButtonClickFull ; "0x00BDFF" 1070 1310 "/mnt/sdcard/coffeevending/wav/click.wav" SoundVolume OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml" If TaobinOnline = "true" Then OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.xml" EndIf If TermTemOnline = "true" Then OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_tt_catalog.xml" EndIf TopView "show" Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml" 868 634 buttonRemoveCup ; "0x00BDFF" 300 "ROOT/taobin_project/image/main_page/bn_remove_cup.png" "ROOT/taobin_project/image/main_page/bp_remove_cup.png" Machine RemoveCup