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

@ -85,6 +85,14 @@
DEBUGVAR PromoPriceDrink
EndIf
If FromMondayBananaPro = 1 Then
Var PromoPriceDrink = PriceDrink
Var PriceDrink = OriginalPrice
DEBUGVAR PriceDrink
DEBUGVAR PromoPriceDrink
EndIf
;Var AdultFlag = 1
@ -294,6 +302,17 @@
Var RerunProCode = ""
EndIf
If FromMondayBananaPro = 1 Then
Var PriceDiff = PriceDrink - PromoPriceDrink
Var Seeker.VendingCode = "PMD10"
Var Seeker.IntVendingCampaign = PriceDiff
Var Seeker.FreeVendingCampaign = 0
Var Seeker.CodeChannel = 1
Var Seeker.CodeNumber = IDNum
Var Seeker.VendingCampaignRI3 = PriceDiff
Var Seeker.CampaignPPrice = PromoPriceDrink
EndIf
If NightTime = 1 Then
If SelectDrink = "12-99-03-0066" Then
Var PriceDrink = 60