SGP: add flag if has coin, disable credit

This commit is contained in:
Pakin 2024-05-02 13:25:12 +07:00
parent afd0693deb
commit d7a154c0b1

View file

@ -775,20 +775,25 @@
Var CreditCardRef = ""
GenHashWithTimeStamp CreditCardRef
DEBUGVAR VendingCashless
DEBUGVAR VendingCashless
If CoinInFlag = 0 Then
If VendingCashless = "READY" Then
Var QRCODE99 = ""
Var Timeout = 0
Var QRErrorState = "Invisible"
Var QR_POPUP = "/img_popup8-2.png"
Var VendingCashless = "-"
Var LOADING_STATE = "Enable"
Var alphaState = "Enable"
Var RemainAmountX = PayAmount - Seeker.IntVendingCampaign
CashlessPay RemainAmountX CreditCardRef
Var CashlessPayFlag = 1
EndIf
If VendingCashless = "READY" Then
Var QRCODE99 = ""
Var Timeout = 0
Var QRErrorState = "Invisible"
Var QR_POPUP = "/img_popup8-2.png"
Var VendingCashless = "-"
Var LOADING_STATE = "Enable"
Var alphaState = "Enable"
Var RemainAmountX = PayAmount - Seeker.IntVendingCampaign
CashlessPay RemainAmountX CreditCardRef
Var CashlessPayFlag = 1
EndIf
Refresh
@ -908,6 +913,9 @@
If CoinInOK = 1 Then
Var PayState5 = "Disable"
Var CoinInCounter = CoinInCounter + 1
If CoinInCounter = 1 Then
@ -918,6 +926,10 @@
Var PayOK = 1
EndIf
Else
Var PayState5 = "Enable"
EndIf
Var stringLog = "Timeout " + Timeout