THAI: Add Lipit promotion

This commit is contained in:
Kenta420 2024-03-05 17:35:54 +07:00
parent 96d8d558ac
commit 6596d83310
140 changed files with 94033 additions and 203 deletions

View file

@ -69,6 +69,14 @@ Var PepsiSecondCup30Enable = 0
Var PepsiSecondCup30DiscountEnable = 0
Var FromPepsiSecondCup30 = 0
; Enable Lipit Promotion, 18 Mar - 12 Apr
Var LipitPro = 0
Var FromLipitPro = 0
; Enable Monday Banana Promotion, every Monday start 11 Mar - 19 Apr
Var MondayBananaPro = 0
Var FromMondayBananaPro = 0
Var NewCollectPoint = 1
Var NewFlowPaymentCode = 0
@ -150,6 +158,49 @@ If SystemDateMonthInt = 3 Then
EndIf
EndIf
If SystemDateDayInt = 11 Then
Var MondayBananaPro = 1
EndIf
If SystemDateDayInt = 18 Then
Var MondayBananaPro = 1
EndIf
If SystemDateDayInt = 25 Then
Var MondayBananaPro = 1
EndIf
If SystemDateDayInt >= 18 Then
Var LipitPro = 1
EndIf
EndIf
If SystemDateMonthInt = 4 Then
If SystemDateDayInt = 1 Then
Var MondayBananaPro = 1
EndIf
If SystemDateDayInt = 8 Then
Var MondayBananaPro = 1
EndIf
If SystemDateDayInt = 15 Then
Var MondayBananaPro = 1
EndIf
If SystemDateDayInt = 22 Then
Var MondayBananaPro = 1
EndIf
If SystemDateDayInt = 29 Then
Var MondayBananaPro = 1
EndIf
If SystemDateDayInt <= 12 Then
Var LipitPro = 1
EndIf
EndIf
@ -181,10 +232,12 @@ If BoxID = 201316 Then
EndIf
If BoxID = 105005 Then
Var ProBadValentineEnable = 0
Var PepsiSecondCup30Enable = 1
Var PepsiSecondCup30DiscountEnable = 1
Var PepsiSecondCup30Enable = 0
Var PepsiSecondCup30DiscountEnable = 0
Var NewFlowPaymentCode = 1
Var LipitPro = 1
Var MondayBananaPro = 1
EndIf
If BoxID = 172644 Then
@ -224,6 +277,24 @@ If BoxID = 200435 Then
Var ProBadValentineEnable = 1
EndIf
; can not have Promotion
If BoxID = 172269 Then
Var PepsiSecondCup30Enable = 0
Var PepsiSecondCup30DiscountEnable = 0
Var LipitPro = 0
EndIf
If BoxID = 200773 Then
Var PepsiSecondCup30Enable = 0
Var PepsiSecondCup30DiscountEnable = 0
Var LipitPro = 0
EndIf
If BoxID = 173791 Then
Var PepsiSecondCup30Enable = 0
Var PepsiSecondCup30DiscountEnable = 0
Var LipitPro = 0
EndIf
Var GameEnableFromTrickerEv = 1