taobin_project/inter/mys/xml/event/tricker.ev

; malaysia



; e-receipt-flag
Var eReceiptFlag = 1

DEBUGVAR eReceiptFlag

;DEBUGVAR SystemDateMonthInt
;DEBUGVAR SystemDateDayInt

; Reset flag away.

Var Propepsi99Enable = 0

; Pro free oreo topping
Var PromotionOreoToppingFreeEnable = 0

; Pro reduce price
Var SetProReduceByBO = 0
Var ProReducedPriceEnable = 0

Var ProMysteryCup = 0


; new_payment
Var New_PaymentInter = 0

If SystemDateMonthInt = 6 Then

	If SystemDateDayInt >= 17 Then
		Var ProMysteryCup = 1
	EndIf

EndIf

If SystemDateMonthInt = 7 Then
	Var ProMysteryCup = 1
EndIf



If XMLProfile = "PromoReduced" Then
	Var SetProReduceByBO = 1
EndIf

DEBUGVAR SetProReduceByBO

; Pay later mode
Var EnablePayLaterMode = 0

; Slide show Video
Var UseSlideShowVideo = 0

Var NoTrickPriceProfile = 0

; zone-refresh-once
WRITE_FILE "/mnt/sdcard/coffeevending/need_refresh_file" "0"

READ_FILE "/mnt/sdcard/coffeevending/need_refresh_file" NeedRefreshStr
STRCONTAIN "1" NeedRefreshStr need_refresh

DEBUGVAR need_refresh



If BoxID = 177746 Then
	Var ProThaiTeaEnable = 0
	Var ProYuzuEnable = 0
	Var PromotionOreoToppingFreeEnable = 0

	;Var ProMelonEnable = 0

	;Var EnablePayLaterMode = 1

	;Var AdvertiseProfile = "00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00"

	Var UseSlideShowVideo = 0

    ;Var ProReducedPriceEnable = 0
	;Var IgnoreProfileFromRunEV = 1

	Var ProMysteryCup = 1
EndIf

If ProMelonEnable = 1 Then
    Var IgnoreProfileFromRunEV = 1
EndIf

If BoxID = 210037 Then
	Var UseSlideShowVideo = 1
EndIf

If BoxID = 210011 Then
	Var UseSlideShowVideo = 1
EndIf

If BoxID = 200002 Then
    Var New_PaymentInter = 1
EndIf

If BoxID = 210055 Then
    Var New_PaymentInter = 1
EndIf

;If BoxID = Something Then
;	Var EnablePayLaterMode = 1
;
;EndIf


If ProMysteryCup = 1 Then
	TRY "/mnt/sdcard/coffeevending/taobin_project/inter/mys/xml/event/mystery_cup/random_list.ev"
	TRY "/mnt/sdcard/coffeevending/taobin_project/inter/mys/xml/event/mystery_cup/check_menu.ev"
	DEBUGVAR "Syncing Pool Done!"
EndIf


DEBUGVAR New_PaymentInter