"Enable"
1080
1920
"0xeae6e1"
; On open
Var GetPayInfoFlag = 0
Var SessionID2 = ""
Var testservice = "kbank"
Var QRCODE99 = ""
Var QRCODETMP = ""
Var QRChannel = 0
Var HaveCup = "true"
;Var PriceDrink = 5
Var DiscountDrink = 0
Var SelectSlot = "1"
SAVELOG BoxID
Var QRCODE1 = "A000000677010112"
Var QRCODE2 = "010755600066301"
Var QRCODE3 = "VDGN"
Var QRCODE4 = BoxID
Var QRCODE5 = SelectSlot
Var QRCODE6 = SelectDrink
Var QRCODE7 = PriceDrink
Var QRCODE8 = ""
Var CountStepPackPayment = 0
Var VendingCode = "C00"
Var VendingCampaignRI3 = 0
Var IntVendingCampaign = 0
Var FreeVendingCampaign = 0
Var CodeChannel = 0
Var CoinVendingOnFlag = 0
Var StoreCreditFlag = 0
Var pageStoreCredit0 = 0
Var TNumberTaobinCredit = ""
Var TNumberTaobinMember = ""
Var VendingTSIDTmp = ""
Var TNumberTaobinMember = ""
Var VendingTSIDTmp = ""
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 MachineStage = "remove-cup" Then
Open "ROOT/taobin_project/xml/page_back_to_remove_cup.xml"
EndIf
Var MachineStage = "-"
900
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 + 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"
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_cash.xml"
EndIf
TimerReset
Refresh
;
; 0
; 0
; "ROOT/taobin_project/image/ad_medium_2.png"
;
375
623
331
435
PictureDrink
0
938
1080
Center
72
KanitMediumTTF
0x513C2F
showname
0
1022
1080
Center
24
KanitLightTTF
0x6F5F51
showdesc
199
413
Var( DirImage + "/text_1.png" )