Breast surgery price fix from sovietmercader

locations/poli

@@ -1420,12 +1420,12 @@ if $ARGS[0] = 'cosmetic1':
 		'Get XXL breast implants - 200,000 <b>₽</b>'
 	end
 	if money >= 200000 and silicone = 0 and fillimplant = 0 and stringimplant = 0:
-		'<a href="exec:brSurTemp = 20 & fillimplant = 1 & gt ''poli'', ''bImplantFill''">Get fillable implants</a> - 200,000 <b>₽</b>'
+		'<a href="exec:brSurTemp = 20 & fillimplant = 1 & gt ''poli'', ''bImplantA''">Get fillable implants</a> - 200,000 <b>₽</b>'
 		else
 		'Get fillable implants - 200,000 <b>₽</b>'
 	end
 	if money >= 250000 and silicone = 0 and fillimplant = 0 and stringimplant = 0:
-		'<a href="exec:brSurTemp = 20 & stringimplant = 1 & gt ''poli'', ''bImplantString''">Get string implants</a> - 250,000 <b>₽</b>'
+		'<a href="exec:brSurTemp = 20 & stringimplant = 1 & gt ''poli'', ''bImplantA''">Get string implants</a> - 250,000 <b>₽</b>'
 		else
 		'Get string implants - 250,000 <b>₽</b>'
 	end
@@ -1530,20 +1530,28 @@ if $ARGS[0] = 'bImplantA':
 	cls
 	minut += 60
 	silicone = brSurTemp
-	money -= 90000
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/cosmeticsur.jpg"></center>'
-	'The surgeon has you strip, put on a gown and lie down on the table. He gives you a mask and tells you: "Just breathe in deeply... we''ll be done before you know it."'
-	'By the time you wake up again, the procedure is complete.'
-
-	act 'Continue':gt 'poli', 'cosmetic1'
-end
-
-if $ARGS[0] = 'bImplantFill':
-	cls
-	minut += 60
-	silicone = brSurTemp
-	money -= 200000
+	! Get String Implants
+	if stringimplant = 1:
+		money -= 250000
+	! Get Fillable Implants
+	elseif fillimplant = 1:
+		money -= 200000
+	! Get XXL Implants
+	elseif silicone = 40:
+		money -= 200000
+	! Get Large Implants
+	elseif silicone = 30:
+		money -= 190000
+	! Get Medium Implants
+	elseif silicone = 20:
+		money -= 180000
+	! Get Small Implants
+	elseif silicone = 10:
+		money -= 170000
+	! Remove any implants
+	elseif silicone = 0:
+		money -= 90000
+	end
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/cosmeticsur.jpg"></center>'
 	'The surgeon has you strip, put on a gown and lie down on the table. He gives you a mask and tells you: "Just breathe in deeply... we''ll be done before you know it."'
@@ -1552,18 +1560,6 @@ if $ARGS[0] = 'bImplantFill':
 	act 'Continue':gt 'poli', 'cosmetic1'
 end
 
-if $ARGS[0] = 'bImplantString':
-	cls
-	minut += 60
-	silicone = brSurTemp
-	money -= 250000
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/cosmeticsur.jpg"></center>'
-	'The surgeon has you strip, put on a gown and lie down on the table. He gives you a mask and tells you: "Just breathe in deeply... we''ll be done before you know it."'
-	'By the time you wake up again, the procedure is complete.'
-
-	act 'Continue':gt 'poli', 'cosmetic1'
-end
 
 --- poli ---------------------------------