"Enable" 1080 1920 "0xEFEDEA" SoundVolume
; "Partial"
; On open
Var Seeker.TNumberTaobinMember = ""
DEBUGVAR TelephoneNumberProblem
DEBUGVAR Seeker.PromotionIDCurrentOrder
If TelephoneNumberProblem = "" Then
Else
Var NumberFailed = "true"
CHECKNUMBERFAIL TelephoneNumberProblem NumberFailed
DEBUGVAR NumberFailed
DEBUGVAR ERROR_PAY_TIMEOUT
DEBUGVAR ERROR_BREW_CAUSE_ENG
DEBUGVAR ERROR_BREW_CAUSE_THAI
If FailedCount > 0 Then
Var ERROR_PAY_TIMEOUT = "false"
DEBUGVAR FailedCount
DEBUGVAR ERROR_PAY_TIMEOUT
EndIf
If NextOrder = "true" Then
Var ERROR_PAY_TIMEOUT = "false"
DEBUGVAR FailedCount
DEBUGVAR ERROR_PAY_TIMEOUT
EndIf
If ERROR_PAY_TIMEOUT = "true" Then
If NumberFailed = "false" Then
If show_eng = "true" Then
Var TextErrorShow = ERROR_BREW_CAUSE_ENG
Else
If show_japan = "true" Then
Var TextErrorShow = ERROR_BREW_CAUSE_JAPAN
Else
Var TextErrorShow = ERROR_BREW_CAUSE_THAI
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_drinkfail4.xml"
EndIf
If CountryName = "Malaysia" Then
Open "ROOT/taobin_project/xml/page_drinkfail5.xml"
Else
Open "ROOT/taobin_project/xml/page_drinkfail2-2.xml"
EndIf
Else
If CountryName = "Malaysia" Then
Open "ROOT/taobin_project/xml/page_drinkfail5.xml"
Else
Open "ROOT/taobin_project/xml/page_drinkfail2-2.xml"
EndIf
EndIf
EndIf
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en/"
Else
Var DirImage = "ROOT/taobin_project/image/collectiing/"
EndIf
Var Timeout = 0
StopLongPlay
Var MachineErrorDetailAll = MachineErrorDetail + " / "
Var MachineErrorDetailAll = MachineErrorDetailAll + MachineErrorDetailEng
If show_eng = "true" Then
Var textRefundChannelX = "textRefundChannel1.png"
Var xRefundChannelX = 249
If Seeker.PayWithQR = 0 Then
If Seeker.StoreCreditFlag = 1 Then
Var textRefundChannelX = "textRefundChannel2.png"
Var xRefundChannelX = 249
EndIf
If Seeker.CodeChannel = 1 Then
Var textRefundChannelX = "textRefundChannel3.png"
Var xRefundChannelX = 60
EndIf
Else
Var textRefundChannelX = "textRefundChannel3.png"
Var xRefundChannelX = 60
EndIf
Var textRefundChannelX = "textRefundChannel3.png"
Var xRefundChannelX = 60
Else
Var textRefundChannelX = "textRefundChannel1.png"
Var xRefundChannelX = 204
If Seeker.PayWithQR = 0 Then
If Seeker.StoreCreditFlag = 1 Then
Var textRefundChannelX = "textRefundChannel2.png"
Var xRefundChannelX = 256
EndIf
If Seeker.CodeChannel = 1 Then
Var textRefundChannelX = "textRefundChannel3.png"
Var xRefundChannelX = 162
EndIf
Else
Var textRefundChannelX = "textRefundChannel3.png"
Var xRefundChannelX = 162
EndIf
Var textRefundChannelX = "textRefundChannel3.png"
Var xRefundChannelX = 162
EndIf
Var text22 = "/text22.png"
Var MaxNumber = 10
If CountryName = "Malaysia" Then
Var MaxNumber = 11
EndIf
If CountryName = "Indonesia" Then
Var MaxNumber = 12
EndIf
1000
SAVELOG MachineStage
Var Timeout = Timeout + 1
If Timeout > 15 Then
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
;
; xRefundChannelX
; 960
; Var( DirImage + textRefundChannelX )
; 47 408 Var( DirImage + text22 )
;
; 410
; 524
; Var( DirImage + "/Businessman_sorry.png" )
; 262 1119 Var( DirImage + "/img5.png" ) 400 1160 ShowTextNumber
; "Enable" Var( DirImage + "/text15.png" ) 293 1140 ShowTextNumber
; "Enable" Var( DirImage + "/Group.png" ) 0 1140 1080 Center 62
RobotoBlack
0x513C2F TelephoneNumberProblem Telnum-mask-1 5 1868 24 Center 1080
RobotoRegular
0xDE794E MachineErrorDetailAll