taobin_project/xml/page_board.xml

<Page>
<X> 0 </X>
<Y> 608 </Y>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
	;TopView "hide"
	;OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/topview_blank_main.xml"
	Var FileNumber = 1

	Var img_press_main_page = "ROOT/taobin_project/image/main_page/bp_main_page_start.png"
	
	Var img_rest_main_page = ""
	Var MemberButtonFileNameRest = ""
	Var img_reset_topup = ""
	
	Var CNTDOWN_PROTECT_SCREEN_BLANK = 120
	DEBUGVAR SoundVolume

	Var credit_card_enable = ""
	READ_FILE "/mnt/sdcard/credit_card_enable" credit_card_enable


	Var eng_enable = "true"
	Var thai_enable = "true"
	
	Var show_eng = "false"	
	Var NextOrder = "false"
	
	Var Seeker = "next"
	Var Seeker.thankLidFlag = 0
	Var Seeker.thankStrawFlag = 0

	Var Seeker = "curr"
	Var Seeker.thankLidFlag = 0
	Var Seeker.thankStrawFlag = 0

	DEBUGVAR web_ref
	DEBUGVAR web_payment
	DEBUGVAR web_telnum
	DEBUGVAR web_code
	DEBUGVAR web_pin

	Var web_telnumOK = ""
	Var web_readyOK = "false"

	Var GetFreeFromError = 0

	
	Cart "DeleteMenuID" "ALL"
	Var MultiPayEnable = "false"
	;Var MultiPayEnable = "true"
	Var ShoppyPayEnable = "true"
	Var WebAppEnable = "true"
	Var WebAppShow = "Enable"
	Var PayType = ""

	Var Seeker.CurrCreditAmount = 0
	Var Seeker.CurrCreditUse    = 0
	Var Seeker.CurrCreditTelNum = ""
	Var Seeker.CurrCreditPinNum = ""

	DEBUGVAR PaySuccessWithDaemonTask

	Var PaidPaymentFromNextStage = 0
	Var DrinkPaid = "-"
	

	; On open
	Var menu_back_to_main = "ROOT/taobin_project/xml/page_back_to_main.xml"

	Var charOfBaht = "฿"
	Var KanitTTF = "ROOT/taobin_project/font/Kanit/Kanit-Light.ttf"
	Var KanitMediaTTF = "ROOT/taobin_project/font/Kanit/Kanit-Medium.ttf"
	Var KanitBoldTTF = "ROOT/taobin_project/font/Kanit/Kanit-Bold.ttf"

	Var RobotoBold = "ROOT/taobin_project/font/Roboto/Roboto-Bold.ttf"
	Var RobotoBlack = "ROOT/taobin_project/font/Roboto/Roboto-Black.ttf"
	Var RobotoRegular = "ROOT/taobin_project/font/Roboto/Roboto-Regular.ttf"
	Var RobotoThin = "ROOT/taobin_project/font/Roboto/Roboto-Thin.ttf"

	Var RobotoCondensedRegular = "ROOT/taobin_project/font/Roboto/RobotoCondensed-Regular.ttf"

	Var KanitMediumTTF = "ROOT/taobin_project/font/Kanit/Kanit-Regular.ttf"
	Var KanitRegularTTF = "ROOT/taobin_project/font/Kanit/Kanit-Regular.ttf"
	Var KanitThinTTF = "ROOT/taobin_project/font/Kanit/Kanit-Thin.ttf"
	Var KanitLightTTF = "ROOT/taobin_project/font/Kanit/Kanit-Light.ttf"

	Var OpunMediumTTF = "ROOT/taobin_project/font/Opun/Opun-Medium.ttf"
	Var OpunThinTTF = "ROOT/taobin_project/font/Opun/Opun-Thin.ttf"
	Var OpunBoldTTF = "ROOT/taobin_project/font/Opun/Opun-Bold.ttf"
	
	Var KanitSemiBoldTTF = "ROOT/taobin_project/font/Kanit/Kanit-Medium.ttf"

	Var BlinkStar = "ROOT/taobin_project/image/animation/blink_star.gif"

	Var MITRegularTTF = "ROOT/taobin_project/font/Mitr/Mitr-Regular.ttf"

	Var DinCondensedRegular = "ROOT/taobin_project/font/Din/DIN-Regular.ttf"
	Var DinCondensedBold = "ROOT/taobin_project/font/Din/DIN-Condensed-Bold.ttf"

	Var ChivoMonoBold = "ROOT/taobin_project/font/ChivoMono/ChivoMono-Bold.ttf"
	Var ChivoMonoSemiBold = "ROOT/taobin_project/font/ChivoMono/ChivoMono-SemiBold.ttf"

	Var InterRegular = "ROOT/taobin_project/font/Inter/Inter-Regular.ttf"


	Var countClick = 0

	Var RoadShow = "false"
	Var IgnorePoint = "true"

	Var ShowButtonClick = "Enable"
	Var ShowButtonClickFull = "Invisible"
	Var ShowButtonClick2 = "Enable"

	;SAVELOG DisplayType

	If DisplayType = "2" Then
		Var XPosiShowCountDownBrew = 693
		Var WQR = 185
		Var HQR = 185
	Else
		Var XPosiShowCountDownBrew = 768
		Var WQR = 290
		Var HQR = 290
		
	EndIf


	
	Var MinPhoneNumber = 10
	Var MaxPhoneNumber = 10
	

	Var TestLoopMakeDrink = 0
	Var TestLoopSuccess = 0
	Var TestLoopFailed = 0

	Var cock_tail_str = ""

	READ_FILE "/mnt/sdcard/coffeevending/cock_tail_enable" cock_tail_str
	STRCONTAIN "1" cock_tail_str cock_tail_enable

	If cock_tail_enable = "true" Then
		Var WheyShow = "false"
		Var CocktailShow = "true"
		Var RoadShow = "true"

		STRCONTAIN "1401" MaterialAvailable BeerTrapEnable

	Else
		Var WheyShow = "true"
		Var CocktailShow = "false"
		Var RoadShow = "false"
	EndIf




	



	; take a look file page_board_1.xml

	
	If XMLProfile = "" Then
		CacheVarStr "get" XMLProfile
	Else
		CacheVarStr "put" XMLProfile
	EndIf


	Var TermTemOnline = "false"
	Var TaobinOnline = "false"

	If MaterialAvailable = "" Then
		CacheVarStr "get" MaterialAvailable
	Else
		CacheVarStr "put" MaterialAvailable
	EndIf


	DEBUGVAR MaterialAvailable

	STRCONTAIN "9501" MaterialAvailable TaobinOnline 
	STRCONTAIN "9505" MaterialAvailable TermTemOnline 

	; App fast
	STRCONTAIN "1063" MaterialAvailable AppFastEnable 
	STRCONTAIN "1046" MaterialAvailable WheyEnable 
	
	STRCONTAIN "1208" MaterialAvailable PromoteYuzuEnable
	STRCONTAIN "1058" MaterialAvailable OreoEnable

	STRCONTAIN "1068" MaterialAvailable JasmineTeaEnable
	STRCONTAIN "1210" MaterialAvailable MelonSyrupEnable
	STRCONTAIN "1212" MaterialAvailable MintSyrupEnable
	STRCONTAIN "1213" MaterialAvailable PeachSyrupEnable
	STRCONTAIN "1211" MaterialAvailable BananaSyrupEnable

	STRCONTAIN "1215" MaterialAvailable SugarZeroCalEnable
	STRCONTAIN "1206" MaterialAvailable EnergyDrinkEnable
	STRCONTAIN "1216" MaterialAvailable CoconutSyrupEnable
	STRCONTAIN "1042" MaterialAvailable CocoaPowderEnable
	STRCONTAIN "1037" MaterialAvailable 7UpSyrupEnable

	;Var AppFastEnable = "false"
	If AppFastEnable = "true" Then
		Var AppFastButtonState = "Enable"
		Var WheyButtonState = "Invisible"
		Var MenuKidButtonState ="Invisible"
	Else
		If WheyEnable = "true" Then
			Var AppFastButtonState = "Invisible"
			Var WheyButtonState = "Enable"
			Var MenuKidButtonState ="Invisible"
			Var MenuKidEnable = "false"
		Else
			Var MenuKidEnable = "true"
			Var AppFastButtonState = "Invisible"
			Var WheyButtonState = "Invisible"
			Var MenuKidButtonState ="Enable"
		EndIf
	EndIf

	If CocktailShow = "true" Then

		Var WheyEnable = "false"
		Var MenuKidEnable = "false"
		Var MenuKidButtonState = "Invisible"
		Var WheyShow = "false"
		Var WheyButtonState = "Invisible"
		Var WebAppShow = "Invisible"
	EndIf

	
	Var TaobinOnlineX = "true"
	
	DEBUGVAR AppFastButtonState
	DEBUGVAR MenuKidButtonState
	DEBUGVAR TaobinOnline
	DEBUGVAR WheyButtonState
	DEBUGVAR WheyEnable

	; Dtac.
	
	Var CAMPAIGN1 = "false" 


	If TaobinOnlineX = "true" Then
		Var EventTurnOn = 0
		; CountDownShowButton must value 35
		Var CountDownShowButton = 35 
		Var ShowButtonClickFull = "Invisible"

		If LanguageInit = "ENG" Then
			Var VideoMainPage = "ROOT/taobin_project/video/main_page_en.mp4"
			Var show_eng = "true"
		Else
			Var VideoMainPage = "ROOT/taobin_project/video/main_page.mp4"
			Var show_eng = "false"
		EndIf

		DEBUGVAR SystemDateMonthInt
		DEBUGVAR SystemDateDayInt

		
	EndIf

	If TaobinOnlineX = "false" Then
		If TermTemOnline = "false" Then
			; TODO
			Machine Initial
			Open "/ROOT/xml/outservice.xml" 
		EndIf
	EndIf


	DEBUGVAR SELLSTATUS
	DEBUGVAR NetworkStatus

	If SELLSTATUS = "" Then
		CacheVarStr "get" SELLSTATUS
	Else
		CacheVarStr "put" SELLSTATUS
	EndIf

	DEBUGVAR SELLSTATUS
	DEBUGVAR AdvertiseProfile

	Var SELLONLINE = 0
	If SELLSTATUS = "SELLONLINE" Then
		Var SELLONLINE = 1
	EndIf
	If SELLSTATUS = "SELLNOCASH" Then
		Var SELLONLINE = 1
	EndIf



	If IgnoreNetCore = "true" Then
		Var SELLONLINE = 1
		Var ButtontoTopupMenu = "Enable"
		Var ShowButtonClick2 = "Enable"

		; for test press button
		Var ShowNetworkProblem = "Enable" 		
	EndIf



	If SELLONLINE = 1 Then
		Var ShowNetworkProblem = "Invisible"
		Var ShowNetworkProblemText = ""
		Machine NetworkUp



		

		Var QRCODE99x = ""


		GenHashWithTimeStamp QRCODE99x
		Var QRCODE99 = "https://taobin-beverage.web.app/" + QRCODE99x
		;Var QRCODE99 = "https://uat-taobin-beverage.firebaseapp.com/" + QRCODE99x
		WEB "ENABLE"
		
	Else

		

		Var ShowNetworkProblem = "Enable"
		Var ShowButtonClick2 = "Invisible"
		Var ShowNetworkProblemText = "การสื่อสารขัดข้อง ชำระเงินได้เฉพาะเงินสด"
		

		If NetworkStatus = "DOWN" Then 
			Machine NetworkDown
		EndIf
		

		Var QRCODE99 = ""
		WEB "DISABLE"
		
	EndIf


	


	Var ShowPrice = "Enable"
	If RoadShow = "true" Then
		Var ShowPrice = "Invisible"
		Var WebAppShow = "Invisible"
	EndIf

	;SAVELOG WheyShow
	;SAVELOG CocktailShow
	DEBUGVAR RoadShow
	;SAVELOG ShowPrice


	Var CountDownPauseVideo = 0
	Var NextPage = "-"

	If StartUpExt = "false" Then

	Else
		Var OreoGuarantee = 0
		Machine Initial
		Var StartUpExt = "false"
		Var CameraSettingStatus = ""
		;DEBUGVAR "FlushTxRef1"
		;FlushTxRef1

		;If JXMLVersionInt > 428 Then
		;	LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/ui/lang.tsv"
		;EndIf

		Var SoundThaiIndex = 0
	EndIf

	DEBUGVAR Not#LanguageLoaded



	;DEBUGVAR "FlushTxRef1"
	;FlushTxRef1

	
	
	StopLongPlay


	Var TimerFirst = "true"


	Var buttonRemoveCup = "Invisible"

	Var led_new = "0"
	READ_FILE "/mnt/sdcard/coffeevending/led_new" led_new
	DEBUGVAR led_new
	If led_new = "1" Then 

		LEDv2 LedDoorCupV2 Off 255 194 166 20 6
 
		LEDv2 LedDoorLidV2 Off 255 255 255 20 6
	Else

		LED LedDoorCup Off 255 255 255 255

		LED LedDoorLid Off 255 255 255 255

	EndIf

	
	

	

	
	Var showCart = "Invisible"
	
	Var LedLidBlink = "no"


	Var EnableSelectMenuBetweenBrew = "Enable"


	If JXMLVersionInt > 412 Then
		Var ToppingNewShow = "true"
	EndIf
	
	DEBUGVAR XMLProfile
	
	Machine CancelWepApp


	StrLen AdvertiseProfile AdvertiseProfileLen
	

	STRCONTAIN "taobin_notopup" XMLProfile taobin_notopup

	DEBUGVAR taobin_notopup
	If taobin_notopup = "true" Then
		Var ButtontoTopupMenu = "Disable"
	Else
		If SELLSTATUS = "SELLNOCASH" Then
			Var ButtontoTopupMenu = "Disable"
		Else
			Var ButtontoTopupMenu = "Enable"
		EndIf
	EndIf

	If NetworkStatus = "DOWN" Then
		Var WebAppShow = "Invisible"
	EndIf


	DEBUGVAR XMLPageVersionInt

	; forever
	Var new_layout = "true"
	Machine MenuLayoutNew

	DEBUGVAR SpiralOnline
	
	Topping "ClearNextOrder" "-"



	If AdvertiseProfileLen = 0 Then
		CacheVarStr "get" AdvertiseProfile
	Else
		CacheVarStr "put" AdvertiseProfile
	EndIf

	DEBUGVAR AdvertiseProfile

	Var show_lang = "THAI"


	Var NETCORE_EVENT_CNT_TMP = NCIC07_EVENT_CNT



	DEBUGVAR CameraCount
	If CameraCount = 0 Then
		CameraService "Start"
	EndIf
	
	If CameraCount = "" Then
		CameraService "Start"
	EndIf

	DEBUGVAR CountryName
	DEBUGVAR LanguageListEnable
	DEBUGVAR DisplayFormat
	DEBUGVAR ScaleValueForCalculation
	DEBUGVAR PreScaleConvertShow
	DEBUGVAR UnitPostDisplay

	DEBUGVAR LanguageInit


	Var TextPriceMenuSize = 14
	Var TextPriceMenuY = 264
	Var TextPriceMenuBlendX = 174
	Var TextPriceMenuHotX = 50

	; zone init lang
	; CountryName
	Var show_eng_button_stage = "Enable"

	Var MemberButtonFileName = "ROOT/taobin_project/image/TermTempage2/bp_main_page_member.png"



	Machine __arm_toggle
	
	GetLongTimeInMinute CurrentTime

	DEBUGVAR LastTimeClickOrder
	DEBUGVAR CurrentTime

	If LastTimeClickOrder = "" Then
		GetLongTimeInMinute LastTimeClickOrder
	EndIf

	Var DiffTimeInMinute = CurrentTime - LastTimeClickOrder 
	
	DEBUGVAR DiffTimeInMinute

	If DiffTimeInMinute > 120 Then
		GetLongTimeInMinute LastTimeClickOrder
		ScreenRefresh
	EndIf

	; zone config language
	
	SetLanguage LanguageInit
	

	Var InternationalEnable = 0
	Var InternationalEnableStr = "false"
	Var cups_sold_text = "เสิร์ฟแล้ว ( CUPS SOLD )"
	Var XButtonMember = 212
	Var YButtonMember = 1695
	
	; CountryName
	If CountryName = "" Then
		READ_FILE "/mnt/sdcard/coffeevending/country/short" StrCountryShort
		DEBUGVAR StrCountryShort
		If StrCountryShort = "MYS" Then
			Var CountryName = "Malaysia"
		EndIf
		If StrCountryShort = "MYR" Then
			Var CountryName = "Malaysia"
		EndIf

		If StrCountryShort = "AUS" Then
			Var CountryName = "Australia"
		EndIf

		If StrCountryShort = "SGP" Then
			Var CountryName = "Singapore"
		EndIf

		If StrCountryShort = "UAE_DUBAI" Then
			Var CountryName = "UnitedArabEmirates Dubai"
		EndIf

		If StrCountryShort = "" Then
			Var CountryName = "Thailand"
		EndIf

		;

	
	EndIf

	; Zone set video main page.

	; ignore collection point 
	Var SettingIgnoreCollectPoint = 0 
	Var SettingVideoBrewingUseCommon = 0

	Var adver_brewing_en = 1

	;inter-xml-open
	If CountryName = "Australia" Then
		TRY "/mnt/sdcard/coffeevending/taobin_project/inter/aus/video/script_video.ev"
	EndIf
	
	;inter-xml-open
	If CountryName = "Malaysia" Then
		TRY "/mnt/sdcard/coffeevending/taobin_project/inter/mys/video/script_video.ev"
	EndIf

	;inter-xml-open
	If CountryName = "Thailand" Then
		TRY "/mnt/sdcard/coffeevending/taobin_project/video/script1.ev"
	EndIf

	;inter-xml-open
	If CountryName = "USANewYork" Then
		TRY "/mnt/sdcard/coffeevending/taobin_project/inter/usaNY/video/script_video.ev"
	EndIf

	;inter-xml-open
	If CountryName = "Singapore" Then
		TRY "/mnt/sdcard/coffeevending/taobin_project/inter/sgp/video/script_video.ev"
	EndIf




	DEBUGVAR CountDownShowButton
	DEBUGVAR EventTurnOn

	;inter-page-board
	If CountryName = "Malaysia" Then

		TRY "/mnt/sdcard/coffeevending/taobin_project/inter/mys/video/script_video.ev"
		
		Var WebAppShow = "Invisible"
		EnableLanguage "ENG"
		EnableLanguage "MALAY"
		SetLanguage "ENG"
		LanguageControl "UpdateList" "-"
		Var InternationalEnable = 1
		Var show_eng = "true"
		;Var VideoMainPage = "ROOT/taobin_project/inter/common/video/video_main.mp4"
		Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"

		Var ShowNetworkProblemText = "Network error. Payment Cash only."

		Var CountryRootPath = "ROOT/taobin_project/inter/mys/"
		Var CountryShortName = "mys"

		Var PriceUnitText = "Prices in MYR"

		Var TextPriceMenuSize = 12
		Var TextPriceMenuY = 266
		Var ShowButtonClick2 = "Enable"
		Var ButtontoTopupMenu = "Invisible"

		Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
		Var show_eng_button_stage = "Invisible"

		Var CountDownShowButton = 35


		Var XButtonMember = 384
		Var YButtonMember = 1695

		If Not#LanguageLoaded = "" Then
			LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/mys/menu/lang.tsv"
		EndIf

		; load credit

		If EnableCreditCard = "" Then
            CacheVarStr "get" EnableCreditCard
        Else
            CacheVarStr "put" EnableCreditCard
        EndIf

		DEBUGVAR EnableCreditCard

		STRCONTAIN "1215" MaterialAvailable SugarZeroCalEnable

		Var MinPhoneNumber = 10
		Var MaxPhoneNumber = 11

	EndIf

	;inter-page-board
	If CountryName = "Indonesia" Then
		
		TRY "/mnt/sdcard/coffeevending/taobin_project/inter/idr/video/script_video.ev"
		Var TextPriceMenuSize = 14
		Var show_eng_button_stage = "Invisible"
		Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"

		Var CountryRootPath = "ROOT/taobin_project/inter/ids/"
		Var CountDownShowButton = 35

		Var CountryShortName = "ids"

		If Not#LanguageLoaded = "" Then
			LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/ids/menu/lang.tsv"
		EndIf

		Var PriceUnitText = ""

		Var XButtonMember = 212
		Var YButtonMember = 1695

		Var MinPhoneNumber = 11
		Var MaxPhoneNumber = 12

		STRCONTAIN "1215" MaterialAvailable SugarZeroCalEnable
	EndIf

	;inter-page-board
	If CountryName = "Australia" Then

		Var SettingVideoBrewingUseCommon = 1
		
		TRY "/mnt/sdcard/coffeevending/taobin_project/inter/aus/video/script_video.ev"
		
		Var WebAppShow = "Invisible"
		EnableLanguage "ENG"
		SetLanguage "ENG"
		LanguageControl "UpdateList" "-"
		
		Var InternationalEnable = 1
		Var show_eng = "true"
		;Var VideoMainPage = "ROOT/taobin_project/inter/aus/video/video_main.mp4"
		Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"

		Var ShowNetworkProblemText = "Network error. Payment Cash only."

		Var CountryRootPath = "ROOT/taobin_project/inter/aus/"
		Var CountryShortName = "aus"

		Var TextPriceMenuSize = 12
		Var TextPriceMenuY = 264
		Var TextPriceMenuBlendX = 180
		Var TextPriceMenuHotX = 48
		Var ShowButtonClick2 = "Enable"
		Var ButtontoTopupMenu = "Invisible"

		Var PriceUnitText = ""

		Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
		Var show_eng_button_stage = "Invisible"

		Var CountDownShowButton = 35

		Var XButtonMember = 384
		Var YButtonMember = 1695

		If Not#LanguageLoaded = "" Then
			LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/aus/menu/lang.tsv"
		EndIf

		DEBUGVAR MaterialAvailable
		STRCONTAIN "511215" MaterialAvailable SugarZeroCalEnable

		Var cups_sold_text = "CUPS SOLD"

		Var MinPhoneNumber = 10
		Var MaxPhoneNumber = 10

	EndIf

	;inter-page-board
	If CountryName = "USANewYork" Then
		TRY "/mnt/sdcard/coffeevending/taobin_project/inter/usaNY/video/script_video.ev"

		
		Var WebAppShow = "Invisible"
		EnableLanguage "ENG"
		SetLanguage "ENG"
		LanguageControl "UpdateList" "-"
		
		Var InternationalEnable = 1
		Var show_eng = "true"
		;Var VideoMainPage = "ROOT/taobin_project/inter/usaNY/video/video_main.mp4"
		Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"

		Var ShowNetworkProblemText = "Network error. Payment Cash only."

		Var CountryRootPath = "ROOT/taobin_project/inter/usaNY/"
		Var CountryShortName = "usaNY"

		Var TextPriceMenuSize = 12
		Var TextPriceMenuY = 264
		Var TextPriceMenuBlendX = 180
		Var TextPriceMenuHotX = 48
		Var ShowButtonClick2 = "Enable"
		Var ButtontoTopupMenu = "Invisible"

		Var PriceUnitText = ""

		Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
		Var show_eng_button_stage = "Invisible"

		Var CountDownShowButton = 35

		Var XButtonMember = 212
		Var YButtonMember = 1695

		If Not#LanguageLoaded = "" Then
			LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/usaNY/menu/lang.tsv"
		EndIf

		STRCONTAIN "1215" MaterialAvailable SugarZeroCalEnable

		Var MinPhoneNumber = 10
		Var MaxPhoneNumber = 11

	EndIf

	;inter-page-board
	If CountryName = "Singapore" Then
		
		TRY "/mnt/sdcard/coffeevending/taobin_project/inter/sgp/video/script_video.ev"
		
		Var WebAppShow = "Invisible"
		EnableLanguage "ENG"
		SetLanguage "ENG"
		LanguageControl "UpdateList" "-"
		
		Var InternationalEnable = 1
		Var show_eng = "true"
		Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"

		Var ShowNetworkProblemText = "Network error. Payment Cash only."

		Var CountryRootPath = "ROOT/taobin_project/inter/sgp/"
		Var CountryShortName = "sgp"

		Var TextPriceMenuSize = 12
		Var TextPriceMenuY = 266
		Var TextPriceMenuBlendX = 180
		Var TextPriceMenuHotX = 48
		Var ShowButtonClick2 = "Enable"
		Var ButtontoTopupMenu = "Invisible"

		Var PriceUnitText = "Price in SGD"

		Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
		Var MemberButtonFileNameRest = "ROOT/taobin_project/image/main_page_en/bn_main_page_member.png"
		Var show_eng_button_stage = "Invisible"

		Var CountDownShowButton = 35

		Var XButtonMember = 384
		Var YButtonMember = 1695

		If Not#LanguageLoaded = "" Then
			LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/sgp/menu/lang.tsv"
		EndIf

		STRCONTAIN "521215" MaterialAvailable SugarZeroCalEnable

		Var SettingDisableTaobinCredit = "true"
		;Var SettingDisableTaobinCode = "false"

		; Singapore disable point
		;Var SettingIgnoreCollectPoint = 1

		Var SettingVideoBrewingUseCommon = 1

		Var MinPhoneNumber = 8
		Var MaxPhoneNumber = 8

		Var ShowCountDownAsPercent = 1

		DEBUGVAR ShowButtonClick2


	EndIf

	;inter-page-board
	; wait
	
	If CountryName = "UnitedArabEmirates Dubai" Then

		SAVELOG "UnitedArabEmirates Dubai UnitedArabEmirates Dubai UnitedArabEmirates Dubai"
		
		TRY "/mnt/sdcard/coffeevending/taobin_project/inter/uae_dubai/video/script_video.ev"
		
		
		Var WebAppShow = "Invisible"
		EnableLanguage "ENG"
		EnableLanguage "UAE_DUBAI"
		SetLanguage "ENG"
		LanguageControl "UpdateList" "-"
		
		Var InternationalEnable = 1
		Var show_eng = "true"
		Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"

		Var ShowNetworkProblemText = "Network error. Payment Cash only."

		Var CountryRootPath = "ROOT/taobin_project/inter/uae_dubai/"
		Var CountryShortName = "uae_dubai"
		
		Var TextPriceMenuSize = 12
		Var TextPriceMenuY = 266
		Var TextPriceMenuBlendX = 180
		Var TextPriceMenuHotX = 48
		Var ShowButtonClick2 = "Enable"
		Var ButtontoTopupMenu = "Invisible"

		Var PriceUnitText = "Price in DH"

		Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
		Var show_eng_button_stage = "Invisible"

		Var CountDownShowButton = 35

		Var XButtonMember = 384
		Var YButtonMember = 1695

		If Not#LanguageLoaded = "" Then
			LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/uae_dubai/menu/lang.tsv"
		EndIf

		Var SettingDisableTaobinCredit = "true"
		Var SettingDisableTaobinCode = "false"
		
		; Dubai disable point
		Var SettingIgnoreCollectPoint = 1

		Var SettingVideoBrewingUseCommon = 1

		Var MinPhoneNumber = 9
		Var MaxPhoneNumber = 9

	EndIf



	DEBUGVAR InternationalEnable
	DEBUGVAR CountryRootPath



	If InternationalEnable = 1 Then
		Var LanguageObjectShow = "Enable"
		Var NoLangObjectShow = "Invisible"
		Var XMLLiveInfoEnable = 0

		If Not#LanguageResult = "false" Then
			LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/ui/lang.tsv"
		EndIf
		
		Var RootPath = "ROOT/taobin_project/inter/common/"

		Var OpenFileXML = CountryRootPath + "xml/event/tricker.ev"
		DEBUGVAR OpenFileXML
		TRY OpenFileXML

	Else
		Var LanguageObjectShow = "Invisible"
		Var NoLangObjectShow = "Enable"
		TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/tricker.ev"

		Var RootPath = "ROOT/taobin_project/"


	EndIf
	TRY "/mnt/sdcard/coffeevending/taobin_project/xml/multi_ads/ads_path.ev"


	Var StrXMLPageVer = "ver=" + XMLPageVersionInt
	WRITE_FILE "/mnt/sdcard/coffeevending/version/xml_page_version.int" StrXMLPageVer


	If SELLONLINE = 1 Then
	Else

		Var ShowNetworkProblem = "Enable"
		Var ShowButtonClick2 = "Invisible"		

		If NetworkStatus = "DOWN" Then 
			Machine NetworkDown
		EndIf
		
		Var QRCODE99 = ""
		WEB "DISABLE"
		
	EndIf

	If GameInstalled = "" Then
		CheckApp "com.NDF.taobin" GameInstalled
	EndIf

	Var CountDownCheckCamera = 10

	;DEBUGVAR EnableLiveness
	DEBUGVAR LivenessLicenseFailNumber
	;DEBUGVAR LivenessControlVersion
	;DEBUGVAR Not#CameraSettingStatus

	RootLayoutVisible 3 "hide"

	If SELLSTATUS = "DEACTIVE" Then
		Open "/ROOT/xml/offline.xml" 
	EndIf	

	Var CheckCupStateDoorCupClose = ""

	; zone cup on arm
	If CupOnArm = "true" Then

		If CheckCupStateDoorCupClose = "" Then
			Var buttonRemoveCup = "Enable"
		EndIf

		If CheckCupStateDoorCupClose = "done" Then
			Var buttonRemoveCup = "Enable"
		EndIf
	Else
		If buttonRemoveCup = "Enable" Then
			Var buttonRemoveCup = "Invisible"
		EndIf
	EndIf

	TRY "ROOT/taobin_project/xml/profile/run.ev"

	Var NETCORE_LOST_COUNT_UP = 0

	Var NoWaitMachineEnable = 1
	DEBUGVAR NeedUpgrade
	
	If NoWaitMachineEnable = 1 Then
		If stop_now = "true" Then
			TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
		EndIf
	Else

		If MachineStage = "close-maintenance" Then
			TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
		EndIf

	EndIf

	If MachineStage = "mcu-upgrade" Then
		TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"

	EndIf

	If NeedUpgrade = "true" Then
		TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
	EndIf

	If RoadShow = "true" Then
		Var ShowNetworkProblem = "Invisible"
		Var ShowNetworkProblemText = ""
	EndIf

	Var SlientRefreshEnable = 0 

	Var ShouldShowNamHomCoconutRemainReward = 0
	Var ShowNamHomCoconutRemainReward = "Invisible"
	Var GetNamHomCoconutRemainReward = 0
	Var NamHomCoconutRemainReward_Y = 1071
	Var NamHomCoconutRemainRewardNumber_Y = 1130
	Var dummyPhone = "089999999"

	If GetNamHomCoconutRemainRewardLastTime = "" Then
		Var GetNamHomCoconutRemainRewardLastTime = 0
	EndIf

	DEBUGVAR NamHomCoconutPro
	DEBUGVAR CurrentMainVideo
	If NamHomCoconutPro = 1 Then
		If CurrentMainVideo = 2 Then
			Var ShouldShowNamHomCoconutRemainReward = 1
			DEBUGVAR GetNamHomCoconutRemainRewardLastTime
			DEBUGVAR SystemTimeMinuteInt
			Var TimeDiff = SystemTimeMinuteInt - GetNamHomCoconutRemainRewardLastTime
			DEBUGVAR TimeDiff
			If TimeDiff >= 15 Then
				DEBUGVAR "update nam hom coconut remain reward!!!"
				DEBUGVAR GetNamHomCoconutRemainReward
				If GetNamHomCoconutRemainReward = 0 Then
					GETACCEXT dummyPhone 34
					Var GetNamHomCoconutRemainReward = 1
				EndIf
			Else
				If TimeDiff <= -15 Then
					DEBUGVAR "update nam hom coconut remain reward!!!"
					If GetNamHomCoconutRemainReward = 0 Then
						GETACCEXT dummyPhone 34
						Var GetNamHomCoconutRemainReward = 1
					EndIf
				EndIf
			EndIf
		EndIf
	EndIf

	If EnergyDrink1BathPro = 1 Then
		If CurrentMainVideo = 1 Then
			Var VideoMainPage = "ROOT/taobin_project/video/main_page_event_pro2.mp4"
			Var CurrentMainVideoTemp = 2
		EndIf
	EndIf

	If CoffeeDrink1BathPro = 1 Then
		If CurrentMainVideo = 1 Then
			Var VideoMainPage = "ROOT/taobin_project/video/main_page_event_pro3.mp4"
			Var CurrentMainVideoTemp = 2
		EndIf
	EndIf

	Var CurrentMainVideo = CurrentMainVideoTemp

	DEBUGVAR SettingDisableTaobinCredit
	If SettingDisableTaobinCredit = "true" Then
		Var ShowButtonClick2 = "Invisible"
		If CountryName = "Singapore" Then
			If SELLONLINE = 1 Then
				Var ShowButtonClick2 = "Enable"
			EndIf
		EndIf
	EndIf
	DEBUGVAR ShowButtonClick2

	Machine OrderCheck

	DEBUGVAR CLOSE_ORDER_NOW

	; move to TRY actoin.
	; Move to end of EventOpen for override war
	Var RoadShow = "false"
	TRY "ROOT/taobin_project/xml/sometime/RoadShow.ev"

</EventOpen>

<EventActionOk>
	If GetNamHomCoconutRemainReward = 1 Then
		If Ext1a = "" Then
			SAVELOG "Get Nam hom coconut remain reward error Ext1a is empty."
		Else
			DEBUGVAR Ext1a
			
			SPLIT2 Ext1a "/" RemainRewardSpl
			
			Var SuperSetRemain = RemainRewardSpl[0]
			Var BalanceEssenceTonerRemain = RemainRewardSpl[1]
			Var CleansingGalRemain = RemainRewardSpl[2]
			Var TumbleBottleRemain = RemainRewardSpl[3]
			Var ClearGelRemain = RemainRewardSpl[4]
			Var E_GiftCard100BathRemain = RemainRewardSpl[5]
			Var ClearGel4mlRemain = RemainRewardSpl[6]

			INT SuperSetRemain
			INT BalanceEssenceTonerRemain
			INT CleansingGalRemain
			INT TumbleBottleRemain
			INT ClearGelRemain
			INT E_GiftCard100BathRemain
			INT ClearGel4mlRemain
			
			Var SumNamHomCoconutRemainReward = SuperSetRemain
			Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + BalanceEssenceTonerRemain
			Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + CleansingGalRemain
			Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + TumbleBottleRemain
			Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + ClearGelRemain
			Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + E_GiftCard100BathRemain
			Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + ClearGel4mlRemain

			If ShouldShowNamHomCoconutRemainReward = 1 Then
				Var ShowNamHomCoconutRemainReward = "Enable"
			EndIf

			;DEBUG
			;Var SumNamHomCoconutRemainReward = 200

			If SumNamHomCoconutRemainReward > 500 Then
				Var ShowNamHomCoconutRemainReward = "Invisible"
			Else
				If SumNamHomCoconutRemainReward = 0 Then
					SAVELOG "NamHomCoconutPro: All reward out of stock"

					WRITE_FILE "/mnt/sdcard/nam_hom_coconut_reward_out_of_stock" "1"
				EndIf
			EndIf

			Var NamHomCoconutRemainReward = SumNamHomCoconutRemainReward
			DEBUGVAR NamHomCoconutRemainReward
            Var GetNamHomCoconutRemainRewardLastTime = SystemTimeMinuteInt
		EndIf
	EndIf
</EventActionOk>

<EventActionError>
	If GetNamHomCoconutRemainReward = 1 Then
		SAVELOG "Get Nam hom coconut remain reward requet error."
	EndIf
</EventActionError>

<EventUnitTest1>
	Var XMLProfile = "AllPriceUp05"
	Open CurrentXMLFileName0
</EventUnitTest1>

<EventUnitTest2>
	Var NextPage = "ROOT/taobin_project/xml/page_back_to_main.xml"

	OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"


	Var OpenFromPageBoard = 1

	If InternationalEnable = 1 Then

		; show language icon
		OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
		RootLayoutVisible 3 "show"

		OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_group_recommend.lxml"
	Else
		TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/script_common_for_open_promotion_xml.ev"
	EndIf

	Machine DoorClose

	TopView "show"
	Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
</EventUnitTest2>

<EventUnitTest3>
	;Var XMLProfile = "AllPriceUp10"
	;Open CurrentXMLFileName0

	__CMD "SetPay" "Coffee"  "123456789123456789" "3000100617001201234"
	;PRICE "Reload" "-"
</EventUnitTest3>

<EventUnitTest4>
	Var XMLProfile = "$School"
	PRICE "Load" "-"
	PRICE "CheckAndApply" XMLProfile

	DEBUGVAR ProfileIndex[0]
	DEBUGVAR ProfileIndex[1]
	DEBUGVAR ProfileIndex[2]
	
</EventUnitTest4>

<EventUnitTest6>
	PushFile "/sdcard/" "RootManPicture" "scn_240703193755.png"
 </EventUnitTest6>

<EventDrink>
	SAVELOG "EventDrink EventDrink EventDrink EventDrink EventDrink "
</EventDrink>

<Timeout> 1000 </Timeout>
<EventTimeout>

	If CNTDOWN_PROTECT_SCREEN_BLANK > 0 Then
		Var CNTDOWN_PROTECT_SCREEN_BLANK = CNTDOWN_PROTECT_SCREEN_BLANK - 1
	EndIf

	If CNTDOWN_PROTECT_SCREEN_BLANK = 0 Then

		SAVELOG "CNTDOWN_PROTECT_SCREEN_BLANK"
		Open "ROOT/taobin_project/xml/page_board.xml"
	EndIf

	If IgnoreNetCore = "true" Then

	Else
		If NetworkStatus = "DOWN" Then
		
			Var WebAppShow = "Invisible"
		EndIf
		If SELLSTATUS = "DEACTIVE" Then
				Open "/ROOT/xml/offline.xml" 
		EndIf	

		If NoWaitMachineEnable = 1 Then
			If RecoveryRunning = "true" Then
				TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"

			EndIf
			If stop_now = "true" Then
				TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
			EndIf
		Else
			If MachineStage = "close-maintenance" Then
				TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"

			EndIf
		EndIf
		
		

		If CLOSE_ORDER_NOW = "true" Then
			TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
		EndIf
		
		If MachineStage = "mcu-upgrade" Then
			TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"

		EndIf


		;stop_now
		If NETCORE_LOST_CNT > 120 Then
			Var stop_now = "true"
			Var MachineErrorDetailAll = "???"
			SAVELOG "NETCORE_LOST_CNT"
			TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
		EndIf


		;DEBUGVAR NETCORE_EVENT_CNT_X


		If NCIC07_EVENT_CNT = NETCORE_EVENT_CNT_TMP Then
			If NETCORE_EVENT_CNT_X = "" Then
				Var NETCORE_EVENT_CNT_X = 0
			EndIf

			Var NETCORE_EVENT_CNT_X = NETCORE_EVENT_CNT_X + 1
			
			If NETCORE_EVENT_CNT_X = 30 Then
				DEBUGVAR NETCORE_EVENT_CNT_X
			EndIf
			If NETCORE_EVENT_CNT_X = 90 Then
				DEBUGVAR NETCORE_EVENT_CNT_X
			EndIf

			If NETCORE_EVENT_CNT_X > 3600 Then
				Var stop_now = "true"
				Var stop_now_from_netcore_event = 1
				Var MachineErrorDetailAll = "Netcore Lost"
				SAVELOG "Netcore Lost NCIC07_EVENT_CNT"
				DEBUGVAR NCIC07_EVENT_CNT
				TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
			EndIf

		Else
			Var NETCORE_EVENT_CNT_X = 0 
			Var NETCORE_EVENT_CNT_TMP = NCIC07_EVENT_CNT 
		EndIf

		

	EndIf

	If MachineStage = "drink-failed" Then
		TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"

	EndIf
	
	If MachineStage = "remove-cup" Then
		Open "ROOT/taobin_project/xml/page_remove_cup.xml"

	EndIf

	If BrewTimeoutExtend = 1 Then
		DEBUGVAR BrewTimeoutExtend 
		DEBUGVAR DoorCupPosition 
		If DoorCupPosition = "bottom" Then
			SAVELOG "BrewTimeoutExtend = 0 Clear Error Flag"
			Var BrewTimeoutExtend = 0 
			; clear stage

		Else
			
			Var stop_now = "true"
			Var stop_now_from_door_cup = 1
			
			TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
		EndIf
	Else
		If DoorCupPosition = "Bottom" Then
			Var BrewTimeoutExtend = 0 

		Else
			Var BrewTimeoutExtend = 0 
		EndIf
	EndIf



	If NeedUpgrade = "true" Then
		TRY "ROOT/taobin_project/xml/sometime/script_open_page_show_error.ev"
	EndIf

	If CountDownShowButton > 0 Then
		Var CountDownShowButton = CountDownShowButton - 1
	EndIf



	;DEBUGVAR MachineStage
	;SAVELOG CountDownShowButton
	;SAVELOG ShowButtonClickFull

	If TaobinOnlineX = "true" Then
	
		If CountDownShowButton < 33 Then
			If CountryName = "Singapore" Then
				Var ShowButtonClick2 = "Invisible"
				Refresh
			EndIf
		EndIf

		If CountDownShowButton = 31 Then
			Var ShowButtonClickFull = "Enable"
			Var ShowButtonClick = "Invisible"
			Refresh
		EndIf

		If CountDownShowButton = 3 Then
			
			Var ShowButtonClick = "Enable"
			If CountryName = "Singapore" Then
				Var ShowButtonClick2 = "Enable"
			EndIf
			Var ShowButtonClickFull = "Invisible"	
			Refresh
		EndIf

		If CountDownPauseVideo > 0 Then
			; ignore
			Var CountDownPauseVideo = CountDownPauseVideo - 1

			If CountDownPauseVideo  = 2 Then

				TapScreen 30 638

			EndIf


			If CountDownPauseVideo  = 1 Then

				TapScreen 860 1004

			EndIf

			If CountDownPauseVideo  = 0 Then

				Var NextPage = "ROOT/taobin_project/xml/page_back_to_main.xml"

				OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"


				Var OpenFromPageBoard = 1

				

				If InternationalEnable = 1 Then

					; show language icon
					OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
					RootLayoutVisible 3 "show"


					Var OpenFileXML = CountryRootPath + "xml/event/script_common_for_open_promotion_xml.ev"
					TRY OpenFileXML
					;OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_group_recommend.lxml"

				Else
					If BeerTrapEnable = "true" Then
						OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"	
					Else
						TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/script_common_for_open_promotion_xml.ev"
					EndIf
        		EndIf
	    	
				Machine DoorClose

				TopView "show"
				Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"

			EndIf
		EndIf

	EndIf



	If TimerFirst = "true" Then
		Var TimerFirst = "false"
		Var CountUpReloadAll = CountUpReloadAll + 1

		DEBUGVAR CountUpReloadAll
		
		; Original value is 40
		If EnableMultiInstance = "true" Then

			If CountUpReloadAll > 300 Then
				Var NeedReboot = "false"

				Var StartUpExt = "-"
				Var CountUpReloadAll = 0

				ReloadAll
			EndIf

		Else
			If CountUpReloadAll > 100 Then
				Var NeedReboot = "false"

				Var StartUpExt = "-"
				Var CountUpReloadAll = 0

				ReloadAll
			EndIf

		EndIf

	EndIf
	

	If CupOnArm = "true" Then

		If CheckCupStateDoorCupClose = "" Then
			Var buttonRemoveCup = "Enable"
		EndIf

		If CheckCupStateDoorCupClose = "done" Then
			Var buttonRemoveCup = "Enable"
		EndIf
	Else
		If buttonRemoveCup = "Enable" Then
			Var buttonRemoveCup = "Invisible"
		EndIf
	EndIf




	If Seeker = "curr" Then
		If DoorCupPosition = "bottom" Then
			; It normal 
			Var EmergencyStop = "false"
		Else
			Var EmergencyStop = "true"
			
		EndIf
	EndIf

	If MainPageEventWithTimeout = "" Then

	Else
		If MainPageEventWithTimeout > 0 Then
			Var MainPageEventWithTimeout = MainPageEventWithTimeout - 1
		EndIf

		;DEBUGVAR MainPageEventWithTimeout
		If MainPageEventWithTimeout = 1 Then
			Var CountDownPauseVideo = 4
		EndIf
	EndIf

	
	Refresh

	TimerReset
</EventTimeout> 

<EventEnd> 
	SAVELOG "EVENT END"
	
	If TaobinOnlineX = "true" Then
		Var CountDownShowButton = 35
	EndIf
	
	If TermTemOnline = "true" Then
		Var CountDownShowButton = 28
	EndIf
	
	Var CountDownPauseVideo = 6
	If TaobinOnlineX = "true" Then
		;TouchTapClose
	EndIf

	;Open CurrentXMLFileName0
	Refresh
	
</EventEnd> 


<EventNetDown>
	SAVELOG NetworkStatus
	;Open "/mnt/sdcard/coffeevending/xml/main.xml" 
</EventNetDown>

<EventNetDeactive>
	SAVELOG NetworkStatus
	If SELLSTATUS = "DEACTIVE" Then
		Open "/mnt/sdcard/coffeevending/xml/main.xml" 
	EndIf
</EventNetDeactive>

<EventWebApp>

	DEBUGVAR web_ready
	If web_ready = "true" Then
		If web_ref = QRCODE99x Then

			Var web_readyOK = web_ready
			Var web_telnumOK = web_telnum
			
			Var web_app_prepar = "true"

			; Handle penetrator

			If Only18 = "true" Then
				OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
				OpenInst 2 "ROOT/taobin_project/xml/page_identity18_verification.xml"
			Else
				OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
				OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_payment.xml"
			EndIf


			TopView "show"
			Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
		EndIf
	Else
	EndIf
 
</EventWebApp>


<Video>
<X> 0 </X>
<Y> 0 </Y>
;<Loop>"true"</Loop>
;<Volume> 80 </Volume>
<Filename> VideoMainPage </Filename>
<FilenameAlternate> "ROOT/taobin_project/video/main_page_en.mp4" </FilenameAlternate>
</Video>


<Image>
	<X> 224 </X>
	<Y> NamHomCoconutRemainReward_Y </Y>
	<State> ShowNamHomCoconutRemainReward </State>
	<Filename> "ROOT/taobin_project/image/event/nam_hom_coconut/reward_remain.png" </Filename>
</Image>

<Text>
    <X> 379 </X>
    <Y> NamHomCoconutRemainRewardNumber_Y </Y>
	<State> ShowNamHomCoconutRemainReward </State>
    <Width> 224 </Width>
    <Height> 112 </Height>
    <Font> OpunBoldTTF </Font>
    <Size> 100 </Size>
    <Color> 0xFF0000 </Color>
    <Align> center-vertical-horizontal </Align>
    <Value> NamHomCoconutRemainReward </Value>    
</Text>




<Button>
<X> 212 </X>
<Y> 1481 </Y>
<State> ShowButtonClick </State>
;<Color> "0x00BDFF" </Color>
<Filename> img_rest_main_page </Filename>
<FilenamePress> img_press_main_page </FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 

	;OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
	If CocktailShow = "true" Then 
		OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"	
	Else
		
		If SpiralOnline = "true" Then

			OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_with_vending.xml"
		Else
			If InternationalEnable = 1 Then
				OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
				OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.lxml"
			Else
				OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.xml"
			EndIf
		
		EndIf

	EndIf

	TopView "show"
	Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
</EventClick>
</Button>

<Button>
<X> XButtonMember </X>
<Y> YButtonMember </Y>
<State> ShowButtonClick2 </State>
;<Color> "0x00BDFF" </Color>
<Filename> MemberButtonFileNameRest </Filename>
<FilenamePress> MemberButtonFileName </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 

	Var NextPage = "-"
	
	OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"

	If InternationalEnable = 1 Then
		;inter-xml-open

		DEBUGVAR CountryName

		If CountryName = "UnitedArabEmirates Dubai" Then
			OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_check_member.xml"
		Else
			Var ChackMemberPage = CountryRootPath + "xml/page_check_member.lxml"
			OpenInst 2 ChackMemberPage
		EndIf
	Else
		OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_before_check_member.xml"
	EndIf
	
	TopView "show"
	Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
	

</EventClick>
</Button>

<Button>
<X> 556 </X>
<Y> 1695 </Y>
<State> ButtontoTopupMenu </State>
;<Color> "0x00BDFF" </Color>
<Filename> img_reset_topup </Filename>
<FilenamePress> "ROOT/taobin_project/image/main_page/bp_main_page_topup.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 
	Var PayDetail=""
	Var NextPage = "-"
	Open "ROOT/xml/service_menu.xml" 
</EventClick>
</Button>

<Button>
<X> 2 </X>
<Y> 609 </Y>
<State> ShowButtonClickFull </State>
;<Color> "0x00BDFF" </Color>
<Width> 1070 </Width>
<Height> 1310 </Height>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick> 

	SAVELOG "click ShowButtonClickFull"

	Var NextPage = "-"
	OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
	If SpiralOnline = "true" Then

		OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_with_vending.xml"
	Else
		If InternationalEnable = 1 Then
			OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
			OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.lxml"
		Else
			OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.xml"
		EndIf
	EndIf
	If TermTemOnline = "true" Then
		OpenInst 2 "/mnt/sdcard/coffeevending/termtem_project/xml/page_tt_catalog.xml"
	EndIf

	TopView "show"
	Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
</EventClick>
</Button>



<Image>
<X> 778 </X>
<Y> 632 </Y>
<State>WebAppShow</State>
<Filename> "ROOT/taobin_project/image/home/home/qr_bg.png" </Filename>
</Image>


<QRCode>
<X> 843 </X>
<Y> 98 </Y>
<Width> 150 </Width>
<Color> "0xeae6e1" </Color>
<QRColor> "0x000000" </QRColor>
<Height> 150 </Height>
<State> WebAppShow </State>
<Service> testservice </Service>
</QRCode>


<Button>
<X> 780 </X>
<Y> 630 </Y>
<State> buttonRemoveCup </State>
;<Color> "0x00BDFF" </Color>
<Interval> 500 </Interval>
<Filename>  Var(RootPath + "image/main_page/bn_remove_cup.png") </Filename>
<Filename>  Var(RootPath + "image/main_page/bp_remove_cup.png") </Filename>
<EventClick> 
	Machine RemoveCup
	Machine DoorLidOpen

	Var CheckCupStateDoorCupClose = "reset"
	Var buttonRemoveCup = "Invisible"
</EventClick>
</Button>

<Button>
<X> 0 </X>
<Y> 1870 </Y>
<State> ShowNetworkProblem </State>
<Color> "0xFF0000" </Color>
<Width> 1080 </Width>
<Height> 60 </Height>
<EventClick> 
	If IgnoreNetCore = "true" Then

		Var NextPage = "-"
		OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"

		OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.lxml"


		TopView "show"
		Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"

	EndIf
</EventClick>
</Button>


<Button>
<X> 0 </X>
<Y> 608 </Y>
<State> "Enable" </State>
<Width> 120 </Width>
<Height> 120 </Height>
<EventClick> 
	
	Var NextPage = "ROOT/taobin_project/xml/page_back_to_main.xml"

	OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"


	Var OpenFromPageBoard = 1

	If InternationalEnable = 1 Then

		; show language icon
		OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
		RootLayoutVisible 3 "show"

		Var OpenFileXML = CountryRootPath + "xml/event/script_common_for_open_promotion_xml.ev"
		TRY OpenFileXML
		
		;OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_group_recommend.lxml"
	Else

		If BeerTrapEnable = "true" Then 
			OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"	
		Else
			TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/script_common_for_open_promotion_xml.ev"
		EndIf
	EndIf

	Machine DoorClose

	TopView "show"
	Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"

</EventClick>
</Button>


<Text>
<State> ShowNetworkProblem </State>
<X> 5 </X>
<Y> 1880 </Y>
<Size> 24 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Font> RobotoRegular </Font>
<Color> 0xFFFFFF </Color>
<Value> ShowNetworkProblemText </Value>
</Text>


</Page>