SGP: add delay page payment init, MYS: fix bug remove cup button not show

This commit is contained in:
Pakin 2025-03-10 11:39:07 +07:00
parent 93fa5c540b
commit d28f470fbc
2 changed files with 61 additions and 32 deletions

View file

@ -25,6 +25,8 @@
Var PreScaleCanculate = 100 Var PreScaleCanculate = 100
DEBUGVAR VendingCashless DEBUGVAR VendingCashless
CashlessReq FAIL "" CashlessReq FAIL ""
Var WaitForStableCashlessState = 3
DEBUGVAR WaitForStableCashlessState
Var CashlessPayFlag = 0 Var CashlessPayFlag = 0
@ -706,6 +708,7 @@
If VendingCashless = "OK" Then If VendingCashless = "OK" Then
DEBUGVAR CashlessCode DEBUGVAR CashlessCode
DEBUGVAR "Ok make::drink"
Var Timeout = 0 Var Timeout = 0
Var QRErrorState = "Invisible" Var QRErrorState = "Invisible"
@ -728,7 +731,9 @@
DEBUGVAR UserChoosePayment DEBUGVAR UserChoosePayment
Var UserChoosePayment = "" Var UserChoosePayment = ""
Open "ROOT/taobin_project/xml/page_thankyou.xml" Open "ROOT/taobin_project/xml/page_thankyou.xml"
Else
DEBUGVAR "VendingCashless get ActOk not ok"
DEBUGVAR VendingCashless
EndIf EndIf
</EventActionOk> </EventActionOk>
@ -805,37 +810,47 @@
DEBUGVAR UserChoosePayment DEBUGVAR UserChoosePayment
DEBUGVAR VendingCashless DEBUGVAR VendingCashless
If UserChoosePayment = "CreditCashless" Then If WaitForStableCashlessState = 0 Then
If VendingCashless = "READY" Then
Var QRCODE99 = "" If UserChoosePayment = "CreditCashless" Then
Var Timeout = 0 If VendingCashless = "READY" Then
Var QRErrorState = "Invisible" Var QRCODE99 = ""
Var QR_POPUP = "ROOT/taobin_project/image/page_payment_en/page_payment/img_popup8-2.png" Var Timeout = 0
Var VendingCashless = "-" Var QRErrorState = "Invisible"
Var LOADING_STATE = "Enable" Var QR_POPUP = "ROOT/taobin_project/image/page_payment_en/page_payment/img_popup8-2.png"
Var alphaState = "Enable" Var VendingCashless = "-"
Var RemainAmountX = PayAmount - Seeker.IntVendingCampaign Var LOADING_STATE = "Enable"
CashlessPay RemainAmountX CreditCardRef Var alphaState = "Enable"
Var CashlessPayFlag = 1 Var RemainAmountX = PayAmount - Seeker.IntVendingCampaign
CashlessPay RemainAmountX CreditCardRef
Var CashlessPayFlag = 1
EndIf
EndIf EndIf
If UserChoosePayment = "" Then
If VendingCashless = "READY" Then
Var QRCODE99 = ""
Var Timeout = 0
Var QRErrorState = "Invisible"
Var QR_POPUP = "ROOT/taobin_project/image/page_payment_en/page_payment/img_popup8-2.png"
Var VendingCashless = "-"
Var LOADING_STATE = "Enable"
Var alphaState = "Enable"
Var RemainAmountX = PayAmount - Seeker.IntVendingCampaign
CashlessPay RemainAmountX CreditCardRef
Var CashlessPayFlag = 1
Var UserChoosePayment = "CreditCashless"
EndIf
EndIf
Else
DEBUGVAR "Get EventCashless while not stable"
DEBUGVAR WaitForStableCashlessState
DEBUGVAR VendingCashless
EndIf EndIf
If UserChoosePayment = "" Then
If VendingCashless = "READY" Then
Var QRCODE99 = ""
Var Timeout = 0
Var QRErrorState = "Invisible"
Var QR_POPUP = "ROOT/taobin_project/image/page_payment_en/page_payment/img_popup8-2.png"
Var VendingCashless = "-"
Var LOADING_STATE = "Enable"
Var alphaState = "Enable"
Var RemainAmountX = PayAmount - Seeker.IntVendingCampaign
CashlessPay RemainAmountX CreditCardRef
Var CashlessPayFlag = 1
Var UserChoosePayment = "CreditCashless"
EndIf
EndIf
EndIf EndIf
@ -860,6 +875,14 @@
DEBUGVAR VendingCashless DEBUGVAR VendingCashless
If WaitForStableCashlessState > 0 Then
DEBUGVAR WaitForStableCashlessState
Var LOADING_STATE = "Enable"
Var WaitForStableCashlessState = WaitForStableCashlessState - 1
Else
Var LOADING_STATE = "Invisible"
EndIf
If ReadyForBrew = "false" Then If ReadyForBrew = "false" Then
SAVELOG "Back to main1" SAVELOG "Back to main1"
@ -1828,7 +1851,12 @@ EndIf
<Filename> QR_POPUP </Filename> <Filename> QR_POPUP </Filename>
</Image> </Image>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<State> LOADING_STATE </State>
<Filename> "ROOT/taobin_project/inter/whatthecup/sgp/image/page_payment_en/page_payment/alpha.png" </Filename>
</Image>
<Image> <Image>
<X> 267 </X> <X> 267 </X>

View file

@ -662,6 +662,9 @@
READ_FILE "/mnt/sdcard/enable_load_lang_fast" ENABLE_LOAD_LANG_V2 READ_FILE "/mnt/sdcard/enable_load_lang_fast" ENABLE_LOAD_LANG_V2
STRCONTAIN "1" ENABLE_LOAD_LANG_V2 UseLoadLangV2 STRCONTAIN "1" ENABLE_LOAD_LANG_V2 UseLoadLangV2
; very-big-btn-init
Var UseVeryBigRemoveCupButton = "false"
;inter-page-board ;inter-page-board
If CountryName = "Malaysia" Then If CountryName = "Malaysia" Then
@ -1282,8 +1285,6 @@
Var btnRemoveCupY = 630 Var btnRemoveCupY = 630
Var btnRemoveCupYNotPageBoard = 500 Var btnRemoveCupYNotPageBoard = 500
Var UseVeryBigRemoveCupButton = "false"
If UseVeryBigRemoveCupButton = "true" Then If UseVeryBigRemoveCupButton = "true" Then
Var btnRemoveCupX = 580 Var btnRemoveCupX = 580
Var btnRemoveCupY = 530 Var btnRemoveCupY = 530