1002 lines
22 KiB
XML
1002 lines
22 KiB
XML
<Popup>
|
|
<Cache> "Enable" </Cache>
|
|
<Width> 1080 </Width>
|
|
<Height> 1920 </Height>
|
|
<Background> "0xeae6e1" </Background>
|
|
<Sound> "ROOT/taobin_project/sounds/chaching.mp3" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventOpen>
|
|
Var SetPayMuti = 0
|
|
Var Timeout3 = 0
|
|
; Var LastMakeDrinkResult = "-"
|
|
; Var MachineState_Result = 2
|
|
|
|
Var ChangeFlag3 = 0
|
|
Var ChangeFailSpiral = 0
|
|
Var ChangeFailCoffee = 0
|
|
Var SpiralText1 = 0
|
|
Var MultiGo = 0
|
|
DEBUGVAR SpiralText1
|
|
Var Timeout = 0
|
|
Var ShowPictureFail = 0
|
|
If ChangeOK = 1 Then
|
|
Var ChangeOK = 2
|
|
EndIf
|
|
|
|
If show_eng = "true" Then
|
|
Var DirImage = "ROOT/taobin_project/image/complete_en/text_bottom.png"
|
|
Var DirImage1 = "ROOT/taobin_project/spiral/image/page_spiral/en_spiral_text_fail.png"
|
|
Else
|
|
Var DirImage = "ROOT/taobin_project/image/complete/text_bottom.png"
|
|
Var DirImage1 = "ROOT/taobin_project/spiral/image/page_spiral/spiral_text_fail.png"
|
|
EndIf
|
|
|
|
|
|
Var SpiralPickDrink = "Invisible"
|
|
</EventOpen>
|
|
<Timeout> 1000 </Timeout>
|
|
|
|
<EventActionOk>
|
|
If CreditCardVoid = 1 Then
|
|
Var ChangeOK = 3
|
|
EndIf
|
|
|
|
If Seeker.thankToppingFlag = 1 Then
|
|
Else
|
|
If SpiralCodeOk = 1 Then
|
|
If CheckAckCode = 1 Then
|
|
Var SessionID2 = SelectSlot + ":"
|
|
Var SessionID2 = SessionID2 + ExtendData
|
|
DEBUGVAR SessionID2
|
|
|
|
DEBUGVAR SessionID2
|
|
|
|
Var CreditAmount1 = ""
|
|
Var ServiceAmountFlow = ""
|
|
Var TelephoneNumber = "0899999999"
|
|
Var ServiceType = "locker"
|
|
Var ECommerce = ""
|
|
Var ECommerce = "locker5/"
|
|
Var ECommerce = ECommerce + PriceDrink
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + DiscountDrink
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + SessionID2
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + SelectDrink
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + Seeker.VendingCode
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + Seeker.CodeNumber
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + "C:"
|
|
Var ECommerce = ECommerce + Seeker.IntVendingCampaign
|
|
Var ServiceParameter = "max"
|
|
Var ServiceCharge = 0
|
|
Var AccountType = "new"
|
|
Var testservice = "kbank"
|
|
Var tc = ""
|
|
Var GetScore = ""
|
|
Var OperatorName = ""
|
|
Var SessionID = ""
|
|
|
|
GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
|
|
|
Var SpiralCodeOk = 2
|
|
|
|
Open "ROOT/taobin_project/spiral/xml/page_spiral_fail2.xml"
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
</EventActionOk>
|
|
|
|
|
|
<EventTimeout>
|
|
|
|
DEBUGVAR LastMakeSpiralResult
|
|
DEBUGVAR LastMakeDrinkResult
|
|
DEBUGVAR MachineState_Result
|
|
DEBUGVAR MachineStage
|
|
DEBUGVAR SpiralPickDrink
|
|
|
|
; DEBUGVAR waitAckPay
|
|
; DEBUGVAR Timeout
|
|
; DEBUGVAR sendPayMultiFlag
|
|
; DEBUGVAR PayOk
|
|
; DEBUGVAR SetPayMuti
|
|
; DEBUGVAR MultiGo
|
|
; DEBUGVAR ChangeOK
|
|
; DEBUGVAR ChangeStatus
|
|
; DEBUGVAR Seeker.TNumberTaobinCredit
|
|
; DEBUGVAR Seeker.StoreCreditFlag
|
|
; DEBUGVAR Seeker.PayWithQR
|
|
; DEBUGVAR Seeker.CodeChannel
|
|
; DEBUGVAR CheckAckCodeTimer
|
|
;
|
|
; DEBUGVAR Seeker.pageStoreCredit0
|
|
;
|
|
; DEBUGVAR SpiralCodeOk
|
|
; DEBUGVAR CheckAckCode
|
|
; DEBUGVAR CheckAckCodeTimer
|
|
|
|
Var Timeout = Timeout + 1
|
|
|
|
Var ChangeTimeout = ChangeTimeout - 1
|
|
Var CheckAckCodeTimer = CheckAckCodeTimer - 1
|
|
|
|
If MachineStage = "pickup-cup" Then
|
|
Var SpiralPickDrink = "Enable"
|
|
Else
|
|
Var SpiralPickDrink = "Invisible"
|
|
EndIf
|
|
|
|
If ChangeTimeout < 1 Then
|
|
If ChangeOK = 1 Then
|
|
Var ChangeOK = 2
|
|
Var ChangeTimeout = 30
|
|
EndIf
|
|
EndIf
|
|
If ChangeTimeout < 1 Then
|
|
If ChangeFlag2 = 1 Then
|
|
Var ChangeOK = 3
|
|
Var ChangeFlag2 = 2
|
|
Var ChangeTimeout = 30
|
|
EndIf
|
|
EndIf
|
|
|
|
If SpiralCodeOk = 1 Then
|
|
If CheckAckCode = 1 Then
|
|
If LastMakeSpiralResult = 2 Then
|
|
Var SessionID2 = SelectSlot + ":"
|
|
Var SessionID2 = SessionID2 + ExtendData
|
|
DEBUGVAR SessionID2
|
|
|
|
DEBUGVAR SessionID2
|
|
|
|
Var CreditAmount1 = ""
|
|
Var ServiceAmountFlow = ""
|
|
Var TelephoneNumber = "0899999999"
|
|
Var ServiceType = "locker"
|
|
Var ECommerce = ""
|
|
Var ECommerce = "locker5/"
|
|
Var ECommerce = ECommerce + PriceDrink
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + DiscountDrink
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + SessionID2
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + SelectDrink
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + Seeker.VendingCode
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + Seeker.CodeNumber
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + "C:"
|
|
Var ECommerce = ECommerce + Seeker.IntVendingCampaign
|
|
Var ServiceParameter = "max"
|
|
Var ServiceCharge = 0
|
|
Var AccountType = "new"
|
|
Var testservice = "kbank"
|
|
Var tc = ""
|
|
Var GetScore = ""
|
|
Var OperatorName = ""
|
|
Var SessionID = ""
|
|
|
|
GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
|
|
|
Var SpiralCodeOk = 2
|
|
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
If PayOk = 9 Then
|
|
Var SetPayMuti = SetPayMuti + 1
|
|
If SetPayMuti = 2 Then
|
|
Var PayOk = 2
|
|
Var SetPayMuti = 0
|
|
EndIf
|
|
EndIf
|
|
|
|
If PayOk = 8 Then
|
|
Var SetPayMuti = SetPayMuti + 1
|
|
If SetPayMuti = 2 Then
|
|
Var PayOk = 3
|
|
Var SetPayMuti = 0
|
|
EndIf
|
|
EndIf
|
|
|
|
If PayOk = 7 Then
|
|
Var SetPayMuti = SetPayMuti + 1
|
|
If SetPayMuti = 2 Then
|
|
Var PayOk = 5
|
|
Var SetPayMuti = 0
|
|
EndIf
|
|
EndIf
|
|
|
|
If LastMakeSpiralResult = 2 Then
|
|
If ChangeOK = 3 Then
|
|
If PayOk = 0 Then
|
|
Var PayOk = 9
|
|
Var SessionID4 = MachineSpiralID
|
|
Var SessionID4 = SessionID4 + ":"
|
|
Var SessionID4 = SessionID4 + MachineSpiralSlotID
|
|
Var SessionID4 = SessionID4 + ":"
|
|
Var SessionID4 = SessionID4 + MachineSpiralRemaining
|
|
Var SessionID4 = SessionID4 + "/"
|
|
Var SessionID4 = SessionID4 + MachineSpiralVMName
|
|
|
|
Var SessionID3 = SessionID3 + MachineSpiralID
|
|
Var SessionID3 = SessionID3 + "/"
|
|
Var SessionID3 = SessionID3 + MachineSpiralSlotID
|
|
|
|
If SpiralCodeOk = 1 Then
|
|
Var SessionID3 = SessionID3 + "/"
|
|
Var SessionID3 = SessionID3 + Seeker.VendingCode
|
|
Var SessionID3 = SessionID3 + "/"
|
|
Var SessionID3 = SessionID3 + Seeker.CodeNumber
|
|
EndIf
|
|
|
|
|
|
;Var PayDetail="1/F:1221/0/"
|
|
Var PayDetail="1/F:"
|
|
Var PayDetail = PayDetail + MachineSpiralErrorCode
|
|
Var PayDetail = PayDetail + "/"
|
|
Var PayDetail = PayDetail + SessionID4
|
|
|
|
If Seeker.PayWithQR = 1 Then
|
|
;If waitAckPay = 0 Then
|
|
; Var waitAckPay = 1
|
|
; Var SVT = "locker"
|
|
; Var ACC = "0899999999"
|
|
; Var DEE = PayDetail
|
|
|
|
If Seeker.TNumberTaobinCredit = "" Then
|
|
Else
|
|
Var ACC = Seeker.TNumberTaobinCredit
|
|
EndIf
|
|
;PAYEXT SVT ACC VendingTSIDTmp DEE
|
|
|
|
Var ServiceCredit = KeepServiceCredit
|
|
Var ServiceType = "locker"
|
|
|
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID3 PriceDrink ServiceCharge Donate
|
|
If SpiralCodeOk = 1 Then
|
|
Var CheckAckCode = 1
|
|
Var CheckAckCodeTimer = 10
|
|
Else
|
|
Var ShowPictureFail = 1
|
|
EndIf
|
|
;EndIf
|
|
Else
|
|
|
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID3 PriceDrink ServiceCharge Donate
|
|
If SpiralCodeOk = 1 Then
|
|
Var CheckAckCode = 1
|
|
Var CheckAckCodeTimer = 10
|
|
Else
|
|
Var ShowPictureFail = 1
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
If LastMakeSpiralResult = 2 Then
|
|
If Seeker.PayWithQR = 0 Then
|
|
If Seeker.CreditCard = 1 Then
|
|
If CreditCardVoid = 0 Then
|
|
|
|
Var ChangeFlag = 1
|
|
Var CreditCardVoid = 1
|
|
; Var ChangeOK = 3
|
|
EndIf
|
|
|
|
If CoinAmount > 0 Then
|
|
If ChangeFlag = 0 Then
|
|
Var ChangeFlag = 1
|
|
Var ServiceAmount3 = ServiceAmount2 - Seeker.IntVendingCampaign
|
|
|
|
If Seeker.StoreCreditFlag = 1 Then
|
|
Var ChangeOK = 2
|
|
Else
|
|
Change ServiceAmount3
|
|
Var ChangeFlag2 = 1
|
|
Var ChangeTimeout = 30
|
|
EndIf
|
|
EndIf
|
|
;Else
|
|
; Var ChangeOK = 3
|
|
EndIf
|
|
|
|
Else
|
|
If Seeker.CodeChannel = 0 Then
|
|
If ChangeFlag = 0 Then
|
|
Var ChangeFlag = 1
|
|
If Seeker.StoreCreditFlag = 1 Then
|
|
Var ChangeOK = 3
|
|
Else
|
|
Var ChangeFailSpiral = 1
|
|
;Var ServiceAmount2 = ServiceAmount2 - PriceDrinkTopping
|
|
;Change ServiceAmount2
|
|
Var ChangeTimeout = 30
|
|
Var ChangeFlag2 = 1
|
|
EndIf
|
|
EndIf
|
|
Else
|
|
If CoinAmount > 0 Then
|
|
If ChangeFlag = 0 Then
|
|
Var ChangeFlag = 1
|
|
Var ServiceAmount3 = ServiceAmount2 - Seeker.IntVendingCampaign
|
|
If Seeker.StoreCreditFlag = 1 Then
|
|
Var ChangeOK = 3
|
|
; test edit
|
|
Else
|
|
Change ServiceAmount3
|
|
Var ChangeFlag2 = 1
|
|
Var ChangeTimeout = 30
|
|
EndIf
|
|
EndIf
|
|
Else
|
|
If ChangeOK = 3 Then
|
|
Else
|
|
Var ChangeOK = 2
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
Else
|
|
Var ChangeOK = 3
|
|
EndIf
|
|
EndIf
|
|
|
|
If Seeker.thankToppingFlag = 1 Then
|
|
If MachineStage = "close-maintenance" Then
|
|
If MachineState_Result = 0 Then
|
|
SAVELOG "back_to_main from line > 663."
|
|
Var MachineState_Result = 2
|
|
EndIf
|
|
EndIf
|
|
|
|
If MachineStage = "drink-success" Then
|
|
Var MachineState_Result = 1
|
|
EndIf
|
|
|
|
If MachineStage = "drink-failed" Then
|
|
SAVELOG " drink-failed...."
|
|
Var MachineState_Result = 2
|
|
EndIf
|
|
|
|
If MachineState_Result > 0 Then
|
|
Var EnableSelectMenuBetweenBrew = "Invisible"
|
|
EndIf
|
|
|
|
|
|
|
|
If LastMakeDrinkResult = "success" Then
|
|
Var MachineState_Result = 1
|
|
EndIf
|
|
|
|
If MultiGo = 0 Then
|
|
If MachineState_Result = 2 Then
|
|
If SaveCoinAmount > 0 Then
|
|
If Seeker.TNumberTaobinCredit = "" Then
|
|
Change PriceDrinkTopping
|
|
Var MultiGo = 1
|
|
Else
|
|
Var MultiGo = 2
|
|
EndIf
|
|
Else
|
|
Var MultiGo = 2
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
If LastMakeDrinkResult = "success" Then
|
|
Var MachineState_Result = 1
|
|
EndIf
|
|
|
|
|
|
If PayOk = 2 Then
|
|
If MultiGo = 2 Then
|
|
If waitAckPay = 0 Then
|
|
If MachineState_Result = 2 Then
|
|
If Timeout3 = 0 Then
|
|
Var waitAckPay = 1
|
|
Var PayOk = 8
|
|
If Seeker.TNumberTaobinCredit = "" Then
|
|
Var TelephoneNumber = "0899999999"
|
|
Var PayO2 = ""
|
|
If Seeker.TNumberTaobinMember = "" Then
|
|
Else
|
|
Var TelephoneNumber = Seeker.TNumberTaobinMember
|
|
EndIf
|
|
Else
|
|
Var TelephoneNumber = Seeker.TNumberTaobinCredit
|
|
Var PayO2 = Seeker.CoffeePinNumber
|
|
EndIf
|
|
|
|
Var PayDetail= "1/F:1221/0/"
|
|
Var ServiceType = "coffee"
|
|
|
|
Var SuggestID = ""
|
|
Var SessionID2 = ""
|
|
Var ServiceCredit = SelectDrink
|
|
|
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
|
|
Var sendPayMultiFlag = 2
|
|
If Seeker.PayWithQR = 0 Then
|
|
If Seeker.CodeChannel = 0 Then
|
|
If Seeker.StoreCreditFlag = 1 Then
|
|
|
|
Else
|
|
Var ChangeAmountSum = ChangeAmountSum + ServiceAmount2
|
|
;Var MultiGo = 0
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
If PayOk = 2 Then
|
|
If MachineState_Result = 1 Then
|
|
DEBUGVAR PaySuccessWithDaemonTask
|
|
|
|
If waitAckPay = 0 Then
|
|
Var PayOk = 8
|
|
Var waitAckPay = 1
|
|
Var Timeout = 0
|
|
Var Timeout3 = 2
|
|
Var ProcessText = ""
|
|
|
|
If Seeker.TNumberTaobinCredit = "" Then
|
|
Var TelephoneNumber = "0899999999"
|
|
Var PayO2 = ""
|
|
|
|
If Seeker.TNumberTaobinMember = "" Then
|
|
Else
|
|
Var TelephoneNumber = Seeker.TNumberTaobinMember
|
|
EndIf
|
|
|
|
Else
|
|
Var TelephoneNumber = Seeker.TNumberTaobinCredit
|
|
Var PayO2 = Seeker.CoffeePinNumber
|
|
EndIf
|
|
|
|
|
|
Var ServiceType = "coffee"
|
|
Var ServiceCredit = SelectDrink
|
|
Var SuggestID = ""
|
|
|
|
Var PayDetail = "2/" + HURR_FOREVER
|
|
Var PayDetail = PayDetail + "/"
|
|
Var PayDetail = PayDetail + SAMESALARY
|
|
Var PayDetail = PayDetail + "/"
|
|
Var PayDetail = PayDetail + NOBONUS
|
|
Var PayDetail = PayDetail + "/XML|"
|
|
Var PayDetail = PayDetail + Seeker.OrderChanel
|
|
|
|
|
|
|
|
If GetFreeFromError = 1 Then
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.VendingCode = "FAU"
|
|
Var Seeker.CodeNumber = "0000000000"
|
|
Var VendingCampaign = ServiceAmount2
|
|
EndIf
|
|
|
|
If Seeker.PayWithQR = 0 Then
|
|
If Seeker.CodeChannel = 1 Then
|
|
;Var SessionID2 = SessionID2 + "/"
|
|
;Var SessionID2 = SessionID2 + Seeker.CodeNumber
|
|
;Var SessionID2 = SessionID2 + "/"
|
|
;Var SessionID2 = SessionID2 + Seeker.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 + Seeker.CodeNumber
|
|
;Var SessionID2 = SessionID2 + "/"
|
|
|
|
If Seeker.CreditCard = 1 Then
|
|
|
|
CashlessReq SUCCESS
|
|
;CashlessReq FAIL
|
|
|
|
EndIf
|
|
|
|
If SessionID2 = "2:00000" Then
|
|
Var SessionID2 = "1:00000"
|
|
EndIf
|
|
|
|
|
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
|
|
Var sendPayMultiFlag = 2
|
|
Else
|
|
|
|
If Seeker.CreditCard = 1 Then
|
|
|
|
CashlessReq SUCCESS
|
|
;CashlessReq FAIL
|
|
|
|
EndIf
|
|
|
|
If SessionID2 = "2:00000" Then
|
|
Var SessionID2 = "1:00000"
|
|
EndIf
|
|
|
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
|
|
Var sendPayMultiFlag = 2
|
|
|
|
|
|
EndIf
|
|
|
|
|
|
Else
|
|
|
|
;no wait ack pay
|
|
Var waitAckPay = 1
|
|
|
|
Var SVT = "coffee"
|
|
Var ACC = "0899999999"
|
|
Var DEE = PayDetail
|
|
|
|
If Seeker.TNumberTaobinMember = "" Then
|
|
Else
|
|
Var ACC = Seeker.TNumberTaobinMember
|
|
EndIf
|
|
|
|
;PAYEXT SVT ACC VendingTSIDTmp DEE
|
|
|
|
If SessionID2 = "2:00000" Then
|
|
Var SessionID2 = "1:00000"
|
|
EndIf
|
|
|
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
|
|
Var sendPayMultiFlag = 2
|
|
|
|
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
__CMD "clear-stock-data" 0 "-" "-"
|
|
|
|
|
|
Var ServiceSuccess = "yes"
|
|
If waitAckPay = 1 Then
|
|
SAVELOG "waitAckPay=0"
|
|
; Open "ROOT/taobin_project/xml/page_back_to_main.xml"
|
|
EndIf
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
If Seeker.PayWithQR = 0 Then
|
|
If ChangeFlag3 = 0 Then
|
|
If MachineState_Result = 2 Then
|
|
Var ChangeFailCoffee = 1
|
|
Var ChangeMuti = ServiceAmountSum - Seeker.VendingCampaign
|
|
Var ChangeFlag3 = 1
|
|
EndIf
|
|
If MachineState_Result = 1 Then
|
|
Var ChangeFailCoffee = 1
|
|
Var ChangeMuti = ServiceAmountSum - Seeker.VendingCampaign
|
|
;Var ChangeMuti = ServiceAmountSum - PriceDrinkTopping
|
|
Var ChangeFlag3 = 1
|
|
EndIf
|
|
EndIf
|
|
|
|
If ChangeFlag3 = 1 Then
|
|
If Seeker.TNumberTaobinCredit = "" Then
|
|
Change ChangeMuti
|
|
Var ChangeFlag3 = 2
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
If PayOk = 3 Then
|
|
If ChangeOK = 3 Then
|
|
If sendPayMultiFlag = 2 Then
|
|
Var PayOk = 7
|
|
If Seeker.PayWithQR = 0 Then
|
|
Var ServiceType = "coffee-multi"
|
|
Else
|
|
Var ServiceType = "coffee-multiQR"
|
|
EndIf
|
|
|
|
If Seeker.TNumberTaobinCredit = "" Then
|
|
Var TelephoneNumber = "0899999999"
|
|
Var PayO2 = ""
|
|
If Seeker.TNumberTaobinMember = "" Then
|
|
Else
|
|
Var TelephoneNumber = Seeker.TNumberTaobinMember
|
|
EndIf
|
|
Else
|
|
Var TelephoneNumber = Seeker.TNumberTaobinCredit
|
|
Var PayO2 = Seeker.CoffeePinNumber
|
|
EndIf
|
|
; Var ServiceType = "coffee-multi"
|
|
|
|
Var ServiceCredit = "00-00-00-0000"
|
|
Var SuggestID = ""
|
|
|
|
|
|
If LastMakeSpiralResult = 1 Then
|
|
Var PayDetail="1/S:0/0/"
|
|
Else
|
|
Var PayDetail="1/F:0/0/"
|
|
EndIf
|
|
|
|
|
|
Var CART_COUNT = "2"
|
|
Var SessionID3 = "" + CART_COUNT
|
|
Var SessionID3 = SessionID3 + ":00000"
|
|
|
|
SAVELOG PayO2
|
|
|
|
Var VendingCampaign = IntVendingCampaign
|
|
Var CreditReference = Seeker.CreditReferenceTmp
|
|
|
|
If LastMakeSpiralResult = 2 Then
|
|
Var ServiceAmountSum = ServiceAmountSum - PriceDrink
|
|
Var ServiceAmountSum = ServiceAmountSum - PriceDrinkTopping
|
|
EndIf
|
|
;If MachineState_Result = 2 Then
|
|
; Var ServiceAmountSum = ServiceAmountSum - PriceDrinkTopping
|
|
;EndIf
|
|
Var PayType = ""
|
|
|
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID3 ServiceAmountSum ServiceCharge Donate
|
|
|
|
|
|
If Seeker.PayWithQR = 1 Then
|
|
Var SVT = "coffee-multi"
|
|
|
|
If Seeker.TNumberTaobinCredit = "" Then
|
|
Var TelephoneNumber = "0899999999"
|
|
If Seeker.TNumberTaobinMember = "" Then
|
|
Else
|
|
Var TelephoneNumber = Seeker.TNumberTaobinMember
|
|
EndIf
|
|
Else
|
|
Var TelephoneNumber = Seeker.TNumberTaobinCredit
|
|
EndIf
|
|
|
|
Var DEE = PayDetail
|
|
|
|
PAYEXT SVT TelephoneNumber Seeker.VendingTSID DEE
|
|
EndIf
|
|
|
|
Var sendPayMultiFlag = 1
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
|
|
If PayOk = 5 Then
|
|
If sendPayMultiFlag = 1 Then
|
|
If MachineStage = "remove-cup" Then
|
|
Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml"
|
|
EndIf
|
|
If MachineStage = "close-maintenance" Then
|
|
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
|
|
EndIf
|
|
If MachineStage = "show-menu" Then
|
|
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
If Timeout >= 120 Then
|
|
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
|
|
EndIf
|
|
|
|
|
|
Refresh
|
|
TimerReset
|
|
</EventTimeout>
|
|
|
|
|
|
|
|
<EventChangeStatus>
|
|
If ChangeOK = 2 Then
|
|
If ChangeStatus = "payout-end" Then
|
|
Var ChangeOK = 3
|
|
Var MultiGo = 2
|
|
EndIf
|
|
EndIf
|
|
If ChangeOK = 1 Then
|
|
If ChangeStatus = "payout-end" Then
|
|
Var ChangeOK = 2
|
|
Var ChangeTimeout = 999
|
|
EndIf
|
|
EndIf
|
|
|
|
</EventChangeStatus>
|
|
|
|
|
|
|
|
|
|
<Image>
|
|
<X> 89 </X>
|
|
<Y> 400 </Y>
|
|
<Width> 902 </Width>
|
|
<Height> 902 </Height>
|
|
<Filename> "ROOT/taobin_project/spiral/image/page_spiral/spiral_fail.png" </Filename>
|
|
</Image>
|
|
|
|
<Image>
|
|
<X> 84 </X>
|
|
<Y> 1100 </Y>
|
|
<Width> 911 </Width>
|
|
<Height> 265 </Height>
|
|
<Filename> DirImage1 </Filename>
|
|
</Image>
|
|
|
|
<Video>
|
|
<X> 0 </X>
|
|
<Y> 0 </Y>
|
|
<Width> 1080</Width>
|
|
<Height> 380 </Height>
|
|
<Loop> "true" </Loop>
|
|
<Filename> video_menu_0 </Filename>
|
|
</Video>
|
|
|
|
<Image>
|
|
<X> 0 </X>
|
|
<Y> 1418 </Y>
|
|
<State> SpiralPickDrink </State>
|
|
<Filename> DirImage </Filename>
|
|
</Image>
|
|
|
|
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1121 </Y>
|
|
;<Width>150</Width>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> Timeout </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1181 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> ChangeTimeout </Value>
|
|
;</Text>
|
|
;
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 650 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> LastMakeSpiralResult </Value>
|
|
;</Text>
|
|
;
|
|
;
|
|
;
|
|
;<Text>
|
|
;<X> 292 </X>
|
|
;<Y> 1250 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> "Seeker.CreditCard" </Value>
|
|
;</Text>
|
|
;
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1250 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> Seeker.CreditCard </Value>
|
|
;</Text>
|
|
;
|
|
;
|
|
;<Text>
|
|
;<X> 292 </X>
|
|
;<Y> 1350 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> "PayOk" </Value>
|
|
;</Text>
|
|
;
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1350 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> PayOk </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 292 </X>
|
|
;<Y> 1400 </Y>
|
|
;<Size> 40 </Size
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> "ChangeOK" </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1400 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> ChangeOK </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 292 </X>
|
|
;<Y> 1450 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> "Seeker.StoreCreditFlag" </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1450 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> Seeker.StoreCreditFlag </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 292 </X>
|
|
;<Y> 1500 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> "ChangeFlag2" </Value>
|
|
;</Text>
|
|
;
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1500 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> ChangeFlag2 </Value>
|
|
;</Text>
|
|
;
|
|
;
|
|
;<Text>
|
|
;<X> 292 </X>
|
|
;<Y> 1550 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> "Seeker.PayWithQR" </Value>
|
|
;</Text>
|
|
;
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1550 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> Seeker.PayWithQR </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 292 </X>
|
|
;<Y> 1600 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> "Seeker.CodeChannel" </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1600 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> Seeker.CodeChannel </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 292 </X>
|
|
;<Y> 1650 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> "ChangeFlag" </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1650 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> ChangeFlag </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 292 </X>
|
|
;<Y> 1700 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> "Canout" </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1700 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> Canout </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 292 </X>
|
|
;<Y> 1750 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> "SpiralCodeOk" </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1750 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> SpiralCodeOk </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 292 </X>
|
|
;<Y> 1800 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> "CoinAmount" </Value>
|
|
;</Text>
|
|
;
|
|
;<Text>
|
|
;<X> 92 </X>
|
|
;<Y> 1800 </Y>
|
|
;<Size> 40 </Size>
|
|
;<Font> KanitTTF </Font>
|
|
;<Color> 0xB78F24 </Color>
|
|
;<Value> CoinAmount </Value>
|
|
;</Text>
|
|
|
|
</Popup>
|