push
This commit is contained in:
wanlop run
parent
d2aa1a6e07
commit
fd7ee74de1
3 changed files with 167 additions and 422 deletions
|
|
@ -6,16 +6,12 @@
|
|||
<Volume> SoundVolume </Volume>
|
||||
<Sound> PlaySoundLag </Sound>
|
||||
<EventOpen>
|
||||
|
||||
SAVELOG "page_payment_cash-SGP.xml"
|
||||
|
||||
|
||||
Var cash_disable = "0"
|
||||
READ_FILE "/mnt/sdcard/coffeevending/cash_disable" cash_disable
|
||||
DEBUGVAR cash_disable
|
||||
|
||||
;If AdultFlag = 1 Then
|
||||
; Open "ROOT/taobin_project/xml/page_payment_camera.xml"
|
||||
;EndIf
|
||||
SAVELOG "page_payment_cach-SGP.xml"
|
||||
|
||||
Var PreScaleCanculate = 100
|
||||
|
||||
|
|
@ -118,7 +114,7 @@
|
|||
Var RemainAmountKeep = 0
|
||||
|
||||
Var showRemaining = charOfBaht + RemainAmountStr
|
||||
Var showRemaining !assigned StringFmt( RemainAmount, DisplayFormatFull, PreScaleConvertShow )
|
||||
Var showRemaining !assigned StringFmt( RemainAmount, DisplayFormat, PreScaleConvertShow )
|
||||
|
||||
Var VendingREFID = ""
|
||||
|
||||
|
|
@ -161,7 +157,7 @@
|
|||
DEBUGVAR QRCODE99KBANK
|
||||
|
||||
If RoadShow = "true" Then
|
||||
Var PayState1 = "Enable"
|
||||
Var PayState1 = "Invisible"
|
||||
Var PayState2 = "Invisible"
|
||||
Var PayState3 = "Invisible"
|
||||
Var PayState4 = "Invisible"
|
||||
|
|
@ -176,8 +172,6 @@
|
|||
Var PayState1 = "Press"
|
||||
EndIf
|
||||
|
||||
Var PayState3 = "Enable"
|
||||
|
||||
If Seeker.IntVendingCampaign = 0 Then
|
||||
Var PayState2 = "Enable"
|
||||
Var PayState4 = "Enable"
|
||||
|
|
@ -189,9 +183,8 @@
|
|||
Var PayState4 = "Disable"
|
||||
Var PayState5 = "Enable"
|
||||
Var PayState6 = "Disable"
|
||||
Var PayState3 = "Disable"
|
||||
EndIf
|
||||
|
||||
Var PayState3 = "Enable"
|
||||
|
||||
|
||||
DEBUGVAR CoinAmount
|
||||
|
|
@ -211,7 +204,6 @@
|
|||
Var PayState4 = "Disable"
|
||||
Var PayState5 = "Disable"
|
||||
Var PayState6 = "Disable"
|
||||
Var PayState3 = "Disable"
|
||||
EndIf
|
||||
|
||||
|
||||
|
|
@ -225,7 +217,7 @@
|
|||
Var showRemaining = RemainAmountStr + " บาท"
|
||||
EndIf
|
||||
|
||||
Var showRemaining !assigned StringFmt( RemainAmount, DisplayFormatFull, PreScaleConvertShow )
|
||||
Var showRemaining !assigned StringFmt( RemainAmount, DisplayFormat, PreScaleConvertShow )
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -299,13 +291,13 @@
|
|||
Var Canout = SumCoinAmount - PayAmount
|
||||
If Canout = 0 Then
|
||||
Var RemainAmountStr = 0
|
||||
Var RemainAmountStr !assigned StringFmt( Canout, DisplayFormatFull, PreScaleConvertShow )
|
||||
Var RemainAmountStr !assigned StringFmt( Canout, DisplayFormat, PreScaleConvertShow )
|
||||
Else
|
||||
|
||||
If show_eng = "true" Then
|
||||
;Var RemainAmountStr = "Change " + Canout
|
||||
;Var RemainAmountStr = RemainAmountStr + "###size=90"
|
||||
Var RemainAmountStr !assigned StringFmt( Canout, DisplayFormatFull, PreScaleConvertShow )
|
||||
Var RemainAmountStr !assigned StringFmt( Canout, DisplayFormat, PreScaleConvertShow )
|
||||
Var RemainAmountStr = "Change " + RemainAmountStr
|
||||
Var RemainAmountStr = RemainAmountStr + "###size=90"
|
||||
Else
|
||||
|
|
@ -322,7 +314,7 @@
|
|||
|
||||
Else
|
||||
Var RemainAmountStr = "" + RemainAmount
|
||||
Var RemainAmountStr !assigned StringFmt( RemainAmount, DisplayFormatFull, PreScaleConvertShow )
|
||||
Var RemainAmountStr !assigned StringFmt( RemainAmount, DisplayFormat, PreScaleConvertShow )
|
||||
EndIf
|
||||
|
||||
;Var RemainAmount = 0
|
||||
|
|
@ -332,10 +324,16 @@
|
|||
Var showRemaining = "Free"
|
||||
EndIf
|
||||
|
||||
Var showRemaining !assigned StringFmt( RemainAmount, DisplayFormatFull, PreScaleConvertShow )
|
||||
Var showRemaining !assigned StringFmt( RemainAmount, DisplayFormat, PreScaleConvertShow )
|
||||
|
||||
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"
|
||||
|
|
@ -385,27 +383,17 @@
|
|||
If NOCashFlag = 1 Then
|
||||
Var PayState1 = "Disable"
|
||||
EndIf
|
||||
; override
|
||||
Var PayState1 = "Invisible"
|
||||
|
||||
;cancel order
|
||||
If SELLSTATUS = "DEACTIVE" Then
|
||||
Var SELLONLINE = 1
|
||||
EndIf
|
||||
|
||||
;If NetworkStatus = "ACTIVATE" Then
|
||||
; Var ShowNetworkProblem = "Invisible"
|
||||
; Var ShowNetworkProblemText = ""
|
||||
;
|
||||
;Else
|
||||
; Var ShowNetworkProblem = "Enable"
|
||||
; Var ShowButtonClick2 = "Invisible"
|
||||
; Var ShowNetworkProblemText = "การสื่อสารขัดข้อง ชำระเงินได้เฉพาะเงินสด"
|
||||
;EndIf
|
||||
|
||||
|
||||
|
||||
|
||||
Var pay_with_credit_image = DirImage + "/bp_pay_with_credit.png"
|
||||
Var pay_with_credit_image = DirImage + "/bp_pay_with_credit_AUS.png"
|
||||
Var pay_with_chanel_text = DirImage + "/text_1.png"
|
||||
|
||||
|
||||
|
|
@ -419,7 +407,7 @@
|
|||
If Seeker.IntVendingCredit > 0 Then
|
||||
|
||||
Var pay_with_code_image = DirImage + "/bp_pay_with_code.png"
|
||||
Var pay_with_credit_image = DirImage + "/bp_pay_with_credit.png"
|
||||
Var pay_with_credit_image = DirImage + "/bp_pay_with_credit_AUS.png"
|
||||
|
||||
Var pay_with_chanel_text = DirImage + "/text_2.png"
|
||||
|
||||
|
|
@ -451,36 +439,18 @@
|
|||
|
||||
__CMD "prepar-cup-from-order" 0 "-" "-"
|
||||
|
||||
Var PayState5 = "Disable"
|
||||
|
||||
|
||||
;Open "ROOT/taobin_project/xml/page_page_camera.xml"
|
||||
|
||||
;Var PayState4 = "Invisible"
|
||||
If RoadShow = "true" Then
|
||||
Var PayState1 = "Invisible"
|
||||
Var PayState2 = "Invisible"
|
||||
Var PayState3 = "Invisible"
|
||||
Var PayState4 = "Invisible"
|
||||
Var PayState5 = "Invisible"
|
||||
Var PayState6 = "Invisible"
|
||||
|
||||
Var TOP_ROW = 1266
|
||||
Var BOT_ROW = 1488
|
||||
|
||||
Var X_PS2 = 324
|
||||
;duit
|
||||
Var X_PS3 = 199
|
||||
;ali
|
||||
Var X_PS4 = 434
|
||||
Var X_PS5 = 669
|
||||
Var X_PS6 = 554
|
||||
|
||||
|
||||
If EnableCash = "true" Then
|
||||
Var PayState1 = "Enable"
|
||||
Var TOP_ROW = 1276
|
||||
Var BOT_ROW = 1488
|
||||
|
||||
Var X_PS2 = 434
|
||||
Var X_PS3 = 434
|
||||
Var X_PS4 = 652
|
||||
Var X_PS5 = X_CASH
|
||||
Var X_PS6 = 652
|
||||
EndIf
|
||||
|
||||
</EventOpen>
|
||||
|
||||
<EventActionOk>
|
||||
|
|
@ -511,9 +481,20 @@
|
|||
Var Seeker.CampaignPayChanel = "malaymbb"
|
||||
EndIf
|
||||
If ReqPayInfoFlag2 = 2 Then
|
||||
Var Seeker.CampaignPayChanel = "alipay"
|
||||
Var Seeker.CampaignPayChanel = "shopee"
|
||||
EndIf
|
||||
|
||||
If ReqPayInfoFlag2 = 3 Then
|
||||
Var Seeker.CampaignPayChanel = "true"
|
||||
EndIf
|
||||
If ReqPayInfoFlag2 = 4 Then
|
||||
Var Seeker.CampaignPayChanel = "dolfin"
|
||||
EndIf
|
||||
If ReqPayInfoFlag2 = 5 Then
|
||||
Var Seeker.CampaignPayChanel = "linepay"
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
|
||||
If Seeker = "curr" Then
|
||||
MakeDrinkV1 SelectDrink SelectSugarID
|
||||
|
|
@ -556,10 +537,36 @@
|
|||
|
||||
EndIf
|
||||
|
||||
If VendingQRTypeResult = "IND:2" Then
|
||||
Var CashTextWarning = ""
|
||||
Var QRErrorState = "Invisible"
|
||||
Var QRCODE99KBANK = SessionID
|
||||
Var QRCODE99KBANK = QRCODE99KBANK + Ext1a
|
||||
SAVELOG Ext1a
|
||||
SAVELOG QRCODE99KBANK
|
||||
Var QRCODE99KBANK = QRCODE99KBANK + Ext21
|
||||
Var QRCODETMP = QRCODE99KBANK
|
||||
Var ReqPayInfoFlag = 0
|
||||
Var ReqPayInfoFlag2 = 1
|
||||
SAVELOG QRCODE99KBANK
|
||||
SAVELOG Ext21
|
||||
|
||||
Var QRCODE99 = QRCODE99KBANK
|
||||
Var LOADING_STATE = "Invisible"
|
||||
|
||||
If show_eng = "true" Then
|
||||
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_scan_to_pay_via_e-wallet.mp3"
|
||||
Else
|
||||
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
If ReqPayInfoFlag = 2 Then
|
||||
If VendingQRTypeResult = "ALI:2" Then
|
||||
If VendingQRTypeResult = "AIR:2" Then
|
||||
Var CashTextWarning = ""
|
||||
Var QRErrorState = "Invisible"
|
||||
Var QRCODE99Shoppy = SessionID
|
||||
|
|
@ -584,6 +591,84 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
If ReqPayInfoFlag = 3 Then
|
||||
If VendingQRTypeResult = "TWN:2" Then
|
||||
Var CashTextWarning = ""
|
||||
Var QRErrorState = "Invisible"
|
||||
Var QRCODE99Shoppy = SessionID
|
||||
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext1a
|
||||
SAVELOG Ext1a
|
||||
SAVELOG QRCODE99Shoppy
|
||||
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext21
|
||||
Var ReqPayInfoFlag = 0
|
||||
Var ReqPayInfoFlag2 = 3
|
||||
SAVELOG QRCODE99Shoppy
|
||||
SAVELOG Ext21
|
||||
|
||||
Var QRCODE99 = QRCODE99Shoppy
|
||||
Var LOADING_STATE = "Invisible"
|
||||
|
||||
If show_eng = "true" Then
|
||||
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_scan_to_pay_via_e-wallet.mp3"
|
||||
Else
|
||||
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
If ReqPayInfoFlag = 4 Then
|
||||
If VendingQRTypeResult = "DOL:2" Then
|
||||
Var CashTextWarning = ""
|
||||
Var QRErrorState = "Invisible"
|
||||
Var QRCODE99Shoppy = SessionID
|
||||
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext1a
|
||||
SAVELOG Ext1a
|
||||
SAVELOG QRCODE99Shoppy
|
||||
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext21
|
||||
Var ReqPayInfoFlag = 0
|
||||
Var ReqPayInfoFlag2 = 4
|
||||
SAVELOG QRCODE99Shoppy
|
||||
SAVELOG Ext21
|
||||
|
||||
Var QRCODE99 = QRCODE99Shoppy
|
||||
Var LOADING_STATE = "Invisible"
|
||||
|
||||
If show_eng = "true" Then
|
||||
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_scan_to_pay_via_e-wallet.mp3"
|
||||
Else
|
||||
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
If ReqPayInfoFlag = 5 Then
|
||||
If VendingQRTypeResult = "LPY:2" Then
|
||||
Var CashTextWarning = ""
|
||||
Var QRErrorState = "Invisible"
|
||||
Var QRCODE99Shoppy = SessionID
|
||||
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext1a
|
||||
SAVELOG Ext1a
|
||||
SAVELOG QRCODE99Shoppy
|
||||
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext21
|
||||
Var ReqPayInfoFlag = 0
|
||||
Var ReqPayInfoFlag2 = 5
|
||||
SAVELOG QRCODE99Shoppy
|
||||
SAVELOG Ext21
|
||||
|
||||
Var QRCODE99 = QRCODE99Shoppy
|
||||
Var LOADING_STATE = "Invisible"
|
||||
|
||||
If show_eng = "true" Then
|
||||
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_scan_to_pay_via_e-wallet.mp3"
|
||||
Else
|
||||
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
Var PayInfoCFlag = 1
|
||||
EndIf
|
||||
|
|
@ -682,6 +767,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
|
||||
|
|
@ -1134,8 +1220,8 @@
|
|||
Var RemainAmountStr = "" + RemainAmount
|
||||
Var showRemaining = charOfBaht + RemainAmountStr
|
||||
|
||||
Var RemainAmountStr !assigned StringFmt( RemainAmount, DisplayFormatFull, PreScaleConvertShow )
|
||||
Var showRemaining !assigned StringFmt( RemainAmount, DisplayFormatFull, PreScaleConvertShow )
|
||||
Var RemainAmountStr !assigned StringFmt( RemainAmount, DisplayFormat, PreScaleConvertShow )
|
||||
Var showRemaining !assigned StringFmt( RemainAmount, DisplayFormat, PreScaleConvertShow )
|
||||
|
||||
|
||||
|
||||
|
|
@ -1175,12 +1261,12 @@
|
|||
Var Canout = SumCoinAmount - PayAmount
|
||||
If Canout = 0 Then
|
||||
Var RemainAmountStr = 0
|
||||
Var RemainAmountStr !assigned StringFmt( Canout, DisplayFormatFull, PreScaleConvertShow )
|
||||
Var RemainAmountStr !assigned StringFmt( Canout, DisplayFormat, PreScaleConvertShow )
|
||||
Else
|
||||
If show_eng = "true" Then
|
||||
;Var RemainAmountStr = "Change " + Canout
|
||||
;Var RemainAmountStr = RemainAmountStr + "###size=90"
|
||||
Var RemainAmountStr !assigned StringFmt( Canout, DisplayFormatFull, PreScaleConvertShow )
|
||||
Var RemainAmountStr !assigned StringFmt( Canout, DisplayFormat, PreScaleConvertShow )
|
||||
Var RemainAmountStr = "Change " + RemainAmountStr
|
||||
Var RemainAmountStr = RemainAmountStr + "###size=90"
|
||||
Else
|
||||
|
|
@ -1197,14 +1283,14 @@
|
|||
|
||||
Else
|
||||
Var RemainAmountStr = "" + RemainAmount
|
||||
Var RemainAmountStr !assigned StringFmt( RemainAmount, DisplayFormatFull, PreScaleConvertShow )
|
||||
Var RemainAmountStr !assigned StringFmt( RemainAmount, DisplayFormat, PreScaleConvertShow )
|
||||
EndIf
|
||||
|
||||
Var Timeout = 0
|
||||
|
||||
;Var RemainAmount = 0
|
||||
Var showRemaining = charOfBaht + RemainAmountStr
|
||||
Var showRemaining !assigned StringFmt( RemainAmount, DisplayFormatFull, PreScaleConvertShow )
|
||||
Var showRemaining !assigned StringFmt( RemainAmount, DisplayFormat, PreScaleConvertShow )
|
||||
Var alphaState2 = "Enable"
|
||||
|
||||
|
||||
|
|
@ -1251,7 +1337,6 @@
|
|||
|
||||
|
||||
|
||||
|
||||
<Video>
|
||||
<X> 0 </X>
|
||||
<Y> 0 </Y>
|
||||
|
|
@ -1333,44 +1418,8 @@
|
|||
</Image>
|
||||
|
||||
<Button>
|
||||
<X> X_CASH </X>
|
||||
<Y> TOP_ROW </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> X_PS2 </X>
|
||||
<Y> BOT_ROW</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>
|
||||
|
|
@ -1393,221 +1442,9 @@
|
|||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
||||
<Button>
|
||||
<X> X_PS3 </X>
|
||||
<Y> TOP_ROW </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 LOGO_CH = "ROOT/taobin_project/inter/mys/image/LOGO_DuitNow.png"
|
||||
|
||||
DEBUGVAR LOGO_CH
|
||||
|
||||
|
||||
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 + "MBB: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
|
||||
RefreshAll
|
||||
|
||||
|
||||
|
||||
|
||||
;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> X_PS4 </X>
|
||||
<Y> TOP_ROW </Y>
|
||||
<State> PayState3</State>
|
||||
<Filename> Var( DirImage + "/bn_alipay.png") </Filename>
|
||||
<FilenamePress> Var( DirImage + "/bp_alipay.png") </FilenamePress>
|
||||
<FilenameDisable> Var( DirImage + "/bd_alipay.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 LOGO_CH = "ROOT/taobin_project/inter/mys/image/LOGO_ALIPAY.png"
|
||||
|
||||
DEBUGVAR LOGO_CH
|
||||
|
||||
|
||||
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 + "ALI:2/"
|
||||
|
||||
|
||||
|
||||
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 = 2
|
||||
RefreshAll
|
||||
|
||||
|
||||
|
||||
|
||||
;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> X_PS6 </X>
|
||||
<Y> BOT_ROW </Y>
|
||||
<X> X_CASH </X>
|
||||
<Y> 1276 </Y>
|
||||
<State> PayState5 </State>
|
||||
<Filename> Var( DirImage + "/bn_pay_with_ccard.png") </Filename>
|
||||
<FilenamePress> Var( DirImage + "/bp_pay_with_ccard.png") </FilenamePress>
|
||||
|
|
@ -1622,7 +1459,6 @@ If alphaState = "Invisible" Then
|
|||
Var QR_POPUP = "/img_popup8.png"
|
||||
Var alphaState = "Enable"
|
||||
Coin CARD
|
||||
Var ReqPayInfoFromCashOther = 2
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
|
@ -1634,19 +1470,11 @@ EndIf
|
|||
|
||||
|
||||
<Button>
|
||||
<X> X_PS5 </X>
|
||||
<Y>
|
||||
eval(
|
||||
If EnableCash = "true" Then
|
||||
Var return = BOT_ROW
|
||||
Else
|
||||
Var return = TOP_ROW
|
||||
EndIf
|
||||
)
|
||||
</Y>
|
||||
<X> 439 </X>
|
||||
<Y> 1276 </Y>
|
||||
<State> PayState4</State>
|
||||
<Filename> Var( DirImage + "/bn_pay_with_credit.png") </Filename>
|
||||
<FilenamePress> Var( DirImage + "/bp_pay_with_credit.png") </FilenamePress>
|
||||
<Filename> Var( DirImage + "/bn_pay_with_credit_AUS.png") </Filename>
|
||||
<FilenamePress> Var( DirImage + "/bp_pay_with_credit_AUS.png") </FilenamePress>
|
||||
<FilenameDisable> pay_with_credit_image </FilenameDisable>
|
||||
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
|
|
@ -1669,23 +1497,6 @@ EndIf
|
|||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
||||
<Button>
|
||||
<X> 664 </X>
|
||||
<Y> 1499 </Y>
|
||||
<State> "Invisible" </State>
|
||||
<Filename> Var( DirImage + "/bn_pay_with_comingSoon.png") </Filename>
|
||||
<FilenamePress> Var( DirImage + "/bn_pay_with_comingSoon.png") </FilenamePress>
|
||||
<FilenameDisable> Var( DirImage + "/bn_pay_with_comingSoon.png") </FilenameDisable>
|
||||
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
||||
<Volume> SoundVolume </Volume>
|
||||
<EventClick>
|
||||
|
||||
|
||||
</EventClick>
|
||||
</Button>
|
||||
|
||||
|
||||
<Button>
|
||||
<X> 360 </X>
|
||||
<Y> 1781 </Y>
|
||||
|
|
@ -1775,19 +1586,11 @@ EndIf
|
|||
<X> 249 </X>
|
||||
<Y> 748 </Y>
|
||||
<State> alphaState </State>
|
||||
<Filename> "ROOT/taobin_project/inter/mys/image/payment/img_popup1.png" </Filename>
|
||||
<Filename> Var( DirImage + QR_POPUP )</Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 249 </X>
|
||||
<Y> 748 </Y>
|
||||
<State> alphaState </State>
|
||||
<Filename> Var( DirImage + QR_POPUPX )</Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 267 </X>
|
||||
<Y> 1065 </Y>
|
||||
|
|
@ -1798,8 +1601,6 @@ EndIf
|
|||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Button>
|
||||
<X> 438 </X>
|
||||
|
|
@ -1872,7 +1673,7 @@ EndIf
|
|||
Var return = "Enable"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
DEBUGVAR return
|
||||
)
|
||||
</State>
|
||||
<Animation>
|
||||
|
|
@ -2090,21 +1891,11 @@ EndIf
|
|||
</Text>
|
||||
|
||||
|
||||
<Image>
|
||||
<X> 483 </X>
|
||||
<Y> 791 </Y>
|
||||
<State> alphaState </State>
|
||||
<Filename> LOGO_CH </Filename>
|
||||
</Image>
|
||||
|
||||
|
||||
<QRCode>
|
||||
<X> 445 </X>
|
||||
<Y> 958 </Y>
|
||||
<Width> 170 </Width>
|
||||
<Height> 170 </Height>
|
||||
<Color> "0xFFFFFF" </Color>
|
||||
;<QRColor> "0xE61A5F" </QRColor>
|
||||
<Width> 200 </Width>
|
||||
<Height> 200 </Height>
|
||||
<State> alphaState </State>
|
||||
<Service> testservice </Service>
|
||||
</QRCode>
|
||||
|
|
@ -2203,27 +1994,8 @@ EndIf
|
|||
|
||||
|
||||
|
||||
; Test QR
|
||||
<EventUnitTest2>
|
||||
Var QR_POPUP = "/img_popup12.png"
|
||||
|
||||
Var QRCODE99 = ""
|
||||
|
||||
Var LOADING_STATE = "Invisible"
|
||||
|
||||
Var FlagQROpened = 1
|
||||
Var PayInfoCFlag = 0
|
||||
|
||||
Var testservice = "Herr"
|
||||
Var alphaState = "Enable"
|
||||
Refresh
|
||||
</EventUnitTest2>
|
||||
|
||||
<EventUnitTest1>
|
||||
|
||||
Var testservice = "Herr"
|
||||
Open CurrentXMLFileName2
|
||||
</EventUnitTest1>
|
||||
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue