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

	Var Timeout = 0

	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

	
	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

	EndIf

	If InternationalEnable = 1 Then
		
		Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/image/page_doing/"
		Var PictureBegin = "txt_"
		Var PictureEnd = "_en.png"
		If SettingVideoBrewingUseCommon = 1 Then
			Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/inter/common/animation01/"
			Var VideoFileBegin = "TaoBin2_draft02_art"
			Var VideoFileEnd = ".mp4"
		Else
			;inter-play-list
			Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/animation01/"
			Var VideoFileBegin = "TaoBin2_draft02_art"
			Var VideoFileEnd = ".mp4"
		EndIf

		Var PicturePath = CountryRootPath + "/image/page_doing/"
		Var PictureBegin = "txt_"
		Var PictureEnd = "_en.png"
	
		;inter-has-alter-anim
		If CountryName = "UnitedArabEmirates Dubai" Then
			;check LanguageShow
			If LanguageShow = "ENG" Then
				Var PicturePath = "ROOT/taobin_project/image/page_doing/"
			EndIf

		EndIf

		If UsePepsiTheme = 1 Then

			Var VideoPath =  CountryRootPath + "/animation01/"
			Var VideoFileBegin = "TaoBin2_draft02_art"
			Var VideoFileEnd = ".mp4"

			Var PicturePath = "ROOT/taobin_project/inter/whatthecup/" + CountryShortName
			Var PicturePath = PicturePath + "/image/page_doing/"
			Var PictureBegin = "txt_"
			Var PictureEnd = "_en.png"
		EndIf

	Else
		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_"
	EndIf

	

	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 Seeker.PayWithQR = 0 Then
				
			
				If Seeker.TNumberTaobinCredit = "" Then
					Var TelephoneNumber = "0899999999"
					Var PayO2 = ""

					If Seeker.TNumberTaobinMember = "" Then
					Else
						Var TelephoneNumber = Seeker.TNumberTaobinMember
					EndIf

				Else
					Var TelephoneNumber = Seeker.TNumberTaobinCredit
					Var PayO2 = Seeker.CoffeePinNumber
				EndIf
			
	EndIf
	
	If Seeker = "next" Then
		;CoinBack
		If ChangeFlag2 = 0 Then
			If Seeker.PayWithQR = 0 Then
				DEBUGVAR TxRef1
				Var PayDetail2 = ToppingDetail
				DEBUGVAR PayDetail
				DEBUGVAR PayDetail2
				
				UpdateTxRef2 TxRef1  ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
			EndIf
			If CountryName = "UnitedArabEmirates Dubai" Then
				Var brewing3ContiInter = CountryRootPath + "/xml/page_brewing3Conti.lxml"

				Open brewing3ContiInter
			Else

				If New_Payment = 1 Then
					TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/payment.ev"
				EndIf
				
				Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"  
			EndIf

		Else
			Open "ROOT/taobin_project/xml/page_get_yourchange.xml"  
		EndIf
	Else

		
	
		DEBUGVAR ChangeFlag2

		If ChangeFlag2 = 0 Then
			If Seeker.PayWithQR = 0 Then
				DEBUGVAR TxRef1
				Var PayDetail2 = ToppingDetail
				DEBUGVAR PayDetail
				DEBUGVAR PayDetail2

				UpdateTxRef2 TxRef1  ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
			EndIf

			If InternationalEnable = 1 Then
				Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
                Open Brew3Inter
			Else

				If New_Payment = 1 Then
					TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/payment.ev"
				EndIf

				Open "ROOT/taobin_project/xml/page_brewing3.xml"  
			EndIf	
		Else
			Open "ROOT/taobin_project/xml/page_get_yourchange.xml"  
		EndIf
	EndIf
		

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


	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"
		If InternationalEnable = 1 Then
			Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
			Open Brew3Inter
		Else
			Open "ROOT/taobin_project/xml/page_brewing3.xml"  
		EndIf	
	EndIf

	If Service_LidStraw = "Disable" Then
		SAVELOG "Service_LidStraw"
		If InternationalEnable = 1 Then
			Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
			Open Brew3Inter
		Else
			Open "ROOT/taobin_project/xml/page_brewing3.xml"  
		EndIf	
	EndIf

	DEBUGVAR StrawAutoRelease1
	Var UserPressButton = "false"

	SAVELOG "page_lid_straw.xml"

	If InternationalEnable = 1 Then
		Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
		Open Brew3Inter
	Else
		Open "ROOT/taobin_project/xml/page_brewing3.xml"  
	EndIf

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

	If CountDownBrewing > 0 Then
		Var CountDownBrewing = CountDownBrewing - 1
	EndIf
	
	Var ShowCountDownBrewing = BREW_CNT


	Var Timeout = Timeout + 1
	If Timeout > 10 Then

		If InternationalEnable = 1 Then
			Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
			Open Brew3Inter
		Else
			Open "ROOT/taobin_project/xml/page_brewing3.xml"  
		EndIf

	EndIf
	
	Refresh
	TimerReset
</EventTimeout> 
; remove by kong ; optimize new step advertise 



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


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

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

	


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


</Popup>