"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
;inter-multi
If show_eng = "true" Then
If LanguageShow = "MYANMAR" Then
SetLanguage "MYANMAR"
Else
If LanguageShow = "MSC" Then
SetLanguage "MSC"
Else
SetLanguage "ENG"
EndIf
EndIf
Else
SetLanguage "THAI"
EndIf
RootLayoutVisible 3 "hide"
Var Ext1a = ""
Var GetAccFlag = 0
Var GetPayInfoFlag = 0
Var TextWaiting = ""
Var text_27 = "/text_27.png"
Var text_show_amountInvalid = "/text_show_amountInvalid.png"
Var text_show_amountInvalid2 = "/text_show_amountInvalid2.png"
Var Min = 20
Var Max = 5000
;inter-image
If CountryName = "Malaysia" Then
Var text_27 = "/text_27-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
;inter-image
If CountryName = "Indonesia" Then
Var text_27 = "/text_27-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
DEBUGVAR LanguageShow
;inter-image
If LanguageShow = "ENG" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
EndIf
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/collectiing"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr"
EndIf
If LanguageShow = "MSC" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_msc"
EndIf
SAVELOG "EventLanguageOnChange menu -list"
If InternationalEnable = 1 Then
If CountryName = "Thailand" Then
Var show_eng_button_stage = "Invisible"
Var LanguageButtonEnable = "Enable"
EndIf
Else
Var LanguageButtonEnable = "Invisible"
Var show_eng_button_stage = "Enable"
EndIf
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
RefreshAll
1000
Var Timeout = Timeout + 1
If Timeout > 30 Then
Open "ROOT/taobin_project/xml/page_member_topup3.xml"
EndIf
TimerReset
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
Open "ROOT/taobin_project/xml/page_member_topupQR.xml"
EndIf
Refresh
If GetPayInfoFlag = 1 Then
Var QRCODE99 = ""
If show_eng = "true" Then
;inter-text
If LanguageShow = "MYANMAR" Then
Var TextWaiting = "QR ကို အသုံးမပြုနိုင်ပါ၊ ကျေးဇူးပြု၍ နောက်မှ ထပ်စမ်းကြည့်ပါ။"
Else
If LanguageShow = "MSC" Then
Var TextWaiting = "无法使用二维码，请稍后再试。"
Else
Var TextWaiting = "Unable to use QR, please try again later."
EndIf
EndIf
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" 217 802 Var( DirImage + "/img3.png" ) 188 640 730 "Enable" Var( DirImage + text_27 ) 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"