"Enable"
1080
1920
"0xeae6e1"
SoundVolume
"Partial"
; On open
Var useCreditAmount = 0;
Var useCreditTemp = 0;
Var Timeout = 0
Var TimeoutSMS = 0
Var StateBGetSMS = "Enable"
Var ShowSentSmsText = "Invisible"
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var ShowErrorText = "Invisible"
Var Tel_Confirm_State = "Invisible"
Var PinNumber = ""
Var ReqFlag = 0
Var Xtext = 246
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var Xtext = 246
Else
Var DirImage = "ROOT/taobin_project/image/collectiing"
EndIf
Var Ext1a = ""
Var ReqAdddata22 = 0
Var timeout_Adddata22 = 0
If show_eng = "true" Then
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_enter_your_4_digits_pin.mp3"
Else
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_enter_your_4_digits_pin.mp3"
EndIf
1000
Var Timeout = Timeout + 1
If Timeout > 30 Then
Open "ROOT/taobin_project/xml/page_topup_credit.xml"
EndIf
If StateBGetSMS = "Disable" Then
Var TimeoutSMS = TimeoutSMS + 1
If TimeoutSMS > 30 Then
Var StateBGetSMS = "Enable"
Var TimeoutSMS = 0
Refresh
EndIf
EndIf
TimerReset
If ViewBill > 0 Then
CoinVending BILLREJECT
EndIf
If ReqFlag = 0 Then
Else
EndIf
Refresh
Var ShowErrorText = "Enable"
Refresh
0
380
"ROOT/taobin_project/image/collectiing/alpha.png"
158
601
"ROOT/taobin_project/image/collectiing/img_popup1.png"
242
830
Var( DirImage + "/img4.png" )
289
870
ShowTextNumber1
"Enable"
Var( DirImage + "/text_X.png" )
446
870
ShowTextNumber2
"Enable"
Var( DirImage + "/text_X.png" )
603
870
ShowTextNumber3
"Enable"
Var( DirImage + "/text_X.png" )
758
870
ShowTextNumber4
"Enable"
Var( DirImage + "/text_X.png" )
188
699
Var( DirImage + "/text_16.png" )
444
945
"Enable"
ShowErrorText
Var( DirImage + "/text_show_notfound.png")
Xtext
945
"Enable"
ShowSentSmsText
Var( DirImage + "/text_show_sentSMS.png")
;include="ROOT/taobin_project/inc/video.inc"
Open "/media/bt/xml/security_alarm.xml"
Var ShowSentSmsText = "Invisible"
Var Timeout = 0
If PinNumberUser = PinNumber Then
Var SumCreditAmount = CoffeeCredit
Var ShowNotEnoughText = "Invisible"
Var Seeker.TNumberTaobinCredit = TelephoneNumber
Var Seeker.CoffeePinNumber = PinNumber
Open "ROOT/taobin_project/xml/page_topup_credit3-1.xml"
Else
Var ShowErrorText = "Enable"
Var PinNumber = ""
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
EndIf
Var ReqFlag = 0
Refresh