0 608 "Enable" 1080 1312 "0xEFEDEA" SoundVolume Var Timeout = 0 Var countClick = 0 Var countClick2 = 0 READ_FILE "/mnt/sdcard/coffeevending/country/short" StrCountryShort DEBUGVAR StrCountryShort ; Don't forget ; This file can open before page_board.xml If StrCountryShort = "MYS" Then Open "ROOT/taobin_project/inter/mys/xml/page_remove_cup.lxml" EndIf If StrCountryShort = "AUS" Then Open "ROOT/taobin_project/inter/aus/xml/page_remove_cup.lxml" EndIf If StrCountryShort = "SGP" Then ;Open "ROOT/taobin_project/inter/sgp/xml/page_remove_cup.lxml" EndIf If show_eng = "true" Then Var DirImage = "ROOT/taobin_project/image/user_take_cup_en/" Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png" Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png" Else Var DirImage = "ROOT/taobin_project/image/user_take_cup_th/" Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png" Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png" EndIf LED LedDoorDoor 5 255 255 255 255 Var TimeoutInstance0 = 0 Var CheckCupStateDoorCupClose = "-" Var CheckCupStateDoorCupCloseCnt = 0 Var CoundUpDelayCertainStage = 0 1000 ;SAVELOG MachineErrorDetail Var MachineErrorDetailAll = MachineErrorDetail + " / " Var MachineErrorDetailAll = MachineErrorDetailAll + MachineErrorDetailEng ;DEBUGVAR HaveCup ;DEBUGVAR CupOnArm ;DEBUGVAR DoorCupPosition ;DEBUGVAR CupChecking ;DEBUGVAR CupArmMove ;DEBUGVAR buttonRemoveCup ; Add haveCup false for block display abnormal. Alternate between page_board.xml and this file. If HaveCup = "false" Then If MachineStage = "show-menu" Then Open "ROOT/taobin_project/xml/page_board.xml" EndIf EndIf If MachineStage = "close-maintenance" Then Open "ROOT/taobin_project/xml/page_show_error.xml" EndIf If show_eng = "true" Then Else If Timeout = 0 Then If CupChecking = "false" Then If DoorCupPosition = "bottom" Then Play "/mnt/sdcard/coffeevending/taobin_project/sound_thai/remove_cup.mp3" EndIf EndIf EndIf EndIf Var Timeout = Timeout + 1 If Timeout > 15 Then Var Timeout = 0 EndIf Var TimeoutInstance0 = TimeoutInstance0 + 1 If TimeoutInstance0 > 600 Then Var TimeoutInstance0 = 0 SAVELOG "Check Cup all" Machine CheckCupAll EndIf ; Logic have differrent drinkfail3.xml ; protect lock ; If CheckCupStateDoorCupCloseCnt > 0 Then Var CheckCupStateDoorCupCloseCnt = CheckCupStateDoorCupCloseCnt - 1 DEBUGVAR CheckCupStateDoorCupCloseCnt If CheckCupStateDoorCupCloseCnt = 0 Then Var CheckCupStateDoorCupClose = "" EndIf EndIf If HaveCup = "true" Then If CheckCupStateDoorCupClose = "" Then Var buttonRemoveCup = "Enable" EndIf Else If buttonRemoveCup = "Enable" Then Var buttonRemoveCup = "Invisible" EndIf EndIf If DoorCupPosition = "bottom" Then Else Var buttonRemoveCup = "Invisible" Var CoundUpDelayCertainStage = 0 EndIf If CupArmMove = "true" Then Var buttonRemoveCup = "Invisible" If show_eng = "true" Then Var MachineErrorDetailAll = "Please wait." Else Var MachineErrorDetailAll = "กรุณารอสักครู่" EndIf Else If CupArmMove = "false" Then If HaveCup = "true" Then If DoorCupPosition = "bottom" Then If buttonRemoveCup = "Invisible" Then Var CoundUpDelayCertainStage = CoundUpDelayCertainStage + 1 If CoundUpDelayCertainStage > 2 Then Var buttonRemoveCup = "Enable" EndIf EndIf EndIf EndIf EndIf EndIf Refresh TimerReset SAVELOG "EventDrink" DEBUGVAR HaveCup DEBUGVAR CupOnArm DEBUGVAR DoorCupPosition DEBUGVAR CupChecking DEBUGVAR CupArmMove If HaveCup = "true" Then Var buttonRemoveCup = "Enable" Else Var buttonRemoveCup = "Invisible" EndIf 0 852 Var(DirImage + "/img5.png") 5 1868 24 Center 1080 RobotoRegular 0xDE794E MachineErrorDetailAll