"Enable" 1080 1920 "0xeae6e1" "ROOT/taobin_project/sounds/chaching.mp3" SoundVolume ; On open Var CountDownThankyou = 4 Var CountDownBrewing = BrewTime Var CountUpBrewing = 0 SAVELOG BrewTime Var ShowCountDownBrewing = CountDownBrewing Var Timeout = 0 Var ChangeFlag = 0 Var ErrTimeout = 0 Var ActionOKCase = 0 Var ChangeTimeout = 0 Var ChangeOK = 0 Var MachineState_Result = 0 Var FailedCount = 0 Var ChangeAmountSum = 0 Var Tel_Confirm_Flag = 0 Var LastMakeDrinkResult = "-" DEBUGVAR MIGGAZE2 DEBUGVAR MachineStage DEBUGVAR NextOrderStatus If show_eng = "true" Then Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2_eng.png" Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png" Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png" Var BottomText = PicturePath + "text_bottom_eng.png" Else Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2.png" Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png" Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png" Var BottomText = PicturePath + "text_bottom_thai2.png" EndIf DEBUGVAR StarwState DEBUGVAR LidState DEBUGVAR BottomText If StarwState = "Press" Then Machine StrawWithDelay LED LedDoorLid Blink 255 255 255 255 EndIf If LidState = "Press" Then Machine LidWithDelay LED LedDoorLid Blink 255 255 255 255 EndIf DEBUGVAR Seeker.TNumberTaobinCredit DEBUGVAR TelephoneNumber DEBUGVAR Seeker.StoreCreditFlag If Seeker = "curr" Then SAVELOG "Call from thankyou Conti" If Seeker.get_a_straw = "Press" Then Machine StrawOrder Var LedLidBlink = "true" EndIf If Seeker.get_a_lid = "Press" Then Machine LidOrder Var LedLidBlink = "true" EndIf Topping "Select" Seeker.selected_a_drink ; Set option toppinng and pack Topping "Select1-ID" Seeker.topping1 Topping "Select2-ID" Seeker.topping2 Topping "Select3-ID" Seeker.topping3 ; Pack Topping "Pack" ExtendData Var MachineStage = "NextOrder" Var SessionID2 = SelectSlot + ":" Var SessionID2 = SessionID2 + ExtendData EndIf DEBUGVAR LastMakeDrinkResult DEBUGVAR MachineStage DEBUGVAR NextOrderStatus 1000 Var CountDownBrewing = CountDownBrewing - 1 Var CountDownThankyou = CountDownThankyou - 1 Var Timeout = Timeout + 1 If Timeout = 4 Then Var VideoPlayFile = VideoPath Var VideoPlayFile = VideoPlayFile + VideoFileBegin Var VideoPlayFile = VideoPlayFile + "1" Var VideoPlayFile = VideoPlayFile + VideoFileEnd Var PictureFile = PicturePath Var PictureFile = PictureFile + PictureBegin Var PictureFile = PictureFile + "1" Var PictureFile = PictureFile + PictureEnd If CART_INDEX = 0 Then DEBUGVAR Seeker.selected_a_drink If NextOrderStatus = "Disable" Then Var LastMakeDrinkResult = "fail" Else MakeDrinkV1 Seeker.selected_a_drink SelectSugarID EndIf Else ;Cart "MakeID" CART_INDEX EndIf EndIf ; run test; If CountDownThankyou = 0 Then DEBUGVAR MachineStage Var CountDownBrewing = BrewTime Var CountUpBrewing = 0 SAVELOG BrewTime Var ShowCountDownBrewing = CountDownBrewing Var MachineState_Result = 0 Open "ROOT/taobin_project/xml/page_brewing3.xml" EndIf Var ShowCountDownBrewing = CountDownBrewing Refresh TimerReset ; ; 0 ; 0 ; "ROOT/taobin_project/image/ad_medium_2.png" ; 375 623 331 435 Seeker.PictureDrink 0 938 1080 Center 72 KanitMediumTTF 0x513C2F Seeker.showname If ChangeStatus = "payout-end" Then EndIf