Fixed City Clinic

sugarcube/src/locations/city/city_clinic.tw

@@ -1,46 +1,36 @@
-:: city_clinic
-<<set $here = 'city_clinic'>>
-<<set $ARGS = $location_var[$here]>>
-<<set $location_type = 'public_indoors'>>
-<<if $location_var[$here][0] == 'start'>>
-	<<set $sexloc = 'city_clinic'>>
-	<<set $loc = 'city_clinic'>>
-	<<set $loc_arg = 'start'>>
-	<<set $location_type = 'indoors'>>
-	<<set $menu_loc = 'city_clinic'>>
-	<<set $menu_arg = 'start'>>
-	<<set $menu_off = 0>>
-	<<set $hosprand = rand(0, 10)>>
-	<<set $time.minutes += 5>>
+:: city_clinic[public indoors]
 	
+	<<ConnectedLocation 'Leave' 'city_residential' '' 'locations/city/residential/street.jpg' 5>>
+
 	<h2>Clinic</h2>
 	<<image "locations/shared/clinic/poli.jpg">>
-	A sign inside the clinic lists some of the services the clinic has to offer:
+	/*A sign inside the clinic lists some of the services the clinic has to offer:
 	<i>General practitioner: currently available
 	Psychotherapist: currently available
 	<p>STD testing - 1,000 <b>₽</b>.</p>
-	For hospital admissions, visit us on a Monday before the 10th of the month.
-	<p>An abortion at the woman's request can be performed up until the 84th day of pregnancy - 15,000 <b>₽</b>.</p>
-	Be warned, improperly performed abortions can be dangerous to your health. There is a risk of complications and the possibility of damage to your uterus.</i>
+	For hospital admissions, visit us on a Monday before the 10th of the month.*/
+	<p>An abortion at the woman's request can be performed up until the 84th day of pregnancy - <<money 15000>>.</p>
+	<p><i>Be warned, improperly performed abortions can be dangerous to your health. There is a risk of complications and the possibility of damage to your uterus.</i></p>
 	<p>At first, you thought the warning was only health department boiler-plate. However, no sooner do you finish thinking that then you notice a nurse pushing a cart of freshly sterilized coat hangers down the hallway and begin to wonder how competent this facility really is in terms of women's health...</p>
-	One area of the clinic is devoted to cosmetic surgery. A sign with directions on the wall point you to the surgeon''s office.
-	<<if getvar("$pcs_gpolimilkdonation") >= 2 and getvar("$lactation['active']") > 0 and getvar("$lact_ev['pcs_knows_milkbank']") < 1 and getvar("$lactation['pc_aware']") > 0>>
+	One area of the clinic is devoted to cosmetic surgery. A sign with directions on the wall point you to the surgeon's office.
+	/*<<if getvar("$pcs_gpolimilkdonation") >= 2 and getvar("$lactation['active']") > 0 and getvar("$lact_ev['pcs_knows_milkbank']") < 1 and getvar("$lactation['pc_aware']") > 0>>
 		'<<link 'Ask'>><<setn $time.minutes += 5>><<gt  'city_clinic'  'milk_reception'>><</link>> at the reception if there is the possibilty for breast milk donation'
 	<<elseif getvar("$pcs_gpolimilkdonation") < 2 and getvar("$lactation['active']") > 0 and getvar("$lact_ev['pcs_knows_milkbank']") < 1 and getvar("$lactation['pc_aware']") > 0>>
 		'A small <<link 'advertisement'>><<setn $time.minutes += 5>><<gt  'city_clinic'  'milk_advertisement'>><</link>> at reception catches your eye.'
 	<</if>>
 	<<if getvar("$workhosp") == 1 and $time.hour >= 8 and $time.hour <= 9 and $time.weekday < 6>>
 		<<actCLA 'Begin your work day'>>
-	<<gt 'city_clinic' 'beginwork'>>
-<</actCLA>>
+			<<gt 'city_clinic' 'beginwork'>>
+		<</actCLA>>
 
 	<</if>>
-	<<actCLA 'Leave the clinic'>>
-		<<set $time.minutes += 5>> <<gt 'city_residential'>>
-	<</actCLA>>
+	*/
+
 	<<actCLA 'See a cosmetic surgeon'>>
-		<<gt 'city_clinic' 'cosmetic1'>>
+		<<gt 'clinic_cosmeticSurgeon'>>
 	<</actCLA>>
+
+:: clinic_old[deprecated]
 	<<if getvar("$lact_ev['pcs_knows_milkbank']") >= 1>>
 		<<actCLA 'Go to the breast milk donation office'>>
 			<<set $time.minutes += 5>> <<gt 'city_clinic' 'milk_donation_room'>>
@@ -1188,19 +1178,20 @@
 		<</actCLA>>
 	<</actCLA>>
 <</if>>
-<<if $location_var[$here][0] == 'cosmetic1'>>
-	<<set $menu_off = 1>>
+
+:: clinic_cosmeticSurgeon[quest]
 	<<image "locations/city/residential/clinic/cosmetic1.jpg">>
-	You're greeted by a nurse who explains what procedures are available.
-	"Electrolysis will remove your body hair and stop it from growing."
-	"Fillable breast implants allow you to fill them after the surgery. We stock silicone you use to fill them."
-	"String implants slowly absorb your body fluids and grow larger over time. We can also drain it for you if it becomes too large."
-	<<if $finances.cash >= 80000 and getvar("$lashair") == 0>>
-		<<link "Electrolysis">><<gt 'city_clinic' 'electrolysis'>><</link>> laser hair removal of legs and pubic area - 80,000 <b>₽</b>
-	<<else>>
-		<p>Electrolysis - laser hair removal of legs and pubic area - 80,000 <b>₽</b></p>
-	<</if>>
-	<<if $finances.cash >= 25000 and $pc.lip_size < 4>>
+	<p>You're greeted by a nurse who explains what procedures are available.</p>
+	<p>"Electrolysis will remove your body hair and stop it from growing."</p>
+	<p>"Fillable breast implants allow you to fill them after the surgery. We stock silicone you use to fill them."</p>
+	<p>"String implants slowly absorb your body fluids and grow larger over time. We can also drain it for you if it becomes too large."</p>
+
+	<<act 'Electrolysis' undefined `{cost:{both:80000}}`>>
+		<<gt 'clinic_cosmeticSurgeon_electrolysis'>>
+	<</act>>
+	<p>Electrolysis - laser hair removal of legs and pubic area - 80,000 <b>₽</b></p>
+
+	/*<<if $finances.cash >= 25000 and $pc.lip_size < 4>>
 		<<link "Lip enlargement surgery">><<gt 'city_clinic' 'lipPlus'>><</link>> - 25,000 <b>₽</b>
 	<<else>>
 		<p>Lip enlargement surgery - 25,000 <b>₽</b></p>
@@ -1270,23 +1261,22 @@
 		<<link "Buy silicone bag">><<set $siliconeBag +  = 1>> <<set $finances.cash -  = 500>> <<msg ''You buy a silicone bag.''>><</link>> - 500 <b>₽</b>
 	<<else>>
 		<p>Buy silicone bag - 500 <b>₽</b></p>
-	<</if>>
+	<</if>>*/
 	<<actCLA 'Go back'>>
-		<<gt 'city_clinic' 'start'>>
+		<<gt 'city_clinic'>>
 	<</actCLA>>
-<</if>>
-<<if $location_var[$here][0] == 'electrolysis'>>
-	<<set $time.minutes += 120>>
+
+:: clinic_cosmeticSurgeon_electrolysis[event]
+	<<addtime 120>>
 	<<set $pc.legHair = 0>>
 	<<set $pc.pcs_pubes = 0>>
 	<<set $lashair = 1>>
-	<<set $finances.cash -= 80000>>
 	<<image "locations/city/residential/clinic/electrolysis.jpg">>
 	The surgeon has you strip completely and lie down on the table. Over the next few hours, you're treated by a laser over and over again. When the treatment is finished and you get up from the table, your skin feels silky smooth.
-	<<actCLA 'Continue'>>
-		<<gt 'city_clinic' 'cosmetic1'>>
-	<</actCLA>>
-<</if>>
+	<<act 'Continue'>>
+		<<gt 'clinic_cosmeticSurgeon'>>
+	<</act>>
+:: clinic_cosmeticSurgeon_deprecated[deprecated]
 <<if $location_var[$here][0] == 'lipPlus'>>
 	<<set $time.minutes += 60>>
 	<<set $pc.lip_size += 1>>
@@ -1295,7 +1285,7 @@
 	The surgeon has you strip, put on a gown and lie down on the table, where he gives you a mask. "Just breathe in deeply. We'll be done before you know it."
 	When you wake up, the procedure is complete and your lips are fuller.
 	<<actCLA 'Continue'>>
-		<<gt 'city_clinic' 'cosmetic1'>>
+		<<gt 'clinic_cosmeticSurgeon'>>
 	<</actCLA>>
 <</if>>
 <<if $location_var[$here][0] == 'lipMin'>>
@@ -1306,7 +1296,7 @@
 	The surgeon has you strip, put on a gown and lie down on the table, where he gives you a mask. "Just breathe in deeply. We'll be done before you know it."
 	When you wake up, the procedure is complete and your lips are thinner.
 	<<actCLA 'Continue'>>
-		<<gt 'city_clinic' 'cosmetic1'>>
+		<<gt 'clinic_cosmeticSurgeon'>>
 	<</actCLA>>
 <</if>>
 <<if $location_var[$here][0] == 'eyePlus'>>
@@ -1317,7 +1307,7 @@
 	The surgeon has you strip, put on a gown and lie down on the table, where he gives you a mask. "Just breathe in deeply. We'll be done before you know it."
 	When you wake up again, the procedure is complete and your eyes are larger.
 	<<actCLA 'Continue'>>
-		<<gt 'city_clinic' 'cosmetic1'>>
+		<<gt 'clinic_cosmeticSurgeon'>>
 	<</actCLA>>
 <</if>>
 <<if $location_var[$here][0] == 'eyeMin'>>
@@ -1328,7 +1318,7 @@
 	The surgeon has you strip, put on a gown and lie down on the table, where he gives you a mask. "Just breathe in deeply. We'll be done before you know it."
 	When you wake up, the procedure is complete and your eyes are smaller.
 	<<actCLA 'Continue'>>
-		<<gt 'city_clinic' 'cosmetic1'>>
+		<<gt 'clinic_cosmeticSurgeon'>>
 	<</actCLA>>
 <</if>>
 <<if $location_var[$here][0] == 'lyposuction'>>
@@ -1344,7 +1334,7 @@
 	The surgeon has you strip, put on a gown and lie down on the table, where he gives you a mask. "Just breathe in deeply. We'll be done before you know it."
 	When you wake up, the procedure is complete and you're looking thinner.
 	<<actCLA 'Continue'>>
-		<<gt 'city_clinic' 'cosmetic1'>>
+		<<gt 'clinic_cosmeticSurgeon'>>
 	<</actCLA>>
 <</if>>
 <<if $location_var[$here][0] == 'bImplantA'>>
@@ -1376,7 +1366,7 @@
 	The surgeon has you strip, put on a gown and lie down on the table, where he gives you a mask. "Just breathe in deeply... we'll be done before you know it."
 	When you wake up again, the procedure is complete and you look down at your new breasts.
 	<<actCLA 'Continue'>>
-		<<gt 'city_clinic' 'cosmetic1'>>
+		<<gt 'clinic_cosmeticSurgeon'>>
 	<</actCLA>>
 <</if>>
 <<if $location_var[$here][0] == 'milk_advertisement'>>