"Enable" 1080 1920 "0xFFFFFF" DEBUGVAR CART1_PICTURE DEBUGVAR CART2_PICTURE DEBUGVAR CART3_PICTURE DEBUGVAR CART1_PDCODE DEBUGVAR CART2_PDCODE DEBUGVAR CART3_PDCODE DEBUGVAR CART1_NAME_ENG DEBUGVAR CART2_NAME_ENG DEBUGVAR CART3_NAME_ENG DEBUGVAR CART1_NAME_THAI DEBUGVAR CART2_NAME_THAI DEBUGVAR CART3_NAME_THAI DEBUGVAR CART1_PRICE DEBUGVAR CART2_PRICE DEBUGVAR CART3_PRICE Var cart1_pic = "" Var cart2_pic = "" Var cart3_pic = "" Var cart1_name = "" Var cart2_name = "" Var cart3_name = "" Var cart1_price = "" Var cart2_price = "" Var cart3_price = "" Var cart1_en = "Invisible" Var cart2_en = "Invisible" Var cart3_en = "Invisible" Var PriceDrinkMulti = 0 Var CART_INDEX = 0 If show_eng = "true" Then If CART_COUNT >= 1 Then Var cart1_pic = "ROOT/taobin_project/image/page_drink/" + CART1_PICTURE Var cart1_name = CART1_NAME_ENG Var cart1_price = "" + CART1_PRICE Var cart1_en = "Enable" Var PriceDrinkMulti = PriceDrinkMulti + CART1_PRICE EndIf If CART_COUNT >= 2 Then Var cart2_pic = "ROOT/taobin_project/image/page_drink/" + CART2_PICTURE Var cart2_name = CART2_NAME_ENG Var cart2_price = "" + CART2_PRICE Var cart2_en = "Enable" Var PriceDrinkMulti = PriceDrinkMulti + CART2_PRICE EndIf If CART_COUNT = 3 Then Var cart3_pic = "ROOT/taobin_project/image/page_drink/" + CART3_PICTURE Var cart3_name = CART3_NAME_ENG Var cart3_price = "" + CART3_PRICE Var cart3_en = "Enable" Var PriceDrinkMulti = PriceDrinkMulti + CART3_PRICE EndIf Else If CART_COUNT >= 1 Then Var cart1_pic = "ROOT/taobin_project/image/page_drink/" + CART1_PICTURE Var cart1_name = CART1_NAME_THAI Var cart1_price = "" + CART1_PRICE Var cart1_en = "Enable" Var PriceDrinkMulti = PriceDrinkMulti + CART1_PRICE EndIf If CART_COUNT >= 2 Then Var cart2_pic = "ROOT/taobin_project/image/page_drink/" + CART2_PICTURE Var cart2_name = CART2_NAME_THAI Var cart2_price = "" + CART2_PRICE Var cart2_en = "Enable" Var PriceDrinkMulti = PriceDrinkMulti + CART2_PRICE EndIf If CART_COUNT = 3 Then Var cart3_pic = "ROOT/taobin_project/image/page_drink/" + CART3_PICTURE Var cart3_name = CART3_NAME_THAI Var cart3_price = "" + CART3_PRICE Var cart3_en = "Enable" Var PriceDrinkMulti = PriceDrinkMulti + CART3_PRICE EndIf EndIf Var ServiceAmountSum = PriceDrinkMulti Var ServiceCharge = 0 ; On open Var GetPayInfoFlag = 0 Var SessionID2 = "" Var testservice = "kbank" Var QRCODE99 = "" Var QRCODETMP = "" Var QRChannel = 0 Var HaveCup = "true" Var SelectDrink = "00-00-00-0000" Var DiscountDrink = 0 Var SelectSlot = "" + CART_COUNT SAVELOG BoxID Var QRCODE1 = "A000000677010112" Var QRCODE2 = "010755600066301" Var QRCODE3 = "VDGN" Var QRCODE4 = BoxID Var QRCODE5 = SelectSlot Var QRCODE6 = SelectDrink Var QRCODE7 = PriceDrinkMulti Var QRCODE8 = "" Var CountStepPackPayment = 0 Var Seeker.VendingCode = "C00" Var Seeker.VendingCampaignRI3 = 0 Var Seeker.IntVendingCampaign = 0 Var Seeker.FreeVendingCampaign = 0 Var Seeker.CodeChannel = 0 Var CoinVendingOnFlag = 0 Var Seeker.IntVendingCredit = 0 Var Seeker.StoreCreditFlag = 0 Var Seeker.pageStoreCredit0 = 0 Var Seeker.TNumberTaobinCredit = "" Var Seeker.TNumberTaobinMember = "" ;Var VendingTSIDTmp = "" Var Seeker.VendingDiscount = 0 Var Seeker.VendingCampaign = 0 Var Seeker.VendingTSID = "" Var MultiTSID = "" Var PayReference = "" Var Seeker.CreditReferenceTmp = "" Var AddPointFlag = 0 Var PayType = "" Var QRCODE99KBANK = "" Var QRCODE99Shoppy = "" Var LOADING_STATE = "Invisible" Var QR_POPUP = "/img_popup2.png" If show_eng = "true" Then Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment" Var PlaySoundLag = "ROOT/taobin_project/sound_eng/How_would_you_like_to_pay.mp3" Else Var DirImage = "ROOT/taobin_project/image/page_payment" Var PlaySoundLag = "ROOT/taobin_project/sound_thai/payment.mp3" EndIf SAVELOG MachineStage If ReadyForBrew = "false" Then Open "ROOT/taobin_project/xml/page_back_to_main.xml" Var ReadyForBrew = "false" EndIf If Seeker = "curr" Then If MachineStage = "remove-cup" Then Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml" EndIf If CupChecking = "true" Then Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml" EndIf EndIf Var MachineStage = "-" Var cartNumText = "" + CART_COUNT If show_eng = "true" Then Var cartNumText = cartNumText + " cups" Else Var cartNumText = cartNumText + " แก้ว" EndIf Var PayAmount = PriceDrinkMulti Var RemainAmountStr = "" + PayAmount Var showRemaining = charOfBaht + RemainAmountStr Var VendingCreditRemain = "" Var Seeker.thankLidFlag = 1 Var Seeker.thankStrawFlag = 1 100 If ReadyForBrew = "false" Then Open "ROOT/taobin_project/xml/page_back_to_main.xml" Var ReadyForBrew = "false" EndIf If MachineStage = "remove-cup" Then Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml" EndIf Var CountStepPackPayment = CountStepPackPayment + 1 If CountStepPackPayment = 1 Then SAVELOG ExtendData If GetPayInfoFlag = 0 Then If RoadShow = "false" Then ;CoinVending ON CoinVending XBILL EndIf Var RemainAmount = 0 ;Var SessionID2 = SelectSlot + ":" ;Var SessionID2 = SessionID2 + "00000" ;Var CreditAmount1 = "" ;Var ServiceAmountFlow = "" ;Var TelephoneNumberQR = "0899999999" ;Var ServiceType = "coffee-multi" ;Var ECommerceQR = "" ;Var ECommerceQR = ECommerceQR + PriceDrinkMulti ;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" ;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 Timeout = 0 ;Var GetPayInfoFlag = 1 ;Var ReqPayInfoFlag = 1 EndIf ; Reset Var MachineState_Result = 0 Open "ROOT/taobin_project/xml/page_payment_cashMore.xml" EndIf TimerReset Refresh ; ; 0 ; 0 ; "ROOT/taobin_project/image/ad_medium_2.png" ; 0 1172 Var( DirImage + "/Rectangle0.png" ) 0 1012 Var( DirImage + "/Rectangle.png" ) 60 412 148 200 cart1_pic 876 467 1080 50 KanitMediumTTF 0xDE794E cart1_price 236 470 1080 50 KanitMediumTTF 0x513C2F cart1_name 60 612 148 200 cart2_pic 876 667 1080 50 KanitMediumTTF 0xDE794E cart2_price 236 670 1080 50 KanitMediumTTF 0x513C2F cart2_name 60 812 148 200 cart3_pic 876 872 1080 50 KanitMediumTTF 0xDE794E cart3_price 236 872 1080 50 KanitMediumTTF 0x513C2F cart3_name 876 1038 1080 72 KanitMediumTTF 0xDE794E showRemaining 80 1038 1080 72 KanitMediumTTF 0x513C2F cartNumText