; malaysia


;DEBUGVAR SystemDateMonthInt
;DEBUGVAR SystemDateDayInt

; Reset flag away.

Var Propepsi99Enable = 0

; FruityRaya Promo
Var FruityRayaEnable = 0
Var FromFruityRaya = 0

; ThaiTea Promo
Var ProThaiTeaEnable = 0
Var FromProThaiTea = 0

; Yuzu Promo
Var ProYuzuEnable = 0
Var FromProYuzu = 0

If SystemDateMonthInt = 6 Then
	If SystemDateDayInt >= 15 Then
		Var ProThaiTeaEnable = 1
	Else
		Var ProThaiTeaEnable = 0
	EndIf
EndIf


If SystemDateMonthInt = 7 Then
    Var ProThaiTeaEnable = 1

    If SystemDateDayInt >= 15 Then
		Var ProYuzuEnable = 1
    Else
    	Var ProYuzuEnable = 0
    EndIf
EndIf

If SystemDateMonthInt = 8 Then
	If SystemDateDayInt < 31 Then
		Var ProThaiTeaEnable = 1
		Var ProYuzuEnable = 1
	Else
		Var ProThaiTeaEnable = 0
		Var ProYuzuEnable = 0
	EndIf
EndIf

If BoxID = 177746 Then
	Var ProThaiTeaEnable = 1
	Var ProYuzuEnable = 1
EndIf