code:
:: Incubator Report [nobr]

<<set $incubatorSlaves = 0>>

<<for _inc = 0; _inc < $tanks.length; _inc++>>
	<<set $tanks[_inc].birthWeek += 1>>
	<<if $tanks[_inc].birthWeek >= 52>>
		<<set $tanks[_inc].birthWeek = 0>>
		<<if $seeAge == 1>>
			<<set $tanks[_inc].actualAge++, $tanks[_inc].ovaryAge++>>
		<</if>>
	<</if>>
	<<set $incubatorSlaves += 1>>
	<<if $tanks[_inc].growTime > 0>>
		<<set $tanks[_inc].growTime -= $incubatorUpgradeSpeed>>

@@.pink;<<print $tanks[_inc].slaveName>>'s@@ growth is currently being accelerated. $He <<if Math.round($tanks[_inc].growTime/$incubatorUpgradeSpeed) <= 0>>is @@.lime;ready for release.@@ $He will be ejected from $his tank upon your approach<<else>>will be ready for release in about <<print Math.round($tanks[_inc].growTime/$incubatorUpgradeSpeed)>> weeks<</if>>.
	<<else>>
		@@.pink;$tanks[_inc].slaveName@@ is @@.lime;ready for release.@@ $He will be ejected from $his tank upon your approach.
	<</if>>

	<<if $incubatorUpgradeWeight == 1>>

		<<if $incubatorWeightSetting == 1>>
			<<if $tanks[_inc].weight < 200>>
				<<if $incubatorUpgradeSpeed == 52>>
					<<set $tanks[_inc].weight += 70>>
				<<elseif $incubatorUpgradeSpeed == 18>>
					<<set $tanks[_inc].weight += 40>>
				<<elseif $incubatorUpgradeSpeed == 9>>
					<<set $tanks[_inc].weight += 20>>
				<<elseif $incubatorUpgradeSpeed == 6>>
					<<set $tanks[_inc].weight += 10>>
				<<elseif $incubatorUpgradeSpeed == 5>>
					<<set $tanks[_inc].weight += 5>>
				<</if>>
			<</if>>
			The weight monitoring systems are overloading $his intake causing @@.red;rapid weight gain.@@
		<<elseif $incubatorWeightSetting == 2>>
			<<if $tanks[_inc].weight > 10>>
				<<if $incubatorUpgradeSpeed == 52>>
					<<set $tanks[_inc].weight -= 30>>
				<<elseif $incubatorUpgradeSpeed == 18>>
					<<set $tanks[_inc].weight -= 10>>
				<<elseif $incubatorUpgradeSpeed == 9>>
					<<set $tanks[_inc].weight -= 5>>
				<<elseif $incubatorUpgradeSpeed == 6>>
					<<set $tanks[_inc].weight -= 2>>
				<<elseif $incubatorUpgradeSpeed == 5>>
					<<set $tanks[_inc].weight -= 1>>
				<</if>>
				The weight monitoring systems detect $he is overweight and @@.green;decrease $his caloric intake.@@
			<<elseif $tanks[_inc].weight < -10>>
				<<if $incubatorUpgradeSpeed == 52>>
					<<set $tanks[_inc].weight += 30>>
				<<elseif $incubatorUpgradeSpeed == 18>>
					<<set $tanks[_inc].weight += 10>>
				<<elseif $incubatorUpgradeSpeed == 9>>
					<<set $tanks[_inc].weight += 5>>
				<<elseif $incubatorUpgradeSpeed == 6>>
					<<set $tanks[_inc].weight += 2>>
				<<elseif $incubatorUpgradeSpeed == 5>>
					<<set $tanks[_inc].weight += 1>>
				<</if>>
				The weight monitoring systems detect $he is underweight and @@.green;increase $his caloric intake.@@
			<<else>>
				$He is @@.lime;currently a healthy weight;@@ efforts will be made to maintain it.
			<</if>>
		<<elseif $incubatorWeightSetting == 0>>
			<<if $tanks[_inc].weight > -100>>
				$His developing body @@.red;quickly sheds its gained weight.@@
				<<set $tanks[_inc].weight -= 40>>
			<</if>>
		<</if>>
	<<else>>
		<<if $tanks[_inc].weight > -100>>
			$His developing body @@.red;quickly sheds its gained weight.@@
			<<set $tanks[_inc].weight -= 40>>
		<</if>>
	<</if>>

	<<if $incubatorUpgradeMuscles == 1>>

		<<if $incubatorMusclesSetting == 2>>
			<<if $tanks[_inc].muscles < 100>>
				<<if $incubatorUpgradeSpeed == 52>>
					<<set $tanks[_inc].muscles += 70>>
				<<elseif $incubatorUpgradeSpeed == 18>>
					<<set $tanks[_inc].muscles += 40>>
				<<elseif $incubatorUpgradeSpeed == 9>>
					<<set $tanks[_inc].muscles += 20>>
				<<elseif $incubatorUpgradeSpeed == 6>>
					<<set $tanks[_inc].muscles += 10>>
				<<elseif $incubatorUpgradeSpeed == 5>>
					<<set $tanks[_inc].muscles += 5>>
				<</if>>
			<</if>>
			The strength monitoring systems are overloading $him with steroids causing @@.green;rapid muscle development.@@
		<<elseif $incubatorMusclesSetting == 1>>
			<<if $tanks[_inc].muscles > 10>>
				<<if $incubatorUpgradeSpeed == 52>>
					<<set $tanks[_inc].muscles -= 30>>
				<<elseif $incubatorUpgradeSpeed == 18>>
					<<set $tanks[_inc].muscles -= 10>>
				<<elseif $incubatorUpgradeSpeed == 9>>
					<<set $tanks[_inc].muscles -= 5>>
				<<elseif $incubatorUpgradeSpeed == 6>>
					<<set $tanks[_inc].muscles -= 2>>
				<<elseif $incubatorUpgradeSpeed == 5>>
					<<set $tanks[_inc].muscles-->>
				<</if>>
				The strength monitoring systems detect $he is overly muscular and @@.green;decrease $his steroid dosage.@@
			<<elseif $tanks[_inc].muscles < -10>>
				<<if $incubatorUpgradeSpeed == 52>>
					<<set $tanks[_inc].muscles += 30>>
				<<elseif $incubatorUpgradeSpeed == 18>>
					<<set $tanks[_inc].muscles += 10>>
				<<elseif $incubatorUpgradeSpeed == 9>>
					<<set $tanks[_inc].muscles += 5>>
				<<elseif $incubatorUpgradeSpeed == 6>>
					<<set $tanks[_inc].muscles += 2>>
				<<elseif $incubatorUpgradeSpeed == 5>>
					<<set $tanks[_inc].muscles++>>
				<</if>>
				The strength monitoring systems detect $he is weak and @@.green;increase $his steroid dosage.@@
			<<else>>
				$He has @@.lime;a healthy musculature;@@ efforts will be made to maintain it.
			<</if>>
		<<elseif $incubatorMusclesSetting == 0>>
			<<if $tanks[_inc].muscles > -100>>
				$His developing body @@.red;quickly loses its gained muscle.@@
				<<set $tanks[_inc].muscles -= 40>>
			<</if>>
		<</if>>
	<<else>>
		<<if $tanks[_inc].muscles > -100>>
			$His developing body @@.red;quickly loses its gained muscle.@@
			<<set $tanks[_inc].muscles -= 40>>
		<</if>>
	<</if>>

	<<if $incubatorUpgradeGrowthStims == 1 && $incubatorGrowthStimsSetting != 0>>

		<<set _heightLimit = Math.trunc(Math.clamp((Height.mean($tanks[_inc]) * 1.25),0,274))>>
		<<set _heightLimitAge = Height.forAge($tanks[_inc].height, $tanks[_inc])>>
		<<if $tanks[_inc].geneMods.NCS == 1>>
			/*
			** NCS should block physical growth beyond that of a toddler, but some players might like
			** a little more or less. So using $minimumSlaveAge or 8, whichever is lesser.
			*/
			<<set _limitAge = Math.min(8, $minimumSlaveAge)>>
			<<set _heightLimitAge = Height.forAge($tanks[_inc].height, _limitAge, $tanks[_inc].genes)>>
			<<set _heightLimit = _heightLimitAge>>
		<</if>>
		<<if $tanks[_inc].height >= _heightLimit>>
			The monitoring system detects $his body is not able to support further increases in height, so it carefully regulates stimulant injections to @@.yellow;maintain $his current stature.@@
			<<set $tanks[_inc].height = _heightLimit>>
		<<elseif $incubatorGrowthStimsSetting == 2>>
			<<if $tanks[_inc].geneMods.NCS == 1>>
				The monitoring system floods $his body with growth stimulants, but $his @@.orange;NCS prevents an increase in $his growth rate.@@
				<<set $tanks[_inc].height = _heightLimitAge>>
			<<else>>
				The monitoring system floods $his body with growth stimulants, causing @@.green;a sharp increase in growth rate.@@
				<<if $incubatorWeightSetting >= 1 && $incubatorMusclesSetting <= 1 && $incubatorReproductionSetting <= 1>>
					<<if $incubatorUpgradeSpeed == 52>>
						<<set $tanks[_inc].height += random(3,6)>>
					<<elseif $incubatorUpgradeSpeed == 18>>
						<<set $tanks[_inc].height += random(2,5)>>
					<<elseif $incubatorUpgradeSpeed == 9>>
						<<set $tanks[_inc].height += random(1,4)>>
					<<elseif $incubatorUpgradeSpeed == 6>>
						<<set $tanks[_inc].height += random(1,3)>>
					<<elseif $incubatorUpgradeSpeed == 5>>
						<<set $tanks[_inc].height += random(1,2)>>
					<</if>>
				<<else>>
					<<if $incubatorUpgradeSpeed == 52>>
						<<set $tanks[_inc].height += random(2,5)>>
					<<elseif $incubatorUpgradeSpeed == 18>>
						<<set $tanks[_inc].height += random(1,4)>>
					<<elseif $incubatorUpgradeSpeed == 9>>
						<<set $tanks[_inc].height += random(1,3)>>
					<<elseif $incubatorUpgradeSpeed == 6>>
						<<set $tanks[_inc].height += random(1,2)>>
					<<elseif $incubatorUpgradeSpeed == 5>>
						<<set $tanks[_inc].height += random(0,1)>>
					<</if>>
				<</if>>
			<</if>>
		<<elseif $incubatorGrowthStimsSetting == 1>>
			<<if $tanks[_inc].geneMods.NCS == 1>>
				The monitoring system detects $he is near the expected height for $his @@.orange;NCS@@ condition, so it carefully regulates stimulants injections to @@.yellow;maintain $his current stature.@@
				<<set $tanks[_inc].height = _heightLimitAge>>
			<<elseif $tanks[_inc].height > _heightLimitAge>>
				The monitoring system detects $he is near the expected height, so it carefully regulates stimulants injections to @@.yellow;maintain $his current stature.@@
				<<if random(1,10) == 10>>
					<<if $incubatorUpgradeSpeed == 52>>
						<<set $tanks[_inc].height += random(1,4)>>
					<<elseif $incubatorUpgradeSpeed == 18>>
						<<set $tanks[_inc].height += random(1,3)>>
					<<elseif $incubatorUpgradeSpeed == 9>>
						<<set $tanks[_inc].height += random(1,2)>>
					<<elseif $incubatorUpgradeSpeed == 6>>
						<<set $tanks[_inc].height += random(0,1)>>
					<<elseif $incubatorUpgradeSpeed == 5>>
						<<set $tanks[_inc].height += random(0,1)>>
					<</if>>
				<</if>>
			<<else>>
				The monitoring system detects $his body is capable of developing more rapidly and @@.green;increases $his growth stimulant dosage.@@
				<<if $incubatorUpgradeSpeed == 52>>
					<<set $tanks[_inc].height += random(1,4)>>
				<<elseif $incubatorUpgradeSpeed == 18>>
					<<set $tanks[_inc].height += random(1,3)>>
				<<elseif $incubatorUpgradeSpeed == 9>>
					<<set $tanks[_inc].height += random(1,2)>>
				<<elseif $incubatorUpgradeSpeed == 6>>
					<<set $tanks[_inc].height += random(0,1)>>
				<<elseif $incubatorUpgradeSpeed == 5>>
					<<set $tanks[_inc].height += random(0,1)>>
				<</if>>
			<</if>>
		<</if>>
		<<set $tanks[_inc].height = Math.clamp($tanks[_inc].height, 0, _heightLimit)>>
	<<else>>

		With the growth stimulant injections offline, $his body is left to develop naturally.
	<</if>>

	<<if $incubatorUpgradeReproduction == 1>>

		<<if $incubatorReproductionSetting == 2>>
			$His developing body is being flooded with hormones.
			<<if $incubatorWeightSetting == 1>>
				Combined with the abundant food provided to $him, $his body grows rapidly.
				<<if $tanks[_inc].ovaries == 1>>
					<<set $tanks[_inc].pubertyXX = 1>>
					<<if $tanks[_inc].hormoneBalance < 500>>
						<<set $tanks[_inc].hormoneBalance += 100>>
					<</if>>
					<<if $seeHyperPreg == 1>>
						<<set $tanks[_inc].readyOva = random(25,45)>>
					<<else>>
						<<set $tanks[_inc].readyOva = random(3,8)>>
					<</if>>
					<<if $tanks[_inc].geneMods.NCS == 1>>
						/* NCS blocks hormonal growth of all secondary sexual characteristics */
						$His @@.orange;NCS blocks all growth@@ despite the excess estrogen-laced growth hormones flooding $his body.
					<<elseif $incubatorUpgradeSpeed == 52>>
						<<if $tanks[_inc].boobs < 8000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 2000>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 50>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips += 2>>
						<</if>>
						<<if $tanks[_inc].butt < 12 && random(1,100) > 30>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt += 4>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 18>>
						<<if $tanks[_inc].boobs < 8000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 500>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 50>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 12 && random(1,100) > 50>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt += 3>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 9>>
						<<if $tanks[_inc].boobs < 8000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 200>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 60>>
							The excess estrogen-laced growth hormones @@.green;causes $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 12 && random(1,100) > 50>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear grow fatter.@@
							<<set $tanks[_inc].butt += 2>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 6>>
						<<if $tanks[_inc].boobs < 8000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 100>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 70>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 12 && random(1,100) > 60>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 5>>
						<<if $tanks[_inc].boobs < 8000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 100>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 80>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 12 && random(1,100) > 70>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt++>>
						<</if>>
					<</if>>
				<<elseif $tanks[_inc].balls > 0>>
					<<set $tanks[_inc].pubertyXY = 1>>
					<<if $tanks[_inc].hormoneBalance > -500>>
						<<set $tanks[_inc].hormoneBalance -= 100>>
					<</if>>
					<<if $tanks[_inc].geneMods.NCS == 1>>
						/* NCS blocks hormonal growth of all secondary sexual characteristics */
						$His @@.orange;NCS blocks all growth@@ despite the excess testosterone-laced growth hormones flooding $his body.
					<<elseif $incubatorUpgradeSpeed == 52>>
						<<if $tanks[_inc].balls < 40>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to balloon for extra cum production.@@
							<<set $tanks[_inc].balls += 16>>
						<</if>>
						<<if $tanks[_inc].dick < 10 && random(1,100) > 20>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick += 4>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 18>>
						<<if $tanks[_inc].balls < 40 && random(1,100) > 10>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to balloon for extra cum production.@@
							<<set $tanks[_inc].balls += 9>>
						<</if>>
						<<if $tanks[_inc].dick < 10 && random(1,100) > 30>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick += 3>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 9>>
						<<if $tanks[_inc].balls < 40 && random(1,100) > 20>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to balloon for extra cum production.@@
							<<set $tanks[_inc].balls += 4>>
						<</if>>
						<<if $tanks[_inc].dick < 10 && random(1,100) > 50>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick += 2>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 6>>
						<<if $tanks[_inc].balls < 40 && random(1,100) > 30>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to balloon for extra cum production.@@
							<<set $tanks[_inc].balls += 2>>
						<</if>>
						<<if $tanks[_inc].dick < 10 && random(1,100) > 70>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 5>>
						<<if $tanks[_inc].balls < 40 && random(1,100) > 30>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to balloon for extra cum production.@@
							<<set $tanks[_inc].balls++>>
						<</if>>
						<<if $tanks[_inc].dick < 10 && random(1,100) > 80>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick++>>
						<</if>>
					<</if>>
				<</if>>
			<<elseif $incubatorWeightSetting == 2>>
				Combined with the healthy food provided to $him, $his body grows readily.
				<<if $tanks[_inc].ovaries == 1>>
					<<set $tanks[_inc].pubertyXX = 1>>
					<<if $tanks[_inc].hormoneBalance < 500>>
						<<set $tanks[_inc].hormoneBalance += 100>>
					<</if>>
					<<if $seeHyperPreg == 1>>
						<<set $tanks[_inc].readyOva = random(15,25)>>
					<<else>>
						<<set $tanks[_inc].readyOva = random(2,6)>>
					<</if>>
					<<if $tanks[_inc].geneMods.NCS == 1>>
						/* NCS blocks hormonal growth of all secondary sexual characteristics */
						$His @@.orange;NCS blocks all growth@@ despite the excess estrogen-laced growth hormones flooding $his body.
					<<elseif $incubatorUpgradeSpeed == 52>>
						<<if $tanks[_inc].boobs < 4000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 1000>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 70>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 8 && random(1,100) > 50>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt += 3>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 18>>
						<<if $tanks[_inc].boobs < 4000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 500>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 80>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 8 && random(1,100) > 50>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 9>>
						<<if $tanks[_inc].boobs < 4000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 200>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 90>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 8 && random(1,100) > 60>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 6>>
						<<if $tanks[_inc].boobs < 4000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 100>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 95>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 8 && random(1,100) > 70>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 5>>
						<<if $tanks[_inc].boobs < 4000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 100>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 95>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 8 && random(1,100) > 80>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt++>>
						<</if>>
					<</if>>
				<<elseif $tanks[_inc].balls > 0>>
					<<set $tanks[_inc].pubertyXY = 1>>
					<<if $tanks[_inc].hormoneBalance > -500>>
						<<set $tanks[_inc].hormoneBalance -= 100>>
					<</if>>
					<<if $tanks[_inc].geneMods.NCS == 1>>
						/* NCS blocks hormonal growth of all secondary sexual characteristics */
						$His @@.orange;NCS blocks all growth@@ despite the excess testosterone-laced growth hormones flooding $his body.
					<<elseif $incubatorUpgradeSpeed == 52>>
						<<if $tanks[_inc].balls < 10>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to balloon for extra cum production.@@
							<<set $tanks[_inc].balls += 3>>
						<</if>>
						<<if $tanks[_inc].dick < 7 && random(1,100) > 20>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick += 2>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 18>>
						<<if $tanks[_inc].balls < 10 && random(1,100) > 10>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to balloon for extra cum production.@@
							<<set $tanks[_inc].balls += 2>>
						<</if>>
						<<if $tanks[_inc].dick < 7 && random(1,100) > 30>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 9>>
						<<if $tanks[_inc].balls < 10 && random(1,100) > 20>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to balloon for extra cum production.@@
							<<set $tanks[_inc].balls++>>
						<</if>>
						<<if $tanks[_inc].dick < 7 && random(1,100) > 50>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 6>>
						<<if $tanks[_inc].balls < 10 && random(1,100) > 30>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to balloon for extra cum production.@@
							<<set $tanks[_inc].balls++>>
						<</if>>
						<<if $tanks[_inc].dick < 7 && random(1,100) > 70>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 5>>
						<<if $tanks[_inc].balls < 10 && random(1,100) > 30>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to balloon for extra cum production.@@
							<<set $tanks[_inc].balls++>>
						<</if>>
						<<if $tanks[_inc].dick < 7 && random(1,100) > 80>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick++>>
						<</if>>
					<</if>>
				<</if>>
			<<else>>
				Since $his body has little to work with, $his growth is fairly minor.
				<<if $tanks[_inc].ovaries == 1>>
					<<set $tanks[_inc].pubertyXX = 1>>
					<<if $tanks[_inc].hormoneBalance < 500>>
						<<set $tanks[_inc].hormoneBalance += 100>>
					<</if>>
					<<if $seeHyperPreg == 1>>
						<<set $tanks[_inc].readyOva = random(10,15)>>
					<<else>>
						<<set $tanks[_inc].readyOva = random(2,4)>>
					<</if>>
					<<if $tanks[_inc].geneMods.NCS == 1>>
						/* NCS blocks hormonal growth of all secondary sexual characteristics */
						$His @@.orange;NCS blocks all growth@@ despite the excess estrogen-laced growth hormones flooding $his body.
					<<elseif $incubatorUpgradeSpeed == 52>>
						<<if $tanks[_inc].boobs < 2000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 700>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 90>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips += 2>>
						<</if>>
						<<if $tanks[_inc].butt < 6 && random(1,100) > 70>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt += 2>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 18>>
						<<if $tanks[_inc].boobs < 2000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 200>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 80>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 6 && random(1,100) > 70>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 9>>
						<<if $tanks[_inc].boobs < 2000>>
							The excess estrogen-laced growth hormones @@.green;rapidly balloon $his breasts.@@
							<<set $tanks[_inc].boobs += 50>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 80>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 6 && random(1,100) > 90>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 6>>
						<<if $tanks[_inc].boobs < 2000>>
							The excess estrogen-laced growth hormones @@.green;rapidly grow $his breasts.@@
							<<set $tanks[_inc].boobs += 20>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 90>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 6 && random(1,100) > 90>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 5>>
						<<if $tanks[_inc].boobs < 2000>>
							The excess estrogen-laced growth hormones @@.green;rapidly grow $his breasts.@@
							<<set $tanks[_inc].boobs += 10>>
						<</if>>
						<<if $tanks[_inc].hips < 2 && random(1,100) > 95>>
							The excess estrogen-laced growth hormones @@.green;cause $his hips to widen for childbirth.@@
							<<set $tanks[_inc].hips++>>
						<</if>>
						<<if $tanks[_inc].butt < 6 && random(1,100) > 90>>
							The excess estrogen-laced growth hormones @@.green;cause $his rear to grow fatter.@@
							<<set $tanks[_inc].butt++>>
						<</if>>
					<</if>>
				<<elseif $tanks[_inc].balls > 0>>
					<<set $tanks[_inc].pubertyXY = 1>>
					<<if $tanks[_inc].hormoneBalance > -500>>
						<<set $tanks[_inc].hormoneBalance -= 100>>
					<</if>>
					<<if $tanks[_inc].geneMods.NCS == 1>>
						/* NCS blocks hormonal growth of all secondary sexual characteristics */
						$His @@.orange;NCS blocks all growth@@ despite the excess testosterone-laced growth hormones flooding $his body.
					<<elseif $incubatorUpgradeSpeed == 52>>
						<<if $tanks[_inc].balls < 6>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to grow for extra cum production.@@
							<<set $tanks[_inc].balls += 2>>
						<</if>>
						<<if $tanks[_inc].dick < 4 && random(1,100) > 60>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 18>>
						<<if $tanks[_inc].balls < 6 && random(1,100) > 50>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to grow for extra cum production.@@
							<<set $tanks[_inc].balls++>>
						<</if>>
						<<if $tanks[_inc].dick < 4 && random(1,100) > 60>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 9>>
						<<if $tanks[_inc].balls < 6 && random(1,100) > 60>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to balloon for extra cum production.@@
							<<set $tanks[_inc].balls++>>
						<</if>>
						<<if $tanks[_inc].dick < 4 && random(1,100) > 70>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick += 2>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 6>>
						<<if $tanks[_inc].balls < 6 && random(1,100) > 70>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to grow for extra cum production.@@
							<<set $tanks[_inc].balls++>>
						<</if>>
						<<if $tanks[_inc].dick < 4 && random(1,100) > 80>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick++>>
						<</if>>
					<<elseif $incubatorUpgradeSpeed == 5>>
						<<if $tanks[_inc].balls < 6 && random(1,100) > 80>>
							The excess testosterone-laced growth hormones @@.green;cause $his balls to grow for extra cum production.@@
							<<set $tanks[_inc].balls++>>
						<</if>>
						<<if $tanks[_inc].dick < 4 && random(1,100) > 90>>
							The excess testosterone-laced growth hormones @@.green;cause $his penis to swell.@@
							<<set $tanks[_inc].dick++>>
						<</if>>
					<</if>>
				<</if>>
			<</if>>
		<<elseif $incubatorReproductionSetting == 1>>
			Her hormone levels are being carefully managed, @@.green;encouraging early puberty.@@
			<<if $tanks[_inc].ovaries == 1>>
				<<set $tanks[_inc].pubertyXX = 1>>
				<<set $tanks[_inc].hormoneBalance = 250>>
				<<if $tanks[_inc].geneMods.NCS == 1>>
					/* NCS blocks hormonal growth of all secondary sexual characteristics */
					$His @@.orange;NCS blocks growth@@ despite the added estrogen.
				<<else>>
					<<if $tanks[_inc].boobs < 400 && random(1,100) > 60>>
						The added estrogen @@.green;causes $his breasts to swell.@@
						<<set $tanks[_inc].boobs += 50>>
					<</if>>
					<<if $tanks[_inc].hips < 2 && random(1,100) > 90>>
						The added estrogen @@.green;causes $his hips to widen.@@
						<<set $tanks[_inc].hips++>>
					<</if>>
					<<if $tanks[_inc].butt < 5 && random(1,100) > 80>>
						The added estrogen @@.green;causes $his butt to grow.@@
						<<set $tanks[_inc].butt++>>
					<</if>>
				<</if>>
			<<elseif $tanks[_inc].balls > 0>>
				<<set $tanks[_inc].pubertyXY = 1>>
				<<set $tanks[_inc].hormoneBalance = -250>>
				<<if $tanks[_inc].geneMods.NCS == 1>>
					/* NCS blocks hormonal growth of all secondary sexual characteristics */
					$His @@.orange;NCS blocks all growth@@ despite the added testosterone.
				<<else>>
					<<if $tanks[_inc].balls < 3 && random(1,100) > 80>>
						The added testosterone @@.green;causes $his balls to swell.@@
						<<set $tanks[_inc].balls++>>
					<</if>>
					<<if $tanks[_inc].dick < 3 && random(1,100) > 60>>
						The added testosterone @@.green;causes $his penis to grow.@@
						<<set $tanks[_inc].dick++>>
					<</if>>
				<</if>>
			<</if>>
		<<else>>
			<<if $tanks[_inc].hormoneBalance > 100>>
				<<set $tanks[_inc].hormoneBalance -= 50>>
			<<elseif $tanks[_inc].hormoneBalance < -100>>
				<<set $tanks[_inc].hormoneBalance += 50>>
			<</if>>
			<<if $tanks[_inc].balls > 0>>
				<<if $tanks[_inc].balls > 1>>
					<<set $tanks[_inc].balls -= 5>>
				<</if>>
				<<if $tanks[_inc].dick > 1>>
					<<set $tanks[_inc].dick -= 5>>
				<</if>>
				<<if $tanks[_inc].balls <= 0>>
					<<set $tanks[_inc].balls = 1>>
				<</if>>
				<<if $tanks[_inc].dick <= 0>>
					<<set $tanks[_inc].dick = 1>>
				<</if>>
			<</if>>
			<<if $tanks[_inc].boobs > 0>>
				<<set $tanks[_inc].boobs -= 500>>
			<</if>>
			<<if $tanks[_inc].butt > 0>>
				<<set $tanks[_inc].butt -= 4>>
			<</if>>
		<</if>>
	<<else>>
		<<if $tanks[_inc].hormoneBalance > 100>>
			<<set $tanks[_inc].hormoneBalance -= 50>>
		<<elseif $tanks[_inc].hormoneBalance < -100>>
			<<set $tanks[_inc].hormoneBalance += 50>>
		<</if>>
		<<if $tanks[_inc].balls > 0>>
			<<if $tanks[_inc].balls > 1>>
				<<set $tanks[_inc].balls -= 5>>
			<</if>>
			<<if $tanks[_inc].dick > 1>>
				<<set $tanks[_inc].dick -= 5>>
			<</if>>
			<<if $tanks[_inc].balls <= 0>>
				<<set $tanks[_inc].balls = 1>>
			<</if>>
			<<if $tanks[_inc].dick <= 0>>
				<<set $tanks[_inc].dick = 1>>
			<</if>>
		<</if>>
		<<if $tanks[_inc].boobs > 0>>
			<<set $tanks[_inc].boobs -= 500>>
		<</if>>
		<<if $tanks[_inc].butt > 0>>
			<<set $tanks[_inc].butt -= 4>>
		<</if>>
	<</if>>

	<<if $incubatorReproductionSetting == 2>>
		<<set $tanks[_inc].energy = 80, $tanks[_inc].need = 100>>
	<<elseif $incubatorReproductionSetting == 1>>
		<<set $tanks[_inc].energy = 50, $tanks[_inc].need = 20>>
	<<else>>
		<<set $tanks[_inc].energy = 0, $tanks[_inc].need = 0>>
	<</if>>

	<<set $tanks[_inc].weight = Math.clamp($tanks[_inc].weight, -100, 200)>>
	<<set $tanks[_inc].muscles = Math.clamp($tanks[_inc].muscles, -100, 100)>>
	<<set $tanks[_inc].dick = Math.clamp($tanks[_inc].dick, 0, 10)>>
	<<set $tanks[_inc].hips = Math.clamp($tanks[_inc].hips, -2, 2)>>
	<<set $tanks[_inc].balls = Math.clamp($tanks[_inc].balls, 0, 40)>>
	<<set $tanks[_inc].boobs = Math.clamp($tanks[_inc].boobs, 0, 30000)>>
	<<set $tanks[_inc].height = Math.clamp($tanks[_inc].height, 0, 274)>>
	<<set $tanks[_inc].hormoneBalance = Math.clamp($tanks[_inc].hormoneBalance, -500, 500)>>

<</for>>
/*
<<if $incubatorSlaves == 0>>
$incubatorNameCaps is currently unused.
<</if>>
*/


code:
:: Incubator Retrieval Workaround [nobr]

$readySlave.slaveName has been discharged from $incubatorName and is ready for her first ever inspection.

<<set $activeSlave = $readySlave>>
<<set $saleDescription = 0, $applyLaw = 0>>
<<set $incubatorSlaves-->>
<<include "Long Slave Description">>
<<run newSlave($activeSlave)>>
<<set $nextLink = "AS Dump">>
<<set $returnTo = "Main">>
<<if $incubatorOrgans.length > 0>>
	<<for _i = 0; _i < $incubatorOrgans.length; _i++>>
		<<if $incubatorOrgans[_i].ID == $incubatorOldID>>
			<<set _newOrgan = {type: $incubatorOrgans[_i].type, weeksToCompletion: $incubatorOrgans[_i].weeksToCompletion, ID: $activeSlave.ID}>>
			<<if _newOrgan.weeksToCompletion <= 0>>
				<<set $completedOrgans.push($incubatorOrgans[_i])>>
			<<else>>
				<<set $organs.push(_newOrgan)>>
			<</if>>
			<<set $incubatorOrgans.deleteAt(_i), _i-->>
		<</if>>
	<</for>>
<</if>>
<<include "New Child Intro">>


code:
:: Incubator Workaround [nobr]

<<if $tanks.length < $incubator>>
	<<set $activeSlave.growTime = Math.trunc($targetAge*52)>>
	<<set $tanks.push($activeSlave)>>
	<<set $incubatorSlaves++>>
<</if>>


code:
:: KillSlave [nobr]

<<set $killChoice = -1>>

<<set _qualifiedFS = []>>
<<set _qualifiedFS.push("RND")>>

<<if $arcologies[0].FSRomanRevivalist != "unset">>
	<<set _qualifiedFS.push("roman revivalist")>>
<<elseif $arcologies[0].FSAztecRevivalist != "unset">>
	<<set _qualifiedFS.push("aztec revivalist")>>
<<elseif $arcologies[0].FSEgyptianRevivalist != "unset">>
	<<set _qualifiedFS.push("egyptian revivalist")>>
<<elseif $arcologies[0].FSEdoRevivalist != "unset">>
	<<set _qualifiedFS.push("edo revivalist")>>
<<elseif $arcologies[0].FSArabianRevivalist != "unset">>
	<<set _qualifiedFS.push("arabian revivalist")>>
<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
	<<set _qualifiedFS.push("chinese revivalist")>>
<</if>>

<<set _weapon = _qualifiedFS>>

<<switch _weapon>>
<<case "roman revivalist">>
	<<set _weapon = "gladius">>
<<case "aztec revivalist">>
	<<set _weapon = "macuahuitl">>
<<case "egyptian revivalist">>
	<<set _weapon = "kopesh">>
<<case "edo revivalist">>
	<<set _weapon = "katana">>
<<case "arabian revivalist">>
	<<set _weapon = "scimitar">>
<<case "chinese revivalist">>
	<<set _weapon = "jian">>
<<default>>
	<<set _weapon = "handgun">>
<</switch>>

<<if canWalk($activeSlave)>>
	You call $activeSlave.slaveName into your office.
<<else>>
	You have $activeSlave.slaveName brought into your office.
<</if>>

	$He looks at you
<<if $activeSlave.fetish != "mindbroken">>with
	<<if $activeSlave.devotion > 50>>
		adoration
	<<elseif ($activeSlave.devotion) > 20 && ($activeSlave.devotion <= 50)>>
		a calm acceptance
	<<elseif ($activeSlave.devotion >= -20) && ($activeSlave.devotion <= 20)>>
		apprehension
	<<elseif $activeSlave.devotion < -20>>
		hatred
	<</if>>
<<else>>
	blankly
<</if>>
/*TODO: Add checks for trust*/
 and waits for you to continue. You tell $him that you've gotten tired of having $him around and that you have decided it is time you got rid of $him.

<<if $activeSlave.fetish != "mindbroken">> $His expression changes to one of <</if>>
<<if $activeSlave.fetish != "mindbroken">>
	<<if $activeSlave.devotion > 50>>
		abject sorrow
	<<elseif ($activeSlave.devotion) > 20 && ($activeSlave.devotion <= 50)>>
		sadness
	<<else>>
		relief
	<</if>>
	until
<<else>>
	$He just nods dumbly and continues to watch you with a vacant expression, even as
<</if>>

 you reach behind your desk and pull out your trusty _weapon,

<<if $activeSlave.fetish != "mindbroken">>
	at which point abject fear fills $his face. $He immediately <<if canWalk($activeSlave)>>drops to $his knees and <</if>>begins openly begging for you to have mercy.
<<else>>
	to which $he still doesn't respond.
<</if>>

<<link "Kill $him" "KilledSlave">><<set $killChoice = 0>><</link>>

<<link "Have mercy on $him" "KilledSlave">><<set $killChoice = 1>><</link>>
<<if ($activeSlave.assignment != "guard you") && ($pit > 0)>>

<<link "Let $him win $his life in combat" "KilledSlave">><<set $killChoice = 2>><</link>>
<</if>>


code:
:: KilledSlave [nobr]

<<if $killChoice == 0>>

<<set _qualifiedFS = []>>
<<set _qualifiedFS.push("RND")>>

<<if $arcologies[0].FSRomanRevivalist != "unset">>
	<<set _qualifiedFS.push("roman revivalist"), _weapon = gladius>>
<<elseif $arcologies[0].FSAztecRevivalist != "unset">>
	<<set _qualifiedFS.push("aztec revivalist"), _weapon = Tecpatl>>
<<elseif $arcologies[0].FSEgyptianRevivalist != "unset">>
	<<set _qualifiedFS.push("egyptian revivalist"), _weapon = kopesh>>
<<elseif $arcologies[0].FSEdoRevivalist != "unset">>
	<<set _qualifiedFS.push("edo revivalist"), _weapon = katana>>
<<elseif $arcologies[0].FSArabianRevivalist != "unset">>
	<<set _qualifiedFS.push("arabian revivalist"), _weapon = scimitar>>
<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
	<<set _qualifiedFS.push("chinese revivalist"), _weapon = jian>>
<</if>>

You simply smile at $him and tell $him not to worry as you continue

<<if _qualifiedFS > 0>>
	sharpening your _weapon.
<<else>>
	threading on a suppressor.
<</if>>

$activeSlave.slaveName gives an audible sigh of relief and begins to thank you profusely, though $his thanks are cut short as the sound of

<<if _qualifiedFS > 0>>
	a sharp edge slicing though flesh
<<else>>
	a suppressed gunshot
<</if>>

	rings through the room. You have another servant clean up the mess as you continue with what you were previously doing.

	<<if $familyTesting == 1>>
			<<for _ss = 0; _ss < $slaves.length; _ss++>>
				<<if $activeSlave.mother == $slaves[_ss].ID>>
					$slaves[_ss].slaveName is @@.mediumorchid;grieved@@ that you have killed $his daughter.
					<<run clearSummaryCache($slaves[_ss])>>

					<<set $slaves[_ss].devotion -= 30>>
				<</if>>
				<<if $activeSlave.father == $slaves[_ss].ID>>
					$slaves[_ss].slaveName is @@.mediumorchid;disappointed@@ that you have killed $his daughter.
					<<run clearSummaryCache($slaves[_ss])>>

					<<set $slaves[_ss].devotion -= 20>>
				<</if>>
				<<if $activeSlave.ID == $slaves[_ss].father>>
					$slaves[_ss].slaveName is @@.mediumorchid;saddened@@ that you have killed $his father.
					<<run clearSummaryCache($slaves[_ss])>>

					<<set $slaves[_ss].devotion -= 20>>
				<</if>>
				<<if $activeSlave.ID == $slaves[_ss].mother>>
					$slaves[_ss].slaveName is @@.mediumorchid;grieved@@ that you have killed $his mother.
					<<run clearSummaryCache($slaves[_ss])>>

					<<set $slaves[_ss].devotion -= 30>>
				<</if>>
				<<switch areSisters($activeSlave, $slaves[_ss])>>
				<<case 1>>
					$slaves[_ss].slaveName is @@.mediumorchid;devastated@@ that you have killed $his twin.
					<<run clearSummaryCache($slaves[_ss])>>

					<<set $slaves[_ss].devotion -= 30>>
				<<case 2>>
					$slaves[_ss].slaveName is @@.mediumorchid;grieved@@ that you have killed $his sister.
					<<run clearSummaryCache($slaves[_ss])>>

					<<set $slaves[_ss].devotion -= 30>>
				<<case 3>>
					$slaves[_ss].slaveName is @@.mediumorchid;disheartened@@ that you have killed $his half-sister.
					<<run clearSummaryCache($slaves[_ss])>>

					<<set $slaves[_ss].devotion -= 20>>
				<</switch>>
			<</for>>
		<<else>>
			<<if $activeSlave.relation != 0>>
				<<set _ss = $slaveIndices[$activeSlave.relationTarget]>>
				<<if def _ss && $slaves[_ss].fetish != "mindbroken">>
					$slaves[_ss].slaveName is @@.mediumorchid;grieved@@ that you have killed $his $activeSlave.relation.
					<<run clearSummaryCache($slaves[_ss])>>

					<<set $slaves[_ss].devotion -= 30>>
					<<set $display = 1>>
				<</if>>
			<</if>>
		<</if>>
		<<if $activeSlave.relationship > 0>>
			<<set _ss = $slaveIndices[$activeSlave.relationshipTarget]>>
			<<if def _ss && $slaves[_ss].fetish != "mindbroken">>
				$slaves[_ss].slaveName is @@.mediumorchid;grieved@@ that you have killed $his best source of comfort and companionship in a life of bondage.
				<<run clearSummaryCache($slaves[_ss])>>

				<<set $slaves[_ss].devotion -= $slaves[_ss].relationship*10>>
				<<set $display = 1>>
			<</if>>
		<<elseif $activeSlave.relationship == -3>>
			Killing one of your slave wives is @@.red;socially unacceptable.@@ In addition, your other devoted slaves are @@.gold;worried@@ that you may not respect their status.
			<<run clearSummaryCache()>>

			<<set $rep -= 200>>
			<<set $display = 1>>
			<<for _ss = 0; _ss < $slaves.length; _ss++>>
				<<if $slaves[_ss].devotion > 50>>
					<<set $slaves[_ss].trust -= 10>>
				<</if>>
			<</for>>
		<</if>>
		<<if $activeSlave.rivalry != 0>>
			<<set _ss = $slaveIndices[$activeSlave.rivalryTarget]>>
			<<if def _ss && $slaves[_ss].fetish != "mindbroken">>
				$slaves[_ss].slaveName is @@.hotpink;pleased@@ that $he won't have to see $his rival any more.
				<<run clearSummaryCache($slaves[_ss])>>

				<<set $slaves[_ss].devotion += $slaves[_ss].rivalry*3>>
				<<set $display = 1>>
			<</if>>
		<</if>>

		<<include "Remove activeSlave">>
		<<set $returnTo = "Main">>

/*this will DEFINTELY need balancing*/
<<elseif $killChoice == 1>>
	    You make a show of considering sparing $his life, then, with a heavy sigh, unbuckle your pants and sit down at your desk. You beckon to $him, and $he just about trips over $himself as $he hastily makes $his way over to you. $His blowjob isn't the best you've ever had, $him @@.gold;sobbing@@ as much as $he is; though $his enthusiasm more than makes up for it. After you finish deep in $his throat, $he sits back and wipes away $his tears, sniffling and @@.hotpink;thanking you again@@ for giving $him another chance.
	<<if $activeSlave.devotion <= 30>>
		<<set $activeSlave.devotion = 30>>
	<<else>>
		<<set $activeSlave.devotion += 20>>
	<</if>>
	<<set $activeSlave.trust = -100>>

<<elseif $killChoice == 2>>
	You tell $him that you'll let your bodyguard $Bodyguard.slaveName decide $his fate -- if $he wants to live, $he'll have to beat $him in hand-to-hand combat in $pitName.
	<<if $activeSlave.combatSkill == 0>>
		The fear on $his face is palpable, though $he nods slowly and agrees, not seeing another choice.
	<<else>>
		$He nods $his head and straightens up, as though preparing $himself for the fight for $his life.
	<</if>>

	//This scene is currently unfinished.//
	/*TODO: Connect this to the Pit, have an end-of-week event between the Bodyguard and the slave*/

<</if>>


code:
:: Manage Economy [nobr]

	@@.yellowgreen;Global Economy@@
| <<print $economy>>

<<if ($cheatMode) && ($cheatModeM)>>
	<<set _Teconomy = $economy>>
	<<textbox "$economy" $economy>>
	<<link "Apply">>
	<<set $economy = Math.trunc(Number($economy)) || _Teconomy, $cheater = 1>>
	<<replace "#economy">>
	@@.yellowgreen;Global Economy@@
	| <<print $economy>>
	<</replace>>
	<</link>>
<</if>>

	@@.yellowgreen;Local Economy@@
| <<print $localEcon>>

<<if ($cheatMode) && ($cheatModeM)>>
	<<set _TlocalEcon = $localEcon>>
	<<textbox "$localEcon" $localEcon>>
	<<link "Apply">>
	<<set $localEcon = Math.trunc(Number($localEcon)) || _TlocalEcon, $cheater = 1>>
	<<replace "#localEcon">>
	@@.yellowgreen;Local Economy@@
	| <<print $localEcon>>
	<</replace>>
	<</link>>
<</if>>

 //The Local Economy score effects some prices in your ecology. The lower the score, the higher the prices. The base score is ''100''.//

 The current score is
<<if $localEcon > 100>>
	<<set _econPercent = Math.trunc(1000-100000/$localEcon)/10>>
	reducing prices by ''<<print _econPercent>> %.''
<<elseif $localEcon == 100>>
	equal to the base score. There are no price modifications.
<<else>>
	<<set _econPercent = Math.trunc(100000/$localEcon-1000)/10>>
	increasing prices by ''<<print _econPercent>> %.''
<</if>>


code:
:: Manage Personal Affairs [nobr]

<<set $nextButton = "Back", $nextLink = "Main", $showEncyclopedia = 0>>
<<run PCTitle()>>

<<if $cheatMode == 1>>
	//[[Cheat Edit Player|PCCheatMenu][$cheater = 1]]

//
<</if>>

You pause for a moment from your busy day to day life to return to <<if $masterSuite != 0>>$masterSuiteName<<else>>your room<</if>> to consider some things about yourself.

You take yourself in a full length mirror. You are <<if $activeSlave.race == "asian" || $activeSlave.race == "indo-aryan" || $activeSlave.race == "amerindian">>an<<else>>a<</if>> $PC.race <<if $PC.dick == 1 && $PC.vagina == 1>>futanari<<elseif $PC.dick == 1>>man<<else>>woman<</if>> with<<if $PC.markings == "freckles">> freckled<<elseif $PC.markings == "heavily freckled">> heavily freckled<</if>> <<print $PC.skin>> skin, $PC.hColor hair and $PC.eyeColor eyes.
<<if $PC.actualAge >= 65>>
	You're @@.orange;$PC.actualAge@@ and definitely feeling it.<<if $PC.visualAge > $PC.actualAge>> You've taken measures to @@.lime;look an older $PC.visualAge,@@ though perhaps it might be time to undo it.<<elseif $PC.visualAge < $PC.actualAge>> You've taken measures to @@.lime;look a younger $PC.visualAge,@@ now if only your body agreed with your looks.<</if>>
<<elseif $PC.actualAge >= 50>>
	You're @@.orange;$PC.actualAge@@ and starting to feel it.<<if $PC.visualAge > $PC.actualAge>> You've taken measures to @@.lime;look an older $PC.visualAge.@@<<elseif $PC.visualAge < $PC.actualAge>> You've taken measures to @@.lime;look a younger $PC.visualAge.@@<</if>>
<<elseif $PC.actualAge >= 35>>
	You're @@.orange;$PC.actualAge@@ and strong.<<if $PC.visualAge > $PC.actualAge>> You've taken measures to @@.lime;look an older $PC.visualAge@@ and reap the respect that comes with it.<<elseif $PC.visualAge < $PC.actualAge>> You've taken measures to @@.lime;look a younger $PC.visualAge@@ recapturing your youth.<</if>>
<<else>>
	You're @@.orange;$PC.actualAge@@ and full of vigor.<<if $PC.visualAge > $PC.actualAge>> You've taken measures to @@.lime;look an older $PC.visualAge@@ and reap the respect that comes with it.<<elseif $PC.visualAge < $PC.actualAge>> You've taken measures to @@.lime;look a younger $PC.visualAge,@@ even though society may find your looks uncomfortable.<</if>>
<</if>>
<<if ($playerAging != 0)>>Your birthday is <<if $PC.birthWeek == 51>>next week<<else>>in <<print 52-$PC.birthWeek>> weeks<</if>>.<</if>>
Looking down;
<<PlayerBoobs>>
<<PlayerBelly>>
<<if $PC.balls == 2 && $PC.belly < 5000>> Your pubic mound is swells outward slightly due to your oversized prostate. <<elseif $PC.balls > 2 && $PC.belly < 10000>> Your pubic mound bulges outward noticeably thanks to your massive prostate. <</if>>
Beneath all that;
<<PlayerCrotch>>
Around back;
<<PlayerButt>>

<<if $playerSurgery == 0>>[[Visit your plastic surgeon.|Elective Surgery][$playerSurgery = 4]]<<elseif $playerSurgery == 1>>Your favorite plastic surgeon is booked solid for the next week.<<else>>Your favorite plastic surgeon is booked solid for the next $playerSurgery weeks.<</if>>

You have a number of contact lenses in various colors available.

	<<if $PC.origEye == $PC.eyeColor>>You aren't wearing contacts to change the color of your eyes.<<else>>[[Remove lenses|Manage Personal Affairs][$PC.eyeColor = $PC.origEye]]<</if>>
	<<if $PC.origEye != "blue">>| [[Blue|Manage Personal Affairs][$PC.eyeColor = "blue"]]<</if>>
	<<if $PC.origEye != "black">>| [[Black|Manage Personal Affairs][$PC.eyeColor = "black"]]<</if>>
	<<if $PC.origEye != "brown">>| [[Brown|Manage Personal Affairs][$PC.eyeColor = "brown"]]<</if>>
	<<if $PC.origEye != "green">>| [[Green|Manage Personal Affairs][$PC.eyeColor = "green"]]<</if>>
	<<if $PC.origEye != "turquoise">>| [[Turquoise|Manage Personal Affairs][$PC.eyeColor = "turquoise"]]<</if>>
	<<if $PC.origEye != "sky-blue">>| [[Sky-blue|Manage Personal Affairs][$PC.eyeColor = "sky-blue"]]<</if>>
	<<if $PC.origEye != "hazel">>| [[Hazel|Manage Personal Affairs][$PC.eyeColor = "hazel"]]<</if>>
	<<if $PC.origEye != "pale-grey">>| [[Pale-Grey|Manage Personal Affairs][$PC.eyeColor = "pale-grey"]]<</if>>
	<<if $PC.origEye != "white">>| [[White|Manage Personal Affairs][$PC.eyeColor = "white"]]<</if>>
	<<if $PC.origEye != "pink">>| [[Pink|Manage Personal Affairs][$PC.eyeColor = "pink"]]<</if>>
	<<if $PC.origEye != "amber">>| [[Amber|Manage Personal Affairs][$PC.eyeColor = "amber"]]<</if>>
	<<if $PC.origEye != "red">>| [[Red|Manage Personal Affairs][$PC.eyeColor = "red"]]<</if>>
	<<if $PC.origEye != "yellow">>| [[Yellow|Manage Personal Affairs][$PC.eyeColor = "yellow"]]<</if>>
	<<if $PC.origEye != "orange">>| [[Orange|Manage Personal Affairs][$PC.eyeColor = "orange"]]<</if>>

	<<if $PC.pupil == "circular">>You aren't wearing contacts to change the shape of your pupils.<<else>>[[Remove lenses|Manage Personal Affairs][$PC.pupil = "circular"]]<</if>>
	<<if $PC.pupil != "catlike">>| [[Catlike|Manage Personal Affairs][$PC.pupil = "catlike"]]<</if>>
	<<if $PC.pupil != "serpent-like">>| [[Serpent-Like|Manage Personal Affairs][$PC.pupil = "serpent-like"]]<</if>>
	<<if $PC.pupil != "devilish">>| [[Devilish|Manage Personal Affairs][$PC.pupil = "devilish"]]<</if>>
	<<if $PC.pupil != "demonic">>| [[Demonic|Manage Personal Affairs][$PC.pupil = "demonic"]]<</if>>
	<<if $PC.pupil != "hypnotic">>| [[Hypnotic|Manage Personal Affairs][$PC.pupil = "hypnotic"]]<</if>>
	<<if $PC.pupil != "heart-shaped">>| [[Heart-Shaped|Manage Personal Affairs][$PC.pupil = "heart-shaped"]]<</if>>
	<<if $PC.pupil != "wide-eyed">>| [[Wide-Eyed|Manage Personal Affairs][$PC.pupil = "wide-eyed"]]<</if>>
	<<if $PC.pupil != "almond-shaped">>| [[Almond-Shaped|Manage Personal Affairs][$PC.pupil = "almond-shaped"]]<</if>>
	<<if $PC.pupil != "bright">>| [[Bright|Manage Personal Affairs][$PC.pupil = "bright"]]<</if>>
	<<if $PC.pupil != "teary">>| [[Teary|Manage Personal Affairs][$PC.pupil = "teary"]]<</if>>
	<<if $PC.pupil != "vacant">>| [[Vacant|Manage Personal Affairs][$PC.pupil = "vacant"]]<</if>>
	<<if $PC.pupil != "star-shaped">>| [[Star-Shaped|Manage Personal Affairs][$PC.pupil = "star-shaped"]]<</if>>
	<<if $PC.pupil != "goat-like">>| [[Goat-Like|Manage Personal Affairs][$PC.pupil = "goat-like"]]<</if>>

	<<if $PC.sclerae == "white">>You aren't wearing contacts to change the color of your sclerae.<<else>>[[Remove lenses|Manage Personal Affairs][$PC.sclerae = "white"]]<</if>>
	<<if $PC.sclerae != "blue">>| [[Blue|Manage Personal Affairs][$PC.sclerae = "blue"]]<</if>>
	<<if $PC.sclerae != "black">>| [[Black|Manage Personal Affairs][$PC.sclerae = "black"]]<</if>>
	<<if $PC.sclerae != "brown">>| [[Brown|Manage Personal Affairs][$PC.sclerae = "brown"]]<</if>>
	<<if $PC.sclerae != "green">>| [[Green|Manage Personal Affairs][$PC.sclerae = "green"]]<</if>>
	<<if $PC.sclerae != "turquoise">>| [[Turquoise|Manage Personal Affairs][$PC.sclerae = "turquoise"]]<</if>>
	<<if $PC.sclerae != "sky-blue">>| [[Sky-blue|Manage Personal Affairs][$PC.sclerae = "sky-blue"]]<</if>>
	<<if $PC.sclerae != "hazel">>| [[Hazel|Manage Personal Affairs][$PC.sclerae = "hazel"]]<</if>>
	<<if $PC.sclerae != "pale-grey">>| [[Pale-Grey|Manage Personal Affairs][$PC.sclerae = "pale-grey"]]<</if>>
	<<if $PC.sclerae != "pink">>| [[Pink|Manage Personal Affairs][$PC.sclerae = "pink"]]<</if>>
	<<if $PC.sclerae != "amber">>| [[Amber|Manage Personal Affairs][$PC.sclerae = "amber"]]<</if>>
	<<if $PC.sclerae != "red">>| [[Red|Manage Personal Affairs][$PC.sclerae = "red"]]<</if>>
	<<if $PC.sclerae != "yellow">>| [[Yellow|Manage Personal Affairs][$PC.sclerae = "yellow"]]<</if>>
	<<if $PC.sclerae != "orange">>| [[Orange|Manage Personal Affairs][$PC.sclerae = "orange"]]<</if>>

You have a selection of hair dyes available.

	<<if $PC.origHColor == $PC.hColor>>Your hair is its natural color.<<else>>[[Remove dye|Manage Personal Affairs][$PC.hColor = $PC.origHColor]]<</if>>
	<<if $PC.origHColor != "blonde">>| [[Blonde|Manage Personal Affairs][$PC.hColor = "blonde"]]<</if>>
	<<if $PC.origHColor != "golden">>| [[Golden|Manage Personal Affairs][$PC.hColor = "golden"]]<</if>>
	<<if $PC.origHColor != "platinum blonde">>| [[Platinum Blonde|Manage Personal Affairs][$PC.hColor = "platinum blonde"]]<</if>>
	<<if $PC.origHColor != "strawberry-blonde">>| [[Strawberry-blonde|Manage Personal Affairs][$PC.hColor = "strawberry-blonde"]]<</if>>
	<<if $PC.origHColor != "copper">>| [[Copper|Manage Personal Affairs][$PC.hColor = "copper"]]<</if>>
	<<if $PC.origHColor != "ginger">>| [[Ginger|Manage Personal Affairs][$PC.hColor = "ginger"]]<</if>>
	<<if $PC.origHColor != "red">>| [[Red|Manage Personal Affairs][$PC.hColor = "red"]]<</if>>
	<<if $PC.origHColor != "crimson">>| [[Crimson|Manage Personal Affairs][$PC.hColor = "crimson"]]<</if>>
	<<if $PC.origHColor != "green">>| [[Green|Manage Personal Affairs][$PC.hColor = "green"]]<</if>>
	<<if $PC.origHColor != "blue">>| [[Blue|Manage Personal Affairs][$PC.hColor = "blue"]]<</if>>
	<<if $PC.origHColor != "pink">>| [[Pink|Manage Personal Affairs][$PC.hColor = "pink"]]<</if>>
	<<if $PC.origHColor != "dark brown">>| [[Dark Brown|Manage Personal Affairs][$PC.hColor = "dark brown"]]<</if>>
	<<if $PC.origHColor != "brown">>| [[Brown|Manage Personal Affairs][$PC.hColor = "brown"]]<</if>>
	<<if $PC.origHColor != "auburn">>| [[Auburn|Manage Personal Affairs][$PC.hColor = "auburn"]]<</if>>
	<<if $PC.origHColor != "burgundy">>| [[Burgundy|Manage Personal Affairs][$PC.hColor = "burgundy"]]<</if>>
	<<if $PC.origHColor != "chocolate brown">>| [[Chocolate|Manage Personal Affairs][$PC.hColor = "chocolate brown"]]<</if>>
	<<if $PC.origHColor != "chestnut">>| [[Chestnut|Manage Personal Affairs][$PC.hColor = "chestnut"]]<</if>>
	<<if $PC.origHColor != "hazel">>| [[Hazel|Manage Personal Affairs][$PC.hColor = "hazel"]]<</if>>
	<<if $PC.origHColor != "black">>| [[Black|Manage Personal Affairs][$PC.hColor = "black"]]<</if>>
	<<if $PC.origHColor != "grey">>| [[Grey|Manage Personal Affairs][$PC.hColor = "grey"]]<</if>>
	<<if $PC.origHColor != "silver">>| [[Silver|Manage Personal Affairs][$PC.hColor = "silver"]]<</if>>
	<<if $PC.origHColor != "white">>| [[White|Manage Personal Affairs][$PC.hColor = "white"]]<</if>>
	<<if $PC.origHColor != "blue-violet">>| [[Blue-Violet|Manage Personal Affairs][$PC.hColor = "blue-violet"]]<</if>>

<<if $FCTVreceiver == 1>>

	<<if $FCTVrate == 1>>
		You make sure to tune in to FCTV at least once a week. [[Watch every other week|Manage Personal Affairs][$FCTVrate = 2]] | [[Watch once a month|Manage Personal Affairs][$FCTVrate = 4]] | [[Ignore it|Manage Personal Affairs][$FCTVrate = -1]]
	<<elseif $FCTVrate == 2>>
		You make sure to tune in to FCTV at least every two weeks. [[Watch every week|Manage Personal Affairs][$FCTVrate = 1]] | [[Watch once a month|Manage Personal Affairs][$FCTVrate = 4]] | [[Ignore it|Manage Personal Affairs][$FCTVrate = -1]]
	<<elseif $FCTVrate == 4>>
		You make sure to check in on FCTV at least once a month. [[Watch every week|Manage Personal Affairs][$FCTVrate = 1]] | [[Watch every other week|Manage Personal Affairs][$FCTVrate = 2]] | [[Ignore it|Manage Personal Affairs][$FCTVrate = -1]]
	<<else>>
		You don't watch FCTV. [[Watch every week|Manage Personal Affairs][$FCTVrate = 1]] | [[Watch every other week|Manage Personal Affairs][$FCTVrate = 2]] | [[Watch once a month|Manage Personal Affairs][$FCTVrate = 4]]
	<</if>>
<</if>>

You ponder what skills may be useful in running your arcology.

Trading:
<<if $PC.trading >= 100>>
	You are a master at economics and trading.
<<elseif $PC.trading >= 80>>
	You are an expert at economics and trading.
<<elseif $PC.trading >= 60>>
	You are skilled in economics and trading.
<<elseif $PC.trading >= 40>>
	You know some things about economics and trading.
<<elseif $PC.trading >= 20>>
	You are a beginner in economics.
<<elseif $PC.trading >= 0>>
	You know only the basics of trading.
<<elseif $PC.trading >= -20>>
	You know how to haggle a little.
<<elseif $PC.trading >= -40>>
	You know how to shop around.
<<elseif $PC.trading >= -60>>
	You know not to pay sticker price.
<<elseif $PC.trading >= -80>>
	People always give you discounts, but you never save any money.
<<else>>
	They said it was a bear market, so where are the bears?
<</if>>

Warfare:
<<if $PC.warfare >= 100>>
	You are a master of warfare.
<<elseif $PC.warfare >= 80>>
	You are an expert at tactics and strategy.
<<elseif $PC.warfare >= 60>>
	You are skilled in combat.
<<elseif $PC.warfare >= 40>>
	You know some things about combat.
<<elseif $PC.warfare >= 20>>
	You are a beginner in tactics and strategy.
<<elseif $PC.warfare >= 0>>
	You know only the basics of fighting.
<<elseif $PC.warfare >= -20>>
	You know how to hold a gun.
<<elseif $PC.warfare >= -40>>
	You know how to stab with a knife.
<<elseif $PC.warfare >= -60>>
	Go for the throat?
<<elseif $PC.warfare >= -80>>
	Just kick them in the balls, right?
<<else>>
	People like you are usually the first raped in a war.
<</if>>

Slaving:
<<if $PC.slaving >= 100>>
	You are a master slaver.
<<elseif $PC.slaving >= 80>>
	You are an expert at enslaving.
<<elseif $PC.slaving >= 60>>
	You are skilled in slaving.
<<elseif $PC.slaving >= 40>>
	You know some things about getting slaves.
<<elseif $PC.slaving >= 20>>
	You are a beginner in slaving.
<<elseif $PC.slaving >= 0>>
	You know only the basics of slaving.
<<elseif $PC.slaving >= -20>>
	You know how to avoid becoming a slave.
<<elseif $PC.slaving >= -40>>
	You know to read contracts before you sign them.
<<elseif $PC.slaving >= -60>>
	You know to be careful.
<<elseif $PC.slaving >= -80>>
	You know better than to trust anyone.
<<else>>
	It would be easy to enslave you.
<</if>>

Engineering:
<<if $PC.engineering >= 100>>
	You are a master engineer.
<<elseif $PC.engineering >= 80>>
	You are an expert at engineering.
<<elseif $PC.engineering >= 60>>
	You are skilled in engineering.
<<elseif $PC.engineering >= 40>>
	You know some things about engineering.
<<elseif $PC.engineering >= 20>>
	You are a beginner in engineering.
<<elseif $PC.engineering >= 0>>
	You know only the basics of engineering.
<<elseif $PC.engineering >= -20>>
	You can build a gingerbread house that doesn't collapse.
<<elseif $PC.engineering >= -40>>
	You can tie a tight knot, does that count?
<<elseif $PC.engineering >= -60>>
	Glue is your friend; lots of it.
<<elseif $PC.engineering >= -80>>
	You know better than to even try to build something.
<<else>>
	You can cook; that's sort of like building something, right?
<</if>>

Medicine:
<<if $PC.medicine >= 100>>
	You are a master surgeon.
<<elseif $PC.medicine >= 80>>
	You are an expert at medicine and surgery.
<<elseif $PC.medicine >= 60>>
	You are skilled in surgery.
<<elseif $PC.medicine >= 40>>
	You know some things about medicine.
<<elseif $PC.medicine >= 20>>
	You are a beginner in medicine.
<<elseif $PC.medicine >= 0>>
	You know the basics of treating injuries.
<<elseif $PC.medicine >= -20>>
	You can stop a wound from getting infected.
<<elseif $PC.medicine >= -40>>
	Gauze is your friend. Just keep wrapping.
<<elseif $PC.medicine >= -60>>
	You know how to apply a band-aid.
<<elseif $PC.medicine >= -80>>
	Cure-alls are wonderful. Why aren't they sold in stores, though?
<<else>>
	Alcohol makes pain go away, right?
<</if>>

Hacking:
<<if $PC.hacking >= 100>>
	You are a master of hacking.
<<elseif $PC.hacking >= 80>>
	You are an expert at hacking.
<<elseif $PC.hacking >= 60>>
	You are skilled in hacking.
<<elseif $PC.hacking >= 40>>
	You know some things about hacking.
<<elseif $PC.hacking >= 20>>
	You are a beginner in hacking.
<<elseif $PC.hacking >= 0>>
	You know only the basics of hacking.
<<elseif $PC.hacking >= -20>>
	You know how to click a mouse.
<<elseif $PC.hacking >= -40>>
	Enter does something?
<<elseif $PC.hacking >= -60>>
	Where is the "any" key?
<<elseif $PC.hacking >= -80>>
	You can push the power button, good job.
<<else>>
	This black box thingy is magical.
<</if>>

On formal occasions, you are announced as $PCTitle. By slaves, however, you prefer to be called <<if ndef $PC.customTitle>><<if $PC.title == 1>>Master<<else>>Mistress<</if>><<else>>$PC.customTitle, or $PC.customTitleLisp, by those slaves incapable of saying $PC.customTitle correctly<</if>>.

<<if ndef $PC.customTitle>>

<<link "Set a custom title for slaves to address you">>
		<<replace "#result">>
			Custom title: <<textbox "$PC.customTitle" $PC.customTitle>>
			<<link "Apply">>
				<<replace "#result">>
					Your title is now $PC.customTitle.
					<<set $PC.customTitleLisp = lispReplace($PC.customTitle)>>
				<</replace>>
			<</link>>
		<</replace>>
	<</link>>
<<else>>

Your custom title is <<textbox "$PC.customTitle" $PC.customTitle>>
	<<link "Apply">>
		<<replace "#result">>
			Your title is now $PC.customTitle.
			<<set $PC.customTitleLisp = lispReplace($PC.customTitle)>>
		<</replace>>
	<</link>> |
	<<link "Stop using a custom title">>
		<<replace "#result">>
			You stop using a custom title
			<<set $PC.customTitle = undefined>>
			<<set $PC.customTitleLisp = undefined>>
		<</replace>>
	<</link>>
<</if>>

<<link "Rename yourself">>
	<<replace "#nameResult">>
	New name: <<textbox "_PCNamet" $PC.name>>
		<<link "Apply">>
			<<set $rep -= 500>>
			<<replace "#nameResult">>
				<<set $PC.name = _PCNamet>>
				You will now be known as <<= PlayerName()>>.
			<</replace>>
		<</link>>
	<</replace>>
<</link>> //Will cost you some reputation//

<<if $PC.degeneracy > 0>>

__Rumors__

<<if $PC.degeneracy > 100>>
	There are severe and devastating rumors about you spreading across the arcology.
<<elseif $PC.degeneracy > 75>>
	There are severe rumors about you spreading across the arcology.
<<elseif $PC.degeneracy > 50>>
	There are bad rumors about you spreading across the arcology.
<<elseif $PC.degeneracy > 25>>
	There are rumors about you spreading across the arcology.
<<elseif $PC.degeneracy > 10>>
	There are minor rumors about you spreading across the arcology.
<<else>>
	The occasional rumor about you can be heard throughout the arcology.
<</if>>

<</if>>

<<if $familyTesting == 1>>

			<<link "Pull up the file on your family tree.">>
				<<replace #familyTreeLink>>
					<<run renderFamilyTree($slaves, -1)>>
				<</replace>>
			<</link>>

	/*Old version

		<<link "Pull up the file on your family tree.">>
			<<replace #family>>

				<<run updateFamilyTree(null, $slaves, $PC)>>

				<</replace>>
		<</link>>

	*/
	<<if totalPlayerRelatives($PC) > 0 || ($showMissingSlaves && ($PC.mother in $missingTable || $PC.father in $missingTable))>>
		<<PlayerFamily>>
	<</if>>
<</if>>

<<if $PC.vagina == 1>>

__Contraceptives and Fertility__

<<if $PC.preg < 6 && $PC.pregKnown == 1 && $PC.pregSource != -1>>
	Your period is late, so the first thing you do is test yourself for a potential pregnancy: @@.lime;you are pregnant.@@	<<link "Abort your child">><<replace "#miniscene">><<set $PC.preg = 0, $PC.pregType = 0, $PC.pregSource = 0, $PC.pregKnown = 0, $PC.pregWeek = 0>><<set WombFlush($PC)>><<print "You take a syringe filled with abortifacients and make yourself comfortable. Injecting the vial through your belly into your womb, your close your eyes and wait for what is coming. Once you feel it is over, you clean yourself up and go on your way, child free.">>
    <</replace>><</link>>
<<elseif $PC.labor == 1>>
	You are beginning to feel contractions; you'll be giving birth soon.
<<elseif $PC.preg >= 39>>
	Your due date is looming, but your child doesn't seem to be interested in coming out just yet. [[Induce childbirth|Manage Personal Affairs][$PC.labor = 1]]
<<elseif $PC.pregKnown == 1 && $PC.pregSource != -1>>
	You're pregnant, something rather unbecoming for an arcology owner. <<link "Abort your child">><<replace "#miniscene">><<set $PC.preg = 0, $PC.pregWeek = -2, $PC.pregType = 0, $PC.pregSource = 0, $PC.belly = 0, $PC.pregKnown = 0>><<set WombFlush($PC)>><<print "You take a syringe filled with abortifacients and make yourself comfortable. Injecting the vial through your belly into your womb, your close your eyes and wait for what is coming. Once you feel it is over, you clean yourself up and go on your way, child free.">>
    <</replace>><</link>>
<</if>>

<<if $PC.births > 0>>

In total, you have given birth to:
<<if $PC.birthElite > 0>>

<<print $PC.birthElite>> bab<<if $PC.birthElite > 1>>ies<<else>>y<</if>> for the Societal Elite.
<</if>>
<<if $PC.birthMaster > 0>>

<<print $PC.birthMaster>> bab<<if $PC.birthMaster > 1>>ies<<else>>y<</if>> for your former master.
<</if>>
<<if $PC.birthClient > 0>>

<<print $PC.birthClient>> bab<<if $PC.birthClient > 1>>ies<<else>>y<</if>> from clients you've slept with.
<</if>>
<<if $PC.birthDegenerate > 0>>

<<print $PC.birthDegenerate>> bastard<<if $PC.birthDegenerate > 1>>s<</if>> from getting fucked by slaves.
<</if>>
<<if $PC.birthArcOwner > 0>>

<<print $PC.birthArcOwner>> bab<<if $PC.birthArcOwner > 1>>ies<<else>>y<</if>> from your time with that male arcology owner.
<</if>>
<<if $PC.birthCitizen > 0>>

<<print $PC.birthCitizen>> bab<<if $PC.birthCitizen > 1>>ies<<else>>y<</if>> from sex with arcology citizens.
<</if>>
<<if $PC.birthOther > 0>>

<<print $PC.birthOther>> bab<<if $PC.birthOther > 1>>ies<<else>>y<</if>> from sources you can't quite recall.
<</if>>
<<if $PC.birthSelf > 0>>

<<print $PC.birthSelf>> bab<<if $PC.birthSelf > 1>>ies<<else>>y<</if>> that <<if $PC.birthSelf > 1>>are<<else>>is<</if>> literally all you.
<</if>>
<</if>>
<<if $PC.slavesKnockedUp > 0>>

	<<if $PC.dick == 1>>
		You've knocked up <<print commaNum($PC.slavesKnockedUp)>> fertile slave girl<<if $PC.slavesKnockedUp > 1>>s<</if>><<if $PC.slavesFathered > 0>> and fathered <<print commaNum($PC.slavesFathered)>> new slave<<if $PC.slavesFathered > 1>>s<</if>><</if>> as an arcology owner so far.
	<<else>>
		Before your sex change, you knocked up <<print commaNum($PC.slavesKnockedUp)>> fertile slave girl<<if $PC.slavesKnockedUp > 1>>s<</if>><<if $PC.slavesFathered > 0>> and fathered <<print commaNum($PC.slavesFathered)>> new slave<<if $PC.slavesFathered > 1>>s<</if>><</if>>.
	<</if>>
<<else>>
	<<if $PC.slavesFathered > 0>>

		<<if $PC.dick == 1>>
			You've fathered <<print commaNum($PC.slavesFathered)>> new slave<<if $PC.slavesFathered > 1>>s<</if>> as an arcology owner so far.
		<<else>>
			Before your sex change, you fathered <<print commaNum($PC.slavesFathered)>> new slave<<if $PC.slavesFathered > 1>>s<</if>>.
		<</if>>
	<</if>>
<</if>>

<<if $PC.preg >= 8>>
	You're currently <<print $PC.preg>> week<<if $PC.preg > 1>>s<</if>> pregnant, so contraception doesn't matter right now.
<<elseif $PC.preg >= 6>>
	You're having morning sickness.
<<elseif $PC.preg > 1>>
	You've missed your period. This could be bad.
<<elseif $PC.preg > 0 && $PC.pregSource != -1>>
	Your fertile pussy has been thoroughly seeded, there is a chance you are pregnant. <<link "Pop some morning after pills">><<set $PC.preg = 0, $PC.pregWeek = 0, $PC.pregType = 0, $PC.pregSource = 0, $PC.pregKnown = 0>><<set WombFlush($PC)>><<goto "Manage Personal Affairs">><</link>>
<<elseif $PC.pregWeek < 0>>
	You're still recovering from your recent pregnancy.
<<elseif $PC.preg == -2>>
	You're menopausal. Your time to bear children has passed.
<<elseif $PC.preg == -1>>
	You're currently on birth control.
	[[Stop taking it|Manage Personal Affairs][$PC.preg = 0]]
<<elseif $PC.preg == 0>>
	You're currently fertile.
	[[Start taking birth control|Manage Personal Affairs][$PC.preg = -1, $PC.fertDrugs = 0]]

	<<set _toSearch = $PC.refreshment.toLowerCase(), _fertRefresh = 0>>
	<<if _toSearch.indexOf("fertility") != -1>>
		<<set _fertRefresh = 1>>
	<</if>>
	<<if $PC.fertDrugs == 1>>
		You are currently taking fertility supplements<<if _fertRefresh == 1>>on top of the <<print $PC.refreshment>>s.<<else>>.<<if $PC.forcedFertDrugs > 0>> You feel a strange eagerness whenever you think of bareback sex.<</if>><</if>> [[Stop taking fertility drugs|Manage Personal Affairs][$PC.fertDrugs = 0]]
	<<else>>
		You are not on any fertility supplements<<if _fertRefresh == 1>>, other than the $PC.refreshment, of course.<<else>>.<<if $PC.forcedFertDrugs > 0>> You feel a strange eagerness whenever you think of bareback sex.<</if>><</if>> [[Start taking fertility drugs|Manage Personal Affairs][$PC.fertDrugs = 1]]
	<</if>>
<</if>>

<<if $arcologies[0].FSRestartDecoration >= 100>>
	<<if $playerBred == 0>>

		You are currently not bearing children for the Societal Elite.
		[[List your womb as available|Manage Personal Affairs][$playerBred = 1, $playerBredTube = 0]] | [[Sign up for artificial insemination|Manage Personal Affairs][$playerBred = 1, $playerBredTube = 1]]
	<<else>>
		Your womb is dedicated to carrying the Societal Elites' children.
		<<if $PC.birthElite > 0>>
			[[List your womb as unavailable|Manage Personal Affairs][$playerBred = 0]]
		<<else>>
			// You must bear at least one child for the Societal Elite before removing yourself from the breeding program. //
		<</if>>
	<</if>>
<</if>>

<<if $PC.preg == 0 && $PC.pregWeek == 0>>

<<if $dairyPiping == 1 && ($cumSlaves > 0 || $arcologies[0].FSPastoralistLaw == 1)>>
	<<if $PC.cumTap == 0>>

		The tap connected to $dairyName has a variety of attachments, one of which being a very tantalizing dick-shaped nozzle. It looks like it would be a perfect fit for you, if you were curious, that is.

[[No one is looking...|FSelf]]
	<<else>>

		The tap connected to $dairyName is calling to you. Begging to let it fill you with cum again. If you wanted to try and go bigger, that is.

[[Sounds fun!|FSelf]]

<<link "You only want to get pregnant.">><<set $PC.preg = 1, $PC.pregWeek = 1, $PC.pregSource = 0, $PC.pregKnown = 1>><<set $PC.pregType = setPregType($PC)>><<set WombImpregnate($PC, $PC.pregType, 0, 1)>><<goto "Manage Personal Affairs">><</link>>
	<</if>>
<</if>>
<<if $PC.vagina == 1 && $PC.dick == 1>>
	<<if $PC.birthSelf > 0>>

		Who better to impregnate you than you?

[[Impregnate yourself.|MpregSelf]]
	<<else>>

		You have an empty vagina, a working set of balls, and a strong craving for a hot creampie. Who better to give it to you than you?
		[[Grab an extra syringe.|MpregSelf]]
	<</if>>
<</if>>

<</if>>

<<else>> /* no vagina */

<<if $PC.births > 0>>

	Before your sex change, you had given birth to:
	<<if $PC.birthElite > 0>>

<<print commaNum($PC.birthElite)>> bab<<if $PC.birthElite > 1>>ies<<else>>y<</if>> for the Societal Elite.
	<</if>>
	<<if $PC.birthMaster > 0>>

<<print commaNum($PC.birthMaster)>> bab<<if $PC.birthMaster > 1>>ies<<else>>y<</if>> for your former master.
	<</if>>
	<<if $PC.birthClient > 0>>

<<print commaNum($PC.birthOther)>> bab<<if $PC.birthOther > 1>>ies<<else>>y<</if>> from clients you've slept with.
	<</if>>
	<<if $PC.birthDegenerate > 0>>

<<print commaNum($PC.birthDegenerate)>> bastard<<if $PC.birthDegenerate > 1>>s<</if>> from getting fucked by slaves.
	<</if>>
	<<if $PC.birthArcOwner > 0>>

<<print commaNum($PC.birthArcOwner)>> bab<<if $PC.birthArcOwner > 1>>ies<<else>>y<</if>> from your time with that male arcology owner.
	<</if>>
	<<if $PC.birthCitizen > 0>>

<<print commaNum($PC.birthCitizen)>> bab<<if $PC.birthCitizen > 1>>ies<<else>>y<</if>> from sex with arcology citizens.
	<</if>>
	<<if $PC.birthOther > 0>>

<<print commaNum($PC.birthOther)>> bab<<if $PC.birthOther > 1>>ies<<else>>y<</if>> from sources you can't quite recall.
	<</if>>
	<<if $PC.birthSelf > 0>>

<<print commaNum($PC.birthSelf)>> bab<<if $PC.birthSelf > 1>>ies<<else>>y<</if>> that were literally all you.
	<</if>>
<</if>>
<<if $PC.slavesKnockedUp > 0>>

		You've knocked up <<print commaNum($PC.slavesKnockedUp)>> fertile slave girl<<if $PC.slavesKnockedUp > 1>>s<</if>><<if $PC.slavesFathered > 0>> and fathered <<print commaNum($PC.slavesFathered)>> new slave<<if $PC.slavesFathered > 1>>s<</if>><</if>> as an arcology owner so far.
<<else>>
	<<if $PC.slavesFathered > 0>>

		You've fathered <<print commaNum($PC.slavesFathered)>> new slave<<if $PC.slavesFathered > 1>>s<</if>> as an arcology owner so far.
	<</if>>
<</if>>

<</if>>

__Drugs__

<<if $PC.staminaPills == 1>>
	You are currently taking stamina enhancing pills in order to enjoy more slaves per week. [[Stop taking stamina enhancing drugs|Manage Personal Affairs][$PC.staminaPills = 0]]
<<else>>
	You are not on any stamina enhancers. [[More stamina means more sex|Manage Personal Affairs][$PC.staminaPills = 1]]
<</if>>

__Other Personal Business__
<<if $rep >= 10000>>

 [[Visit the Black Market|The Black Market]]
<<elseif $rep > 7500>>

 You lack the reputation to be invited to the underground Black Market.
<</if>>

<<if $propOutcome == 1 && $arcologies[0].FSRestart != "unset">>

__Elite Breeder Qualifications__
	<<if ndef $activeStandard>>
		<<InitStandards>>
	<<else>>
		<<UpdateStandards>>
		<<BreedingStandards>>
	<</if>>
<</if>>