taobin_project/xml/page_collect_point_1.xml

<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
;<Refresh> "Partial" </Refresh>
<EventOpen>
	; On open

	Var Tel_Confirm_State = "Invisible"
	Var ShowTextNumber = "Enable"
	Var Timeout = 0
	Var TelephoneNumber = ""
	Var TelephoneNumberX = ""

    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

	SAVELOG "collect_point1"
	SAVELOG Seeker.TNumberTaobinCredit
	SAVELOG TelephoneNumber
	SAVELOG "collect_point1_"

	Var Seeker.FromConsent = 0


	

	If Seeker.TNumberTaobinCredit = "" Then
		Var number7 = ""
		Var number8 = ""
		Var number9 = ""
		Var number10 = ""

		If web_telnumOK = "" Then
		Else
			Var TelephoneNumber = web_telnumOK
			Var StepGetPoint = 0

			Var PdpaAsk = 0
			
			Var OperatorTemp = ""
			Var CreditAmount = 0
			Var OperatorStatus = ""
			Var AccountType = ""

			SAVELOG "collect_point1-p52."


			Var TelephoneNumberX = TelephoneNumber
			GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
			Open "ROOT/taobin_project/xml/page_collect_point_2.xml"  

		EndIf
	Else

		Var TelephoneNumber = Seeker.TNumberTaobinCredit

		Var StepGetPoint = 0

		Var PdpaAsk = 0
		
		Var OperatorTemp = ""
		Var CreditAmount = 0
		Var OperatorStatus = ""
		Var AccountType = ""

		SAVELOG "collect_point1-p71."
		Var TelephoneNumberX = TelephoneNumber
		GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
		Open "ROOT/taobin_project/xml/page_collect_point_2.xml"  

	EndIf

	Var Tel_Confirm_Flag = 1

</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout> 

	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
	
	DEBUGVAR Timeout

	Var Timeout = Timeout + 1
	If Timeout > 30 Then

		SAVELOG "collect_point1-p107."
        Open "ROOT/taobin_project/xml/page_lid_straw.xml"  
	EndIf

	If Timeout = 18 Then
		Var date_time_str = ""
		STRDATETIME date_time_str
		Var date_time_str = "/mnt/sdcard/scn_" + date_time_str
		Var date_time_str = date_time_str + ".png"
		DEBUGVAR date_time_str
		SCREEN_CAP date_time_str
	EndIf

	If Timeout = 9 Then
		;RefreshAll
	EndIf

	Refresh
	TimerReset
</EventTimeout> 



<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>




<Image>
<X> 158 </X>
<Y> 665 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
</Image>

<Button>
<X> 333 </X>
<Y> 1086 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	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

</EventClick>
</Button>

<Button>
<X> 477 </X>
<Y> 1086 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	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
</EventClick>
</Button>

<Button>
<X> 620 </X>
<Y> 1086 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	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
</EventClick>
</Button>

<Button>
<X> 333 </X>
<Y> 1230 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	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
</EventClick>
</Button>

<Button>
<X> 477 </X>
<Y> 1230 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	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
</EventClick>
</Button>

<Button>
<X> 620 </X>
<Y> 1230 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	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
</EventClick>
</Button>

<Button>
<X> 333 </X>
<Y> 1373 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	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
</EventClick>
</Button>

<Button>
<X> 477 </X>
<Y> 1373 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	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
</EventClick>
</Button>

<Button>
<X> 620 </X>
<Y> 1373 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	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
	
</EventClick>
</Button>

<Button>
<X> 477 </X>
<Y> 1517 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	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
</EventClick>
</Button>

<Button>
<X> 620 </X>
<Y> 1517 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	Var Timeout = 0
	Trim TelephoneNumber  -1
	Var Tel_Confirm_State = "Invisible"
	
	StrLen TelephoneNumber TelNumLen
	
	If TelNumLen = 0 Then 
		Var ShowTextNumber = "Enable"
	EndIf

	TimerReset
	Refresh
	
</EventClick>
</Button>


<Text>
<X> 0 </X>
<Y> 873 </Y>
<Width> 1080 </Width>
<Align> Center </Align>
<Size> 62 </Size>
<Font> RobotoBlack </Font>
<Color> 0x513C2F </Color>
<Value> TelephoneNumber </Value>
<Format> Telnum-mask-1 </Format>
</Text>

<Button>
<X> 218 </X>
<Y> 1671 </Y>
<Filename> Var( DirImage + "/bn_negative.png") </Filename>
<FilenamePress> Var( DirImage + "/bp_negative.png") </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	; goto lid straw
	SAVELOG "collect_point1-p589."
	Open "ROOT/taobin_project/xml/page_lid_straw.xml"
</EventClick>
</Button>


<Button>
<X> 577 </X>
<Y> 1671 </Y>
<State> Tel_Confirm_State </State>
<Filename>  Var( DirImage + "/bn_positive.png") </Filename>
<FilenamePress> Var( DirImage + "/bp_positive.png") </FilenamePress>
<FilenameDisable> Var( DirImage + "/bn_positive.png") </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 

	If Tel_Confirm_Flag = 1 Then
		Var StepGetPoint = 0

		Var PdpaAsk = 0
		
		Var OperatorTemp = ""
		Var CreditAmount = 0
		Var OperatorStatus = ""
		Var AccountType = ""

		SAVELOG "collect_point1-p583."
		Var TelephoneNumberX = TelephoneNumber
		GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
		Open "ROOT/taobin_project/xml/page_collect_point_2.xml"  

	EndIf
</EventClick>
</Button>

; Border Edit
<Image>
<X> 217 </X>
<Y> 866 </Y>
<Filename> "ROOT/taobin_project/image/collect_point1/img3.png" </Filename>
</Image>

<Image>
<X> 157 </X>
<Y> 868 </Y>
<State> ShowTextNumber </State>
<Filename> Var( DirImage + "/text_edit.png") </Filename>
</Image>


<Image>
<X> 236 </X>
<Y> 699 </Y>
<Filename> Var( DirImage + "/text_2.png") </Filename>
</Image>

; Advertise
;<Image>
;<X> 0 </X>
;<Y> 0 </Y>
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
;</Image>

<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>

;
<Image>
<X> 751 </X>
<Y> 413 </Y>
<Filename> page_doing_show_time_image </Filename>
</Image>
;
<Text>
<X> XPosiShowCountDownBrew </X>
<Y> 470 </Y>
<Align> End </Align>
<Width> 153 </Width>
<Size> 88 </Size>
<Font> RobotoBold </Font>
<Color> 0x513C2F </Color>
<Value> ShowCountDownBrewing </Value>
</Text>
			

			
<EventSecurity> 
	Open "/media/bt/xml/security_alarm.xml" 
</EventSecurity>
<EventMachine>
	If MachineStage = "drink-success" Then
		Var MachineState_Result = 1
	EndIf

	If MachineStage = "drink-failed" Then
		Var MachineState_Result = 2
	EndIf
</EventMachine>




</Popup>