DBG-VAR
This commit is contained in:
parent
d37d093cb0
commit
fb852455bd
2 changed files with 16 additions and 0 deletions
|
|
@ -199,6 +199,12 @@
|
|||
Var RemainAmount = RemainAmount - Seeker.IntVendingCredit
|
||||
Var SumCoinAmount = CoinAmount + Seeker.IntVendingCampaign
|
||||
If SumCoinAmount >= PayAmount Then
|
||||
|
||||
SAVELOG "CoinInOk First"
|
||||
DEBUGVAR CoinAmount
|
||||
DEBUGVAR Seeker.IntVendingCampaign
|
||||
DEBUGVAR Seeker.IntVendingCredit
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
CoinVending OFF
|
||||
Var Canout = SumCoinAmount - PayAmount
|
||||
|
|
@ -617,6 +623,8 @@
|
|||
Var CoinInCounter = CoinInCounter + 1
|
||||
If CoinInCounter = 1 Then
|
||||
|
||||
SAVELOG "CoinInOk OK"
|
||||
|
||||
;Var ChangeOK = 1
|
||||
Var Timeout = 180
|
||||
Var PayOK = 1
|
||||
|
|
|
|||
|
|
@ -229,6 +229,12 @@
|
|||
Var RemainAmount = RemainAmount - Seeker.IntVendingCredit
|
||||
Var SumCoinAmount = CoinAmount + Seeker.IntVendingCampaign
|
||||
If SumCoinAmount >= PayAmount Then
|
||||
|
||||
SAVELOG "CoinInOk First"
|
||||
DEBUGVAR CoinAmount
|
||||
DEBUGVAR Seeker.IntVendingCampaign
|
||||
DEBUGVAR Seeker.IntVendingCredit
|
||||
|
||||
;Var VendingQRCode = "ERROR"
|
||||
CoinVending OFF
|
||||
Var Canout = SumCoinAmount - PayAmount
|
||||
|
|
@ -534,6 +540,8 @@
|
|||
Var CoinInCounter = CoinInCounter + 1
|
||||
If CoinInCounter = 1 Then
|
||||
|
||||
SAVELOG "CoinInOk OK"
|
||||
|
||||
;Var ChangeOK = 1
|
||||
Var Timeout = 180
|
||||
Var PayOK = 1
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue