"Enable"
1080
1920
"0xeae6e1"
SoundVolume
; On open
Var Tel_Confirm_State = "Invisible"
Var ShowTextNumber = "Enable"
Var Timeout = 0
Var TelephoneNumber = ""
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collect_point1_en"
Play "ROOT/taobin_project/sound_eng/Reward_final.mp3"
Else
Var DirImage = "ROOT/taobin_project/image/collect_point1"
Play "ROOT/taobin_project/sound_thai/dontforget_number.mp3"
EndIf
Var FromConsent = 0
If TNumberTaobinCredit = "" Then
Var number7 = ""
Var number8 = ""
Var number9 = ""
Var number10 = ""
Else
Var TelephoneNumber = TNumberTaobinCredit
Var StepGetPoint = 0
Var PdpaAsk = 0
Var OperatorTemp = ""
Var CreditAmount = 0
Var OperatorStatus = ""
Var AccountType = ""
GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
1000
Var CountDownBrewing = CountDownBrewing - 1
; run test;
;If CountDownBrewing = 40 Then
; Open "ROOT/taobin_project/xml/page_drinkok.xml"
;EndIf
;If CountDownBrewing = 0 Then
; Open "ROOT/taobin_project/xml/page_drinkok.xml"
;EndIf
Var ShowCountDownBrewing = CountDownBrewing
StrLen TelephoneNumber TelNumLen
If TelNumLen > 0 Then
Var ShowTextNumber = "Invisible"
EndIf
Var Timeout = Timeout + 1
If Timeout > 20 Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
TimerReset
Refresh
0
380
"ROOT/taobin_project/image/collectiing/alpha.png"
158
665
"ROOT/taobin_project/image/collectiing/img_popup1.png"
333
1086
"ROOT/taobin_project/image/collectiing/bn_1.png"
"ROOT/taobin_project/image/collectiing/bp_1.png"
"ROOT/sounds/codebuttom.wav"
SoundVolume
Var Timeout = 0
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
Var TelephoneNumber = TelephoneNumber + "1"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
If TelNumLen = 7 Then
Var number7 = "1"
EndIf
If TelNumLen = 8 Then
Var number8 = "1"
EndIf
If TelNumLen = 9 Then
Var number9 = "1"
EndIf
If TelNumLen = 10 Then
Var number10 = "1"
EndIf
EndIf
477
1086
"ROOT/taobin_project/image/collectiing/bn_2.png"
"ROOT/taobin_project/image/collectiing/bp_2.png"
"ROOT/sounds/codebuttom.wav"
SoundVolume
Var Timeout = 0
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
Var TelephoneNumber = TelephoneNumber + "2"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
If TelNumLen = 7 Then
Var number7 = "2"
EndIf
If TelNumLen = 8 Then
Var number8 = "2"
EndIf
If TelNumLen = 9 Then
Var number9 = "2"
EndIf
If TelNumLen = 10 Then
Var number10 = "2"
EndIf
EndIf
620
1086
"ROOT/taobin_project/image/collectiing/bn_3.png"
"ROOT/taobin_project/image/collectiing/bp_3.png"
"ROOT/sounds/codebuttom.wav"
SoundVolume
Var Timeout = 0
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
Var TelephoneNumber = TelephoneNumber + "3"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
If TelNumLen = 7 Then
Var number7 = "3"
EndIf
If TelNumLen = 8 Then
Var number8 = "3"
EndIf
If TelNumLen = 9 Then
Var number9 = "3"
EndIf
If TelNumLen = 10 Then
Var number10 = "3"
EndIf
EndIf
333
1230
"ROOT/taobin_project/image/collectiing/bn_4.png"
"ROOT/taobin_project/image/collectiing/bp_4.png"
"ROOT/sounds/codebuttom.wav"
SoundVolume
Var Timeout = 0
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
Var TelephoneNumber = TelephoneNumber + "4"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
If TelNumLen = 7 Then
Var number7 = "4"
EndIf
If TelNumLen = 8 Then
Var number8 = "4"
EndIf
If TelNumLen = 9 Then
Var number9 = "4"
EndIf
If TelNumLen = 10 Then
Var number10 = "4"
EndIf
EndIf
477
1230
"ROOT/taobin_project/image/collectiing/bn_5.png"
"ROOT/taobin_project/image/collectiing/bp_5.png"
"ROOT/sounds/codebuttom.wav"
SoundVolume
Var Timeout = 0
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
Var TelephoneNumber = TelephoneNumber + "5"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
If TelNumLen = 7 Then
Var number7 = "5"
EndIf
If TelNumLen = 8 Then
Var number8 = "5"
EndIf
If TelNumLen = 9 Then
Var number9 = "5"
EndIf
If TelNumLen = 10 Then
Var number10 = "5"
EndIf
EndIf
620
1230
"ROOT/taobin_project/image/collectiing/bn_6.png"
"ROOT/taobin_project/image/collectiing/bp_6.png"
"ROOT/sounds/codebuttom.wav"
SoundVolume
Var Timeout = 0
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
Var TelephoneNumber = TelephoneNumber + "6"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
If TelNumLen = 7 Then
Var number7 = "6"
EndIf
If TelNumLen = 8 Then
Var number8 = "6"
EndIf
If TelNumLen = 9 Then
Var number9 = "6"
EndIf
If TelNumLen = 10 Then
Var number10 = "6"
EndIf
EndIf
333
1373
"ROOT/taobin_project/image/collectiing/bn_7.png"
"ROOT/taobin_project/image/collectiing/bp_7.png"
"ROOT/sounds/codebuttom.wav"
SoundVolume
Var Timeout = 0
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
Var TelephoneNumber = TelephoneNumber + "7"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
If TelNumLen = 7 Then
Var number7 = "7"
EndIf
If TelNumLen = 8 Then
Var number8 = "7"
EndIf
If TelNumLen = 9 Then
Var number9 = "7"
EndIf
If TelNumLen = 10 Then
Var number10 = "7"
EndIf
EndIf
477
1373
"ROOT/taobin_project/image/collectiing/bn_8.png"
"ROOT/taobin_project/image/collectiing/bp_8.png"
"ROOT/sounds/codebuttom.wav"
SoundVolume
Var Timeout = 0
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
Var TelephoneNumber = TelephoneNumber + "8"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
If TelNumLen = 7 Then
Var number7 = "8"
EndIf
If TelNumLen = 8 Then
Var number8 = "8"
EndIf
If TelNumLen = 9 Then
Var number9 = "8"
EndIf
If TelNumLen = 10 Then
Var number10 = "8"
EndIf
EndIf
620
1373
"ROOT/taobin_project/image/collectiing/bn_9.png"
"ROOT/taobin_project/image/collectiing/bp_9.png"
"ROOT/sounds/codebuttom.wav"
SoundVolume
Var Timeout = 0
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
Var TelephoneNumber = TelephoneNumber + "9"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
If TelNumLen = 7 Then
Var number7 = "9"
EndIf
If TelNumLen = 8 Then
Var number8 = "9"
EndIf
If TelNumLen = 9 Then
Var number9 = "9"
EndIf
If TelNumLen = 10 Then
Var number10 = "9"
EndIf
EndIf
477
1517
"ROOT/taobin_project/image/collectiing/bn_0.png"
"ROOT/taobin_project/image/collectiing/bp_0.png"
"ROOT/sounds/codebuttom.wav"
SoundVolume
Var Timeout = 0
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
Var TelephoneNumber = TelephoneNumber + "0"
Trim TelephoneNumber 10
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowTextNumber = "Invisible"
TimerReset
Refresh
If TelNumLen = 7 Then
Var number7 = "0"
EndIf
If TelNumLen = 8 Then
Var number8 = "0"
EndIf
If TelNumLen = 9 Then
Var number9 = "0"
EndIf
If TelNumLen = 10 Then
Var number10 = "0"
EndIf
EndIf
620
1517
"ROOT/taobin_project/image/collectiing/bn_back-1.png"
"ROOT/taobin_project/image/collectiing/bp_back-1.png"
"ROOT/sounds/codebuttom.wav"
SoundVolume
Var Timeout = 0
Trim TelephoneNumber -1
Var Tel_Confirm_State = "Invisible"
StrLen TelephoneNumber TelNumLen
If TelNumLen = 0 Then
Var ShowTextNumber = "Enable"
EndIf
TimerReset
Refresh
0
873
1080
Center
62
RobotoBlack
0x513C2F
TelephoneNumber
Telnum-mask-1
218
1671
Var( DirImage + "/bn_negative.png")
Var( DirImage + "/bp_negative.png")
"ROOT/sounds/codebuttom.wav"
SoundVolume
; goto lid straw
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
577
1671
Tel_Confirm_State
Var( DirImage + "/bn_positive.png")
Var( DirImage + "/bp_positive.png")
Var( DirImage + "/bn_positive.png")
"ROOT/sounds/codebuttom.wav"
SoundVolume
Var StepGetPoint = 0
Var PdpaAsk = 0
Var OperatorTemp = ""
Var CreditAmount = 0
Var OperatorStatus = ""
Var AccountType = ""
GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
; Border Edit
217
866
"ROOT/taobin_project/image/collect_point1/img3.png"
157
868
ShowTextNumber
Var( DirImage + "/text_edit.png")
236
699
Var( DirImage + "/text_2.png")
; Advertise
;
; 0
; 0
; "ROOT/taobin_project/image/ad_medium_2.png"
;
0
0
1080
380
"true"
video_menu_0
;
751
413
page_doing_show_time_image
;
XPosiShowCountDownBrew
470
End
153
88
RobotoBold
0x513C2F
ShowCountDownBrewing
Open "/media/bt/xml/security_alarm.xml"
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf