Add Wednesday melon promotion (not test yet)

This commit is contained in:
Kenta420 2024-05-07 17:56:23 +07:00
parent 658a70ff53
commit fd032aa287
95 changed files with 70322 additions and 9124 deletions

View file

@ -321,6 +321,17 @@
Var Seeker.CampaignPPrice = PromotionPriceDrink
EndIf
If FromWednesdayMelonPro = 1 Then
Var PriceDiff = PriceDrink - PromotionPriceDrink
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 = PromotionPriceDrink
EndIf
If NightTime = 1 Then
If SelectDrink = "12-99-03-0066" Then
Var PriceDrink = 60