2959 lines
67 KiB
XML
2959 lines
67 KiB
XML
<Popup>
|
|
<Cache> "Enable" </Cache>
|
|
<Width> 1080 </Width>
|
|
<Height> 1920 </Height>
|
|
<Background> "0xeae6e1" </Background>
|
|
<Volume> SoundVolume </Volume>
|
|
<Sound> PlaySoundLag </Sound>
|
|
<EventOpen>
|
|
RootLayoutVisible 3 "hide"
|
|
|
|
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
|
|
|
|
If CountryName = "Malaysia" Then
|
|
Open "ROOT/taobin_project/xml/page_payment_cash-MYR.xml"
|
|
EndIf
|
|
|
|
If CountryName = "Indonesia" Then
|
|
Open "ROOT/taobin_project/xml/page_payment_cash-IDR.xml"
|
|
EndIf
|
|
|
|
If CountryName = "Australia" Then
|
|
Open "ROOT/taobin_project/xml/page_payment_cash-AUS.xml"
|
|
EndIf
|
|
|
|
Var PreScaleCanculate = 1
|
|
|
|
|
|
Var CashlessPayFlag = 0
|
|
Var RemainAmountStrENG = ""
|
|
Var AdultState = "Invisible"
|
|
Var AdultState1 = "Invisible"
|
|
Var AdultState2 = "Invisible"
|
|
Var AdultState3 = "Invisible"
|
|
|
|
;Var AdultFlag = 0
|
|
Var AdultFlag2 = 0
|
|
|
|
If AdultFlag = 1 Then
|
|
|
|
Var AdultFlag = 0
|
|
|
|
DEBUGVAR SystemDate
|
|
Var sdate = ""
|
|
Var sdate = SystemDate
|
|
Var sdateday = ""
|
|
Var sdatemonth = ""
|
|
Var sdateyear = ""
|
|
SPLIT sdate "/" 1 sdateday
|
|
SPLIT sdate "/" 2 sdatemonth
|
|
SPLIT sdate "/" 3 sdateyear
|
|
INT sdateday
|
|
INT sdatemonth
|
|
INT sdateyear
|
|
READCARDID
|
|
|
|
Var AdultState = "Enable"
|
|
Var AdultState1 = "Enable"
|
|
|
|
Var countAdultS2 = 0
|
|
Var AdultFlag2 = 1
|
|
EndIf
|
|
|
|
Var ReqPayInfoFlag2 = 0
|
|
|
|
|
|
DEBUGVAR QRCODETMP
|
|
|
|
DEBUGVAR IsSmoRet
|
|
Var countClick2 = 0
|
|
;SAVELOG SelectDrink
|
|
;SAVELOG NameDrink
|
|
;SAVELOG NameDrinkTH
|
|
;SAVELOG DrinkDescription
|
|
SAVELOG PriceDrink
|
|
;SAVELOG topping1
|
|
;SAVELOG topping2
|
|
;SAVELOG topping3
|
|
DEBUGVAR SelectDrink
|
|
|
|
DEBUGVAR video_menu_0
|
|
|
|
|
|
Var FlagQROpened = 0
|
|
Var PayInfoCFlag = 0
|
|
Var ActionOKCase = 0
|
|
Var VendingCampaign = Seeker.IntVendingCampaign
|
|
Var Seeker.VendingCampaign = Seeker.IntVendingCampaign
|
|
|
|
Var PayAmount = PriceDrink
|
|
|
|
Var LOADING_STATE = "Invisible"
|
|
; Below original
|
|
; On open
|
|
|
|
|
|
|
|
Var cancelState = "Invisible"
|
|
|
|
|
|
Var alphaState = "Invisible"
|
|
Var alphaState2 = "Invisible"
|
|
Var FlagalphaState2 = 0
|
|
Var alphaState2t = alphaState2
|
|
Var alphaState3 = "Invisible"
|
|
|
|
|
|
Var CoinInFlag = 0
|
|
;Var CoinAmount = 0
|
|
Var CancelFlag = 0
|
|
Var CancelCounter = 0
|
|
Var CoinInCounter = 0
|
|
Var CancelNumber = 3
|
|
|
|
Var PayAmount = PriceDrink
|
|
Var RemainAmount = PayAmount - Seeker.IntVendingCampaign
|
|
Var RemainAmount = RemainAmount - CoinAmount
|
|
Var RemainAmount = RemainAmount - Seeker.IntVendingCredit
|
|
Var RemainAmountStr = "" + RemainAmount
|
|
Var Timeout = 0
|
|
Var PayOK = 0
|
|
Var ChangeOK = 0
|
|
Var CoinInOK = 0
|
|
|
|
Var RemainAmountKeep = 0
|
|
|
|
Var showRemaining = charOfBaht + RemainAmountStr
|
|
|
|
Var VendingREFID = ""
|
|
|
|
Var TelephoneNumber = "0899999999"
|
|
Var ServiceType = "coffee"
|
|
|
|
Var ServiceCredit = SelectDrink
|
|
Var ServiceAmount2 = PayAmount
|
|
Var Seeker.ServiceAmount2 = PayAmount
|
|
Var ServiceCharge = 0
|
|
Var Donate = ""
|
|
Var SuggestID = ""
|
|
Var CancleState = "Enable"
|
|
|
|
Var Seeker.VendingDiscount = DiscountDrink
|
|
|
|
|
|
Var CashTextWarning = ""
|
|
Var QRErrorState = "Invisible"
|
|
Var QRErrorFlag = 0
|
|
|
|
|
|
SAVELOG SelectDrink
|
|
|
|
Var QRCODE99 = ""
|
|
|
|
SAVELOG QRChannel
|
|
SAVELOG QRCODE99
|
|
DEBUGVAR QRCODE99
|
|
|
|
SAVELOG VendingCampaign
|
|
SAVELOG Seeker.VendingCode
|
|
SAVELOG Seeker.CodeChannel
|
|
|
|
|
|
If Seeker.VendingCode = "C00" Then
|
|
Var Seeker.CodeChannel = 0
|
|
EndIf
|
|
|
|
Var ExtendData = Seeker.ExtendData
|
|
|
|
DEBUGVAR QRCODE99KBANK
|
|
|
|
|
|
Var EnableCCard = "Invisible"
|
|
Var InvisibleCCard = "Enable"
|
|
|
|
DEBUGVAR credit_card_enable
|
|
|
|
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
|
|
|
|
If InvisibleCCard = "Invisible" Then
|
|
Var EnableCCard = "Enable"
|
|
EndIf
|
|
|
|
|
|
|
|
If RoadShow = "true" Then
|
|
Var PayState1 = "Enable"
|
|
Var PayState2 = "Invisible"
|
|
Var PayState3 = "Invisible"
|
|
Var PayState4 = "Invisible"
|
|
Var PayState5 = "Invisible"
|
|
Var PayState6 = "Invisible"
|
|
Var showRemaining = "Free"
|
|
|
|
Else
|
|
Var PayState1 = "Enable"
|
|
|
|
If cash_disable = "1" Then
|
|
Var PayState1 = "Press"
|
|
EndIf
|
|
|
|
If Seeker.IntVendingCampaign = 0 Then
|
|
Var PayState2 = "Enable"
|
|
Var PayState4 = "Enable"
|
|
Var PayState5 = "Enable"
|
|
Var PayState6 = "Enable"
|
|
Else
|
|
SAVELOG "Cash only IntVendingCampaign"
|
|
Var PayState2 = "Disable"
|
|
Var PayState4 = "Disable"
|
|
Var PayState5 = "Enable"
|
|
Var PayState6 = "Disable"
|
|
EndIf
|
|
Var PayState3 = "Enable"
|
|
|
|
|
|
DEBUGVAR CoinAmount
|
|
If CoinAmount > 0 Then
|
|
SAVELOG "Cash only CoinAmount"
|
|
Var PayState2 = "Disable"
|
|
Var PayState3 = "Disable"
|
|
Var PayState4 = "Disable"
|
|
Var PayState5 = "Disable"
|
|
Var PayState6 = "Disable"
|
|
Var CoinInFlag = 1
|
|
EndIf
|
|
|
|
If Seeker.IntVendingCredit > 0 Then
|
|
SAVELOG "Cash only IntVendingCredit"
|
|
Var PayState2 = "Disable"
|
|
Var PayState4 = "Disable"
|
|
Var PayState5 = "Disable"
|
|
Var PayState6 = "Disable"
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
Var showRemaining = charOfBaht + RemainAmountStr
|
|
|
|
If show_eng = "true" Then
|
|
Var showRemaining = charOfBaht + RemainAmountStr
|
|
Else
|
|
Var showRemaining = RemainAmountStr + " บาท"
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
Var Seeker.PayWithQR = 0
|
|
Var NoGotoMenupage = "false"
|
|
If show_eng = "true" Then
|
|
Var FilenameShowbuttonCashBN = "ROOT/taobin_project/image/page_payment_en/page_payment/bn_cash.png"
|
|
Var FilenameShowbuttonCashBP = "ROOT/taobin_project/image/page_payment_en/page_payment/bp_cash.png"
|
|
Else
|
|
Var FilenameShowbuttonCashBN = "ROOT/taobin_project/image/page_payment/bn_cash.png"
|
|
Var FilenameShowbuttonCashBP = "ROOT/taobin_project/image/page_payment/bp_cash.png"
|
|
|
|
EndIf
|
|
|
|
Var X_CASH1 = 216
|
|
Var X_CASH2 = 439
|
|
Var X_CASH3 = 664
|
|
|
|
Var X_Diff = 113
|
|
;113
|
|
|
|
If EnableCCard = "Enable" Then
|
|
Var X_CASH1 = 216 - 113
|
|
Var X_CASH2 = 439 - 113
|
|
Var X_CASH3 = 664 - 113
|
|
EndIf
|
|
|
|
|
|
If RoadShow = "true" Then
|
|
Var X_CASH1 = 287
|
|
If show_eng = "true" Then
|
|
Var FilenameShowbuttonCashBN = "ROOT/taobin_project/image/page_payment_en/page_payment/bn_cash_2.png"
|
|
Var FilenameShowbuttonCashBP = "ROOT/taobin_project/image/page_payment_en/page_payment/bp_cash_2.png"
|
|
Else
|
|
Var FilenameShowbuttonCashBN = "ROOT/taobin_project/image/page_payment/bn_cash_2.png"
|
|
Var FilenameShowbuttonCashBP = "ROOT/taobin_project/image/page_payment/bp_cash_2.png"
|
|
EndIf
|
|
EndIf
|
|
|
|
If GetFreeFromError = 1 Then
|
|
Var Seeker.FreeVendingCampaign = 1
|
|
CoinVending OFF
|
|
If Seeker = "curr" Then
|
|
|
|
MakeDrinkV1 SelectDrink SelectSugarID
|
|
Var TxRef1 = ""
|
|
CreateTxRef1 TxRef1
|
|
Else
|
|
Var TxRef1 = ""
|
|
CreateTxRef1 TxRef1
|
|
|
|
Var DrinkPaid = SelectDrink
|
|
Var PaidPaymentFromNextStage = 1
|
|
|
|
EndIf
|
|
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
|
|
|
EndIf
|
|
|
|
If Seeker.FreeVendingCampaign = 1 Then
|
|
|
|
Var RemainAmountStr = "Free###size=150"
|
|
|
|
CoinVending OFF
|
|
If Seeker = "curr" Then
|
|
|
|
MakeDrinkV1 SelectDrink SelectSugarID
|
|
Var TxRef1 = ""
|
|
CreateTxRef1 TxRef1
|
|
Else
|
|
Var TxRef1 = ""
|
|
CreateTxRef1 TxRef1
|
|
|
|
Var DrinkPaid = SelectDrink
|
|
Var PaidPaymentFromNextStage = 1
|
|
|
|
EndIf
|
|
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
|
|
|
EndIf
|
|
|
|
|
|
If CoinInOK = 0 Then
|
|
|
|
Var RemainAmount = PayAmount - CoinAmount
|
|
Var RemainAmount = RemainAmount - Seeker.IntVendingCampaign
|
|
Var RemainAmount = RemainAmount - Seeker.IntVendingCredit
|
|
Var SumCoinAmount = CoinAmount + Seeker.IntVendingCampaign
|
|
Var SumCoinAmount = CoinAmount + Seeker.IntVendingCredit
|
|
If SumCoinAmount >= PayAmount Then
|
|
|
|
SAVELOG "CoinInOk First"
|
|
DEBUGVAR CoinAmount
|
|
DEBUGVAR Seeker.IntVendingCampaign
|
|
DEBUGVAR Seeker.IntVendingCredit
|
|
|
|
;Var VendingQRCode = "ERROR"
|
|
CoinVending OFF
|
|
Var Canout = SumCoinAmount - PayAmount
|
|
If Canout = 0 Then
|
|
Var RemainAmountStr = 0
|
|
Else
|
|
|
|
If show_eng = "true" Then
|
|
Var RemainAmountStr = "Change " + Canout
|
|
Var RemainAmountStr = RemainAmountStr + "###size=90"
|
|
Else
|
|
Var FlagalphaState2 = 1
|
|
Var RemainAmountStr = "ทอน " + Canout
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
Var CancleState = "Disable"
|
|
Var CoinInOK = 1
|
|
Var CoinInCounter = 0
|
|
|
|
|
|
|
|
Else
|
|
Var RemainAmountStr = "" + RemainAmount
|
|
EndIf
|
|
|
|
;Var RemainAmount = 0
|
|
|
|
Var showRemaining = charOfBaht + RemainAmountStr
|
|
If RoadShow = "true" Then
|
|
Var showRemaining = "Free"
|
|
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"
|
|
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
|
|
|
|
Else
|
|
Var DirImage = "ROOT/taobin_project/image/page_payment"
|
|
Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend"
|
|
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
|
|
EndIf
|
|
|
|
|
|
Var EnoughChange = "yes"
|
|
|
|
Var SELLONLINE = 0
|
|
If SELLSTATUS = "SELLONLINE" Then
|
|
Var SELLONLINE = 1
|
|
EndIf
|
|
If SELLSTATUS = "SELLNOCASH" Then
|
|
Var SELLONLINE = 1
|
|
EndIf
|
|
|
|
If SELLONLINE = 0 Then
|
|
SAVELOG "Cash only NetworkStatus down"
|
|
|
|
Var PayState2 = "Disable"
|
|
Var PayState3 = "Disable"
|
|
Var PayState4 = "Disable"
|
|
Var PayState5 = "Disable"
|
|
Var PayState6 = "Disable"
|
|
|
|
Var PayOfflineMode = 1
|
|
|
|
Var ShowNetworkProblem = "Enable"
|
|
Var ShowButtonClick2 = "Invisible"
|
|
Var ShowNetworkProblemText = "การสื่อสารขัดข้อง ชำระเงินได้เฉพาะเงินสด"
|
|
|
|
Else
|
|
Var PayOfflineMode = 0
|
|
|
|
Var ShowNetworkProblem = "Invisible"
|
|
Var ShowNetworkProblemText = ""
|
|
EndIf
|
|
|
|
DEBUGVAR NOCashFlag
|
|
|
|
If NOCashFlag = 1 Then
|
|
Var PayState1 = "Disable"
|
|
EndIf
|
|
|
|
;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_chanel_text = DirImage + "/text_1.png"
|
|
|
|
|
|
;If DisableUsingCode = "true" Then
|
|
If DisableUsingCode = "-" Then
|
|
SAVELOG "Diable code because using topping."
|
|
Var PayState2 = "Disable"
|
|
Var pay_with_code_image = DirImage + "/bd_pay_with_code.png"
|
|
Else
|
|
|
|
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_chanel_text = DirImage + "/text_2.png"
|
|
|
|
Else
|
|
|
|
Var pay_with_code_image = DirImage + "/bp_pay_with_code.png"
|
|
EndIf
|
|
EndIf
|
|
|
|
Machine DoorClose
|
|
|
|
|
|
If ShoppyPayEnable = "true" Then
|
|
Else
|
|
Var PayState5 = "Disable"
|
|
Var PayState6 = "Disable"
|
|
EndIf
|
|
|
|
|
|
If web_readyOK = "true" Then
|
|
|
|
Var web_readyOK = "false"
|
|
|
|
If web_payment = "CASH" Then
|
|
Var alphaState2 = "Enable"
|
|
Var alphaState2t = alphaState2
|
|
EndIf
|
|
|
|
If web_payment = "QR" Then
|
|
|
|
If IndoQR = 1 Then
|
|
Var QR_POPUP = "/img_popup7.png"
|
|
Else
|
|
Var QR_POPUP = "/img_popup1.png"
|
|
EndIf
|
|
|
|
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 + "/"
|
|
If IndoQR = 1 Then
|
|
Var ECommerceQR = ECommerceQR + "IND:2/"
|
|
Else
|
|
Var ECommerceQR = ECommerceQR + "KBA:2/"
|
|
EndIf
|
|
|
|
|
|
|
|
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
|
|
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
|
|
EndIf
|
|
|
|
If web_payment = "SHOPEE" Then
|
|
|
|
Var QR_POPUP = "/img_popup2.png"
|
|
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 + "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
|
|
EndIf
|
|
|
|
If web_payment = "TRUE" Then
|
|
|
|
Var QR_POPUP = "/img_popup3.png"
|
|
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 + "TWN: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 = 3
|
|
EndIf
|
|
|
|
If web_payment = "DOLFIN" Then
|
|
|
|
Var QR_POPUP = "/img_popup5.png"
|
|
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 + "DOL: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 = 4
|
|
EndIf
|
|
|
|
If web_payment = "LINEPAY" Then
|
|
|
|
Var QR_POPUP = "/img_popup9.png"
|
|
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 + "LPY: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 = 5
|
|
EndIf
|
|
|
|
If web_payment = "LAZADAPAY" Then
|
|
|
|
Var QR_POPUP = "/img_popup10.png"
|
|
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 + "LZP: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 = 6
|
|
EndIf
|
|
|
|
If web_payment = "MAXME" Then
|
|
|
|
Var QR_POPUP = "/img_popup11.png"
|
|
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 + "MAX: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 = 7
|
|
EndIf
|
|
|
|
If web_payment = "WECHAT" Then
|
|
|
|
Var QR_POPUP = "/img_popup12.png"
|
|
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 + "WEC: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 = 8
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
EndIf
|
|
|
|
__CMD "prepar-cup-from-order" 0 "-" "-"
|
|
|
|
If ReqPayInfoFromCashOther = 1 Then
|
|
Var LOADING_STATE = "Enable"
|
|
|
|
Var FlagQROpened = 1
|
|
Var alphaState = "Enable"
|
|
|
|
VendingQR ON
|
|
|
|
Var ReqPayInfoFromCashOther = 0
|
|
EndIf
|
|
|
|
If ReqPayInfoFromCashOther = 2 Then
|
|
Var alphaState = "Enable"
|
|
Var ReqPayInfoFromCashOther = 0
|
|
EndIf
|
|
|
|
|
|
DEBUGVAR MenuCautionImageStage0
|
|
|
|
|
|
If IgnoreCollectPointByMe = 1 Then
|
|
SAVELOG "Diable code because IgnoreCollectPointByMe = 1."
|
|
Var PayState2 = "Disable"
|
|
EndIf
|
|
|
|
</EventOpen>
|
|
|
|
<EventActionOk>
|
|
|
|
Var VendingQRTypeResult = ""
|
|
|
|
DEBUGVAR ECommerceQR
|
|
SPLIT ECommerceQR "/" 5 VendingQRTypeResult
|
|
|
|
|
|
If ActionOKCase = 0 Then
|
|
If VendingREFID = "" Then
|
|
SAVELOG "menu_page4-QR.xml > ActOK_REFID"
|
|
Refresh
|
|
Else
|
|
If ViewBill > 0 Then
|
|
CoinVending BILLREJECT
|
|
EndIf
|
|
SAVELOG "menu_page4-QR.xml > ActOK_make"
|
|
;Var VendingQRCode = "ERROR"
|
|
;Coin STANDBY
|
|
VendingQR OFF
|
|
CoinVending OFF
|
|
|
|
|
|
If ReqPayInfoFlag2 = 1 Then
|
|
DEBUGVAR VendingBank
|
|
If VendingBank = "kbank" Then
|
|
Var Seeker.CampaignPayChanel = "kbank"
|
|
Else
|
|
If IndoQR = 1 Then
|
|
Var Seeker.CampaignPayChanel = "xendit"
|
|
Else
|
|
Var Seeker.CampaignPayChanel = "promptpay"
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
If ReqPayInfoFlag2 = 2 Then
|
|
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 ReqPayInfoFlag2 = 6 Then
|
|
Var Seeker.CampaignPayChanel = "lazadapay"
|
|
EndIf
|
|
If ReqPayInfoFlag2 = 7 Then
|
|
Var Seeker.CampaignPayChanel = "maxme"
|
|
EndIf
|
|
If ReqPayInfoFlag2 = 8 Then
|
|
Var Seeker.CampaignPayChanel = "wechat"
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
|
|
If Seeker = "curr" Then
|
|
MakeDrinkV1 SelectDrink SelectSugarID
|
|
;Var TxRef1 = ""
|
|
;CreateTxRef1 TxRef1
|
|
EndIf
|
|
Var Seeker.PayWithQR = 1
|
|
Var Seeker.VendingTSID = VendingTSID
|
|
|
|
|
|
Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
|
|
Var BrewingTextThai = "เตรียมแก้ว"
|
|
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
|
|
|
EndIf
|
|
|
|
If ReqPayInfoFlag = 1 Then
|
|
If VendingQRTypeResult = "KBA: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_mobile.mp3"
|
|
Else
|
|
|
|
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_mobile.mp3"
|
|
|
|
; Play Sound #zone
|
|
If SoundBackToSchoolEnable = 1 Then
|
|
|
|
If SoundBackToSchoolType = 1 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
|
|
EndIf
|
|
If SoundBackToSchoolType = 2 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
|
|
EndIf
|
|
Var PlaySoundLag = RootPathSoundBackToSchool + "Please_scan_to_pay_via_mobile.wav"
|
|
EndIf
|
|
|
|
Play PlaySoundLag
|
|
|
|
EndIf
|
|
|
|
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
|
|
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
|
|
|
|
; Play Sound #zone
|
|
If SoundBackToSchoolEnable = 1 Then
|
|
|
|
If SoundBackToSchoolType = 1 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
|
|
EndIf
|
|
If SoundBackToSchoolType = 2 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
|
|
EndIf
|
|
Var PlaySoundLag = RootPathSoundBackToSchool + "Please_scan_to_pay_via_e-wallet.wav"
|
|
EndIf
|
|
|
|
Play PlaySoundLag
|
|
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
EndIf
|
|
|
|
If ReqPayInfoFlag = 2 Then
|
|
If VendingQRTypeResult = "AIR: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 = 2
|
|
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
|
|
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
|
|
|
|
; Play Sound #zone
|
|
If SoundBackToSchoolEnable = 1 Then
|
|
|
|
If SoundBackToSchoolType = 1 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
|
|
EndIf
|
|
If SoundBackToSchoolType = 2 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
|
|
EndIf
|
|
Var PlaySoundLag = RootPathSoundBackToSchool + "Please_scan_to_pay_via_e-wallet.wav"
|
|
EndIf
|
|
|
|
Play PlaySoundLag
|
|
EndIf
|
|
|
|
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
|
|
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
|
|
|
|
; Play Sound #zone
|
|
If SoundBackToSchoolEnable = 1 Then
|
|
|
|
If SoundBackToSchoolType = 1 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
|
|
EndIf
|
|
If SoundBackToSchoolType = 2 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
|
|
EndIf
|
|
Var PlaySoundLag = RootPathSoundBackToSchool + "Please_scan_to_pay_via_e-wallet.wav"
|
|
EndIf
|
|
|
|
Play PlaySoundLag
|
|
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
|
|
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
|
|
|
|
; Play Sound #zone
|
|
If SoundBackToSchoolEnable = 1 Then
|
|
|
|
If SoundBackToSchoolType = 1 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
|
|
EndIf
|
|
If SoundBackToSchoolType = 2 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
|
|
EndIf
|
|
Var PlaySoundLag = RootPathSoundBackToSchool + "Please_scan_to_pay_via_e-wallet.wav"
|
|
EndIf
|
|
|
|
Play PlaySoundLag
|
|
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
|
|
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
|
|
|
|
; Play Sound #zone
|
|
If SoundBackToSchoolEnable = 1 Then
|
|
|
|
If SoundBackToSchoolType = 1 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
|
|
EndIf
|
|
If SoundBackToSchoolType = 2 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
|
|
EndIf
|
|
Var PlaySoundLag = RootPathSoundBackToSchool + "Please_scan_to_pay_via_e-wallet.wav"
|
|
EndIf
|
|
|
|
Play PlaySoundLag
|
|
EndIf
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
If ReqPayInfoFlag = 6 Then
|
|
If VendingQRTypeResult = "LZP:2" Then
|
|
Var CashTextWarning = ""
|
|
Var QRErrorState = "Invisible"
|
|
Var QRCODE99Shoppy = ""
|
|
Var QRCODE99Shoppy = QRCODE99Shoppy + SessionID
|
|
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext1a
|
|
SAVELOG Ext1a
|
|
SAVELOG QRCODE99Shoppy
|
|
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext21
|
|
Var ReqPayInfoFlag = 0
|
|
Var ReqPayInfoFlag2 = 6
|
|
SAVELOG QRCODE99Shoppy
|
|
SAVELOG Ext21
|
|
|
|
DEBUGVAR QRCODE99Shoppy
|
|
|
|
;Var QRCODE99 = QRCODE99Shoppy
|
|
Var QRCODE99 = "UTF8" + QRCODE99Shoppy
|
|
;Var QRCODE_UTF8 = 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
|
|
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
|
|
|
|
; Play Sound #zone
|
|
If SoundBackToSchoolEnable = 1 Then
|
|
|
|
If SoundBackToSchoolType = 1 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
|
|
EndIf
|
|
If SoundBackToSchoolType = 2 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
|
|
EndIf
|
|
Var PlaySoundLag = RootPathSoundBackToSchool + "Please_scan_to_pay_via_e-wallet.wav"
|
|
EndIf
|
|
|
|
Play PlaySoundLag
|
|
EndIf
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
If ReqPayInfoFlag = 7 Then
|
|
If VendingQRTypeResult = "MAX:2" Then
|
|
Var CashTextWarning = ""
|
|
Var QRErrorState = "Invisible"
|
|
Var QRCODE99Shoppy = ""
|
|
Var QRCODE99Shoppy = QRCODE99Shoppy + SessionID
|
|
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext1a
|
|
SAVELOG Ext1a
|
|
SAVELOG QRCODE99Shoppy
|
|
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext21
|
|
Var ReqPayInfoFlag = 0
|
|
Var ReqPayInfoFlag2 = 7
|
|
SAVELOG QRCODE99Shoppy
|
|
SAVELOG Ext21
|
|
|
|
DEBUGVAR QRCODE99Shoppy
|
|
|
|
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
|
|
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
|
|
|
|
; Play Sound #zone
|
|
If SoundBackToSchoolEnable = 1 Then
|
|
|
|
If SoundBackToSchoolType = 1 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
|
|
EndIf
|
|
If SoundBackToSchoolType = 2 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
|
|
EndIf
|
|
Var PlaySoundLag = RootPathSoundBackToSchool + "Please_scan_to_pay_via_e-wallet.wav"
|
|
EndIf
|
|
|
|
Play PlaySoundLag
|
|
EndIf
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
If ReqPayInfoFlag = 8 Then
|
|
If VendingQRTypeResult = "WEC:2" Then
|
|
Var CashTextWarning = ""
|
|
Var QRErrorState = "Invisible"
|
|
Var QRCODE99Shoppy = ""
|
|
Var QRCODE99Shoppy = QRCODE99Shoppy + SessionID
|
|
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext1a
|
|
SAVELOG Ext1a
|
|
SAVELOG QRCODE99Shoppy
|
|
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext21
|
|
Var ReqPayInfoFlag = 0
|
|
Var ReqPayInfoFlag2 = 8
|
|
SAVELOG QRCODE99Shoppy
|
|
SAVELOG Ext21
|
|
|
|
DEBUGVAR QRCODE99Shoppy
|
|
|
|
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
|
|
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
|
|
|
|
; Play Sound #zone
|
|
If SoundBackToSchoolEnable = 1 Then
|
|
|
|
If SoundBackToSchoolType = 1 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
|
|
EndIf
|
|
If SoundBackToSchoolType = 2 Then
|
|
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
|
|
EndIf
|
|
Var PlaySoundLag = RootPathSoundBackToSchool + "Please_scan_to_pay_via_e-wallet.wav"
|
|
EndIf
|
|
|
|
Play PlaySoundLag
|
|
EndIf
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
Else
|
|
Var PayInfoCFlag = 1
|
|
EndIf
|
|
|
|
|
|
If VendingCashless = "OK" Then
|
|
DEBUGVAR CashlessCode
|
|
Var Timeout = 0
|
|
|
|
Var QRErrorState = "Invisible"
|
|
Var LOADING_STATE = "Invisible"
|
|
|
|
If ViewBill > 0 Then
|
|
CoinVending BILLREJECT
|
|
EndIf
|
|
|
|
VendingQR OFF
|
|
CoinVending OFF
|
|
Refresh
|
|
|
|
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
|
|
|
|
</EventActionOk>
|
|
|
|
<EventActionError>
|
|
SAVELOG "EventActionError"
|
|
DEBUGVAR VendingCashless
|
|
DEBUGVAR CoinInOK
|
|
|
|
If ActionOKCase = 0 Then
|
|
If ReqPayInfoFlag > 0 Then
|
|
Var QRErrorFlag = 1
|
|
If alphaState = "Enable" Then
|
|
Var QRErrorState = "Enable"
|
|
Var LOADING_STATE = "Invisible"
|
|
Var QRCODE99 = ""
|
|
EndIf
|
|
EndIf
|
|
|
|
Else
|
|
Var PayInfoCFlag = 1
|
|
EndIf
|
|
|
|
|
|
If VendingCashless = "ERROR" Then
|
|
If CoinInOK = 1 Then
|
|
|
|
Else
|
|
Var Timeout = 0
|
|
EndIf
|
|
|
|
;Var QRErrorFlag = 1
|
|
If alphaState = "Enable" Then
|
|
Var QRErrorState = "Enable"
|
|
Var LOADING_STATE = "Invisible"
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
|
|
Refresh
|
|
|
|
</EventActionError>
|
|
|
|
<EventCashlessCard>
|
|
SAVELOG "EventCashlessCard"
|
|
|
|
Var CreditCardRef = ""
|
|
GenHashWithTimeStamp CreditCardRef
|
|
DEBUGVAR VendingCashless
|
|
|
|
If VendingCashless = "READY" Then
|
|
Var QRCODE99 = ""
|
|
If CoinInOK = 1 Then
|
|
|
|
Else
|
|
Var Timeout = 0
|
|
EndIf
|
|
|
|
Var QRErrorState = "Invisible"
|
|
Var QR_POPUP = "/img_popup8-2.png"
|
|
Var VendingCashless = "-"
|
|
Var LOADING_STATE = "Enable"
|
|
Var RemainAmountX = PayAmount - Seeker.IntVendingCampaign
|
|
CashlessPay RemainAmountX CreditCardRef
|
|
Var CashlessPayFlag = 1
|
|
EndIf
|
|
|
|
Refresh
|
|
|
|
</EventCashlessCard>
|
|
|
|
|
|
<Timeout> 1000 </Timeout>
|
|
<EventTimeout>
|
|
If ReadyForBrew = "false" Then
|
|
SAVELOG "Back to main1"
|
|
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
|
|
|
|
EndIf
|
|
|
|
DEBUGVAR Timeout
|
|
DEBUGVAR PayOK
|
|
DEBUGVAR ChangeOK
|
|
DEBUGVAR CancelFlag
|
|
|
|
|
|
If CamFlag = 1 Then
|
|
Var CamCount = CamCount + 1
|
|
If CamCount > 2 Then
|
|
facecompare 10
|
|
Var CamFlag = 0
|
|
Var CamCount = 0
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
|
|
If AdultState2 = "Enable" Then
|
|
Var countAdultS2 = countAdultS2 + 1
|
|
|
|
If countAdultS2 > 60 Then
|
|
Var AdultState2 = "Invisible"
|
|
Var AdultState3 = "Enable"
|
|
EndIf
|
|
Else
|
|
Var countAdultS2 = 0
|
|
EndIf
|
|
|
|
|
|
Var Timeout = Timeout + 1
|
|
|
|
|
|
If Timeout >= 120 Then
|
|
Var alphaState = "Invisible"
|
|
|
|
|
|
If RoadShow = "true" Then
|
|
Else
|
|
Var PayState3 = "Disable"
|
|
Var PayState5 = "Disable"
|
|
EndIf
|
|
|
|
Var LOADING_STATE = "Invisible"
|
|
Var QRErrorState = "Invisible"
|
|
|
|
EndIf
|
|
|
|
|
|
If Timeout > 210 Then
|
|
If ActionOKCase = 1 Then
|
|
Var PayInfoCFlag = 1
|
|
EndIf
|
|
EndIf
|
|
|
|
If PayInfoCFlag = 1 Then
|
|
If Seeker.CodeChannel = 1 Then
|
|
Var SessionID2 = SelectSlot + ":"
|
|
Var SessionID2 = SessionID2 + Seeker.ExtendData
|
|
|
|
Var CreditAmount1 = ""
|
|
Var ServiceAmountFlow = ""
|
|
Var TelephoneNumber = "0899999999"
|
|
Var ServiceType = "coffee"
|
|
Var ECommerce = ""
|
|
Var ECommerce = ECommerce + PriceDrink
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + DiscountDrink
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + SessionID2
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + SelectDrink
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + Seeker.VendingCode
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + Seeker.CodeNumber
|
|
Var ECommerce = ECommerce + "/"
|
|
Var ECommerce = ECommerce + "C:"
|
|
Var ECommerce = ECommerce + Seeker.IntVendingCampaign
|
|
Var ServiceParameter = "max"
|
|
Var ServiceCharge = 0
|
|
Var AccountType = "new"
|
|
Var testservice = "kbank"
|
|
Var tc = ""
|
|
Var GetScore = ""
|
|
Var OperatorName = ""
|
|
Var SessionID = ""
|
|
GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
|
;Var Timeout = 0
|
|
EndIf
|
|
If Seeker = "curr" Then
|
|
Open "ROOT/taobin_project/xml/page_catalog.xml"
|
|
Else
|
|
|
|
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
If TestLoopMakeDrink = 1 Then
|
|
MakeDrinkV1 SelectDrink SelectSugarID
|
|
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
|
EndIf
|
|
|
|
|
|
|
|
If CoinInOK = 1 Then
|
|
Var CoinInCounter = CoinInCounter + 1
|
|
If CoinInCounter = 1 Then
|
|
|
|
SAVELOG "CoinInOk OK"
|
|
|
|
;Var ChangeOK = 1
|
|
Var Timeout = 180
|
|
Var PayOK = 1
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
Var stringLog = "Timeout " + Timeout
|
|
Var stringLog = stringLog + " PayOK"
|
|
Var stringLog = stringLog + PayOK
|
|
|
|
|
|
If Timeout > 180 Then
|
|
If PayOK = 1 Then
|
|
|
|
If Seeker = "curr" Then
|
|
|
|
MakeDrinkV1 SelectDrink SelectSugarID
|
|
Var TxRef1 = ""
|
|
CreateTxRef1 TxRef1
|
|
Else
|
|
Var TxRef1 = ""
|
|
CreateTxRef1 TxRef1
|
|
Var DrinkPaid = SelectDrink
|
|
Var PaidPaymentFromNextStage = 1
|
|
|
|
EndIf
|
|
|
|
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
|
|
|
Else
|
|
If CancelFlag = 0 Then
|
|
SAVELOG "Timeout > 180 s."
|
|
|
|
If ViewBill > 0 Then
|
|
CoinVending BILLREJECT
|
|
EndIf
|
|
|
|
CoinVending OFF
|
|
Var CancelFlag = 1
|
|
Var cancelState = "Enable"
|
|
|
|
If CashlessPayFlag = 1 Then
|
|
Var CashlessPayFlag = 0
|
|
CashlessReq FAIL
|
|
EndIf
|
|
|
|
Var CancelCounter = 0
|
|
If CoinAmount = 0 Then
|
|
|
|
If Seeker.IntVendingCredit > 0 Then
|
|
Var BmiYear = Seeker.IntVendingCredit
|
|
Var GetScore = "useCredit"
|
|
AddData 24 Seeker.TNumberTaobinCredit BmiYear PointCrm GetScore
|
|
Var Seeker.IntVendingCredit = 0
|
|
Var Seeker.CurrCreditUse = 0
|
|
EndIf
|
|
|
|
|
|
|
|
If Seeker.IntVendingCampaign = 0 Then
|
|
VendingQR OFF
|
|
If Seeker = "curr" Then
|
|
Open "ROOT/taobin_project/xml/page_catalog.xml"
|
|
Else
|
|
|
|
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
If CancelFlag = 1 Then
|
|
|
|
If Seeker.IntVendingCredit > 0 Then
|
|
Var BmiYear = Seeker.IntVendingCredit
|
|
Var GetScore = "useCredit"
|
|
AddData 24 Seeker.TNumberTaobinCredit BmiYear PointCrm GetScore
|
|
Var Seeker.IntVendingCredit = 0
|
|
Var Seeker.CurrCreditUse = 0
|
|
EndIf
|
|
|
|
Var CancelCounter = CancelCounter + 1
|
|
If CancelCounter = CancelNumber Then
|
|
;Change CoinAmount
|
|
If CoinAmount > 0 Then
|
|
If Seeker.StoreCreditFlag = 1 Then
|
|
Var ChangeOK = 1
|
|
Else
|
|
Change CoinAmount
|
|
EndIf
|
|
|
|
Else
|
|
If ActionOKCase = 0 Then
|
|
Var ActionOKCase = 1
|
|
Var PayInfoCFlag = 1
|
|
EndIf
|
|
EndIf
|
|
|
|
VendingQR OFF
|
|
EndIf
|
|
|
|
If CancelCounter >= 43 Then
|
|
Var ChangeOK = 1
|
|
EndIf
|
|
|
|
; This copy in file menu_catalog.xml
|
|
|
|
If ChangeOK = 1 Then
|
|
If ActionOKCase = 0 Then
|
|
|
|
If Seeker.TNumberTaobinCredit = "" Then
|
|
Var TelephoneNumber = "0899999999"
|
|
Var PayO2 = ""
|
|
Else
|
|
Var TelephoneNumber = Seeker.TNumberTaobinCredit
|
|
Var PayO2 = Seeker.CoffeePinNumber
|
|
EndIf
|
|
|
|
Var VendingDiscount = 0
|
|
Var VendingCampaign = 0
|
|
Var ServiceType = "credit"
|
|
Var SessionID2 = SelectDrink
|
|
Var ServiceCredit = "coffee"
|
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
|
Var PayCredit = 1
|
|
|
|
Var ActionOKCase = 1
|
|
If Seeker = "curr" Then
|
|
If Seeker.IntVendingCampaign = 0 Then
|
|
If Seeker = "curr" Then
|
|
Open "ROOT/taobin_project/xml/page_catalog.xml"
|
|
Else
|
|
|
|
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
|
|
EndIf
|
|
EndIf
|
|
Else
|
|
;wait ack
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
;Var CoinInCounter = CoinInCounter + 1
|
|
;If CoinInOK = 1 Then
|
|
; If CoinInCounter = 3 Then
|
|
;
|
|
; Var RemainAmount = PayAmount - CoinAmount
|
|
; If CoinAmount >= PayAmount Then
|
|
; Var Canout = CoinAmount - PayAmount
|
|
; If Canout > 0 Then
|
|
; Change Canout
|
|
; Else
|
|
; Var ChangeOK = 1
|
|
; EndIf
|
|
;
|
|
; Var Timeout = 118
|
|
; Var PayOK = 1
|
|
;
|
|
; MakeDrinkV1 SelectDrink SelectSugarID
|
|
;
|
|
; Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
|
;
|
|
; EndIf
|
|
; EndIf
|
|
;EndIf
|
|
|
|
Refresh
|
|
TimerReset
|
|
</EventTimeout>
|
|
|
|
<EventChangeStatus>
|
|
If ChangeStatus = "payout-end" Then
|
|
Var ChangeOK = 1
|
|
EndIf
|
|
</EventChangeStatus>
|
|
|
|
<EventIDCard>
|
|
|
|
DEBUGVAR IDCardStatus
|
|
DEBUGVAR IDCardReady
|
|
DEBUGVAR IDCardData
|
|
DEBUGVAR IDBirthdate
|
|
|
|
If CancelFlag = 0 Then
|
|
|
|
If AdultFlag2 = 1 Then
|
|
|
|
If IDCardStatus = "OK" Then
|
|
If IDCardReady = "OK" Then
|
|
If IDCardData = "START" Then
|
|
|
|
Var AdultState2 = "Enable"
|
|
Var AdultState1 = "Invisible"
|
|
Var AdultState3 = "Invisible"
|
|
|
|
Refresh
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
If IDCardStatus = "OK" Then
|
|
If IDCardReady = "OK" Then
|
|
If IDCardData = "ERROR" Then
|
|
Var AdultState2 = "Invisible"
|
|
Var AdultState3 = "Enable"
|
|
|
|
Refresh
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
If IDCardStatus = "ERROR" Then
|
|
Var AdultState2 = "Invisible"
|
|
Var AdultState3 = "Enable"
|
|
|
|
Refresh
|
|
EndIf
|
|
|
|
If IDCardStatus = "OK" Then
|
|
If IDCardReady = "OK" Then
|
|
If IDCardData = "DONE" Then
|
|
|
|
;Var birthDate = IDBirthdate
|
|
Var StrYear = ""
|
|
Var StrMon = ""
|
|
Var StrDay = ""
|
|
|
|
SUBSTRING IDBirthdate 0 4 StrYear
|
|
SUBSTRING IDBirthdate 4 6 StrMon
|
|
SUBSTRING IDBirthdate 6 8 StrDay
|
|
|
|
INT StrYear
|
|
INT StrMon
|
|
INT StrDay
|
|
|
|
Var Adult20 = 0
|
|
|
|
|
|
DEBUGVAR StrYear
|
|
DEBUGVAR StrMon
|
|
DEBUGVAR StrDay
|
|
|
|
DEBUGVAR sdatemonth
|
|
DEBUGVAR sdateday
|
|
|
|
Var sdateyear = sdateyear + 543
|
|
Var AgeNumber = sdateyear - StrYear
|
|
DEBUGVAR AgeNumber
|
|
|
|
If AgeNumber >= 20 Then
|
|
|
|
If AgeNumber = 20 Then
|
|
If sdatemonth > StrMon Then
|
|
Var Adult20 = 1
|
|
Else
|
|
If sdatemonth = StrMon Then
|
|
If sdateday >= StrDay Then
|
|
Var Adult20 = 1
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
Else
|
|
Var Adult20 = 1
|
|
EndIf
|
|
|
|
If Adult20 = 1 Then
|
|
Var AdultState3 = "Invisible"
|
|
Var AdultState2 = "Invisible"
|
|
Var AdultState1 = "Invisible"
|
|
Var AdultState = "Invisible"
|
|
;CoinVending XBILL
|
|
Open "ROOT/taobin_project/xml/page_payment_camera.xml"
|
|
Refresh
|
|
|
|
Else
|
|
Var AdultState2 = "Invisible"
|
|
Var AdultState3 = "Enable"
|
|
Refresh
|
|
EndIf
|
|
|
|
Else
|
|
Var AdultState2 = "Invisible"
|
|
Var AdultState3 = "Enable"
|
|
Refresh
|
|
EndIf
|
|
|
|
|
|
Var AdultFlag2 = 1
|
|
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
|
|
</EventIDCard>
|
|
|
|
<EventCoin>
|
|
TimerReset
|
|
|
|
If CoinInFlag = 0 Then
|
|
;VendingQR OFF
|
|
Var alphaState = "Invisible"
|
|
EndIf
|
|
|
|
|
|
|
|
Var CoinInFlag = 1
|
|
|
|
DEBUGVAR CoinInOK
|
|
|
|
If ViewBill > 0 Then
|
|
|
|
If PayOfflineMode = 1 Then
|
|
CoinVending BILLREJECT
|
|
Else
|
|
|
|
If Seeker.StoreCreditFlag = 1 Then
|
|
CoinVending BILLSTACKALL
|
|
Else
|
|
|
|
|
|
Var RemainAmount = PayAmount - CoinAmount
|
|
Var RemainAmount = RemainAmount - Seeker.IntVendingCampaign
|
|
Var RemainAmount = RemainAmount - Seeker.IntVendingCredit
|
|
|
|
If ViewBill > RemainAmount Then
|
|
Var RemainAmountKeep = ViewBill - RemainAmount
|
|
Else
|
|
Var RemainAmountKeep = ViewBill
|
|
EndIf
|
|
|
|
DEBUGVAR Timeout
|
|
Var Timeout = 0
|
|
|
|
|
|
Var RemainAmountStr = "" + RemainAmount
|
|
Var showRemaining = charOfBaht + RemainAmountStr
|
|
|
|
|
|
|
|
|
|
Var alphaState3 = "Enable"
|
|
|
|
If show_eng = "true" Then
|
|
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/The_change_has_run_out.mp3"
|
|
Else
|
|
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/The_change_has_run_out.mp3"
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
Else
|
|
|
|
|
|
If CoinInOK = 0 Then
|
|
|
|
Var RemainAmount = PayAmount - CoinAmount
|
|
Var RemainAmount = RemainAmount - Seeker.IntVendingCampaign
|
|
Var RemainAmount = RemainAmount - Seeker.IntVendingCredit
|
|
|
|
Var SumCoinAmount = CoinAmount + Seeker.IntVendingCampaign
|
|
Var SumCoinAmount = SumCoinAmount + Seeker.IntVendingCredit
|
|
If SumCoinAmount >= PayAmount Then
|
|
;Var VendingQRCode = "ERROR"
|
|
CoinVending OFF
|
|
VendingQR OFF
|
|
Var Canout = SumCoinAmount - PayAmount
|
|
If Canout = 0 Then
|
|
Var RemainAmountStr = 0
|
|
Else
|
|
If show_eng = "true" Then
|
|
Var RemainAmountStr = "Change " + Canout
|
|
Var RemainAmountStr = RemainAmountStr + "###size=90"
|
|
Else
|
|
Var FlagalphaState2 = 1
|
|
Var RemainAmountStr = "ทอน " + Canout
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
Var CancleState = "Disable"
|
|
Var CoinInOK = 1
|
|
Var CoinInCounter = 0
|
|
|
|
|
|
|
|
Else
|
|
Var RemainAmountStr = "" + RemainAmount
|
|
EndIf
|
|
|
|
DEBUGVAR Timeout
|
|
Var Timeout = 0
|
|
|
|
;Var RemainAmount = 0
|
|
Var showRemaining = charOfBaht + RemainAmountStr
|
|
Var alphaState2 = "Enable"
|
|
Var alphaState2t = alphaState2
|
|
If FlagalphaState2 = 1 Then
|
|
Var alphaState2t = "Invisible"
|
|
EndIf
|
|
|
|
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
Refresh
|
|
</EventCoin>
|
|
<EventVDCancle>
|
|
If CoinInFlag = 1 Then
|
|
If CoinInOK = 0 Then
|
|
If CancelFlag = 0 Then
|
|
SAVELOG "VDCancle > Cancle Order."
|
|
Machine CancelWepApp
|
|
CoinVending OFF
|
|
Var CancelFlag = 1
|
|
Var cancelState = "Enable"
|
|
Var CancelCounter = 0
|
|
;If CoinAmount = 0 Then
|
|
; Open "ROOT/taobin_project/xml/page_catalog.xml"
|
|
;EndIf
|
|
|
|
|
|
If show_eng = "true" Then
|
|
Var showRemaining = "Refund"
|
|
Else
|
|
Var showRemaining = "คืนเงิน"
|
|
EndIf
|
|
;Open "ROOT/taobin_project/xml/page_catalog.xml"
|
|
|
|
If FlagQROpened = 1 Then
|
|
Var CancelNumber = 12
|
|
EndIf
|
|
|
|
EndIf
|
|
EndIf
|
|
;VendingQR OFF
|
|
Refresh
|
|
|
|
If ViewBill > 0 Then
|
|
CoinVending BILLREJECT
|
|
EndIf
|
|
EndIf
|
|
</EventVDCancle>
|
|
|
|
|
|
|
|
|
|
<Image>
|
|
<X> 91 </X>
|
|
<Y> 1180 </Y>
|
|
<State> MenuCautionImageStage0 </State>
|
|
<Filename> eval(
|
|
If show_eng = "true" Then
|
|
Var return = "ROOT/taobin_project/image/warning/image_warning_energy_drink_en.png"
|
|
Else
|
|
Var return = "ROOT/taobin_project/image/warning/image_warning_energy_drink.png"
|
|
|
|
EndIf
|
|
)
|
|
</Filename>
|
|
</Image>
|
|
|
|
;
|
|
|
|
<Video>
|
|
<X> 0 </X>
|
|
<Y> 0 </Y>
|
|
<Width> 1080</Width>
|
|
<Height> 380 </Height>
|
|
<Loop> "true" </Loop>
|
|
<Filename> video_menu_0 </Filename>
|
|
</Video>
|
|
|
|
<Image>
|
|
<X> 144 </X>
|
|
<Y> 413 </Y>
|
|
<Filename> pay_with_chanel_text </Filename>
|
|
</Image>
|
|
|
|
|
|
; back
|
|
<Button>
|
|
<X> 18 </X>
|
|
<Y> 422 </Y>
|
|
<Filename> Var( DirImage + "/bn_back_arrow2.png") </Filename>
|
|
<FilenamePress> Var( DirImage + "/bn_back_arrow2.png") </FilenamePress>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
If CoinInOK = 0 Then
|
|
If CancelFlag = 0 Then
|
|
|
|
If ViewBill > 0 Then
|
|
CoinVending BILLREJECT
|
|
EndIf
|
|
|
|
SAVELOG "ButtonCancleMain > Cancle Order."
|
|
Machine CancelWepApp
|
|
CoinVending OFF
|
|
Var CancelFlag = 1
|
|
Var cancelState = "Enable"
|
|
Var CancelCounter = 0
|
|
|
|
If FlagQROpened = 1 Then
|
|
Var CancelNumber = 12
|
|
EndIf
|
|
|
|
If CashlessPayFlag = 1 Then
|
|
Var CashlessPayFlag = 0
|
|
CashlessReq FAIL
|
|
EndIf
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
|
|
|
|
<Image>
|
|
<X> 375 </X>
|
|
<Y> 623 </Y>
|
|
<Width> 331 </Width>
|
|
<Height> 435 </Height>
|
|
<Filename> PictureDrink </Filename>
|
|
</Image>
|
|
|
|
|
|
<Image>
|
|
<X> 375 </X>
|
|
<Y> 623 </Y>
|
|
<State> eval(
|
|
If IsSmoRet = "true" Then
|
|
Var return = "Enable"
|
|
Else
|
|
Var return = "Invisible"
|
|
EndIf
|
|
)
|
|
</State>
|
|
<Filename> "ROOT/taobin_project/image/topping2/blender_icon.png" </Filename>
|
|
</Image>
|
|
|
|
<Button>
|
|
<X> X_CASH1 </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"
|
|
Var alphaState2t = alphaState2
|
|
|
|
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>
|
|
<State> PayState2</State>
|
|
<Filename> Var( DirImage + "/bn_pay_with_code.png") </Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_pay_with_code.png") </FilenamePress>
|
|
<FilenameDisable> pay_with_code_image </FilenameDisable>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
If alphaState = "Invisible" Then
|
|
|
|
If CoinInFlag = 0 Then
|
|
If CancelFlag = 0 Then
|
|
Var TelephoneNumber = ""
|
|
Var Tel_Confirm_State = "Disable"
|
|
Open "ROOT/taobin_project/xml/page_payment_code.xml"
|
|
EndIf
|
|
EndIf
|
|
|
|
EndIf
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> X_CASH2 </X>
|
|
<Y> 1276 </Y>
|
|
<State> PayState3</State>
|
|
<Filename> Var( DirImage + "/bn_prompt_pay.png") </Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_prompt_pay.png") </FilenamePress>
|
|
<FilenameDisable> Var( DirImage + "/bd_prompt_pay.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
|
|
|
|
If IndoQR = 1 Then
|
|
Var QR_POPUP = "/img_popup7.png"
|
|
Else
|
|
Var QR_POPUP = "/img_popup1.png"
|
|
EndIf
|
|
|
|
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 + "/"
|
|
If IndoQR = 1 Then
|
|
Var ECommerceQR = ECommerceQR + "IND:2/"
|
|
Else
|
|
Var ECommerceQR = ECommerceQR + "KBA:2/"
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
|
|
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> X_CASH3 </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>
|
|
<FilenameDisable> pay_with_credit_image </FilenameDisable>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
|
|
If alphaState = "Invisible" Then
|
|
|
|
If CoinInFlag = 0 Then
|
|
If CancelFlag = 0 Then
|
|
Var TelephoneNumber = ""
|
|
Var Tel_Confirm_State = "Disable"
|
|
Open "ROOT/taobin_project/xml/page_payment_credit.xml"
|
|
EndIf
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 775 </X>
|
|
<Y> 1276 </Y>
|
|
<State> EnableCCard</State>
|
|
<Filename> Var( DirImage + "/bn_pay_with_ccard.png") </Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_pay_with_ccard.png") </FilenamePress>
|
|
<FilenameDisable> Var( DirImage + "/bd_pay_with_ccard.png") </FilenameDisable>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
If alphaState = "Invisible" Then
|
|
If CoinInFlag = 0 Then
|
|
If CancelFlag = 0 Then
|
|
Var QR_POPUP = "/img_popup8.png"
|
|
Var alphaState = "Enable"
|
|
Coin CARD
|
|
Var ReqPayInfoFromCashOther = 2
|
|
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
|
|
<Button>
|
|
<X> 439 </X>
|
|
<Y> 1499 </Y>
|
|
<State> PayState5</State>
|
|
<Filename> Var( DirImage + "/bn_pay_with_ewallet.png") </Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_pay_with_ewallet.png") </FilenamePress>
|
|
<FilenameDisable> Var( DirImage + "/bd_pay_with_ewallet.png") </FilenameDisable>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
|
|
If alphaState = "Invisible" Then
|
|
|
|
If CoinInFlag = 0 Then
|
|
If CancelFlag = 0 Then
|
|
Open "ROOT/taobin_project/xml/page_payment_cashOther.xml"
|
|
EndIf
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
|
|
<Button>
|
|
<X> 664 </X>
|
|
<Y> 1499 </Y>
|
|
<State> PayState2</State>
|
|
<Filename> Var( DirImage + "/bn_pay_with_codeOther.png") </Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_pay_with_codeOther.png") </FilenamePress>
|
|
<FilenameDisable> Var( DirImage + "/bp_pay_with_codeOther.png") </FilenameDisable>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
If alphaState = "Invisible" Then
|
|
|
|
If CoinInFlag = 0 Then
|
|
If CancelFlag = 0 Then
|
|
Var TelephoneNumber = ""
|
|
Var Tel_Confirm_State = "Disable"
|
|
Open "ROOT/taobin_project/xml/page_payment_codeOther.xml"
|
|
EndIf
|
|
EndIf
|
|
|
|
EndIf
|
|
</EventClick>
|
|
</Button>
|
|
|
|
|
|
<Button>
|
|
<X> 360 </X>
|
|
<Y> 1781 </Y>
|
|
<State>CancleState</State>
|
|
<Filename> Var( DirImage + "/bn_cancel_all.png" )</Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_cancel_all.png" ) </FilenamePress>
|
|
<FilenameDisable> Var( DirImage + "/bp_cancel_all.png" ) </FilenameDisable>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
;VendingQR OFF
|
|
|
|
If CoinInOK = 0 Then
|
|
If CancelFlag = 0 Then
|
|
SAVELOG "ButtonCancleMain > Cancle Order."
|
|
Machine CancelWepApp
|
|
If ViewBill > 0 Then
|
|
CoinVending BILLREJECT
|
|
EndIf
|
|
CoinVending OFF
|
|
Var CancelFlag = 1
|
|
Var cancelState = "Enable"
|
|
Var CancelCounter = 0
|
|
|
|
If FlagQROpened = 1 Then
|
|
Var CancelNumber = 12
|
|
EndIf
|
|
|
|
If CashlessPayFlag = 1 Then
|
|
Var CashlessPayFlag = 0
|
|
CashlessReq FAIL
|
|
EndIf
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
Refresh
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Text>
|
|
<X> 0 </X>
|
|
<Y> 1065 </Y>
|
|
<Width> 1080</Width>
|
|
<Align> Center </Align>
|
|
<Size> 72 </Size>
|
|
<Font> KanitMediumTTF </Font>
|
|
<Color> 0xB78F24 </Color>
|
|
<Value> showRemaining </Value>
|
|
</Text>
|
|
|
|
|
|
|
|
<Text>
|
|
<X> 0 </X>
|
|
<Y> 938 </Y>
|
|
<Width> 1080</Width>
|
|
<Align> Center </Align>
|
|
<Size> 72 </Size>
|
|
<Font> KanitMediumTTF </Font>
|
|
<Color> 0x513C2F </Color>
|
|
<Value> showname </Value>
|
|
</Text>
|
|
|
|
<Text>
|
|
<X> 0 </X>
|
|
<Y> 1022 </Y>
|
|
<Width> 1080</Width>
|
|
<Align> Center </Align>
|
|
<Size> 24 </Size>
|
|
<Font> KanitLightTTF </Font>
|
|
<Color> 0x6F5F51 </Color>
|
|
<Value> showdesc </Value>
|
|
</Text>
|
|
|
|
; QR popup
|
|
<Image>
|
|
<X> 0 </X>
|
|
<Y> 380 </Y>
|
|
<State> alphaState </State>
|
|
<Filename> "ROOT/taobin_project/image/page_payment/alpha.png" </Filename>
|
|
</Image>
|
|
|
|
<Image>
|
|
<X> 249 </X>
|
|
<Y> 748 </Y>
|
|
<State> alphaState </State>
|
|
<Filename> Var( DirImage + QR_POPUP )</Filename>
|
|
</Image>
|
|
|
|
|
|
|
|
<Image>
|
|
<X> 267 </X>
|
|
<Y> 1065 </Y>
|
|
<State> LOADING_STATE </State>
|
|
<Filename> Var( DirImage + "/loadingText.png" )</Filename>
|
|
</Image>
|
|
|
|
|
|
|
|
|
|
|
|
<Button>
|
|
<X> 438 </X>
|
|
<Y> 1345 </Y>
|
|
<State> alphaState </State>
|
|
<Filename> Var( DirImage + "/bn_cancel.png" )</Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_cancel.png" )</FilenamePress>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
Var LOADING_STATE = "Invisible"
|
|
Var QRErrorState = "Invisible"
|
|
Var alphaState = "Invisible"
|
|
Var QRCODE99 = ""
|
|
;CoinVending ON
|
|
;VendingQR OFF
|
|
|
|
CashlessReq OFF
|
|
|
|
If CashlessPayFlag = 1 Then
|
|
Var CashlessPayFlag = 0
|
|
CashlessReq FAIL
|
|
EndIf
|
|
|
|
|
|
Refresh
|
|
</EventClick>
|
|
</Button>
|
|
|
|
; begin cash popup
|
|
<Image>
|
|
<X> 0 </X>
|
|
<Y> 380 </Y>
|
|
<State> alphaState2 </State>
|
|
<Filename> "ROOT/taobin_project/image/page_payment/alpha.png" </Filename>
|
|
</Image>
|
|
|
|
<Image>
|
|
<X> 182 </X>
|
|
<Y> 748 </Y>
|
|
<State> alphaState2 </State>
|
|
<Filename> Var( DirImage2 + "/img_popup11.png" )</Filename>
|
|
</Image>
|
|
|
|
|
|
<Image>
|
|
<X> 0 </X>
|
|
<Y> 380 </Y>
|
|
<State> AdultState </State>
|
|
<Filename> "ROOT/taobin_project/image/page_payment/alpha.png" </Filename>
|
|
</Image>
|
|
|
|
|
|
<Image>
|
|
<X> 249 </X>
|
|
<Y> 751 </Y>
|
|
<State> AdultState1 </State>
|
|
<Filename> Var( DirImage + "/img_popup4.png" )</Filename>
|
|
</Image>
|
|
|
|
<Image>
|
|
<X> 838 </X>
|
|
<Y> 1350 </Y>
|
|
<State> eval(
|
|
Var return = "Invisible"
|
|
|
|
If AdultState1 = "Enable" Then
|
|
If AdultState2 = "Invisible" Then
|
|
Var return = "Enable"
|
|
EndIf
|
|
EndIf
|
|
DEBUGVAR return
|
|
)
|
|
</State>
|
|
<Animation>
|
|
<Style> "Bounce" </Style>
|
|
<OnEvent> "TimerSec=3" </OnEvent>
|
|
</Animation>
|
|
<Filename> "ROOT/taobin_project/image/anmi/arrow_1.png" </Filename>
|
|
</Image>
|
|
|
|
<Button>
|
|
<X> 360 </X>
|
|
<Y> 1373 </Y>
|
|
<State>AdultState1</State>
|
|
<Filename> Var( DirImage + "/bn_cancel_all.png" )</Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_cancel_all.png" ) </FilenamePress>
|
|
<FilenameDisable> Var( DirImage + "/bp_cancel_all.png" ) </FilenameDisable>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
;VendingQR OFF
|
|
|
|
If CoinInOK = 0 Then
|
|
If CancelFlag = 0 Then
|
|
SAVELOG "ButtonCancleMain > Cancle Order."
|
|
Machine CancelWepApp
|
|
If ViewBill > 0 Then
|
|
CoinVending BILLREJECT
|
|
EndIf
|
|
CoinVending OFF
|
|
Var CancelFlag = 1
|
|
Var cancelState = "Enable"
|
|
Var CancelCounter = 0
|
|
|
|
If FlagQROpened = 1 Then
|
|
Var CancelNumber = 12
|
|
EndIf
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
Refresh
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Image>
|
|
<X> 249 </X>
|
|
<Y> 751 </Y>
|
|
<State> AdultState2 </State>
|
|
<Filename> Var( DirImage + "/img_popup4-2.png" )</Filename>
|
|
</Image>
|
|
|
|
<Image>
|
|
<X> 249 </X>
|
|
<Y> 751 </Y>
|
|
<State> AdultState3 </State>
|
|
<Filename> Var( DirImage + "/img_popup4-3.png" )</Filename>
|
|
</Image>
|
|
|
|
<Button>
|
|
<X> 360 </X>
|
|
<Y> 1373 </Y>
|
|
<State>AdultState3</State>
|
|
<Filename> Var( DirImage + "/bn_cancel_all.png" )</Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_cancel_all.png" ) </FilenamePress>
|
|
<FilenameDisable> Var( DirImage + "/bp_cancel_all.png" ) </FilenameDisable>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
;VendingQR OFF
|
|
|
|
If CoinInOK = 0 Then
|
|
If CancelFlag = 0 Then
|
|
SAVELOG "ButtonCancleMain > Cancle Order."
|
|
Machine CancelWepApp
|
|
If ViewBill > 0 Then
|
|
CoinVending BILLREJECT
|
|
EndIf
|
|
CoinVending OFF
|
|
Var CancelFlag = 1
|
|
Var cancelState = "Enable"
|
|
Var CancelCounter = 0
|
|
|
|
If FlagQROpened = 1 Then
|
|
Var CancelNumber = 12
|
|
EndIf
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
Refresh
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 438 </X>
|
|
<Y> 1345 </Y>
|
|
<State> alphaState2t </State>
|
|
<Filename> Var( DirImage + "/bn_cancel.png" )</Filename>
|
|
<FilenamePress> Var( DirImage + "/bp_cancel.png" )</FilenamePress>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
|
|
|
|
|
|
|
|
If CoinInOK = 0 Then
|
|
If CancelFlag = 0 Then
|
|
SAVELOG "ButtonCancleAlpha2 > Cancle Order."
|
|
Machine CancelWepApp
|
|
If ViewBill > 0 Then
|
|
CoinVending BILLREJECT
|
|
EndIf
|
|
CoinVending OFF
|
|
Var CancelFlag = 1
|
|
Var cancelState = "Enable"
|
|
Var CancelCounter = 0
|
|
If FlagQROpened = 1 Then
|
|
Var CancelNumber = 12
|
|
EndIf
|
|
EndIf
|
|
EndIf
|
|
|
|
Var alphaState2 = "Invisible"
|
|
Var alphaState2t = alphaState2
|
|
Refresh
|
|
|
|
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
|
|
|
|
<Text>
|
|
<X> 0 </X>
|
|
<Y> 1041 </Y>
|
|
<Size> 144 </Size>
|
|
<Align> Center </Align>
|
|
<Width> 1080 </Width>
|
|
<Font> KanitRegularTTF </Font>
|
|
<State> alphaState2 </State>
|
|
<Color> 0xDE794E </Color>
|
|
<Value> RemainAmountStr </Value>
|
|
</Text>
|
|
; end case popup
|
|
|
|
<Image>
|
|
<X> 0 </X>
|
|
<Y> 380 </Y>
|
|
<State> alphaState3 </State>
|
|
<Filename> "ROOT/taobin_project/image/page_payment/alpha.png" </Filename>
|
|
</Image>
|
|
|
|
<Image>
|
|
<X> 182 </X>
|
|
<Y> 748 </Y>
|
|
<State> alphaState3 </State>
|
|
<Filename> Var( DirImage2 + "/img_popup12.png" )</Filename>
|
|
</Image>
|
|
|
|
<Button>
|
|
<X> 327 </X>
|
|
<Y> 1208 </Y>
|
|
<State> alphaState3 </State>
|
|
<Filename> Var( DirImage2 + "/bn_keep.png" )</Filename>
|
|
<FilenamePress> Var( DirImage2 + "/bp_keep.png" )</FilenamePress>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
Open "ROOT/taobin_project/xml/page_payment_storeCredit.xml"
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Button>
|
|
<X> 327 </X>
|
|
<Y> 1335 </Y>
|
|
<State> alphaState3 </State>
|
|
<Filename> Var( DirImage2 + "/bn_cancel2.png" )</Filename>
|
|
<FilenamePress> Var( DirImage2 + "/bp_cancel2.png" )</FilenamePress>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
CoinVending BILLREJECT
|
|
Var alphaState3 = "Invisible"
|
|
Refresh
|
|
</EventClick>
|
|
</Button>
|
|
|
|
;<Text>
|
|
;<X> 0 </X>
|
|
;<Y> 1041 </Y>
|
|
;<Size> 100 </Size>
|
|
;<Align> Center </Align>
|
|
;<Width> 1080 </Width>
|
|
;<Font> KanitRegularTTF </Font>
|
|
;<State> alphaState3 </State>
|
|
;<Color> 0xDE794E </Color>
|
|
;<Value> RemainAmountKeep </Value>
|
|
;</Text>
|
|
|
|
|
|
<Text>
|
|
<X> 270 </X>
|
|
<Y> 1000 </Y>
|
|
<Width>550</Width>
|
|
<Align> Center </Align>
|
|
<Size> 30 </Size>
|
|
<Font> KanitRegularTTF </Font>
|
|
<State> alphaState </State>
|
|
<Color> 0xFF0000 </Color>
|
|
<Value> CashTextWarning </Value>
|
|
</Text>
|
|
|
|
|
|
<QRCode>
|
|
<X> 445 </X>
|
|
<Y> 958 </Y>
|
|
<Width> 200 </Width>
|
|
<Height> 200 </Height>
|
|
<State> alphaState </State>
|
|
<Service> testservice </Service>
|
|
</QRCode>
|
|
|
|
<Button>
|
|
<X> 267 </X>
|
|
<Y> 960 </Y>
|
|
<State>QRErrorState</State>
|
|
<Filename> Var( DirImage + "/QRError.png" ) </Filename>
|
|
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
|
|
<Volume> SoundVolume </Volume>
|
|
<EventClick>
|
|
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Image>
|
|
<X> 0 </X>
|
|
<Y> 380 </Y>
|
|
<State> cancelState </State>
|
|
<Filename> Var( DirImage + "/CancelOrder.png" ) </Filename>
|
|
</Image>
|
|
|
|
;<GIF>
|
|
;<X> 493 </X>
|
|
;<Y> 960 </Y>
|
|
;<Width> 94 </Width>
|
|
;<Height> 94 </Height>
|
|
;<State> cancelState </State>
|
|
;<Filename> Var( DirImage + "/loading.gif" )</Filename>
|
|
;</GIF>
|
|
|
|
;<GIF>
|
|
;<X> 493 </X>
|
|
;<Y> 1195 </Y>
|
|
;<Width> 94 </Width>
|
|
;<Height> 94 </Height>
|
|
;<State> AdultState2 </State>
|
|
;<Filename> Var( DirImage + "/loading.gif" )</Filename>
|
|
;</GIF>
|
|
|
|
<GIF>
|
|
<X> 493 </X>
|
|
<Y> 968 </Y>
|
|
<Width> 94 </Width>
|
|
<Height> 94 </Height>
|
|
<State> LOADING_STATE </State>
|
|
<Filename> Var( DirImage + "/loading.gif" )</Filename>
|
|
</GIF>
|
|
|
|
|
|
|
|
<EventSecurity>
|
|
Open "/media/bt/xml/security_alarm.xml"
|
|
</EventSecurity>
|
|
|
|
;<Text>
|
|
;<X> 0 </X>
|
|
;<Y> 1880 </Y>
|
|
;<Size> 14 </Size>
|
|
;<Align> "Left" </Align>
|
|
;<Width> 1080 </Width>
|
|
;<Font> KanitThinTTF </Font>
|
|
;<Color> 0x513C2F </Color>
|
|
;<Value> SelectDrink </Value>
|
|
;</Text>
|
|
|
|
|
|
|
|
<Button>
|
|
<X> 0 </X>
|
|
<Y> 1870 </Y>
|
|
<State> ShowNetworkProblem </State>
|
|
<Color> "0xFF0000" </Color>
|
|
<Width> 1080 </Width>
|
|
<Height> 60 </Height>
|
|
<EventClick>
|
|
DEBUGVAR IgnoreNetCore
|
|
If IgnoreNetCore = "true" Then
|
|
If Seeker = "curr" Then
|
|
|
|
MakeDrinkV1 SelectDrink SelectSugarID
|
|
Else
|
|
|
|
EndIf
|
|
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
|
EndIf
|
|
</EventClick>
|
|
</Button>
|
|
|
|
<Text>
|
|
<X> 5 </X>
|
|
<Y> 1880 </Y>
|
|
<Size> 24 </Size>
|
|
<Align> Center </Align>
|
|
<Width> 1080 </Width>
|
|
<Font> RobotoRegular </Font>
|
|
<Color> 0xFFFFFF </Color>
|
|
<Value> ShowNetworkProblemText </Value>
|
|
</Text>
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
</Popup>
|