"Enable" 1080 1920 "0xeae6e1" SoundVolume "Partial" ; On open Var ECommerce = "" Var Seeker.FreeVendingCampaign = 0 Var Timeout = 0 Var GetPayInfoFlag = 0 ;Var Seeker.CodeChannel = 0 ;Var VendingQRCode = "ERROR" ;VendingQR ON ;Var QRCODE99 = "" ;CoinVending OFF VendingQR OFF Var ShowTextNumber = "Enable" Var ShowErrorText = "Invisible" Var Tel_Confirm_State = "Invisible" Var ErrorCause = "" If show_eng = "true" Then Var DirImage = "ROOT/taobin_project/image/collectiing_en" Else Var DirImage = "ROOT/taobin_project/image/collectiing" EndIf Var TelephoneNumber# = "" Var PlaySoundLag = "" Var InvisibleCCard = "Enable" DEBUGVAR credit_card_enable DEBUGVAR InvisibleCCard If credit_card_enable = "Enable" Then Var InvisibleCCard = "Invisible" EndIf If Seeker = "next" Then Var SeekerCurr = "curr" If SeekerCurr.CreditCard = 1 Then Var InvisibleCCard = "Enable" EndIf EndIf Var WalletEnable = "Enable" If Seeker.IntVendingCampaign > 0 Then DEBUGVAR "Discount Disable Wallet" Var WalletEnable = "Disable" EndIf If From15THBPro = 1 Then DEBUGVAR "Discount Disable Wallet" Var WalletEnable = "Disable" EndIf ;Var InvisibleCCard = "Invisible" 1000 ;Open "ROOT/xml/page_board.xml" Var Timeout = Timeout + 1 If Timeout > 30 Then ;VendingQR OFF ;Open menu_back_to_main Var PayState1 = "PressForever" Var PayState2 = "Enable" ;Var QRChannel = 0 ;Var Seeker.CodeChannel = 0 If CART_COUNT >= 1 Then Open "ROOT/taobin_project/xml/page_payment_cashMore.xml" Else Open "ROOT/taobin_project/xml/page_payment_cash.xml" EndIf Refresh EndIf TimerReset If ViewBill > 0 Then CoinVending BILLREJECT EndIf If VendingCashless = "OK" Then DEBUGVAR CashlessCode If ViewBill > 0 Then CoinVending BILLREJECT EndIf VendingQR OFF CoinVending OFF If Seeker = "curr" Then MakeDrinkV1 SelectDrink SelectSugarID EndIf Var Seeker.CreditCard = 1 Var Seeker.CreditCardRef = CreditCardRef Open "ROOT/taobin_project/xml/page_thankyou.xml" EndIf Var CreditCardRef = "" GenHashWithTimeStamp CreditCardRef DEBUGVAR VendingCashless If VendingCashless = "READY" Then CashlessPay PriceDrink CreditCardRef EndIf 0 380 "ROOT/taobin_project/image/collectiing/alpha.png" 158 567 Var( DirImage + "/img_popup16.png") 209 741 WalletEnable "ROOT/taobin_project/image/collectiing/bn_pay_with_true.png" "ROOT/taobin_project/image/collectiing/bp_pay_with_true.png" "ROOT/taobin_project/image/collectiing/bd_pay_with_true.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var QR_POPUP = "/img_popup3.png" Var LOADING_STATE = "Enable" Var QRCODE99 = "" Var FlagQROpened = 1 Var alphaState = "Enable" Var cancelButtonQRPopupState = "Enable" Var QRCodeImageState = "Enable" ;CoinVending OFF VendingQR ON Var QRPopupOpenFlag = 1 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 + "TWN: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 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 = 3 Var ReqPayInfoFromCashOther = 1 Open "ROOT/taobin_project/xml/page_payment_cash.xml" 441 741 WalletEnable "ROOT/taobin_project/image/collectiing/bn_pay_with_paotang.png" "ROOT/taobin_project/image/collectiing/bp_pay_with_paotang.png" "ROOT/taobin_project/image/collectiing/bd_pay_with_paotang.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var QR_POPUP = "/img_popup1.png" Var LOADING_STATE = "Enable" Var QRCODE99 = "" Var FlagQROpened = 1 Var alphaState = "Enable" Var cancelButtonQRPopupState = "Enable" Var QRCodeImageState = "Enable" ;CoinVending OFF VendingQR ON Var QRPopupOpenFlag = 1 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 + "KBA: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 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 Var ReqPayInfoFromCashOther = 1 Open "ROOT/taobin_project/xml/page_payment_cash.xml" 675 741 WalletEnable "ROOT/taobin_project/image/collectiing/bn_pay_with_linepay.png" "ROOT/taobin_project/image/collectiing/bp_pay_with_linepay.png" "ROOT/taobin_project/image/collectiing/bd_pay_with_linepay.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var QR_POPUP = "/img_popup9.png" Var LOADING_STATE = "Enable" Var QRCODE99 = "" Var FlagQROpened = 1 Var alphaState = "Enable" Var cancelButtonQRPopupState = "Enable" Var QRCodeImageState = "Enable" ;CoinVending OFF VendingQR ON Var QRPopupOpenFlag = 1 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 + "LPY: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 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 = 5 Var ReqPayInfoFromCashOther = 1 Open "ROOT/taobin_project/xml/page_payment_cash.xml" 209 965 WalletEnable "ROOT/taobin_project/image/collectiing/bn_pay_with_shoppy.png" "ROOT/taobin_project/image/collectiing/bp_pay_with_shoppy.png" "ROOT/taobin_project/image/collectiing/bd_pay_with_shoppy.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var QR_POPUP = "/img_popup2.png" Var LOADING_STATE = "Enable" Var QRCODE99 = "" Var FlagQROpened = 1 Var alphaState = "Enable" Var cancelButtonQRPopupState = "Enable" Var QRCodeImageState = "Enable" ;CoinVending OFF VendingQR ON Var QRPopupOpenFlag = 1 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 + "AIR: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 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 Var ReqPayInfoFromCashOther = 1 Open "ROOT/taobin_project/xml/page_payment_cash.xml" 440 965 WalletEnable "ROOT/taobin_project/image/collectiing/bn_pay_with_maxme.png" "ROOT/taobin_project/image/collectiing/bp_pay_with_maxme.png" "ROOT/taobin_project/image/collectiing/bd_pay_with_maxme.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var QR_POPUP = "/img_popup11.png" Var LOADING_STATE = "Enable" Var QRCODE99 = "" Var FlagQROpened = 1 Var alphaState = "Enable" Var cancelButtonQRPopupState = "Enable" Var QRCodeImageState = "Enable" ;CoinVending OFF VendingQR ON Var QRPopupOpenFlag = 1 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 + "MAX: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 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 = 7 Var ReqPayInfoFromCashOther = 1 Open "ROOT/taobin_project/xml/page_payment_cash.xml" 675 965 WalletEnable "ROOT/taobin_project/image/collectiing/bn_pay_with_wechat.png" "ROOT/taobin_project/image/collectiing/bp_pay_with_wechat.png" "ROOT/taobin_project/image/collectiing/bd_pay_with_wechat.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var QR_POPUP = "/img_popup13.png" Var LOADING_STATE = "Enable" Var QRCODE99 = "" Var FlagQROpened = 1 Var alphaState = "Enable" Var cancelButtonQRPopupState = "Enable" Var QRCodeImageState = "Enable" ;CoinVending OFF VendingQR ON Var QRPopupOpenFlag = 1 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 + "WEC: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 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 = 8 Var ReqPayInfoFromCashOther = 1 Open "ROOT/taobin_project/xml/page_payment_cash.xml" 208 1189 WalletEnable "ROOT/taobin_project/image/collectiing/bn_pay_with_make.png" "ROOT/taobin_project/image/collectiing/bn_pay_with_make.png" "ROOT/taobin_project/image/collectiing/bn_pay_with_make.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var QR_POPUP = "/img_popup1.png" Var LOADING_STATE = "Enable" Var QRCODE99 = "" Var FlagQROpened = 1 Var alphaState = "Enable" Var cancelButtonQRPopupState = "Enable" Var QRCodeImageState = "Enable" ;CoinVending OFF VendingQR ON Var QRPopupOpenFlag = 1 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 + "KBA: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 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 Var ReqPayInfoFromCashOther = 1 Open "ROOT/taobin_project/xml/page_payment_cash.xml" 440 1189 WalletEnable "ROOT/taobin_project/image/collectiing/bn_pay_with_cashAli.png" "ROOT/taobin_project/image/collectiing/bp_pay_with_cashAli.png" "ROOT/taobin_project/image/collectiing/bd_pay_with_cashAli.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var QR_POPUP = "/img_popup20.png" Var LOADING_STATE = "Enable" Var QRCODE99 = "" Var FlagQROpened = 1 Var alphaState = "Enable" Var cancelButtonQRPopupState = "Enable" Var QRCodeImageState = "Enable" ;CoinVending OFF VendingQR ON Var QRPopupOpenFlag = 1 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 + "ALP: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 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 = 9 Var ReqPayInfoFromCashOther = 1 Open "ROOT/taobin_project/xml/page_payment_cash.xml" 675 1189 WalletEnable "ROOT/taobin_project/image/collectiing/bn_pay_with_cashUnion.png" "ROOT/taobin_project/image/collectiing/bp_pay_with_cashUnion.png" "ROOT/taobin_project/image/collectiing/bd_pay_with_cashUnion.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var QR_POPUP = "/img_popup21.png" Var LOADING_STATE = "Enable" Var QRCODE99 = "" Var FlagQROpened = 1 Var alphaState = "Enable" Var cancelButtonQRPopupState = "Enable" Var QRCodeImageState = "Enable" ;CoinVending OFF VendingQR ON Var QRPopupOpenFlag = 1 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 + "UNP: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 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 = 10 Var ReqPayInfoFromCashOther = 1 Open "ROOT/taobin_project/xml/page_payment_cash.xml" 208 1413 ; WalletEnable "Invisible" "ROOT/taobin_project/image/collectiing/bn_pay_with_cashACU.png" "ROOT/taobin_project/image/collectiing/bp_pay_with_cashACU.png" "ROOT/taobin_project/image/collectiing/bd_pay_with_cashACU.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var QR_POPUP = "/img_popup22.png" Var LOADING_STATE = "Enable" Var QRCODE99 = "" Var FlagQROpened = 1 Var alphaState = "Enable" Var cancelButtonQRPopupState = "Enable" Var QRCodeImageState = "Enable" ;CoinVending OFF VendingQR ON Var QRPopupOpenFlag = 1 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 + "ACU: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 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 = 11 Var ReqPayInfoFromCashOther = 1 Open "ROOT/taobin_project/xml/page_payment_cash.xml" 208 1413 "Enable" "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" "ROOT/sounds/codebuttom.wav" SoundVolume 440 1413 "Enable" "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" "ROOT/sounds/codebuttom.wav" SoundVolume 675 1413 "Enable" "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" "ROOT/sounds/codebuttom.wav" SoundVolume 673 1112 "Invisible" "ROOT/taobin_project/image/collectiing/bn_pay_with_ccard1.png" "ROOT/taobin_project/image/collectiing/bp_pay_with_ccard1.png" "ROOT/taobin_project/image/collectiing/bd_pay_with_ccard1.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var QR_POPUP = "/img_popup8.png" Var alphaState = "Enable" Var cancelButtonQRPopupState = "Enable" Var QRCodeImageState = "Enable" Coin CARD Var ReqPayInfoFromCashOther = 2 Open "ROOT/taobin_project/xml/page_payment_cash.xml" 397 1670 Var( DirImage + "/bn_cancel2.png") Var( DirImage + "/bn_cancel2.png") "ROOT/sounds/codebuttom.wav" SoundVolume Var PayState1 = "PressForever" Var PayState2 = "Enable" ;Var QRChannel = 0 ;Var Seeker.CodeChannel = 0 If CART_COUNT >= 1 Then Open "ROOT/taobin_project/xml/page_payment_cashMore.xml" Else Open "ROOT/taobin_project/xml/page_payment_cash.xml" EndIf Open "/media/bt/xml/security_alarm.xml"