taobin_project/xml/page_lid_straw.xml

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

	
	Var CountUpBrewing = BrewTime - CountDownBrewing
	;Var CountUpBrewing = 0
	Var CountDownVideoTimeReload = AnimationVideoPlayTime
	Var CountDownVideoTime = 1
	Var StepVideo = 1
	Var PreviseStepVideo = 90

	;SAVELOG CountUpBrewing

	;SAVELOG AnimationOn
	;SAVELOG AnimationVideoPlayTime
	;SAVELOG VideoID1
	;SAVELOG VideoID2
	;SAVELOG VideoID3
	;SAVELOG VideoID4
	;SAVELOG VideoID5
	;SAVELOG VideoID6
	;SAVELOG VideoAnimationCount

	If show_eng = "true" Then 
		Var DirImage = "ROOT/taobin_project/image/page_lid_straw_en"
		Var PictureEnd = "_en.png"
		Var BottomText = PicturePath + "text_bottom_eng.png"
		
		Var lid_straw_bg_iamge = DirImage + "/img4.png" 

		If LidState = "Enable" Then
			Var lid_straw_bg_iamge = DirImage + "/img3.png" 
		EndIf

		Play "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Wait_a_moment.mp3"
	
	Else
		Var DirImage = "ROOT/taobin_project/image/page_lid_straw"
		Var PictureEnd = ".png"
		Var BottomText = PicturePath + "text_bottom_thai2.png"

		Var lid_straw_bg_iamge = DirImage + "/img4.png" 
	
		If LidState = "Enable" Then
			Var lid_straw_bg_iamge = DirImage + "/img3.png" 
		EndIf

		Play "ROOT/sounds/pleaseWait.wav"
	EndIf


	Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/animation01/"
	Var VideoFileBegin = "TaoBin2_draft02_art"
	Var VideoFileEnd = ".mp4"

	Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/image/page_doing/"
	Var PictureBegin = "txt_"

	Var VideoPlayFile = VideoPath
	Var VideoPlayFile = VideoPlayFile + VideoFileBegin
	Var VideoPlayFile = VideoPlayFile + "1"
	Var VideoPlayFile = VideoPlayFile + VideoFileEnd

	Var PictureFile = PicturePath
	Var PictureFile = PictureFile + PictureBegin
	Var PictureFile = PictureFile + "1"
	Var PictureFile = PictureFile + PictureEnd



	;If lidAndStrawOldPageIgnore = "true" Then
	;	Var lidAndStrawOldPageIgnore = "false"
	
	If Seeker = "next" Then
		;CoinBack
		Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"  
	Else
		Open "ROOT/taobin_project/xml/page_brewing3.xml"  
	EndIf
		
	;EndIf

	Var LidState = Lid1Status
	;Lid1Status
	Var StarwState = "Enable"
	Var LidStrawCountDown = 15


	If Lid1Status = "Disable" Then
		Var LidState = "Invisible"
	EndIf

	STRCONTAIN "9701" BrewParam IgnoreLidStraw 

	DEBUGVAR BrewParam
	DEBUGVAR IgnoreLidStraw
	DEBUGVAR Service_LidStraw
	
	

	If IgnoreLidStraw = "true" Then
		Var IgnoreLidStraw = "false"
		SAVELOG "Ignore lid straw because recipe disable"
		Open "ROOT/taobin_project/xml/page_brewing3.xml"  
	EndIf

	If Service_LidStraw = "Disable" Then
		SAVELOG "Service_LidStraw"
		Open "ROOT/taobin_project/xml/page_brewing3.xml"  
	EndIf

	DEBUGVAR StrawAutoRelease1
	Var UserPressButton = "false"
	

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

	If CountDownBrewing > 0 Then
		Var CountDownBrewing = CountDownBrewing - 1
	EndIf
	
	; run test;
	;If CountDownBrewing = 58 Then 
	;	Open "ROOT/taobin_project/xml/page_brewing.xml"  
	;EndIf
	
	Var LidStrawCountDown = LidStrawCountDown - 1
	; count down
	If LidStrawCountDown = 1 Then
		Var LidStrawCountDown = 10
		If StarwState = "Press" Then
			Machine Straw
		EndIf
		If LidState = "Press" Then
			Machine Lid
		EndIf
		Open "ROOT/taobin_project/xml/page_brewing3.xml"  
	EndIf

	Var ShowCountDownBrewing = CountDownBrewing
	
	; animation video loop
	If AnimationOn = "true" Then
		Var CountUpBrewing = CountUpBrewing + 1

		Var SlotVideo = CountUpBrewing / AnimationVideoPlayTime
		If CountUpBrewing < 4 Then

		Else

			If PreviseStepVideo = SlotVideo Then
				;SAVELOG SlotVideo
			Else
				Var PreviseStepVideo = SlotVideo
				;SAVELOG PreviseStepVideo
				;SAVELOG SlotVideo
				;SAVELOG CountUpBrewing

				;Var CountDownVideoTime = CountDownVideoTimeReload
				
				Var StepVideo = SlotVideo + 2
				
				;SAVELOG StepVideo

				If StepVideo = 1 Then
					Var videoID = VideoID1
				EndIf
				If StepVideo = 2 Then
					Var videoID = VideoID2
				EndIf
				If StepVideo = 3 Then
					Var videoID = VideoID3
				EndIf
				If StepVideo = 4 Then
					Var videoID = VideoID4
				EndIf
				If StepVideo = 5 Then
					Var videoID = VideoID5
				EndIf
				If StepVideo = 6 Then
					Var videoID = VideoID6
				EndIf
				If StepVideo = 7 Then
					Var videoID = VideoID7
				EndIf

				;SAVELOG videoID

				If videoID = 0 Then

				Else
				    If videoID = "---" Then

				    Else

						Var VideoPlayFile = VideoPath
						Var VideoPlayFile = VideoPlayFile + VideoFileBegin
						Var VideoPlayFile = VideoPlayFile + videoID
						Var VideoPlayFile = VideoPlayFile + VideoFileEnd

						Var PictureFile = PicturePath
						Var PictureFile = PictureFile + PictureBegin
						Var PictureFile = PictureFile + videoID
						Var PictureFile = PictureFile + PictureEnd
						
						SAVELOG VideoPlayFile
						SAVELOG PictureFile
				     EndIf
				EndIf
			EndIf
		EndIf
	EndIf

	If StrawAutoRelease1 = "true" Then 
		Var StrawAutoRelease1 = "false"
		Var StarwState = "Press"
	EndIf

	Refresh
	TimerReset
</EventTimeout> 

;<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>

<Video>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080</Width>
<Height> 840 </Height>
<Refresh> "Reload" </Refresh>
<Loop> "true" </Loop>
<Filename> VideoPlayFile </Filename>
</Video>

<Image>
<X> 0 </X>
<Y> 1289 </Y>
<Filename> Var( DirImage + "/text2.png" ) </Filename>
</Image>


<Image>
<X> 78 </X>
<Y> 1425 </Y>
<Filename> lid_straw_bg_iamge </Filename>
</Image>


<Button>
<X> 750 </X>
<Y> 1783 </Y>
<Filename> Var( DirImage + "/bn_ok.png" )</Filename>
<FilenamePress> Var( DirImage + "/bn_ok.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	If StarwState = "Press" Then
		Machine Straw
		LED LedDoorLid Blink 255 255 255 255
	EndIf
	If LidState = "Press" Then
		Machine Lid
		LED LedDoorLid Blink 255 255 255 255
	EndIf


	Open "ROOT/taobin_project/xml/page_brewing3.xml"  
</EventClick>
</Button>


; starw left
<Button>
<X> 126 </X>
<Y> 1474 </Y>
<State> StarwState </State>
<Filename> "ROOT/taobin_project/image/page_lid_straw/bn_straw.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_lid_straw/bp_straw.png" </FilenamePress>
<EventClick> 
</EventClick>
</Button>

; lid left
<Button>
<X> 126 </X>
<Y> 1584 </Y>
<State> LidState </State>
<Filename> "ROOT/taobin_project/image/page_lid_straw/bn_lid.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_lid_straw/bp_lid.png" </FilenamePress>
<EventClick> 
</EventClick>
</Button>



<Button>
<X> 901 </X>
<Y> 1494 </Y>
<Width> 50 </Width>
<Height> 50 </Height>
<State> StarwState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/page_lid_straw/cb_straw_nch.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_lid_straw/cb_straw_ch.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	SAVELOG StarwState
	If StarwState = "Press" Then
		Var StarwState = "Enable"	
	Else
		Var StarwState = "Press"
	EndIf
	Refresh
</EventClick>
</Button>



<Button>
<X> 901 </X>
<Y> 1604 </Y>
<Width> 50 </Width>
<Height> 50 </Height>
<State> LidState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/page_lid_straw/cb_lid_nch.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_lid_straw/cb_lid_ch.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	SAVELOG LidState
	If LidState = "Press" Then
		Var LidState = "Enable"	
	Else
		Var LidState = "Press"
	EndIf
	Refresh
</EventClick>
</Button>



;
<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>

;<GIF>
;<X> 182 </X>
;<Y> 700 </Y>
;<Filename> GIFShowProcess </Filename>
;</GIF>

<EventMachine>
	
	If MachineStage = "drink-success" Then
		Var MachineState_Result = 1
	EndIf

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

	
</EventMachine>

<EventChangeStatus>
	If ChangeStatus = "payout-end" Then 
		
	EndIf
</EventChangeStatus>


</Popup>