taobin_project/video/script3_first_brewing.ev
wanlop run b360975c28 Do
2025-01-27 15:36:51 +07:00

368 lines
No EOL
10 KiB
Text

; Need var brew_vdo1
; Need var brew_txt1
If BrewingAdvertiseShowSlot = "" Then
Var BrewingAdvertiseShowSlot = 0
EndIf
Var PremiumTriosEnable = 0
Var GiftNewYearEnable = 0
If SystemDateMonthInt = 10 Then
If SystemDateDayInt > 21 Then
Var EDC_ThailandOn = 1
EndIf
EndIf
If BoxID = 175599 Then
Var ShopeePayLaterOn = 0
EndIf
If BoxID = 172420 Then
Var ShopeePayLaterOn = 0
EndIf
;
;
;
;
;
;
;
;
;
Var BrewingAdvertiseEnable[0] = 0
Var BrewingAdvertiseEnable[1] = 0
Var BrewingAdvertiseEnable[2] = 0
Var BrewingAdvertiseEnable[3] = 0
Var BrewingAdvertiseEnable[4] = 0
Var BrewingAdvertiseEnable[5] = 0
Var BrewingAdvertiseEnable[6] = 0
Var BrewingAdvertiseEnable[7] = 0
DEBUGVAR RobinsonBeautyPro
DEBUGVAR EDC_ThailandOn
DEBUGVAR ShopeePayLaterOn
Var BrewingAdvertiseRunSlot = 0
Var BrewingAdvertiseEnable[ BrewingAdvertiseRunSlot] = 1
Var BrewingAdvertiseVideo[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/image/page_doing/tao_adv1.png";
If show_eng = "true" Then
Var BrewingAdvertiseImage[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv1_en.png"
Else
Var BrewingAdvertiseImage[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv1.png"
EndIf
Var BrewingAdvertiseDurationTime[BrewingAdvertiseRunSlot] = 10
Var BrewingAdvertiseShowTextNextToOrder[ BrewingAdvertiseRunSlot] = 1
Var BrewingAdvertiseRunSlot = BrewingAdvertiseRunSlot + 1
If brewing_adv11_size = "" Then
GetFileSizeK "taobin_project/video/brewing_adv11.mp4" brewing_adv11_size
EndIf
DEBUGVAR brewing_adv11_size
If brewing_adv11_size = 18065754 Then
If WinterWonderPro = 1 Then
Var BrewingAdvertiseEnable[ BrewingAdvertiseRunSlot] = 1
Var BrewingAdvertiseVideo[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv11.mp4";
If show_eng = "true" Then
Var BrewingAdvertiseImage[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv11_en.png"
Else
Var BrewingAdvertiseImage[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv11.png"
EndIf
Var BrewingAdvertiseDurationTime[BrewingAdvertiseRunSlot] = 15
Var BrewingAdvertiseShowTextNextToOrder[ BrewingAdvertiseRunSlot] = 0
;Var BrewingAdvertiseRunSlot = BrewingAdvertiseRunSlot + 1
EndIf
EndIf
If brewing_adv12_size = "" Then
GetFileSizeK "taobin_project/video/brewing_adv12.mp4" brewing_adv12_size
EndIf
DEBUGVAR brewing_adv12_size
If brewing_adv12_size = 3687715 Then
If ShopeePayLaterOn = 1 Then
Var BrewingAdvertiseEnable[ BrewingAdvertiseRunSlot] = 1
Var BrewingAdvertiseVideo[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv12.mp4";
If show_eng = "true" Then
Var BrewingAdvertiseImage[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv12_en.png"
Else
Var BrewingAdvertiseImage[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv12.png"
EndIf
Var BrewingAdvertiseDurationTime[BrewingAdvertiseRunSlot] = 15
Var BrewingAdvertiseShowTextNextToOrder[ BrewingAdvertiseRunSlot] = 0
Var BrewingAdvertiseRunSlot = BrewingAdvertiseRunSlot + 1
EndIf
EndIf
If brewing_adv13_size = "" Then
GetFileSizeK "taobin_project/video/brewing_adv13.mp4" brewing_adv13_size
EndIf
DEBUGVAR brewing_adv13_size
If brewing_adv13_size = 1919848 Then
If StrawberrySeriesPro = 1 Then
Var BrewingAdvertiseEnable[ BrewingAdvertiseRunSlot] = 1
Var BrewingAdvertiseVideo[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv13.mp4";
If show_eng = "true" Then
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv13_en.png"
Else
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv13.png"
EndIf
Var BrewingAdvertiseDurationTime[BrewingAdvertiseRunSlot] = 12
Var BrewingAdvertiseShowTextNextToOrder[ BrewingAdvertiseRunSlot] = 0
Var BrewingAdvertiseRunSlot = BrewingAdvertiseRunSlot + 1
EndIf
EndIf
If brewing_adv14_size = "" Then
GetFileSizeK "taobin_project/video/brewing_adv14.mp4" brewing_adv14_size
EndIf
DEBUGVAR brewing_adv14_size
If brewing_adv14_size = 9260622 Then
If OvaltineSchoolPro = 1 Then
Var BrewingAdvertiseEnable[ BrewingAdvertiseRunSlot] = 1
Var BrewingAdvertiseVideo[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv14.mp4";
If show_eng = "true" Then
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv14_en.png"
Else
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv14.png"
EndIf
Var BrewingAdvertiseDurationTime[BrewingAdvertiseRunSlot] = 15
Var BrewingAdvertiseShowTextNextToOrder[ BrewingAdvertiseRunSlot] = 0
Var BrewingAdvertiseRunSlot = BrewingAdvertiseRunSlot + 1
EndIf
EndIf
If brewing_adv15_size = "" Then
GetFileSizeK "taobin_project/video/brewing_adv15.mp4" brewing_adv15_size
EndIf
DEBUGVAR brewing_adv15_size
If brewing_adv15_size = 9493162 Then
If RedStringOfFatePro = 1 Then
Var BrewingAdvertiseEnable[ BrewingAdvertiseRunSlot] = 1
Var BrewingAdvertiseVideo[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv15.mp4";
If show_eng = "true" Then
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv15_en.png"
Else
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv15.png"
EndIf
Var BrewingAdvertiseDurationTime[BrewingAdvertiseRunSlot] = 15
Var BrewingAdvertiseShowTextNextToOrder[ BrewingAdvertiseRunSlot] = 0
Var BrewingAdvertiseRunSlot = BrewingAdvertiseRunSlot + 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 BrewingAdvertiseEnable[ BrewingAdvertiseRunSlot] = 1
Var BrewingAdvertiseVideo[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv16.mp4";
If show_eng = "true" Then
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv16_en.png"
Else
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv16.png"
EndIf
Var BrewingAdvertiseDurationTime[BrewingAdvertiseRunSlot] = 18
Var BrewingAdvertiseShowTextNextToOrder[ BrewingAdvertiseRunSlot] = 0
Var BrewingAdvertiseRunSlot = BrewingAdvertiseRunSlot + 1
EndIf
EndIf
If brewing_adv17_size = "" Then
GetFileSizeK "taobin_project/video/brewing_adv17.mp4" brewing_adv17_size
EndIf
DEBUGVAR brewing_adv17_size
If brewing_adv17_size = 10348323 Then
If PremiumTriosEnable = 1 Then
Var BrewingAdvertiseEnable[ BrewingAdvertiseRunSlot] = 1
Var BrewingAdvertiseVideo[ BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv17.mp4"
If show_eng = "true" Then
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv17_en.png"
Else
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv17.png"
EndIf
Var BrewingAdvertiseDurationTime[BrewingAdvertiseRunSlot] = 13
Var BrewingAdvertiseShowTextNextToOrder[ BrewingAdvertiseRunSlot] = 0
Var BrewingAdvertiseRunSlot = BrewingAdvertiseRunSlot + 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 BrewingAdvertiseEnable[BrewingAdvertiseRunSlot] = 1
Var BrewingAdvertiseVideo[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv16.mp4";
If show_eng = "true" Then
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv16_en.png"
Else
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv16.png"
EndIf
Var BrewingAdvertiseDurationTime[BrewingAdvertiseRunSlot] = 18
Var BrewingAdvertiseShowTextNextToOrder[ BrewingAdvertiseRunSlot] = 0
Var BrewingAdvertiseRunSlot = BrewingAdvertiseRunSlot + 1
EndIf
EndIf
If brewing_adv21_size = "" Then
GetFileSizeK "taobin_project/video/brewing_adv21.mp4" brewing_adv21_size
EndIf
DEBUGVAR brewing_adv21_size
If brewing_adv21_size = 9701195 Then
If ThickTeaByBrewerPro = 1 Then
Var BrewingAdvertiseEnable[BrewingAdvertiseRunSlot] = 1
Var BrewingAdvertiseVideo[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_adv21.mp4"
If show_eng = "true" Then
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv21_en.png"
Else
Var BrewingAdvertiseImage[BrewingAdvertiseRunSlot] = "ROOT/taobin_project/video/brewing_txt_adv21.png"
EndIf
Var BrewingAdvertiseDurationTime[BrewingAdvertiseRunSlot] = 13
Var BrewingAdvertiseShowTextNextToOrder[ BrewingAdvertiseRunSlot] = 0
Var BrewingAdvertiseRunSlot = BrewingAdvertiseRunSlot + 1
EndIf
EndIf
DEBUGVAR BrewingAdvertiseRunSlot
;Var BrewingAdvertiseShowSlot = SaveSlotForTest
DEBUGVAR BrewingAdvertiseShowSlot
DEBUGVAR BrewingAdvertiseDurationTime[BrewingAdvertiseShowSlot]
Var brew_vdo1 = BrewingAdvertiseVideo[BrewingAdvertiseShowSlot]
Var brew_txt1 = BrewingAdvertiseImage[BrewingAdvertiseShowSlot]
Var adver_brewing_count_down = BrewingAdvertiseDurationTime[BrewingAdvertiseShowSlot]
DEBUGVAR BrewingAdvertiseShowTextNextToOrder[BrewingAdvertiseShowSlot]
If BrewingAdvertiseShowTextNextToOrder[BrewingAdvertiseShowSlot] = 1 Then
Var SelectMenuBetweenBrewEnable1Blink = "Enable"
Var SelectMenuBetweenBrewEnable1Text = "Enable"
Else
Var SelectMenuBetweenBrewEnable1Blink = "Invisible"
Var SelectMenuBetweenBrewEnable1Text = "Invisible"
EndIf
DEBUGVAR brew_vdo1
DEBUGVAR brew_txt1
DEBUGVAR SelectMenuBetweenBrewEnable1Blink
DEBUGVAR SelectMenuBetweenBrewEnable1Text
DEBUGVAR BrewingAdvertiseEnable[0]
DEBUGVAR BrewingAdvertiseEnable[1]
DEBUGVAR BrewingAdvertiseEnable[2]
DEBUGVAR BrewingAdvertiseEnable[3]
DEBUGVAR BrewingAdvertiseEnable[4]
DEBUGVAR BrewingAdvertiseVideo[0]
DEBUGVAR BrewingAdvertiseVideo[1]
DEBUGVAR BrewingAdvertiseVideo[2]
DEBUGVAR BrewingAdvertiseVideo[3]
DEBUGVAR BrewingAdvertiseVideo[4]
Var BrewingAdvertiseShowSlot = BrewingAdvertiseShowSlot + 1
DEBUGVAR BrewingAdvertiseEnable[BrewingAdvertiseShowSlot]
If BrewingAdvertiseEnable[BrewingAdvertiseShowSlot] = 0 Then
Var BrewingAdvertiseShowSlot = 0
EndIf
If BrewingAdvertiseEnable[BrewingAdvertiseShowSlot] = "" Then
Var BrewingAdvertiseShowSlot = 0
EndIf
DEBUGVAR BrewingAdvertiseShowSlot
Var script3_brewing_ignore = "set"