THAI: Add TeaTime promotion & FIXED: bug cancel pay with cash will get discount drink in full price

This commit is contained in:
Kenta420 2024-04-02 16:42:19 +07:00
parent 7a500c37ec
commit 9ed5012bf6
178 changed files with 34040 additions and 202 deletions

View file

@ -86,21 +86,21 @@
EndIf
If FromMondayBananaPro = 1 Then
Var PromoPriceDrink = PriceDrink
Var PriceDrink = OriginalPrice
DEBUGVAR PriceDrink
DEBUGVAR PromoPriceDrink
DEBUGVAR PromotionPriceDrink
EndIf
If FromPowerUpPro = 1 Then
Var PromoPriceDrink = PriceDrink
Var PriceDrink = OriginalPrice
DEBUGVAR PriceDrink
DEBUGVAR PromoPriceDrink
DEBUGVAR PromotionPriceDrink
EndIf
Var PriceFromCatalog = PromotionPriceDrink
;Var AdultFlag = 1
@ -315,14 +315,14 @@
EndIf
If FromMondayBananaPro = 1 Then
Var PriceDiff = PriceDrink - PromoPriceDrink
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 = PromoPriceDrink
Var Seeker.CampaignPPrice = PromotionPriceDrink
EndIf
If NightTime = 1 Then
@ -352,7 +352,7 @@
If FreeEnergyDrink = 1 Then
If SelectDrink = "12-05-02-0035" Then
Var PriceDiff = PriceDrink - PromoPriceDrink
Var PriceDiff = PriceDrink - PromotionPriceDrink
Var Seeker.VendingCode = "FIX1"
Var Seeker.IntVendingCampaign = PriceDiff
Var Seeker.FreeVendingCampaign = 0
@ -362,7 +362,7 @@
Var Seeker.CampaignPPrice = 1
Else
If SelectDrink = "12-05-02-0034" Then
Var PriceDiff = PriceDrink - PromoPriceDrink
Var PriceDiff = PriceDrink - PromotionPriceDrink
Var Seeker.VendingCode = "FIX1"
Var Seeker.IntVendingCampaign = PriceDiff
Var Seeker.FreeVendingCampaign = 0