taobin_project/video/script1.ev
2025-03-04 17:48:26 +07:00

296 lines
6.7 KiB
Text

Var MainfileSize = 0
DEBUGVAR BoxID
Var EventMatch = 0
; Strawberry Series, 7 - 31 Jan
Var StrawberrySeriesPro = 0
Var StrawberrySeriesMenu = 0
; zone logic flag event
If SystemDateMonthInt = 1 Then
Var LuckyDrawCampaign = 1
If SystemDateDayInt <= 6 Then
Var ThickTeaByBrewerPro = 1
Var ThickTeaByBrewerBanner = 1
EndIf
If SystemDateDayInt >= 7 Then
Var StrawberrySeriesPro = 1
EndIf
EndIf
If SystemDateMonthInt = 2 Then
Var OvaltineSchoolPro = 1
If SystemDateDayInt >= 10 Then
If SystemDateDayInt <= 23 Then
Var RedStringOfFatePro = 1
EndIf
EndIf
EndIf
If SystemDateMonthInt = 2 Then
Var OvaltineSchoolPro = 1
If SystemDateDayInt >= 10 Then
If SystemDateDayInt <= 23 Then
Var RedStringOfFatePro = 1
EndIf
EndIf
EndIf
If SystemDateMonthInt = 3 Then
If SystemDateDayInt >= 10 Then
Var SwensenPro = 1
EndIf
Var CoconutMilkPro = 1
EndIf
; zone block logic follow ingredent
DEBUGVAR HaveIngredientOvaltine
If HaveIngredientOvaltine = "true" Then
Else
Var OvaltineSchoolPro = 0
Var RedStringOfFatePro = 0
EndIf
DEBUGVAR OvaltineSchoolPro
DEBUGVAR RedStringOfFatePro
Var MainAdvertiseRunSlot = 0
If MainAdvertiseShowSlot = "" Then
Var MainAdvertiseShowSlot = 0
EndIf
Var MainAdvertiseFileName[0] = ""
Var MainAdvertiseFileName[1] = ""
Var MainAdvertiseFileName[2] = ""
Var MainAdvertiseFileName[3] = ""
Var MainAdvertiseFileName[4] = ""
Var MainAdvertiseFileName[5] = ""
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 = 9461310 Then
If CoconutMilkPro = 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_adv14_long_size = "" Then
GetFileSizeK "taobin_project/video/brewing_adv14_long.mp4" brewing_adv14_long_size
EndIf
DEBUGVAR brewing_adv14_long_size
If brewing_adv14_long_size = 5353047 Then
If OvaltineSchoolPro = 1 Then
Var MainAdvertiseFileName[MainAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv14_long.mp4"
Var MainAdvertiseVideoEnd[MainAdvertiseRunSlot] = 0
Var EventTurnOn = 1
Var MainAdvertiseRunSlot = MainAdvertiseRunSlot + 1
EndIf
EndIf
If brewing_adv15_long_size = "" Then
GetFileSizeK "taobin_project/video/brewing_adv15_long.mp4" brewing_adv15_long_size
EndIf
DEBUGVAR brewing_adv15_long_size
If brewing_adv15_long_size = 5579052 Then
If RedStringOfFatePro = 1 Then
Var MainAdvertiseFileName[MainAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv15_long.mp4"
Var MainAdvertiseVideoEnd[MainAdvertiseRunSlot] = 0
Var EventTurnOn = 1
Var MainAdvertiseRunSlot = MainAdvertiseRunSlot + 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
Var PearRequest1 = 0
If BoxID = 201729 Then
Var PearRequest1 = 1
EndIf
If BoxID = 201714 Then
Var PearRequest1 = 1
EndIf
If PearRequest1 = 1 Then
Else
If brewing_adv17_long_size = "" Then
GetFileSizeK "taobin_project/video/brewing_adv17_long.mp4" brewing_adv17_long_size
EndIf
DEBUGVAR brewing_adv17_long_size
If brewing_adv17_long_size = 4984284 Then
If SwensenPro = 1 Then
Var MainAdvertiseFileName[MainAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv17_long.mp4"
Var MainAdvertiseVideoEnd[MainAdvertiseRunSlot] = 0
Var EventTurnOn = 1
Var MainAdvertiseRunSlot = MainAdvertiseRunSlot + 1
EndIf
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
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 = ""
Var ShowButtonClick = "Enable"
Var ShowButtonClickFull = "Invisible"
Var CountDownShowButton = 35
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