spiral ice
This commit is contained in:
worawut
parent
d9ea2b3b78
commit
67bcc544bc
35 changed files with 4530 additions and 369 deletions
|
|
@ -6,13 +6,16 @@
|
|||
;<Sound> "ROOT/taobin_project/sounds/chaching.mp3" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventOpen>
|
||||
|
||||
|
||||
Var Rraiwa = "Young"
|
||||
Var SaveCoinAmount = 0
|
||||
Var SaveCoinAmount = CoinAmount
|
||||
Var MachineState_Result = 0
|
||||
Var SwapVDO = 0
|
||||
Var TimeSwapVDO = 0
|
||||
Var ShowSwapVDO = "ROOT/taobin_project/spiral/video/sp01.mp4"
|
||||
|
||||
|
||||
Var CheckCoin = 0
|
||||
Var KeepServiceCredit = ""
|
||||
Var KeepServiceCredit = ServiceCredit
|
||||
Var PayFlagCoinQR = 0
|
||||
Var SetFlagCoinQR = 0
|
||||
Var SetFlagCoinQRTimer = 999999
|
||||
|
|
@ -20,6 +23,7 @@
|
|||
Var Timeout = 0
|
||||
Var ServiceType = "locker"
|
||||
Var ServiceCharge = 0
|
||||
Var PayReferenceTmp = ""
|
||||
If TelephoneNumber = "" Then
|
||||
Var TelephoneNumber = "0899999999"
|
||||
EndIf
|
||||
|
|
@ -30,7 +34,22 @@
|
|||
Var VendingCampaign = IntVendingCampaign
|
||||
|
||||
Var PayType = ""
|
||||
|
||||
If Seeker.thankToppingFlag = 1 Then
|
||||
Var PayType = "multi"
|
||||
;Var PayReference = "123456"
|
||||
|
||||
If Seeker.PayWithQR = 1 Then
|
||||
DEBUGVAR PayReference
|
||||
Else
|
||||
Var PayReference = ""
|
||||
GenHashWithTimeStamp PayReference
|
||||
EndIf
|
||||
|
||||
|
||||
Var PriceDrink = PriceDrinkTmp2
|
||||
Var ServiceAmountSum = PriceDrinkTmp2 + PriceDrinkTopping
|
||||
EndIf
|
||||
|
||||
Var PayOk = 0
|
||||
Var ChangeFlag = 0
|
||||
|
||||
|
|
@ -79,6 +98,16 @@
|
|||
Var CreditReference = Seeker.CreditReferenceTmp
|
||||
Var VendingDiscount = Seeker.VendingDiscount
|
||||
Var VendingCampaign = Seeker.VendingCampaign
|
||||
|
||||
If Seeker.thankToppingFlag = 1 Then
|
||||
If SpiralCodeOk = 1 Then
|
||||
If Seeker.VendingCampaign >= PayAmount Then
|
||||
Var VendingCampaign = Seeker.VendingCampaign - PriceDrinkTopping
|
||||
Else
|
||||
Var VendingCampaign = 0
|
||||
EndIf
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
;SendSpiralResult = spiral-success , spiral-failed , spiral-valid , spiral-invalid
|
||||
If SellLeaw = 1 Then
|
||||
|
|
@ -88,11 +117,46 @@
|
|||
Var TestSellSpiral = 2
|
||||
DEBUGVAR TestSellSpiral
|
||||
Var SellLeaw = 1
|
||||
If Seeker.thankToppingFlag = 1 Then
|
||||
Topping "Select" SelectDrink
|
||||
; Pack
|
||||
Topping "Pack" ExtendDataCurr
|
||||
|
||||
|
||||
If StrawState = "Press" Then
|
||||
Machine StrawOrder
|
||||
Var LedLidBlink = "true"
|
||||
EndIf
|
||||
|
||||
If LidState = "Press" Then
|
||||
Machine LidOrder
|
||||
Var LedLidBlink = "true"
|
||||
EndIf
|
||||
Var SelectDrink = "12-05-02-0017"
|
||||
Var SelectSugarID = 0
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
EndIf
|
||||
EndIf
|
||||
</EventOpen>
|
||||
<Timeout> 1000 </Timeout>
|
||||
<EventTimeout>
|
||||
DEBUGVAR LastMakeSpiralResult
|
||||
DEBUGVAR LastMakeDrinkResult
|
||||
DEBUGVAR MachineState_Result
|
||||
DEBUGVAR MachineStage
|
||||
|
||||
DEBUGVAR Seeker.thankToppingFlag
|
||||
DEBUGVAR VendingCampaign
|
||||
DEBUGVAR Seeker.VendingCampaign
|
||||
DEBUGVAR SpiralCodeOk
|
||||
DEBUGVAR SetFlagCoinQR
|
||||
DEBUGVAR Rraiwa
|
||||
DEBUGVAR Seeker.StoreCreditFlag
|
||||
DEBUGVAR SetFlagCoinQR
|
||||
DEBUGVAR CheckCoin
|
||||
DEBUGVAR KeepServiceCredit
|
||||
DEBUGVAR ChangeOK
|
||||
|
||||
Var Timeout = Timeout + 1
|
||||
Var ChangeTimeout = ChangeTimeout - 1
|
||||
Var CheckAckCodeTimer = CheckAckCodeTimer - 1
|
||||
|
|
@ -179,13 +243,29 @@
|
|||
;Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
Else
|
||||
If Seeker.StoreCreditFlag = 1 Then
|
||||
Var VendingDiscount = 0
|
||||
Var VendingCampaign = 0
|
||||
Var CreditReference = ""
|
||||
Var ServiceType = "credit"
|
||||
Var SessionID2 = SelectDrink
|
||||
Var ServiceCredit = "locker"
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
|
||||
Var CheckCoin = CoinAmount
|
||||
If CheckCoin > 0 Then
|
||||
Var VendingDiscount = 0
|
||||
Var VendingCampaign = 0
|
||||
Var CreditReference = ""
|
||||
Var ServiceType = "credit"
|
||||
Var SessionID2 = SelectDrink
|
||||
Var ServiceCredit = "locker"
|
||||
Var Rraiwa = "PAY"
|
||||
Var PayReferenceTmp = PayReference
|
||||
Var PayReference = ""
|
||||
Var PayType = ""
|
||||
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
|
||||
|
||||
Var ServiceCredit = KeepServiceCredit
|
||||
Var ServiceType = "locker"
|
||||
Var PayReference = PayReferenceTmp
|
||||
Var PayType = "multi"
|
||||
|
||||
EndIf
|
||||
EndIf
|
||||
EndIf
|
||||
EndIf
|
||||
|
|
@ -212,6 +292,7 @@
|
|||
EndIf
|
||||
|
||||
If SetFlagCoinQR = 2 Then
|
||||
|
||||
DEBUGVAR "tube2"
|
||||
Var SetFlagCoinQR = 3
|
||||
Var TelephoneNumber = "0899999999"
|
||||
|
|
@ -222,7 +303,19 @@
|
|||
Var ServiceType = "credit"
|
||||
Var SessionID2 = SelectDrink
|
||||
Var ServiceCredit = "locker"
|
||||
Var Rraiwa = "PAY2"
|
||||
|
||||
Var PayReferenceTmp = PayReference
|
||||
Var PayReference = ""
|
||||
Var PayType = ""
|
||||
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
|
||||
Var PayReference = PayReferenceTmp
|
||||
Var PayType = "multi"
|
||||
Var ServiceCredit = KeepServiceCredit
|
||||
Var ServiceType = "locker"
|
||||
|
||||
EndIf
|
||||
|
||||
If LastMakeSpiralResult = 1 Then
|
||||
|
|
@ -237,10 +330,14 @@
|
|||
Var SessionID3 = SessionID3 + MachineSpiralSlotID
|
||||
|
||||
If SpiralCodeOk = 1 Then
|
||||
Var SessionID3 = SessionID3 + "/"
|
||||
Var SessionID3 = SessionID3 + Seeker.VendingCode
|
||||
Var SessionID3 = SessionID3 + "/"
|
||||
Var SessionID3 = SessionID3 + Seeker.CodeNumber
|
||||
If Seeker.thankToppingFlag = 1 Then
|
||||
Var VendingCampaign = 0
|
||||
Else
|
||||
Var SessionID3 = SessionID3 + "/"
|
||||
Var SessionID3 = SessionID3 + Seeker.VendingCode
|
||||
Var SessionID3 = SessionID3 + "/"
|
||||
Var SessionID3 = SessionID3 + Seeker.CodeNumber
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Var PayOk = 1
|
||||
|
|
@ -258,12 +355,22 @@
|
|||
Else
|
||||
Var ACC = Seeker.TNumberTaobinCredit
|
||||
EndIf
|
||||
PAYEXT SVT ACC VendingTSIDTmp DEE
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou2.xml"
|
||||
|
||||
If Seeker.thankToppingFlag = 1 Then
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID3 PriceDrink ServiceCharge Donate
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou3.xml"
|
||||
Else
|
||||
PAYEXT SVT ACC VendingTSIDTmp DEE
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou2.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
Else
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID3 PriceDrink ServiceCharge Donate
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou2.xml"
|
||||
If Seeker.thankToppingFlag = 1 Then
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou3.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou2.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
EndIf
|
||||
EndIf
|
||||
|
|
@ -301,12 +408,24 @@
|
|||
Else
|
||||
Var ACC = Seeker.TNumberTaobinCredit
|
||||
EndIf
|
||||
PAYEXT SVT ACC VendingTSIDTmp DEE
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou2.xml"
|
||||
|
||||
If Seeker.thankToppingFlag = 1 Then
|
||||
;edit test
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID3 PriceDrink ServiceCharge Donate
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou3.xml"
|
||||
Else
|
||||
;edit test
|
||||
PAYEXT SVT ACC VendingTSIDTmp DEE
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou2.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
Else
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID3 PriceDrink ServiceCharge Donate
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou2.xml"
|
||||
If Seeker.thankToppingFlag = 1 Then
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou3.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou2.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
|
@ -361,7 +480,11 @@
|
|||
EndIf
|
||||
|
||||
If LastMakeSpiralResult = 2 Then
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_fail.xml"
|
||||
If Seeker.thankToppingFlag = 1 Then
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_failmuti.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_fail.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
;If LastMakeSpiralResult = 2 Then
|
||||
|
|
@ -425,7 +548,12 @@
|
|||
If Timeout > 180 Then
|
||||
Var LastMakeSpiralResult = 2
|
||||
SAVELOG "Spiral Timeout 180 sec"
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_fail.xml"
|
||||
|
||||
If Seeker.thankToppingFlag = 1 Then
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_failmuti.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/spiral/xml/page_spiral_fail.xml"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -500,12 +628,9 @@
|
|||
<Refresh> "Reload" </Refresh>
|
||||
<Loop> "true" </Loop>
|
||||
<Filename> ShowSwapVDO </Filename>
|
||||
;Filename> "ROOT/taobin_project/spiral/video/sp01.mp4" </Filename>
|
||||
;<Filename> "ROOT/taobin_project/spiral/video/sp01.mp4" </Filename>
|
||||
</Video>
|
||||
|
||||
|
||||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
If SpiralCodeOk = 1 Then
|
||||
|
|
@ -555,14 +680,6 @@
|
|||
|
||||
</EventActionOk>
|
||||
|
||||
;<Image>
|
||||
;<X> 89 </X>
|
||||
;<Y> 700 </Y>
|
||||
;<Width> 902 </Width>
|
||||
;<Height> 902 </Height>
|
||||
;<Filename> "ROOT/taobin_project/spiral/image/page_spiral/thankyou.png" </Filename>
|
||||
;</Image>
|
||||
|
||||
<Video>
|
||||
<X> 0 </X>
|
||||
<Y> 0 </Y>
|
||||
|
|
@ -593,244 +710,4 @@
|
|||
|
||||
|
||||
|
||||
; Var SwapVDO = 0
|
||||
; Var TimeSwapVDO = 0
|
||||
; Var ShowSwapVDO = "
|
||||
|
||||
|
||||
|
||||
;<Text>
|
||||
;<X> 92 </X>
|
||||
;<Y> 650 </Y>
|
||||
;<Width>150</Width>
|
||||
;<Size> 40 </Size>
|
||||
;<Font> KanitTTF </Font>
|
||||
;<Color> 0xB78F24 </Color>
|
||||
;<Value> SwapVDO </Value>
|
||||
;</Text>
|
||||
;
|
||||
;<Text>
|
||||
;<X> 92 </X>
|
||||
;<Y> 750 </Y>
|
||||
;<Size> 40 </Size>
|
||||
;<Font> KanitTTF </Font>
|
||||
;<Color> 0xB78F24 </Color>
|
||||
;<Value> TimeSwapVDO </Value>
|
||||
;</Text>
|
||||
;
|
||||
;
|
||||
;<Text>
|
||||
;<X> 92 </X>
|
||||
;<Y> 850 </Y>
|
||||
;<Size> 40 </Size>
|
||||
;<Font> KanitTTF </Font>
|
||||
;<Color> 0xB78F24 </Color>
|
||||
;<Value> ShowSwapVDO </Value>
|
||||
;</Text>
|
||||
|
||||
|
||||
;<Text>
|
||||
;<X> 292 </X>
|
||||
;<Y> 1250 </Y>
|
||||
;<Size> 40 </Size>
|
||||
;<Font> KanitTTF </Font>
|
||||
;<Color> 0xB78F24 </Color>
|
||||
;<Value> "SetFlagCoinQRTimer" </Value>
|
||||
;</Text>
|
||||
;
|
||||
;
|
||||
;<Text>
|
||||
;<X> 92 </X>
|
||||
;<Y> 1250 </Y>
|
||||
;<Size> 40 </Size>
|
||||
;<Font> KanitTTF </Font>
|
||||
;<Color> 0xB78F24 </Color>
|
||||
;<Value> SetFlagCoinQRTimer </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> "CheckAckCodeTimer" </Value>
|
||||
;</Text>
|
||||
;
|
||||
;<Text>
|
||||
;<X> 92 </X>
|
||||
;<Y> 1800 </Y>
|
||||
;<Size> 40 </Size>
|
||||
;<Font> KanitTTF </Font>
|
||||
;<Color> 0xB78F24 </Color>
|
||||
;<Value> CheckAckCodeTimer </Value>
|
||||
;</Text>
|
||||
|
||||
</Popup>
|
||||
Loading…
Add table
Add a link
Reference in a new issue