THAI: fix free energy flow

This commit is contained in:
Pakin 2024-03-08 18:50:31 +07:00
parent c2d1a443d5
commit 2b8ed36806
7 changed files with 697 additions and 9 deletions

View file

@ -93,6 +93,14 @@
DEBUGVAR PromoPriceDrink
EndIf
If FromPowerUpPro = 1 Then
Var PromoPriceDrink = PriceDrink
Var PriceDrink = OriginalPrice
DEBUGVAR PriceDrink
DEBUGVAR PromoPriceDrink
EndIf
;Var AdultFlag = 1
@ -340,7 +348,7 @@
If FreeEnergyDrink = 1 Then
If SelectDrink = "12-05-02-0035" Then
Var PriceDiff = PriceDrink - 1
Var PriceDiff = PriceDrink - PromoPriceDrink
Var Seeker.VendingCode = "FIX1"
Var Seeker.IntVendingCampaign = PriceDiff
Var Seeker.FreeVendingCampaign = 0
@ -349,8 +357,8 @@
Var Seeker.VendingCampaignRI3 = PriceDiff
Var Seeker.CampaignPPrice = 1
Else
If SelectDrink = "" Then
Var PriceDiff = PriceDrink - 1
If SelectDrink = "12-05-02-0034" Then
Var PriceDiff = PriceDrink - PromoPriceDrink
Var Seeker.VendingCode = "FIX1"
Var Seeker.IntVendingCampaign = PriceDiff
Var Seeker.FreeVendingCampaign = 0