;DEBUGVAR SystemDateMonthInt
;DEBUGVAR SystemDateDayInt

; Reset flag away.
Var OreoDueEnable = 0
Var OreoForFreeEnable = 0
Var SoundBackToSchoolEnable = 0
Var PromotionIDOreoBuyTwoSaveMore = 0
Var BackToSchoolForFreeEnable = 0

Var PepsiProEnable = 0
Var PepsiPromoteVideo = 0
Var PepsiProCodeEnable = 0

Var SoundBackToSchoolType = 0
; End

Var MysteryProEnable = 0

If SystemDateMonthInt = 7 Then
	If SystemDateDayInt = 3 Then
		Var MysteryProEnable = 1
	EndIf
	If SystemDateDayInt = 4 Then
		Var MysteryProEnable = 1
	EndIf
	If SystemDateDayInt = 5 Then
		Var MysteryProEnable = 1
	EndIf
	If SystemDateDayInt = 6 Then
		Var MysteryProEnable = 1
	EndIf
	If SystemDateDayInt = 7 Then
		Var MysteryProEnable = 1
	EndIf
	If SystemDateDayInt = 8 Then
		Var MysteryProEnable = 1
	EndIf
	If SystemDateDayInt = 9 Then
		Var MysteryProEnable = 1
	EndIf
	If SystemDateDayInt = 10 Then
		Var MysteryProEnable = 1
	EndIf
	If SystemDateDayInt = 11 Then
		Var MysteryProEnable = 1
	EndIf
	If SystemDateDayInt = 12 Then
		Var MysteryProEnable = 1
	EndIf
	If SystemDateDayInt = 13 Then
		Var MysteryProEnable = 1
	EndIf	
	If SystemDateDayInt = 14 Then
		Var MysteryProEnable = 1
	EndIf
EndIf

If BoxID = 200001 Then
	Var OreoDueEnable = 0
	Var OreoForFreeEnable = 0
	Var PepsiProEnable = 0
	Var PepsiProCodeEnable = 0
	Var MysteryProEnable = 0
EndIf

If BoxID = 200000 Then
	Var OreoDueEnable = 0
	Var OreoForFreeEnable = 0
	Var PepsiProEnable = 0
	Var PepsiProCodeEnable = 0
	Var MysteryProEnable = 0
EndIf

If BoxID = 173149 Then
	Var OreoDueEnable = 0
	Var OreoForFreeEnable = 0
	Var PepsiProEnable = 0
	Var PepsiProCodeEnable = 0
	Var MysteryProEnable = 0
EndIf



If BoxID = 173149 Then
	Var MysteryProEnable = 1
EndIf

If BoxID = 172053 Then
	Var MysteryProEnable = 1
EndIf


DEBUGVAR MysteryProEnable

If InternationalEnable = 1 Then
	Var PepsiProEnable = 0
	Var PepsiPromoteVideo = 0
	Var PepsiProCodeEnable = 0
	Var MysteryProEnable = 0
EndIf