"Enable" 1080 1920 "0xEFEDEA" SoundVolume "Partial" ; On open Var DirImage = CountryRootPath + "/image/collectiing/" Var Timeout = 0 StopLongPlay Var MachineErrorDetailAll = MachineErrorDetailEng DEBUGVAR Seeker.CreditCard Var SorryUnexpectedTxt11 = DirImage + "/text11.png" Var SorryFullState = "Enable" If Seeker.CreditCard = 1 Then DEBUGVAR "Fail5::CreditCard" Var SorryUnexpectedTxt11 = DirImage + "/text11_if_credit.png" Var Timeout = 21 Var SorryFullState = "Invisible" EndIf DEBUGVAR SorryUnexpectedTxt11 DEBUGVAR TelephoneNumberProblem 1000 Var Timeout = Timeout + 1 If Timeout > 30 Then DEBUGVAR TelephoneNumberProblem StrLen TelephoneNumberProblem TelNumLen If Seeker.CreditCard = 0 Then If TelNumLen >= MinPhoneNumber Then Var ProblemID = 7 Var ChooseProblem = "taobin purchasing problems" If Seeker.PayWithQR = 1 Then Var VendingTSIDProblem = VendingTSIDTmp If Seeker.CampaignPayChanel = "promptpay" Then Var ProblemID = 8 Var ChooseProblem = "taobin purchasing problems(Void Failed)" EndIf Else Var VendingTSIDProblem = VendingTSID EndIf PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem EndIf EndIf If MachineStage = "remove-cup" Then Open "ROOT/taobin_project/xml/page_drinkfail3.xml" Else If NextOrder = "true" Then Var NextOrder = "false" TransferVar "next" "curr" Var Seeker = "curr" Open "ROOT/taobin_project/xml/page_thankyouConti.xml" Else Open "ROOT/taobin_project/xml/page_back_to_main.xml" EndIf EndIf EndIf TimerReset ;include="ROOT/taobin_project/inc/video.inc" 0 428 SorryUnexpectedTxt11 429 1351 SorryFullState Var( DirImage + "/QR_contract.png" ) 190 1598 SorryFullState Var( DirImage + "/text13.png" ) 392 1720 Var( DirImage + "/bn_close.png" ) Var( DirImage + "/bp_close.png" ) "/mnt/sdcard/coffeevending/wav/click.wav" SoundVolume StrLen TelephoneNumberProblem TelNumLen If Seeker.CreditCard = 0 Then If TelNumLen >= MinPhoneNumber Then Var ProblemID = 7 Var ChooseProblem = "taobin purchasing problems" If Seeker.PayWithQR = 1 Then Var VendingTSIDProblem = VendingTSIDTmp If Seeker.CampaignPayChanel = "promptpay" Then Var ProblemID = 8 Var ChooseProblem = "taobin purchasing problems(Void Failed)" EndIf Else Var VendingTSIDProblem = VendingTSID EndIf PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem EndIf EndIf If MachineStage = "remove-cup" Then Open "ROOT/taobin_project/xml/page_drinkfail3.xml" Else If NextOrder = "true" Then Var NextOrder = "false" TransferVar "next" "curr" Var Seeker = "curr" Open "ROOT/taobin_project/xml/page_thankyouConti.xml" Else Open "ROOT/taobin_project/xml/page_back_to_main.xml" EndIf EndIf 5 1868 24 Center 1080 RobotoRegular 0xDE794E MachineErrorDetailAll