pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

THAI: Added Payment Code can control pay buttons state

Browse source
This commit is contained in:
Kenta420 2025-01-17 15:26:40 +07:00
parent c1c8c69b62
commit 3d176f4313
7 changed files with 329 additions and 289 deletions
Download patch file Download diff file Expand all files Collapse all files

89
xml/page_payment_code.xml
View file

@ -122,8 +122,6 @@
;Open menu_back_to_main
Var ShowLoadingText = "Invisible"
Var PayState1 = "PressForever"
Var PayState2 = "Enable"
Var QRChannel = 0
Var Seeker.CodeChannel = 0
If CART_COUNT >= 1 Then
@ -194,28 +192,78 @@
SPLIT ECommerce "/" 7 Seeker.VendingCampaignRI3
SPLIT ECommerce "/" 8 VendingCampaign1
SPLIT ECommerce "/" 9 ShouldCollectPoint
SPLIT ECommerce "/" 10 CashOtherButtonControl
SPLIT ECommerce "/" 10 PaymentButtonControl
DEBUGVAR CashOtherButtonControl
DEBUGVAR PaymentButtonControl
If CashOtherButtonControl = "" Then
Var EnableCashOtherAll = "true"
If PaymentButtonControl = "" Then
Var PaymentEnableAll = "true"
Else
If CashOtherButtonControl = "*" Then
Var EnableCashOtherAll = "true"
If PaymentButtonControl = "*" Then
Var PaymentEnableAll = "true"
Else
Var EnableCashOtherAll = "false"
STRCONTAIN "TWN" CashOtherButtonControl TWN_CashOtherEnable
STRCONTAIN "KBA" CashOtherButtonControl KBA_CashOtherEnable
STRCONTAIN "LPY" CashOtherButtonControl LPY_CashOtherEnable
STRCONTAIN "AIR" CashOtherButtonControl AIR_CashOtherEnable
STRCONTAIN "MAX" CashOtherButtonControl MAX_CashOtherEnable
STRCONTAIN "WEC" CashOtherButtonControl WEC_CashOtherEnable
STRCONTAIN "ALP" CashOtherButtonControl ALP_CashOtherEnable
STRCONTAIN "UNP" CashOtherButtonControl UNP_CashOtherEnable
STRCONTAIN "ACU" CashOtherButtonControl ACU_CashOtherEnable
STRCONTAIN "TAO" CashOtherButtonControl TAO_CashOtherEnable
Var PaymentEnableAll = "false"
STRCONTAIN "TWN" PaymentButtonControl TWN_CashOtherEnable
STRCONTAIN "KBA" PaymentButtonControl KBA_CashOtherEnable
STRCONTAIN "LPY" PaymentButtonControl LPY_CashOtherEnable
STRCONTAIN "AIR" PaymentButtonControl AIR_CashOtherEnable
STRCONTAIN "MAX" PaymentButtonControl MAX_CashOtherEnable
STRCONTAIN "WEC" PaymentButtonControl WEC_CashOtherEnable
STRCONTAIN "ALP" PaymentButtonControl ALP_CashOtherEnable
STRCONTAIN "UNP" PaymentButtonControl UNP_CashOtherEnable
STRCONTAIN "ACU" PaymentButtonControl ACU_CashOtherEnable
STRCONTAIN "TAO" PaymentButtonControl TAO_CreditEnable
STRCONTAIN "CSH" PaymentButtonControl CSH_CashEnable
STRCONTAIN "CRD" PaymentButtonControl CRD_CreditCardEnable
If CSH_CashEnable = "true" Then
Else
Var CPD_CouponCodeEnable = "true"
EndIf
If TWN_CashOtherEnable = "true" Then
Var E_WalletEnable = "true"
EndIf
If KBA_CashOtherEnable = "true" Then
Var E_WalletEnable = "true"
EndIf
If LPY_CashOtherEnable = "true" Then
Var E_WalletEnable = "true"
EndIf
If AIR_CashOtherEnable = "true" Then
Var E_WalletEnable = "true"
EndIf
If MAX_CashOtherEnable = "true" Then
Var E_WalletEnable = "true"
EndIf
If WEC_CashOtherEnable = "true" Then
Var E_WalletEnable = "true"
EndIf
If ALP_CashOtherEnable = "true" Then
Var E_WalletEnable = "true"
EndIf
If UNP_CashOtherEnable = "true" Then
Var E_WalletEnable = "true"
EndIf
If ACU_CashOtherEnable = "true" Then
Var E_WalletEnable = "true"
EndIf
DEBUGVAR CSH_CashEnable
DEBUGVAR TAO_CreditEnable
DEBUGVAR CPD_CouponCodeEnable
DEBUGVAR CRD_CreditCardEnable
DEBUGVAR E_WalletEnable
DEBUGVAR TWN_CashOtherEnable
DEBUGVAR KBA_CashOtherEnable
DEBUGVAR LPY_CashOtherEnable
@ -225,7 +273,6 @@
DEBUGVAR ALP_CashOtherEnable
DEBUGVAR UNP_CashOtherEnable
DEBUGVAR ACU_CashOtherEnable
DEBUGVAR TAO_CashOtherEnable
EndIf
EndIf
@ -891,8 +938,6 @@
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var PayState1 = "PressForever"
Var PayState2 = "Enable"
Var QRChannel = 0
Var Seeker.CodeChannel = 0
If CART_COUNT >= 1 Then