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

			If UsePepsiTheme = 1 Then
				If CountryName = "Singapore" Then
					Open "ROOT/taobin_project/inter/whatthecup/sgp/xml/page_get_yourchange-SGP_blue.xml"
				EndIf
			Else
				Open "ROOT/taobin_project/xml/page_get_yourchange.xml"
			EndIf


		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
				If CountryName = "Thailand" Then
					Open "ROOT/taobin_project/xml/page_brewing3.xml"
				Else
					Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
					Open Brew3Inter
				EndIf
			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
			If UsePepsiTheme = 1 Then
				If CountryName = "Singapore" Then
					Open "ROOT/taobin_project/inter/whatthecup/sgp/xml/page_get_yourchange-SGP_blue.xml"
				EndIf
			Else
				Open "ROOT/taobin_project/xml/page_get_yourchange.xml"
			EndIf
		EndIf
	EndIf


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


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

	

	DEBUGVAR CountryName
	DEBUGVAR InternationalEnable
	
	Var UserPressButton = "false"

	SAVELOG "page_lid_straw.xml"


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