"Enable" 1080 1920 "0xeae6e1" SoundVolume
; On open
Var LidState = "Enable"
Var StarwState = "Enable"
Var countClick2 = 0
800
Var CountDownBrewing = CountDownBrewing - 1
; run test;
;If CountDownBrewing = 40 Then
; Open "ROOT/taobin_project/xml/menu_drinkok.xml"
;EndIf
If CountDownBrewing = 0 Then
Open "ROOT/taobin_project/xml/menu_drinkok.xml"
EndIf
Var ShowCountDownBrewing = CountDownBrewing
If ChangeOK = 2 Then
If ActionOKCase = 0 Then
Var TelephoneNumber = "0899999999"
Var VendingDiscount = 0
Var VendingCampaign = 0
Var ServiceType = "credit"
Var SessionID2 = SelectDrink
Var ServiceCredit = "coffee"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
;Open "ROOT/xml/menu_closeMaintenance.xml"
Var ActionOKCase = 1
EndIf
EndIf
If MachineState_Result = 1 Then
Var Timeout = 0
Var ProcessText = ""
Var TelephoneNumber = "0899999999"
Var ServiceType = "coffee"
Var ServiceCredit = SelectDrink
Var SuggestID = ""
If PayWithQR = 0 Then
If CodeChannel = 1 Then
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + CodeNumber
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + VendingCode
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + SelectDrink
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + BoxID
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + "S"
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + CodeNumber
Var SessionID2 = SessionID2 + "/"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
Else
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
EndIf
EndIf
Var ServiceSuccess = "yes"
Open "ROOT/taobin_project/xml/menu_drinkok.xml"
EndIf
If MachineState_Result = 2 Then
If ErrTimeout = 0 Then
Var ErrTimeout = 1
If PayWithQR = 0 Then
If CodeChannel = 0 Then
If ChangeFlag = 0 Then
Var ChangeFlag = 1
Change ServiceAmount2
Var ChangeOK = 0
EndIf
Else
If CoinAmount > 0 Then
If ChangeFlag = 0 Then
Var ChangeFlag = 1
Var ServiceAmount2 = ServiceAmount2 - IntVendingCampaign
Change ServiceAmount2
Var ChangeOK = 0
EndIf
Else
Var ChangeOK = 4
EndIf
EndIf
Else
Var ChangeOK = 3
EndIf
OpenInst 0 "/mnt/sdcard/coffeevending/taobin_project/xml/menu_drinkfail.xml"
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/test_video_loop.xml"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/menu_list.xml"
EndIf
EndIf
If MachineStage = "show-menu" Then
Open "ROOT/taobin_project/xml/menu_drinkok.xml"
EndIf
If MachineStage = "close-maintenance" Then
Open "ROOT/taobin_project/xml/menu_back_to_main.xml"
EndIf
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf
Refresh
TimerReset
;If MachineStage = "drink-success" Then
; Open "ROOT/taobin_project/xml/menu_drinkok.xml"
;EndIf
;If MachineStage = "drink-failed" Then
; Open "ROOT/taobin_project/xml/menu_drinkfail.xml"
;EndIf
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf
; this copy in file menu_brew2.xml and menu_lid_straw.xml
If ChangeStatus = "payout-end" Then
Var ChangeOK = 2
EndIf
0 0 "ROOT/taobin_project/image/ad_medium_2.png" 140 1124 "ROOT/taobin_project/image/page_doing/text2.png" 751 413 "ROOT/taobin_project/image/page_doing/img2.png" 808 480 1080 "Hurr" 88
"ROOT/taobin_project/font/Roboto/Roboto-Regular.ttf"
0x513C2F ShowCountDownBrewing 0 1880 30 Center 1080
RobotoBlack
0x513C2F MachineStage 0 1886 20 1080 Start
RobotoBlack
0x513C2F countClick 0 1886 20 1080 end
RobotoBlack
0x513C2F countClick2