Var MainfileSize = 0
DEBUGVAR BoxID
Var EventMatch = 0

Var EventMatch = 1

DEBUGVAR EventMatch

If EventMatch = 1 Then
	Var WebAppShow = "Invisible"

	GetFileSizeK "taobin_project/video/main_page_event.mp4" MainfileSize
	DEBUGVAR MainfileSize
	If MainfileSize = 10634530 Then
			
		Var CurrentMainVideoTemp = 1
		Var CountDownShowButton = 0
		;Var MainPageEventWithTimeout = 25
		Var ShowButtonClickFull = "Invisible"

		Var img_rest_main_page = "ROOT/taobin_project/image/main_page/bn_main_page_start.png"
		Var MemberButtonFileNameRest = "ROOT/taobin_project/image/main_page/bn_main_page_member.png"
		Var img_reset_topup = "ROOT/taobin_project/image/main_page/bn_main_page_topup.png"

		Var VideoMainPage = "ROOT/taobin_project/video/main_page_event.mp4"

		If CocktailShow = "true" Then

		Else 
			Var EventTurnOn = 1		
		EndIf
	EndIf
EndIf





If SystemDateMonthInt = 11 Then

    Var EDC_ThailandOn = 1

    If SystemDateDayInt > 20 Then
    	Var PremiumTriosEnable = 1
    	Var GiftNewYearEnable = 1
    EndIf
EndIf

If SystemDateMonthInt = 12 Then

    Var EDC_ThailandOn = 1
    Var GiftNewYearEnable = 1
EndIf

If SystemDateMonthInt = 1 Then
	If SystemDateDayInt < 20 Then
    	Var EDC_ThailandOn = 1
    EndIf
	If SystemDateDayInt < 16 Then
    	Var GiftNewYearEnable = 1
    EndIf

EndIf





Var MainAdvertiseRunSlot = 0

If MainAdvertiseShowSlot = "" Then
	Var MainAdvertiseShowSlot = 0
EndIf


If brewing_adv11_long_size = "" Then
	GetFileSizeK "taobin_project/video/brewing_adv11_long.mp4" brewing_adv11_long_size	
EndIf
DEBUGVAR brewing_adv11_long_size
If brewing_adv11_long_size = 8233782 Then
	If WinterWonderPro = 1 Then

		Var MainAdvertiseFileName[MainAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv11_long.mp4"
		Var MainAdvertiseVideoEnd[MainAdvertiseRunSlot] = 0
		Var EventTurnOn = 1
		Var MainAdvertiseRunSlot = MainAdvertiseRunSlot + 1
	EndIf
EndIf



If brewing_adv13_long_size = "" Then
	GetFileSizeK "taobin_project/video/brewing_adv13_long.mp4" brewing_adv13_long_size	
EndIf
DEBUGVAR brewing_adv13_long_size
If brewing_adv13_long_size = 3789806 Then
	If StrawberrySeriesPro = 1 Then

		Var MainAdvertiseFileName[MainAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv13_long.mp4"
		Var MainAdvertiseVideoEnd[MainAdvertiseRunSlot] = 0
		Var EventTurnOn = 1
		Var MainAdvertiseRunSlot = MainAdvertiseRunSlot + 1
	EndIf
EndIf


If brewing_adv21_long_size = "" Then
	GetFileSizeK "taobin_project/video/brewing_adv21_long.mp4" brewing_adv21_long_size	
EndIf
DEBUGVAR brewing_adv21_long_size
If brewing_adv21_long_size = 6507746 Then
	If ThickTeaByBrewerPro = 1 Then

		Var MainAdvertiseFileName[MainAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv21_long.mp4"
		Var MainAdvertiseVideoEnd[MainAdvertiseRunSlot] = 1

		Var EventTurnOn = 1
		Var MainAdvertiseRunSlot = MainAdvertiseRunSlot + 1

		Var EventTurnOn = 1
	EndIf
EndIf






If brewing_adv16_size = "" Then
	GetFileSizeK "taobin_project/video/brewing_adv16.mp4" brewing_adv16_size	
EndIf


DEBUGVAR brewing_adv16_size
If brewing_adv16_size = 7422861 Then
	If GiftNewYearEnable = 1 Then
		Var MainAdvertiseFileName[MainAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv16.mp4"
		Var MainAdvertiseVideoEnd[MainAdvertiseRunSlot] = 0

		Var EventTurnOn = 1
		Var MainAdvertiseRunSlot = MainAdvertiseRunSlot + 1

	EndIf
EndIf


DEBUGVAR MainAdvertiseShowSlot
DEBUGVAR MainAdvertiseRunSlot

;
;
;
;
;
;
; final call
; Protect edge of promotion.
If MainAdvertiseShowSlot < MainAdvertiseRunSlot Then
	Var VideoMainPage = MainAdvertiseFileName[MainAdvertiseShowSlot]
	If MainAdvertiseVideoEnd[MainAdvertiseShowSlot] = 0 Then
		Var CountDownPauseVideoEnable = "ignore"
	Else
		Var CountDownPauseVideoEnable = ""
	EndIf
	Var MainAdvertiseShowSlot = MainAdvertiseShowSlot + 1
Else
	Var MainAdvertiseShowSlot = 0
	Var VideoMainPage = MainAdvertiseFileName[MainAdvertiseShowSlot]
	If MainAdvertiseVideoEnd[MainAdvertiseShowSlot] = 0 Then
		Var CountDownPauseVideoEnable = "ignore"
	Else
		Var CountDownPauseVideoEnable = ""
	EndIf
	
EndIf

If VideoMainPage = "" Then
	Var EventTurnOn = 0
EndIf

DEBUGVAR MainAdvertiseRunSlot
DEBUGVAR MainAdvertiseShowSlot

DEBUGVAR VideoMainPage
DEBUGVAR EventTurnOn



If EventTurnOn = 1 Then
	Var CurrentMainVideoTemp = 1
	;Var MainPageEventWithTimeout = 25
	Var ShowButtonClickFull = "Invisible"

	Var img_rest_main_page = "ROOT/taobin_project/image/main_page/bn_main_page_start.png"
	Var MemberButtonFileNameRest = "ROOT/taobin_project/image/main_page/bn_main_page_member.png"
	Var img_reset_topup = "ROOT/taobin_project/image/main_page/bn_main_page_topup.png"


	Var CountDownShowButton = 0
	Var ShowButtonClick = "Enable"
	Var ShowButtonClickFull = "Invisible"
Else
	Var MemberButtonFileNameRest = ""
	Var img_rest_main_page = ""
	Var img_reset_topup = ""
	

EndIf







If taobin_notopup = "true" Then
	GetFileSizeK "taobin_project/video/_main_page_notopup.mp4" MainfileSize
	DEBUGVAR MainfileSize
	If MainfileSize > 0 Then
		Var VideoMainPage = "ROOT/taobin_project/video/_main_page_notopup.mp4"
	EndIf
EndIf