"Enable" 1080 1920 "0xeae6e1" SoundVolume "Partial"
; On open
VendingQR OFF
Var Timeout = 0
Var AmountNumber = ""
Var ShowTextNumber = "Enable"
Var ShowErrorText = "Invisible"
Var Tel_Confirm_State = "Invisible"
Var GetCreditFlag = 0
Var posX = 400
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Else
Var DirImage = "ROOT/taobin_project/image/collectiing"
EndIf
If show_eng = "true" Then
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
Var posX = 430
Else
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
EndIf
Var Ext1a = ""
Var GetAccFlag = 0
Var GetPayInfoFlag = 0
Var TextWaiting = ""
Var text_44 = "/text_44.png"
Var text_show_amountInvalid = "/text_show_amountInvalid.png"
Var text_show_amountInvalid2 = "/text_show_amountInvalid2.png"
Var Min = PayAmountSubDiscount
Var Max = 5000
If CountryName = "Malaysia" Then
Var text_44 = "/text_44-MYR.png"
Var text_show_amountInvalid = "/text_show_amountInvalid-MYR.png"
Var text_show_amountInvalid2 = "/text_show_amountInvalid2-MYR.png"
;Var Min = 2
Var Max = 500
EndIf
If CountryName = "Indonesia" Then
Var text_44 = "/text_44-IDR.png"
Var text_show_amountInvalid = "/text_show_amountInvalid-IDR.png"
Var text_show_amountInvalid2 = "/text_show_amountInvalid2-IDR.png"
;Var Min = 9000
Var Max = 2000000
EndIf
1000
Var Timeout = Timeout + 1
If Timeout > 60 Then
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
EndIf
TimerReset
If ViewBill > 0 Then
CoinVending BILLREJECT
EndIf
If GetPayInfoFlag = 1 Then
Var VendingQRCode = "OK"
Var CashTextWarning = ""
Var QRErrorState = "Invisible"
Var QRCODE99 = SessionID
Var QRCODE99 = QRCODE99 + Ext1a
Var QRCODE99 = QRCODE99 + Ext21
Var QRCODETMP = QRCODE99
Var ReqPayInfoFlag = 0
Var VendingExtResult = ""
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupQR.xml"
EndIf
Refresh
If GetPayInfoFlag = 1 Then
Var QRCODE99 = ""
If show_eng = "true" Then
Var TextWaiting = "Unable to use QR, please try again later."
Else
Var TextWaiting = "ระบบ QR ขัดข้อง โปรดใช้ใหม่ภายหลัง."
EndIf
Var AmountNumber = ""
Var Tel_Confirm_State = "Invisible"
EndIf
Refresh
0 380 "ROOT/taobin_project/image/collectiing/alpha.png" 158 601 "ROOT/taobin_project/image/collectiing/img_popup1.png" posX 680 60 Right 250
KanitRegularTTF
0xDE794E PayAmountSubDiscount 217 802 Var( DirImage + "/img3.png" ) 188 640 "Enable" Var( DirImage + text_44 ) 0 817 1080 Center 62
RobotoBlack
0x513C2F "Enable" AmountNumber 145 820 ShowErrorText "Enable" Var( DirImage + text_show_error )
;
; 0
; 0
; "ROOT/taobin_project/image/ad_medium_2.png"
; 5 940 "Enable" 30 Center 1080
RobotoRegular
0xFF0000 TextWaiting
Open "/media/bt/xml/security_alarm.xml"