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

aus

Browse source
This commit is contained in:
wanlop run 2023-11-07 13:42:59 +07:00
commit 6e6aef42f5
1 changed files with 14 additions and 153 deletions
Download patch file Download diff file Expand all files Collapse all files

167
xml/page_payment_cash-AUS.xml
View file

@ -330,6 +330,12 @@
EndIf
If CoinInFlag = 0 Then
If CancelFlag = 0 Then
Coin CARD
EndIf
EndIf
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend_en"
@ -763,6 +769,7 @@
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
@ -1413,44 +1420,8 @@
</Image>
<Button>
<X> X_CASH </X>
<Y> 1276 </Y>
<State> PayState1</State>
<Filename> FilenameShowbuttonCashBN </Filename>
<FilenamePress> FilenameShowbuttonCashBP </FilenamePress>
<FilenameDisable> FilenameShowbuttonCashBP </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If alphaState = "Invisible" Then
If EnoughChange = "yes" Then
Var alphaState2 = "Enable"
If RoadShow = "true" Then
Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
Var MachineStage = "make-drink"
Var BrewingTextThai = "เตรียมแก้ว"
MakeDrinkV1 SelectDrink SelectSugarID
Open "ROOT/taobin_project/xml/page_thankyou.xml"
;Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
EndIf
Else
Var alphaState3 = "Enable"
Refresh
EndIf
EndIf
</EventClick>
</Button>
<Button>
<X> 216 </X>
<Y> 1499</Y>
<X> 664 </X>
<Y> 1276</Y>
<State> PayState2</State>
<Filename> Var( DirImage + "/bn_pay_with_code.png") </Filename>
<FilenamePress> Var( DirImage + "/bp_pay_with_code.png") </FilenamePress>
@ -1473,120 +1444,9 @@
</EventClick>
</Button>
<Button>
<X> 439 </X>
<X> X_CASH </X>
<Y> 1276 </Y>
<State> PayState3</State>
<Filename> Var( DirImage + "/bn_qrcode.png") </Filename>
<FilenamePress> Var( DirImage + "/bp_qrcode.png") </FilenamePress>
<FilenameDisable> Var( DirImage + "/bd_qrcode.png") </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If Timeout < 120 Then
If CoinInFlag = 0 Then
If CancelFlag = 0 Then
If alphaState = "Invisible" Then
Var QR_POPUP = "/img_popup12.png"
Var QRCODE99 = ""
Var LOADING_STATE = "Enable"
Var FlagQROpened = 1
Var alphaState = "Enable"
;CoinVending OFF
VendingQR ON
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
Var TelephoneNumberQR = "0899999999"
Var ServiceType = "coffee"
Var ECommerceQR = ""
Var ECommerceQR = ECommerceQR + PriceDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + DiscountDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SessionID2
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SelectDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "AUS:2/"
If Seeker.IntVendingCampaign > 0 Then
Var ECommerceQR = ECommerceQR + Seeker.VendingCode
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
EndIf
If Seeker.IntVendingCredit > 0 Then
Var ECommerceQR = ECommerceQR + "CRD"
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + Seeker.TNumberTaobinCredit
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + Seeker.IntVendingCredit
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + PointCrm
EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"
Var testservice = "kbank"
Var tc = ""
Var GetScore = ""
Var OperatorName = ""
Var SessionID = ""
GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
Var ReqPayInfoFlag = 1
Refresh
;If CoinAmount > 0 Then
; Change CoinAmount
; Var ChangeOK = 0
; Var CancelFlag = 1x
; Var CancelCounter = 0
; Var NoGotoMenupage = "true"
;
;EndIf
EndIf
EndIf
EndIf
EndIf
; If CoinInFlag = 0 Then
; Var BG_Menu_Page4 = "ROOT/image/BG_PromptPay_Page4.bmp"
; Var PayState1 = "Enable"
; Var PayState2 = "PressForever"
; Var QRChannel = 1
; Open "ROOT/taobin_project/xml/page_payment_qr.xml"
;
; EndIf
</EventClick>
</Button>
<Button>
<X> 439 </X>
<Y> 1499 </Y>
<State> PayState5 </State>
<Filename> Var( DirImage + "/bn_pay_with_ccard.png") </Filename>
<FilenamePress> Var( DirImage + "/bp_pay_with_ccard.png") </FilenamePress>
@ -1601,7 +1461,6 @@ If alphaState = "Invisible" Then
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Coin CARD
Var ReqPayInfoFromCashOther = 2
EndIf
EndIf
@ -1613,7 +1472,7 @@ EndIf
<Button>
<X> 664 </X>
<X> 439 </X>
<Y> 1276 </Y>
<State> PayState4</State>
<Filename> Var( DirImage + "/bn_pay_with_credit_AUS.png") </Filename>
@ -1642,7 +1501,9 @@ EndIf
<Button>
<X> 664 </X>
;<X> 664 </X>
;<Y> 1499 </Y>
<X> X_CASH </X>
<Y> 1499 </Y>
<State> "Enable"</State>
<Filename> Var( DirImage + "/bn_pay_with_comingSoon.png") </Filename>