Merge branch 'indenture-restrictions-for-surgerya' into 'pregmod-master'

Indenture restrictions applied to more surgeries

See merge request pregmodfan/fc-pregmod!5789

src/uncategorized/remoteSurgery.tw

@@ -133,18 +133,25 @@
 	$He has <<print App.Desc.eyesType($activeSlave)>><<if hasAnyEyes($activeSlave)>>, they are <<print App.Desc.eyesVision($activeSlave)>><</if>>.
 	/* eye blur and fix */
 	<<if hasAnyEyes($activeSlave)>>
-		<<set _n = 0>>
-		<<if getLeftEyeVision($activeSlave) === 2 && getLeftEyeType($activeSlave) === 1>>
-			<<set _n++>>
-			| [[Blur left eye|Surgery Degradation][eyeSurgery($activeSlave, "left", "blur"), cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,5), $surgeryType = "eyeBlur"]]
-		<</if>>
-		<<if getRightEyeVision($activeSlave) === 2 && getRightEyeType($activeSlave) === 1>>
-			<<set _n++>>
-			| [[Blur right eye|Surgery Degradation][eyeSurgery($activeSlave, "right", "blur"), cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,5), $surgeryType = "eyeBlur"]]
-		<</if>>
-		<<if _n === 2>>
-			| [[Blur both eyes|Surgery Degradation][eyeSurgery($activeSlave, "both", "blur"), cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,10), $surgeryType = "eyeBlur"]]
+		/* Blur eyes*/
+		<<if $activeSlave.indentureRestrictions > 1>>
+			//$His indenture forbids elective surgery//
+		<<else>>
+			<<set _n = 0>>
+			<<if getLeftEyeVision($activeSlave) === 2 && getLeftEyeType($activeSlave) === 1>>
+				<<set _n++>>
+				| [[Blur left eye|Surgery Degradation][eyeSurgery($activeSlave, "left", "blur"), cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,5), $surgeryType = "eyeBlur"]]
+			<</if>>
+			<<if getRightEyeVision($activeSlave) === 2 && getRightEyeType($activeSlave) === 1>>
+				<<set _n++>>
+				| [[Blur right eye|Surgery Degradation][eyeSurgery($activeSlave, "right", "blur"), cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,5), $surgeryType = "eyeBlur"]]
+			<</if>>
+			<<if _n === 2>>
+				| [[Blur both eyes|Surgery Degradation][eyeSurgery($activeSlave, "both", "blur"), cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,10), $surgeryType = "eyeBlur"]]
+			<</if>>
 		<</if>>
+
+		/* Fix eyes */
 		<<set _n = 0>>
 		<<if getLeftEyeVision($activeSlave) === 1 && getLeftEyeType($activeSlave) === 1>>
 			<<set _n++>>
@@ -547,8 +554,13 @@
 		$He has <<= App.Desc.expandScarString($activeSlave, "left cheek")>> on $his left cheek.
 		[[Remove all scars there|Surgery Degradation][delete $activeSlave.scar["left cheek"], cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,5), $surgeryType = "scarRemov"]]
 	<<else>>
-		$His face is unscarred. [[Give a menacing scar|Surgery Degradation][App.Medicine.Modification.addScar($activeSlave, "left cheek", "menacing"), cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,5), $surgeryType = "scarFear"]] |
-		[[Give an exotic scar|Surgery Degradation][App.Medicine.Modification.addScar($activeSlave, "left cheek", "exotic"), cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,5), $surgeryType = "scarExo"]]
+		$His face is unscarred.
+		<<if $activeSlave.indentureRestrictions > 1>>
+			//$His indenture forbids elective surgery//
+		<<else>>
+			[[Give a menacing scar|Surgery Degradation][App.Medicine.Modification.addScar($activeSlave, "left cheek", "menacing"), cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,5), $surgeryType = "scarFear"]] |
+			[[Give an exotic scar|Surgery Degradation][App.Medicine.Modification.addScar($activeSlave, "left cheek", "exotic"), cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,5), $surgeryType = "scarExo"]]
+		<</if>>
 	<</if>>
 </div>
 
@@ -1064,23 +1076,27 @@
 		</div>
 
 		<div class="indent">
-			<<if $activeSlave.ovaImplant != 0>>
-				<<switch $activeSlave.ovaImplant>>
-				<<case "fertility">>
-					They have fertility implants attached to them.
-					[[Remove implants|Surgery Degradation][$activeSlave.ovaImplant = 0,cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,10),$surgeryType = "ovaImplant removed"]]
-				<<case "sympathy">>
-					They are linked via implants and ovulate in concert.
-					[[Remove implants|Surgery Degradation][$activeSlave.ovaImplant = 0,cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,10),$surgeryType = "ovaImplant removed"]]
-				<<case "asexual">>
-					One has been replaced with a sperm producing analog for self-fertilization.
-				<</switch>>
+			<<if $activeSlave.indentureRestrictions > 0>>
+				//$His indenture forbids invasive elective surgery//
 			<<else>>
-				<<if $fertilityImplant == 1>>
-					[[Install fertility implants|Surgery Degradation][$activeSlave.ovaImplant = "fertility",cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,10),$surgeryType = "ovaImplant added"]]
-				<</if>>
-				<<if $sympatheticOvaries == 1>>
-					[[Install sympathetic ovulation implants|Surgery Degradation][$activeSlave.ovaImplant = "sympathy",cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,10),$surgeryType = "ovaImplant added"]]
+				<<if $activeSlave.ovaImplant != 0>>
+					<<switch $activeSlave.ovaImplant>>
+					<<case "fertility">>
+						They have fertility implants attached to them.
+						[[Remove implants|Surgery Degradation][$activeSlave.ovaImplant = 0,cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,10),$surgeryType = "ovaImplant removed"]]
+					<<case "sympathy">>
+						They are linked via implants and ovulate in concert.
+						[[Remove implants|Surgery Degradation][$activeSlave.ovaImplant = 0,cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,10),$surgeryType = "ovaImplant removed"]]
+					<<case "asexual">>
+						One has been replaced with a sperm producing analog for self-fertilization.
+					<</switch>>
+				<<else>>
+					<<if $fertilityImplant == 1>>
+						[[Install fertility implants|Surgery Degradation][$activeSlave.ovaImplant = "fertility",cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,10),$surgeryType = "ovaImplant added"]]
+					<</if>>
+					<<if $sympatheticOvaries == 1>>
+						[[Install sympathetic ovulation implants|Surgery Degradation][$activeSlave.ovaImplant = "sympathy",cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), surgeryDamage($activeSlave,10),$surgeryType = "ovaImplant added"]]
+					<</if>>
 				<</if>>
 			<</if>>
 		</div>
@@ -1365,7 +1381,11 @@
 	<<set _pubertyAge = Math.min($activeSlave.pubertyAgeXX, $activeSlave.pubertyAgeXY)>>
 	<<if $activeSlave.bald == 0 && $activeSlave.hStyle != "bald">>
 		$He naturally grows $activeSlave.origHColor hair from $his head.
-		[["Surgically remove " + $his + " ability to grow hair"|Surgery Degradation][cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave),$activeSlave.bald = 1,$surgeryType = "hair removal"]]
+		<<if $activeSlave.indentureRestrictions > 1>>
+			//$His indenture forbids elective surgery//
+		<<else>>
+			[["Surgically remove " + $his + " ability to grow hair"|Surgery Degradation][cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave),$activeSlave.bald = 1,$surgeryType = "hair removal"]]
+		<</if>>
 	<<else>>
 		$He is no longer capable of growing hair on $his head.
 	<</if>>
@@ -1375,7 +1395,11 @@
 <div class="indent">
 	<<if ($activeSlave.eyebrowHStyle != "bald")>>
 		$He has $activeSlave.origHColor eyebrows.
-		[["Surgically remove " + $his + " ability to grow eyebrows"|Surgery Degradation][cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave),$surgeryType = "eyebrow removal"]]
+		<<if $activeSlave.indentureRestrictions > 1>>
+			//$His indenture forbids elective surgery//
+		<<else>>
+			[["Surgically remove " + $his + " ability to grow eyebrows"|Surgery Degradation][cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave),$surgeryType = "eyebrow removal"]]
+		<</if>>
 	<<else>>
 		$He is no longer capable of growing eyebrow hair.
 	<</if>>
@@ -1385,7 +1409,11 @@
 <div class="indent">
 	<<if ($activeSlave.underArmHStyle != "bald" && $activeSlave.underArmHStyle != "hairless") || ($activeSlave.pubicHStyle != "bald" && $activeSlave.pubicHStyle != "hairless")>>
 		$He <<if $activeSlave.physicalAge >= _pubertyAge>>naturally grows<<elseif $activeSlave.physicalAge >= _pubertyAge-1>>is beginning to grow<<else>>will someday grow<</if>> $activeSlave.origHColor body hair.
-		[["Surgically remove " + $his + " ability to grow body hair"|Surgery Degradation][cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave),$surgeryType = "body hair removal"]]
+		<<if $activeSlave.indentureRestrictions > 1>>
+			//$His indenture forbids elective surgery//
+		<<else>>
+			[["Surgically remove " + $his + " ability to grow body hair"|Surgery Degradation][cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave),$surgeryType = "body hair removal"]]
+		<</if>>
 	<<else>>
 		$His $activeSlave.skin skin is silky smooth and hair free from $his neck to $his <<if !hasAnyLegs($activeSlave)>>hips<<else>>toes<</if>>.
 	<</if>>