|
@@ -626,16 +626,20 @@ if ARGS[0] = 9:
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/condoms.jpg"></center>'
|
|
|
- tovpay = 80
|
|
|
+ !!Normal price 500/5, Market price is 50-250
|
|
|
+ tempdiscount = rand(0,20)
|
|
|
+ tovpay = 250 - (tempdiscount*10)
|
|
|
'You see a booth selling condoms for <<tovpay>> <b>₽</b>.'
|
|
|
if money >= tovpay:
|
|
|
- act 'Buy condoms (80 <b>₽</b>)':
|
|
|
+ act 'Buy condoms (<<tovpay>> <b>₽</b>)':
|
|
|
cls
|
|
|
minut += 15
|
|
|
prezik += 5
|
|
|
i = 5
|
|
|
- :cndmlp
|
|
|
- if rand(0,49)-6*(8-tovpay/10) <= 0:badprezik += 1
|
|
|
+ !!Increasing risk of bad condom with higher discount; 5% at 250, max 75% at 100 (or less)
|
|
|
+ if tempdiscount > 15: tempdiscount = 15
|
|
|
+ :cndmlp
|
|
|
+ if rand(0,20) <= tempdiscount:badprezik += 1
|
|
|
if i > 0: i-= 1 & jump 'cndmlp'
|
|
|
killvar 'i'
|
|
|
money -= tovpay
|
|
@@ -805,14 +809,18 @@ if ARGS[0] = 19:
|
|
|
minut += 5
|
|
|
gs 'stat'
|
|
|
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/birthcontrolpills.jpg"></center>'
|
|
|
- tovpay = 1500
|
|
|
+ !Normal price 1870, Market price is 750-1750/pack
|
|
|
+ tempdiscount = rand(0,40)
|
|
|
+ tovpay = 1750 - (tempdiscount*50)
|
|
|
'You see a booth selling birth control pills for <<tovpay>> <b>₽</b>.'
|
|
|
if money >= tovpay:
|
|
|
- act 'Buy birth control pills (1500 <b>₽</b>)':
|
|
|
+ act 'Buy birth control pills (<<tovpay>> <b>₽</b>)':
|
|
|
cls
|
|
|
minut += 15
|
|
|
tabletki += 1
|
|
|
- if rand(0,49) - (6*(8-tovpay/50)) <= 0:
|
|
|
+
|
|
|
+ !Rising chance of bad pills based on price: 2% at 1750/pack, 80% at 750/pack
|
|
|
+ if rand(0,50) <= tempdiscount:
|
|
|
temp = rand(0,3)
|
|
|
if temp = 0:
|
|
|
tabletkiold += 1 & !Pills are expired and less effective
|