code:
:: SA hormone effects [nobr]

<<if $slaves[$i].hormoneBalance <= -400>>
	$possessiveCap hormone balance is overwhelmingly masculine.
<<elseif $slaves[$i].hormoneBalance <= -300>>
	$possessiveCap hormone balance is extremely masculine.
<<elseif $slaves[$i].hormoneBalance <= -200>>
	$possessiveCap hormone balance is heavily masculine.
<<elseif $slaves[$i].hormoneBalance <= -100>>
	$possessiveCap hormone balance is very masculine.
<<elseif $slaves[$i].hormoneBalance < -20>>
	$possessiveCap hormone balance is masculine.
<<elseif $slaves[$i].hormoneBalance >= 400>>
	$possessiveCap hormone balance is overwhelmingly feminine.
<<elseif $slaves[$i].hormoneBalance >= 300>>
	$possessiveCap hormone balance is extremely feminine.
<<elseif $slaves[$i].hormoneBalance >= 200>>
	$possessiveCap hormone balance is heavily feminine.
<<elseif $slaves[$i].hormoneBalance >= 100>>
	$possessiveCap hormone balance is very feminine.
<<elseif $slaves[$i].hormoneBalance > 20>>
	$possessiveCap hormone balance is feminine.
<<else>>
	$pronounCap has a neutral hormone balance.
<</if>>

<<if $hormoneUpgradeMood == 0>>
	<<if $slaves[$i].hormoneBalance > 20 && $slaves[$i].genes == "XY" && $slaves[$i].balls != 0>>
		$possessiveCap feminine hormonal balance conflicts with $possessive natural hormones,
		<<if $slaves[$i].devotion > 50>>
			but $pronoun's a good enough slave to suppress the occasional moodiness.
		<<else>>
			causing @@.mediumorchid;occasional moodiness.@@
			<<set $slaves[$i].devotion -= 1>>
		<</if>>
		<<if $slaves[$i].energy > 10>>
			It also has the unfortunate consequence of @@.red;damaging her libido.@@
			<<set $slaves[$i].energy-->>
		<</if>>
		<<if $slaves[$i].attrXX > 50 || $slaves[$i].attrXY > 50>>
			Even more troubling, $possessive sexual confusion @@.red;leaves $possessive finding others less attractive.@@
			<<if $slaves[$i].attrXX > 50>>
				<<set $slaves[$i].attrXX-->>
			<</if>>
			<<if $slaves[$i].attrXY > 50>>
				<<set $slaves[$i].attrXY-->>
			<</if>>
		<</if>>
	<</if>>
	<<if $slaves[$i].hormoneBalance < -20 && $slaves[$i].genes == "XX" && ($slaves[$i].ovaries != 0 || $slaves[$i].mpreg != 0)>>
		$possessiveCap masculine hormonal balance conflicts with $possessive natural hormones,
		<<if $slaves[$i].devotion > 50>>
			but $pronoun's a good enough slave to suppress the occasional moodiness.
		<<else>>
			causing @@.mediumorchid;occasional moodiness.@@
			<<set $slaves[$i].devotion -= 1>>
		<</if>>
		<<if $slaves[$i].energy > 10>>
			It also has the unfortunate consequence of @@.red;damaging her libido.@@
			<<set $slaves[$i].energy-->>
		<</if>>
		<<if $slaves[$i].attrXX > 50 || $slaves[$i].attrXY > 50>>
			Even more troubling, $possessive sexual confusion @@.red;leaves $possessive finding others less attractive.@@
			<<if $slaves[$i].attrXX > 50>>
				<<set $slaves[$i].attrXX-->>
			<</if>>
			<<if $slaves[$i].attrXY > 50>>
				<<set $slaves[$i].attrXY-->>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if $slaves[$i].physicalAge >= 18 || $loliGrow == 1>>
<<if Math.abs($slaves[$i].hormoneBalance) >= 50>>

<<if $slaves[$i].hormoneBalance >= 350>>

	<<if ($slaves[$i].physicalAge < 25)>>
		<<if ($slaves[$i].shoulders+(Math.abs($slaves[$i].shouldersImplant)) > -1) && ($slaves[$i].shoulders > -2) && (random(1,100) < 20+(10*$hormoneUpgradePower))>>
			$possessiveCap body has not yet found its final bone structure, which typically happens in the mid-twenties. Hormonal effects cause @@.lime;$possessive shoulders to develop into a more feminine narrowness@@ than they would have done naturally.
			<<set $slaves[$i].shoulders-->>
		<</if>>
		<<if ($slaves[$i].hips-(Math.abs($slaves[$i].hipsImplant)) < 1) && ($slaves[$i].hips < 2) && (random(1,100) <= 20+(10*$hormoneUpgradePower))>>
			$possessiveCap body has not yet found its final bone structure, which typically happens in the mid-twenties. Hormonal effects cause @@.lime;$possessive hips to develop more broadly@@ than they would have done naturally.
			<<set $slaves[$i].hips++>>
		<</if>>
	<</if>>

	<<if ($slaves[$i].faceShape == "masculine")>>
		Hormonal effects cause @@.orange;$possessive face to soften into androgyny.@@
		<<set $slaves[$i].faceShape = "androgynous">>
	<<elseif ($slaves[$i].faceShape == "androgynous")>>
		Hormonal effects cause @@.lime;$possessive face to soften into femininity.@@
		<<set $slaves[$i].faceShape = "normal">>
	<</if>>
	<<if ($slaves[$i].face-$slaves[$i].faceImplant < 0) && ($slaves[$i].face < 75)>>
		Hormonal effects cause @@.lime;$possessive facial structure to soften and become less unattractive.@@
		<<set _faceInc = 1+$hormoneUpgradePower>>
		<<FaceIncrease $slaves[$i] _faceInc>>
	<</if>>

	<<if ($slaves[$i].voice < 3) && ($slaves[$i].voice > 0)>>
		Hormonal effects cause @@.lime;$possessive voice to become higher and more feminine.@@
		<<set $slaves[$i].voice++>>
	<</if>>

	<<if $slaves[$i].muscles > 10 && $slaves[$i].diet != "muscle building" && $slaves[$i].drugs != "steroids">>
		Hormonal effects @@.orange;reduce $possessive musculature.@@
		<<set $slaves[$i].muscles -= 2+$hormoneUpgradePower>>
	<</if>>
	<<if $slaves[$i].waist > -30>>
		Hormonal effects cause $possessive @@.lime;waist to narrow.@@
		<<set $slaves[$i].waist -= 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].boobs-$slaves[$i].boobsImplant) < 1400>>
		Hormonal effects cause @@.lime;a small amount of natural breast growth.@@
		<<set $slaves[$i].boobs += 10+(15*$hormoneUpgradePower)>>
	<</if>>
	<<if $slaves[$i].nipples == "tiny">>
		Hormonal effects cause $possessive tiny @@.lime;nipples to grow to a more normal size.@@
		<<set $slaves[$i].nipples = "cute">>
	<</if>>
	<<if ($slaves[$i].butt-$slaves[$i].buttImplant) < 4>>
		Hormonal effects cause @@.lime;the natural size of $possessive butt to increase.@@
		<<set $slaves[$i].butt++>>
	<</if>>
	<<if $slaves[$i].vagina > -1 && $slaves[$i].ovaries != 0 && $slaves[$i].vaginaLube < 2>>
		Hormonal effects cause @@.lime;$possessive vagina to produce more copious natural lubricant.@@
		<<set $slaves[$i].vaginaLube++>>
	<</if>>

	<<if $hormoneUpgradeShrinkage == 0>>
		<<if $slaves[$i].dick > 1>>
			Hormonal effects cause @@.orange;$possessive dick to atrophy.@@
			<<set $slaves[$i].dick-->>
		<</if>>
		<<if $slaves[$i].balls > 1>>
			Hormonal effects cause @@.orange;$possessive testicles to atrophy.@@
			<<set $slaves[$i].balls-->>
		<</if>>
		<<if $slaves[$i].clit > 0>>
			Hormonal effects cause @@.orange;$possessive clit to shrink significantly.@@
			<<set $slaves[$i].clit-->>
		<</if>>
	<</if>>

	<<if $slaves[$i].devotion <= 20>>
		Hormonal effects make $object a bit more @@.hotpink;docile.@@
		<<set $slaves[$i].devotion++>>
	<</if>>
	<<if $slaves[$i].trust <= 20>>
		Hormonal effects make $object a bit more @@.mediumaquamarine;trusting.@@
		<<set $slaves[$i].trust++>>
	<</if>>
	<<if $slaves[$i].attrXY < 100>>
		Hormonal effects cause $object to become @@.green;more attracted to men.@@
		<<set $slaves[$i].attrXY += 2+$hormoneUpgradePower>>
	<</if>>
<<elseif $slaves[$i].hormoneBalance >= 300>>

	<<if ($slaves[$i].faceShape == "masculine")>>
		Hormonal effects cause @@.orange;$possessive face to harden into androgyny.@@
		<<set $slaves[$i].faceShape = "androgynous">>
	<<elseif ($slaves[$i].faceShape == "androgynous")>>
		Hormonal effects cause @@.lime;$possessive face to soften into femininity.@@
		<<set $slaves[$i].faceShape = "normal">>
	<</if>>
	<<if ($slaves[$i].face-$slaves[$i].faceImplant < 0) && ($slaves[$i].face < 60)>>
		Hormonal effects cause @@.lime;$possessive facial structure to soften and become less unattractive.@@
		<<set _faceInc = 1+$hormoneUpgradePower>>
		<<FaceIncrease $slaves[$i] _faceInc>>
	<</if>>

	<<if ($slaves[$i].voice < 3) && ($slaves[$i].voice > 0)>>
		Hormonal effects cause @@.lime;$possessive voice to become higher and more feminine.@@
		<<set $slaves[$i].voice++>>
	<</if>>

	<<if $slaves[$i].muscles > 30 && $slaves[$i].diet != "muscle building" && $slaves[$i].drugs != "steroids">>
		Hormonal effects @@.orange;reduce $possessive musculature.@@
		<<set $slaves[$i].muscles -= 2+$hormoneUpgradePower>>
	<</if>>
	<<if $slaves[$i].waist > -10>>
		Hormonal effects cause $possessive @@.lime;waist to narrow.@@
		<<set $slaves[$i].waist -= 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].boobs-$slaves[$i].boobsImplant) < 1000>>
		Hormonal effects cause @@.lime;a small amount of natural breast growth.@@
		<<set $slaves[$i].boobs += 10+(15*$hormoneUpgradePower)>>
	<</if>>
	<<if $slaves[$i].nipples == "tiny">>
		Hormonal effects cause $possessive tiny @@.lime;nipples to grow to a more normal size.@@
		<<set $slaves[$i].nipples = "cute">>
	<</if>>
	<<if ($slaves[$i].butt-$slaves[$i].buttImplant) < 4>>
		Hormonal effects cause @@.lime;the natural size of $possessive butt to increase.@@
		<<set $slaves[$i].butt++>>
	<</if>>
	<<if $slaves[$i].vagina > -1 && $slaves[$i].ovaries != 0 && $slaves[$i].vaginaLube < 2>>
		Hormonal effects cause @@.lime;$possessive vagina to produce more copious natural lubricant.@@
		<<set $slaves[$i].vaginaLube++>>
	<</if>>

	<<if $hormoneUpgradeShrinkage == 0>>
		<<if $slaves[$i].dick > 1>>
			Hormonal effects cause @@.orange;$possessive dick to atrophy.@@
			<<set $slaves[$i].dick-->>
		<</if>>
		<<if $slaves[$i].balls > 1>>
			Hormonal effects cause @@.orange;$possessive testicles to atrophy.@@
			<<set $slaves[$i].balls-->>
		<</if>>
		<<if $slaves[$i].clit > 0>>
			Hormonal effects cause @@.orange;$possessive clit to shrink significantly.@@
			<<set $slaves[$i].clit-->>
		<</if>>
	<</if>>

	<<if $slaves[$i].devotion <= 20>>
		Hormonal effects make $object a bit more @@.hotpink;docile.@@
		<<set $slaves[$i].devotion++>>
	<</if>>
	<<if $slaves[$i].trust <= 20>>
		Hormonal effects make $object a bit more @@.mediumaquamarine;trusting.@@
		<<set $slaves[$i].trust++>>
	<</if>>
	<<if $slaves[$i].attrXY < 100>>
		Hormonal effects cause $object to become @@.green;more attracted to men.@@
		<<set $slaves[$i].attrXY += 2+$hormoneUpgradePower>>
	<</if>>

<<elseif $slaves[$i].hormoneBalance >= 250>>

	<<if ($slaves[$i].faceShape == "masculine")>>
		Hormonal effects cause @@.orange;$possessive face to soften into androgyny.@@
		<<set $slaves[$i].faceShape = "androgynous">>
	<<elseif ($slaves[$i].faceShape == "androgynous")>>
		Hormonal effects cause @@.lime;$possessive face to soften into femininity.@@
		<<set $slaves[$i].faceShape = "normal">>
	<</if>>
	<<if ($slaves[$i].face-$slaves[$i].faceImplant < 0) && ($slaves[$i].face < 30)>>
		Hormonal effects cause @@.lime;$possessive facial structure to soften and become less unattractive.@@
		<<set _faceInc = 1+$hormoneUpgradePower>>
		<<FaceIncrease $slaves[$i] _faceInc>>
	<</if>>

	<<if ($slaves[$i].voice < 2) && ($slaves[$i].voice > 0)>>
		Hormonal effects cause @@.lime;$possessive voice to become higher and more feminine.@@
		<<set $slaves[$i].voice++>>
	<</if>>

	<<if $slaves[$i].muscles > 30 && $slaves[$i].diet != "muscle building" && $slaves[$i].drugs != "steroids">>
		Hormonal effects @@.orange;reduce $possessive musculature.@@
		<<set $slaves[$i].muscles -= 2+$hormoneUpgradePower>>
	<</if>>
	<<if $slaves[$i].waist > 0>>
		Hormonal effects cause $possessive @@.lime;waist to narrow.@@
		<<set $slaves[$i].waist -= 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].boobs-$slaves[$i].boobsImplant) < 800>>
		Hormonal effects cause @@.lime;a small amount of natural breast growth.@@
		<<set $slaves[$i].boobs += 10+(15*$hormoneUpgradePower)>>
	<</if>>
	<<if $slaves[$i].nipples == "tiny">>
		Hormonal effects cause $possessive tiny @@.lime;nipples to grow to a more normal size.@@
		<<set $slaves[$i].nipples = "cute">>
	<</if>>
	<<if ($slaves[$i].butt-$slaves[$i].buttImplant) < 3>>
		Hormonal effects cause @@.lime;the natural size of $possessive butt to increase.@@
		<<set $slaves[$i].butt++>>
	<</if>>
	<<if $slaves[$i].vagina > -1 && $slaves[$i].ovaries != 0 && $slaves[$i].vaginaLube < 1>>
		Hormonal effects cause @@.lime;$possessive vagina to produce more copious natural lubricant.@@
		<<set $slaves[$i].vaginaLube++>>
	<</if>>

	<<if $hormoneUpgradeShrinkage == 0>>
		<<if $slaves[$i].dick > 2>>
			Hormonal effects cause @@.orange;$possessive dick to atrophy.@@
			<<set $slaves[$i].dick-->>
		<</if>>
		<<if $slaves[$i].balls > 2>>
			Hormonal effects cause @@.orange;$possessive testicles to atrophy.@@
			<<set $slaves[$i].balls-->>
		<</if>>
		<<if $slaves[$i].clit > 1>>
			Hormonal effects cause @@.orange;$possessive clit to shrink significantly.@@
			<<set $slaves[$i].clit-->>
		<</if>>
	<</if>>

	<<if $slaves[$i].devotion <= 20>>
		Hormonal effects make $object a bit more @@.hotpink;docile.@@
		<<set $slaves[$i].devotion++>>
	<</if>>
	<<if $slaves[$i].trust <= 20>>
		Hormonal effects make $object a bit more @@.mediumaquamarine;trusting.@@
		<<set $slaves[$i].trust++>>
	<</if>>
	<<if $slaves[$i].attrXY < 95>>
		Hormonal effects cause $object to become @@.green;more attracted to men.@@
		<<set $slaves[$i].attrXY += 2+$hormoneUpgradePower>>
	<</if>>

<<elseif $slaves[$i].hormoneBalance >= 200>>

	<<if ($slaves[$i].faceShape == "masculine")>>
		Hormonal effects cause @@.orange;$possessive face to soften into androgyny.@@
		<<set $slaves[$i].faceShape = "androgynous">>
	<</if>>
	<<if ($slaves[$i].face-$slaves[$i].faceImplant < 0) && ($slaves[$i].face < 0)>>
		Hormonal effects cause @@.lime;$possessive facial structure to soften and become less unattractive.@@
		<<set _faceInc = 1+$hormoneUpgradePower>>
		<<FaceIncrease $slaves[$i] _faceInc>>
	<</if>>

	<<if ($slaves[$i].voice < 2) && ($slaves[$i].voice > 0)>>
		Hormonal effects cause @@.lime;$possessive voice to become higher and more feminine.@@
		<<set $slaves[$i].voice++>>
	<</if>>

	<<if $slaves[$i].muscles > 30 && $slaves[$i].diet != "muscle building" && $slaves[$i].drugs != "steroids">>
		Hormonal effects @@.orange;reduce $possessive musculature.@@
		<<set $slaves[$i].muscles -= 2+$hormoneUpgradePower>>
	<</if>>
	<<if $slaves[$i].waist > 10>>
		Hormonal effects cause $possessive @@.lime;waist to narrow.@@
		<<set $slaves[$i].waist -= 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].boobs-$slaves[$i].boobsImplant) < 650>>
		Hormonal effects cause @@.lime;a small amount of natural breast growth.@@
		<<set $slaves[$i].boobs += 10+(15*$hormoneUpgradePower)>>
	<</if>>
	<<if $slaves[$i].nipples == "tiny">>
		Hormonal effects cause $possessive tiny @@.lime;nipples to grow to a more normal size.@@
		<<set $slaves[$i].nipples = "cute">>
	<</if>>
	<<if ($slaves[$i].butt-$slaves[$i].buttImplant) < 2>>
		Hormonal effects cause @@.lime;the natural size of $possessive butt to increase.@@
		<<set $slaves[$i].butt++>>
	<</if>>
	<<if $slaves[$i].vagina > -1 && $slaves[$i].ovaries != 0 && $slaves[$i].vaginaLube < 1>>
		Hormonal effects cause @@.lime;$possessive vagina to produce more copious natural lubricant.@@
		<<set $slaves[$i].vaginaLube++>>
	<</if>>

	<<if $hormoneUpgradeShrinkage == 0>>
		<<if $slaves[$i].dick > 3>>
			Hormonal effects cause @@.orange;$possessive dick to atrophy.@@
			<<set $slaves[$i].dick-->>
		<</if>>
		<<if $slaves[$i].balls > 3>>
			Hormonal effects cause @@.orange;$possessive testicles to atrophy.@@
			<<set $slaves[$i].balls-->>
		<</if>>
		<<if $slaves[$i].clit > 2>>
			Hormonal effects cause @@.orange;$possessive clit to shrink significantly.@@
			<<set $slaves[$i].clit-->>
		<</if>>
	<</if>>

	<<if $slaves[$i].devotion <= 20>>
		Hormonal effects make $object a bit more @@.hotpink;docile.@@
		<<set $slaves[$i].devotion++>>
	<</if>>
	<<if $slaves[$i].trust <= 20>>
		Hormonal effects make $object a bit more @@.mediumaquamarine;trusting.@@
		<<set $slaves[$i].trust++>>
	<</if>>
	<<if $slaves[$i].attrXY < 90>>
		Hormonal effects cause $object to become @@.green;more attracted to men.@@
		<<set $slaves[$i].attrXY += 2+$hormoneUpgradePower>>
	<</if>>

<<elseif $slaves[$i].hormoneBalance >= 100>>

	<<if ($slaves[$i].boobs-$slaves[$i].boobsImplant) < 500>>
		Hormonal effects cause @@.lime;a small amount of natural breast growth.@@
		<<set $slaves[$i].boobs += 10+(15*$hormoneUpgradePower)>>
	<</if>>

	<<if ($slaves[$i].devotion <= 20)>>
		Hormonal effects make $object a bit more @@.hotpink;docile.@@
		<<set $slaves[$i].devotion++>>
	<</if>>
	<<if ($slaves[$i].trust <= 20)>>
		Hormonal effects make $object a bit more @@.mediumaquamarine;trusting.@@
		<<set $slaves[$i].trust++>>
	<</if>>
	<<if ($slaves[$i].attrXY < 80)>>
		Hormonal effects cause $object to become @@.green;more attracted to men.@@
		<<set $slaves[$i].attrXY += 2+$hormoneUpgradePower>>
	<</if>>

<<elseif $slaves[$i].hormoneBalance >= 50>>
	<<if ($slaves[$i].attrXY < 70)>>
		Hormonal effects cause $object to become @@.green;more attracted to men.@@
		<<set $slaves[$i].attrXY += 2+$hormoneUpgradePower>>
	<</if>>

<<elseif $slaves[$i].hormoneBalance <= -350>>
	<<if ($slaves[$i].physicalAge < 25)>>
		<<if ($slaves[$i].shoulders-(Math.abs($slaves[$i].shouldersImplant)) < 1) && ($slaves[$i].shoulders < 2) && (random(1,100) < 20+(10*$hormoneUpgradePower))>>
			$possessiveCap body has not yet found its final bone structure, which typically happens in the mid-twenties. Hormonal effects cause @@.orange;$possessive shoulders to develop a more masculine wideness@@ than they would have done naturally.
		<</if>>
		<<if ($slaves[$i].hips+(Math.abs($slaves[$i].hipsImplant)) > -1) && ($slaves[$i].hips > -2) && (random(1,100) <= 20+(10*$hormoneUpgradePower))>>
			$possessiveCap body has not yet found its final bone structure, which typically happens in the mid-twenties. Hormonal effects cause @@.orange;$possessive hips to develop more narrowly@@ than they would have done naturally.
		<</if>>
	<</if>>

	<<if ($slaves[$i].faceShape == "androgynous")>>
		Hormonal effects cause @@.orange;$possessive face to harden into masculinity.@@
		<<set $slaves[$i].faceShape = "masculine">>
	<<elseif ($slaves[$i].faceShape != "masculine")>>
		Hormonal effects cause @@.orange;$possessive face to harden into androgyny.@@
		<<set $slaves[$i].faceShape = "androgynous">>
	<</if>>
	<<if ($slaves[$i].face-$slaves[$i].faceImplant > 0)>>
		Hormonal effects cause @@.orange;$possessive facial structure to harden and become less attractive.@@
		<<set _faceDec = 1+$hormoneUpgradePower>>
		<<set $slaves[$i].face = Math.trunc($slaves[$i].face-_faceDec,-100,100)>>
	<</if>>

	<<if ($slaves[$i].voice > 1)>>
		Hormonal effects cause @@.orange;$possessive voice to become deeper and less feminine.@@
		<<set $slaves[$i].voice-->>
	<</if>>

	<<if ($hormoneUpgradeShrinkage == 0)>>
		<<if (($slaves[$i].butt-$slaves[$i].buttImplant) > 1)>>
			Hormonal effects cause @@.orange;the natural size of $possessive butt to decrease.@@
			<<set $slaves[$i].butt-->>
		<</if>>
		<<if (($slaves[$i].boobs-$slaves[$i].boobsImplant) > 100)>>
			Hormonal effects cause @@.orange;the natural size of $possessive tits to shrink.@@
			<<set $slaves[$i].boobs -= 10+(15*$hormoneUpgradePower)>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].nipples != "cute")>>
		Hormonal effects cause $possessive @@.orange;nipples to shrink to a more masculine size.@@
		<<set $slaves[$i].nipples = "cute">>
	<</if>>

	<<if ($slaves[$i].dick > 0) && ($slaves[$i].dick < 5)>>
		Hormonal effects add @@.lime;a bit more heft to $possessive penis.@@
		<<set $slaves[$i].dick++>>
	<</if>>
	<<if ($slaves[$i].balls > 0) && ($slaves[$i].balls < 5)>>
		Hormonal effects cause @@.lime;$possessive balls to hang a little heavier.@@
		<<set $slaves[$i].balls++>>
	<</if>>

	<<if ($slaves[$i].clit < 5) && ($slaves[$i].dick == 0)>>
		Hormonal effects cause @@.lime;$possessive clit to grow significantly.@@
		<<set $slaves[$i].clit++>>
	<</if>>
	<<if ($slaves[$i].vagina > -1) && ($slaves[$i].vaginaLube > 0)>>
		Hormonal effects cause @@.orange;$possessive vagina to produce less natural lubricant.@@
		<<set $slaves[$i].vaginaLube-->>
	<</if>>

	<<if ($slaves[$i].muscles <= 50) && ($slaves[$i].diet != "slimming")>>
		Hormonal effects @@.lime;build up $possessive musculature.@@
		<<set $slaves[$i].muscles += 2+$hormoneUpgradePower>>
	<</if>>
	<<if ($slaves[$i].waist < 80)>>
		Hormonal effects cause $possessive @@.orange;waist to broaden.@@
		<<set $slaves[$i].waist += 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].attrXX < 100)>>
		Hormonal effects cause $object to become @@.green;more attracted to women.@@
		<<set $slaves[$i].attrXX += 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].devotion > 20) && $slaves[$i].trust <= 20>>
		Hormonal effects @@.mediumorchid;make $object a bit less docile.@@
		<<set $slaves[$i].devotion -= 1>>
	<</if>>

<<elseif $slaves[$i].hormoneBalance <= -300>>
	<<if ($slaves[$i].faceShape == "androgynous")>>
		Hormonal effects cause @@.orange;$possessive face to harden into masculinity.@@
		<<set $slaves[$i].faceShape = "masculine">>
	<<elseif ($slaves[$i].faceShape != "masculine")>>
		Hormonal effects cause @@.orange;$possessive face to harden into androgyny.@@
		<<set $slaves[$i].faceShape = "androgynous">>
	<</if>>
	<<if ($slaves[$i].face-$slaves[$i].faceImplant > 0)>>
		Hormonal effects cause @@.orange;$possessive facial structure to harden and become less attractive.@@
		<<set _faceDec = 1+$hormoneUpgradePower>>
		<<set $slaves[$i].face = Math.trunc($slaves[$i].face-_faceDec,-100,100)>>
	<</if>>

	<<if ($slaves[$i].voice > 1)>>
		Hormonal effects cause @@.orange;$possessive voice to become deeper and less feminine.@@
		<<set $slaves[$i].voice-->>
	<</if>>

	<<if ($hormoneUpgradeShrinkage == 0)>>
		<<if (($slaves[$i].butt-$slaves[$i].buttImplant) > 1)>>
			Hormonal effects cause @@.orange;the natural size of $possessive butt to decrease.@@
			<<set $slaves[$i].butt-->>
		<</if>>
		<<if (($slaves[$i].boobs-$slaves[$i].boobsImplant) > 300)>>
			Hormonal effects cause @@.orange;the natural size of $possessive tits to shrink.@@
			<<set $slaves[$i].boobs -= 10+(15*$hormoneUpgradePower)>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].nipples != "cute")>>
		Hormonal effects cause $possessive @@.orange;nipples to shrink to a more masculine size.@@
		<<set $slaves[$i].nipples = "cute">>
	<</if>>

	<<if ($slaves[$i].dick > 0) && ($slaves[$i].dick < 5)>>
		Hormonal effects add @@.lime;a bit more heft to $possessive penis.@@
		<<set $slaves[$i].dick++>>
	<</if>>
	<<if ($slaves[$i].balls > 0) && ($slaves[$i].balls < 5)>>
		Hormonal effects cause @@.lime;$possessive balls to hang a little heavier.@@
		<<set $slaves[$i].balls++>>
	<</if>>

	<<if ($slaves[$i].clit < 4) && ($slaves[$i].dick == 0)>>
		Hormonal effects cause @@.lime;$possessive clit to grow significantly.@@
		<<set $slaves[$i].clit++>>
	<</if>>
	<<if ($slaves[$i].vagina > -1) && ($slaves[$i].vaginaLube > 0)>>
		Hormonal effects cause @@.orange;$possessive vagina to produce less natural lubricant.@@
		<<set $slaves[$i].vaginaLube-->>
	<</if>>

	<<if ($slaves[$i].muscles <= 50) && ($slaves[$i].diet != "slimming")>>
		Hormonal effects @@.lime;build up $possessive musculature.@@
		<<set $slaves[$i].muscles += 2+$hormoneUpgradePower>>
	<</if>>
	<<if ($slaves[$i].waist < 40)>>
		Hormonal effects cause $possessive @@.orange;waist to broaden.@@
		<<set $slaves[$i].waist += 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].attrXX < 100)>>
		Hormonal effects cause $object to become @@.green;more attracted to women.@@
		<<set $slaves[$i].attrXX += 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].devotion > 20) && $slaves[$i].trust <= 20>>
		Hormonal effects @@.mediumorchid;make $object a bit less docile.@@
		<<set $slaves[$i].devotion -= 1>>
	<</if>>

<<elseif $slaves[$i].hormoneBalance <= -250>>
	<<if $slaves[$i].faceShape != "masculine" && $slaves[$i].faceShape != "androgynous">>
		Hormonal effects cause @@.orange;$possessive face to harden into androgyny.@@
		<<set $slaves[$i].faceShape = "androgynous">>
	<</if>>
	<<if ($slaves[$i].face-$slaves[$i].faceImplant > 20)>>
		Hormonal effects cause @@.orange;$possessive facial structure to harden and become less attractive.@@
		<<set _faceDec = 1+$hormoneUpgradePower>>
		<<set $slaves[$i].face = Math.trunc($slaves[$i].face-_faceDec,-100,100)>>
	<</if>>

	<<if ($slaves[$i].voice > 1)>>
		Hormonal effects cause @@.orange;$possessive voice to become deeper and less feminine.@@
		<<set $slaves[$i].voice-->>
	<</if>>

	<<if ($hormoneUpgradeShrinkage == 0)>>
		<<if (($slaves[$i].butt-$slaves[$i].buttImplant) > 2)>>
			Hormonal effects cause @@.orange;the natural size of $possessive butt to decrease.@@
			<<set $slaves[$i].butt-->>
		<</if>>
		<<if (($slaves[$i].boobs-$slaves[$i].boobsImplant) > 400)>>
			Hormonal effects cause @@.orange;the natural size of $possessive tits to shrink.@@
			<<set $slaves[$i].boobs -= 10+(15*$hormoneUpgradePower)>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].nipples != "cute")>>
		Hormonal effects cause $possessive @@.orange;nipples to shrink to a more masculine size.@@
		<<set $slaves[$i].nipples = "cute">>
	<</if>>

	<<if ($slaves[$i].dick > 0) && ($slaves[$i].dick < 4)>>
		Hormonal effects add @@.lime;a bit more heft to $possessive penis.@@
		<<set $slaves[$i].dick++>>
	<</if>>
	<<if ($slaves[$i].balls > 0) && ($slaves[$i].balls < 4)>>
		Hormonal effects cause @@.lime;$possessive balls to hang a little heavier.@@
		<<set $slaves[$i].balls++>>
	<</if>>

	<<if ($slaves[$i].clit < 3) && ($slaves[$i].dick == 0)>>
		Hormonal effects cause @@.lime;$possessive clit to grow significantly.@@
		<<set $slaves[$i].clit++>>
	<</if>>
	<<if ($slaves[$i].vagina > -1) && ($slaves[$i].vaginaLube > 0)>>
		Hormonal effects cause @@.orange;$possessive vagina to produce less natural lubricant.@@
		<<set $slaves[$i].vaginaLube-->>
	<</if>>

	<<if ($slaves[$i].muscles <= 35) && ($slaves[$i].diet != "slimming")>>
		Hormonal effects @@.lime;build up $possessive musculature.@@
		<<set $slaves[$i].muscles += 2+$hormoneUpgradePower>>
	<</if>>
	<<if ($slaves[$i].waist < 25)>>
		Hormonal effects cause $possessive @@.orange;waist to broaden.@@
		<<set $slaves[$i].waist += 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].attrXX < 95)>>
		Hormonal effects cause $object to become @@.green;more attracted to women.@@
		<<set $slaves[$i].attrXX += 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].devotion > 20) && $slaves[$i].trust <= 20>>
		Hormonal effects @@.mediumorchid;make $object a bit less docile.@@
		<<set $slaves[$i].devotion -= 1>>
	<</if>>

<<elseif $slaves[$i].hormoneBalance <= -200>>
	<<if $slaves[$i].faceShape != "masculine" && $slaves[$i].faceShape != "androgynous">>
		Hormonal effects cause @@.orange;$possessive face to harden into androgyny.@@
		<<set $slaves[$i].faceShape = "androgynous">>
	<</if>>
	<<if ($slaves[$i].face-$slaves[$i].faceImplant > 40)>>
		Hormonal effects cause @@.orange;$possessive facial structure to harden and become less attractive.@@
		<<set _faceDec = 1+$hormoneUpgradePower>>
		<<set $slaves[$i].face = Math.trunc($slaves[$i].face-_faceDec,-100,100)>>
	<</if>>

	<<if ($slaves[$i].voice > 2)>>
		Hormonal effects cause @@.orange;$possessive voice to become deeper and less feminine.@@
		<<set $slaves[$i].voice-->>
	<</if>>

	<<if ($hormoneUpgradeShrinkage == 0)>>
		<<if (($slaves[$i].butt-$slaves[$i].buttImplant) > 3)>>
			Hormonal effects cause @@.orange;the natural size of $possessive butt to decrease.@@
			<<set $slaves[$i].butt-->>
		<</if>>
		<<if (($slaves[$i].boobs-$slaves[$i].boobsImplant) > 600)>>
			Hormonal effects cause @@.orange;the natural size of $possessive tits to shrink.@@
			<<set $slaves[$i].boobs -= 10+(15*$hormoneUpgradePower)>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].nipples == "huge") || $slaves[$i].nipples == "puffy">>
		Hormonal effects cause $possessive big @@.orange;nipples to shrink to a more reasonable size.@@
		<<set $slaves[$i].nipples = "cute">>
	<</if>>

	<<if ($slaves[$i].dick > 0) && ($slaves[$i].dick < 3)>>
		Hormonal effects add @@.lime;a bit more heft to $possessive penis.@@
		<<set $slaves[$i].dick++>>
	<</if>>
	<<if ($slaves[$i].balls > 0) && ($slaves[$i].balls < 3)>>
		Hormonal effects cause @@.lime;$possessive balls to hang a little heavier.@@
		<<set $slaves[$i].balls++>>
	<</if>>

	<<if ($slaves[$i].clit < 2) && ($slaves[$i].dick == 0)>>
		Hormonal effects cause @@.lime;$possessive clit to grow significantly.@@
		<<set $slaves[$i].clit++>>
	<</if>>
	<<if ($slaves[$i].vagina > -1) && ($slaves[$i].vaginaLube > 0)>>
		Hormonal effects cause @@.orange;$possessive vagina to produce less natural lubricant.@@
		<<set $slaves[$i].vaginaLube-->>
	<</if>>

	<<if ($slaves[$i].muscles <= 15) && ($slaves[$i].diet != "slimming")>>
		Hormonal effects @@.lime;build up $possessive musculature.@@
		<<set $slaves[$i].muscles += 2+$hormoneUpgradePower>>
	<</if>>
	<<if ($slaves[$i].waist < 9)>>
		Hormonal effects cause $possessive @@.orange;waist to broaden.@@
		<<set $slaves[$i].waist += 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].attrXX < 90)>>
		Hormonal effects cause $object to become @@.green;more attracted to women.@@
		<<set $slaves[$i].attrXX += 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].devotion > 20) && $slaves[$i].trust <= 20>>
		Hormonal effects @@.mediumorchid;make $object a bit less docile.@@
		<<set $slaves[$i].devotion -= 1>>
	<</if>>

<<elseif $slaves[$i].hormoneBalance <= -100>>
	<<if ($slaves[$i].face-$slaves[$i].faceImplant > 60)>>
		Hormonal effects cause @@.orange;$possessive facial structure to harden and become less attractive.@@
		<<set _faceDec = 1+$hormoneUpgradePower>>
		<<set $slaves[$i].face = Math.trunc($slaves[$i].face-_faceDec,-100,100)>>
	<</if>>

	<<if ($slaves[$i].voice > 2)>>
		Hormonal effects cause @@.orange;$possessive voice to become deeper and less feminine.@@
		<<set $slaves[$i].voice-->>
	<</if>>

	<<if ($hormoneUpgradeShrinkage == 0)>>
		<<if (($slaves[$i].butt-$slaves[$i].buttImplant) > 4)>>
			Hormonal effects cause @@.orange;the natural size of $possessive butt to decrease.@@
			<<set $slaves[$i].butt-->>
		<</if>>
		<<if (($slaves[$i].boobs-$slaves[$i].boobsImplant) > 800)>>
			Hormonal effects cause @@.orange;the natural size of $possessive tits to shrink.@@
			<<set $slaves[$i].boobs -= 10+(15*$hormoneUpgradePower)>>
		<</if>>
	<</if>>

	<<if ($slaves[$i].muscles < 0) && ($slaves[$i].diet != "slimming")>>
		Hormonal effects @@.lime;build up $possessive musculature.@@
		<<set $slaves[$i].muscles += 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].waist < 0)>>
		Hormonal effects cause $possessive @@.orange;waist to broaden.@@
		<<set $slaves[$i].waist += 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].dick > 0) && ($slaves[$i].dick < 2)>>
		Hormonal effects cause @@.lime;$possessive micropenis to return to a more normal size.@@
		<<set $slaves[$i].dick++>>
	<</if>>
	<<if ($slaves[$i].balls > 0) && ($slaves[$i].balls < 2)>>
		Hormonal effects cause @@.lime;$possessive balls to drop.@@
		<<set $slaves[$i].balls++>>
	<</if>>

	<<if ($slaves[$i].clit < 1) && ($slaves[$i].dick == 0)>>
		Hormonal effects cause @@.lime;$possessive clit to grow significantly.@@
		<<set $slaves[$i].clit++>>
	<</if>>
	<<if ($slaves[$i].vagina > -1) && ($slaves[$i].vaginaLube > 1)>>
		Hormonal effects cause @@.orange;$possessive vagina to produce less natural lubricant.@@
		<<set $slaves[$i].vaginaLube-->>
	<</if>>

	<<if ($slaves[$i].attrXX < 80)>>
		Hormonal effects cause $object to become @@.green;more attracted to women.@@
		<<set $slaves[$i].attrXX += 2+$hormoneUpgradePower>>
	<</if>>

	<<if ($slaves[$i].devotion > 20) && $slaves[$i].trust <= 20>>
		Hormonal effects @@.mediumorchid;make $object a bit less docile.@@
		<<set $slaves[$i].devotion -= 1>>
	<</if>>

<<elseif $slaves[$i].hormoneBalance <= -50>>
	<<if ($slaves[$i].attrXX < 70)>>
		Hormonal effects cause $object to become @@.green;more attracted to women.@@
		<<set $slaves[$i].attrXX += 2+$hormoneUpgradePower>>
	<</if>>

<</if>>

<</if>>
<</if>>

<<if $slaves[$i].fetish != "mindbroken" && $slaves[$i].fuckdoll == 0>>
<<if ($slaves[$i].hormoneBalance <= 20)>>
<<if ($slaves[$i].dick > 0)>>
<<if ($slaves[$i].devotion > 0)>>
<<if ($slaves[$i].boobs < 800 && $slaves[$i].butt < 3) || ($slaves[$i].faceShape == "masculine") || ($slaves[$i].shoulders > $slaves[$i].hips) || ($slaves[$i].balls > 4)>>
<<if ($slaves[$i].career == "a Futanari Sister")>>
	$pronounCap wishes $pronoun were more feminine, but isn't unhappy to be off hormones, since $pronoun likes being a stiff dicked futa.
<<elseif ($slaves[$i].fetish == "buttslut") && ($slaves[$i].fetishStrength > 60) && ($slaves[$i].fetishKnown == 1)>>
	$pronounCap wishes $pronoun were more feminine, but $pronoun loves getting fucked in the butt so much that it doesn't much bother $object.
<<elseif ($slaves[$i].fetish == "sadist") && ($slaves[$i].fetishStrength > 60) && ($slaves[$i].fetishKnown == 1)>>
	Life is easier for effeminate slaves, but $pronoun loves abusing other slaves so much that $pronoun likes being able to get hard.
<<elseif ($slaves[$i].fetish == "dom") && ($slaves[$i].fetishStrength > 60) && ($slaves[$i].fetishKnown == 1)>>
	Life is easier for effeminate slaves, but $pronoun loves dominating other girls so much that $pronoun likes being able to get hard.
<<elseif ($slaves[$i].energy > 95)>>
	$pronounCap wishes $pronoun were more feminine, but $pronoun loves getting fucked like a good little sex slave so much that $pronoun doesn't think about it much.
<<elseif ($slaves[$i].devotion <= 20)>>
	Life is easier for effeminate slaves, so @@.mediumorchid;$pronoun's a little unhappy@@ that $pronoun isn't getting hormones to make $object more feminine.
	<<set $slaves[$i].devotion -= 2>>
<<elseif ($slaves[$i].devotion <= 50)>>
	$pronounCap wants to be a good slave girl, so @@.mediumorchid;$pronoun's a little unhappy@@ that $pronoun isn't getting hormones to make $object look more feminine.
	<<set $slaves[$i].devotion -= 2>>
<<else>>
	$pronounCap wishes $pronoun were more feminine, but $pronoun accepts your judgment in not giving $object hormones to make that happen.
<</if>>
<</if>>
<</if>>
<</if>>
<</if>>
<</if>>

<<if Math.abs($slaves[$i].hormones) > 1>>
	<<set $slaves[$i].chem += 0.5>>
<</if>>


code:
:: SA live with HG [nobr]

<<set $HeadGirl = $slaves[_iTemp]>>
<<set _oralUse = 0, _analUse = 0, _vaginalUse = 0, _mammaryUse = 0, _penetrativeUse = 0>>

<<if $slaves[$i].devotion > 20>>
	<<if $HGSlaveSuccess == 1>>
		looks after your Head Girl <<SlaveFullName $HeadGirl>> domestically and sexually, freeing her to devote more of her time to looking after your other slaves.
	<<else>>
		does her best to look after your Head Girl <<SlaveFullName $HeadGirl>> domestically and sexually, but doesn't free up much of her time this week.
	<</if>>
<<elseif $slaves[$i].trust < -20>>
	<<if $HGSlaveSuccess == 1>>
		obeys Head Girl <<SlaveFullName $HeadGirl>> domestically and sexually, freeing her to devote more of her time to looking after your other slaves.
	<<else>>
		tries to look after your Head Girl <<SlaveFullName $HeadGirl>> domestically and sexually, but doesn't free up much of her time this week.
	<</if>>
<<else>>
	<<if $HGSlaveSuccess == 1>>
		resists Head Girl <<SlaveFullName $HeadGirl>>'s domestic and sexual use, but still frees her to devote more of her time to looking after your other slaves.
	<<else>>
		resists Head Girl <<SlaveFullName $HeadGirl>>'s domestic and sexual use, and doesn't free up much of her time this week.
	<</if>>
<</if>>

<<if ($HeadGirl.fetish == "sadist") && ($HeadGirl.fetishStrength > 60) && ($HeadGirl.fetishKnown == 1)>>
	Since $HeadGirl.slaveName is a sadist, poor $slaves[$i].slaveName lives a life of fear and pain.
	<<if ($slaves[$i].energy > 95)>>
		Though it's hard, she manages to find @@.hotpink;sexual satisfaction@@ being a pain slave.
		<<set $slaves[$i].devotion += 4>>
		<<set $slaves[$i].need = 0>>
	<<elseif ($slaves[$i].fetish == "masochist")>>
		<<if $slaves[$i].fetishKnown == 1>>
			<<if ($slaves[$i].fetishStrength > 95)>>
				She finds deep @@.hotpink;sexual satisfaction@@ being a pain slave.
				<<set $slaves[$i].devotion += 4>>
			<<else>>
				This forces her to find solace in @@.lightcoral;deeper masochism.@@
				<<set $slaves[$i].fetishStrength += 4>>
			<</if>>
		<<else>>
			Oddly enough, she seems to find it enjoyable; @@.lightcoral;she's a natural masochist.@@
			<<set $slaves[$i].fetishKnown = 1>>
		<</if>>
		<<set $slaves[$i].need = 0>>
	<<elseif ($slaves[$i].devotion < -20)>>
		This rapidly fills her with @@.mediumorchid;hatred@@ and @@.mediumorchid;fear.@@
		<<set $slaves[$i].devotion -= 10, $slaves[$i].trust -= 10>>
	<<elseif ($slaves[$i].devotion > 20)>>
		This fills her with @@.mediumorchid;bitterness@@ and @@.mediumorchid;fear.@@
		<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5>>
	<</if>>
<<elseif ($slaves[$i].devotion < -20)>>
	<<if ($slaves[$i].trust >= -20)>>
		Since she is not yet obedient, $HeadGirl.slaveName @@.gold;punishes@@ her constantly, training her to be a decent assistant or suffer pain.
		<<set $slaves[$i].trust -= 5>>
	<<else>>
		Since she isn't suitably broken into slavery yet, $HeadGirl.slaveName trains her to be @@.hotpink;obedient@@ or suffer pain.
		<<set $slaves[$i].devotion += 5>>
	<</if>>
<<elseif ($slaves[$i].devotion <= 20)>>
	Since she is not yet well trained, $HeadGirl.slaveName instructs her, @@.hotpink;training@@ her to be a proper assistant.
	<<set $slaves[$i].devotion += 4>>
<<elseif ($slaves[$i].devotion <= 50)>>
	Since she is not yet a devoted slave, $HeadGirl.slaveName works with her, @@.hotpink;training@@ her to be a good assistant.
	<<set $slaves[$i].devotion += 2>>
<<else>>
	Since she is a devoted assistant, $HeadGirl.slaveName @@.hotpink;praises@@ and encourages her.
	<<set $slaves[$i].devotion += 1>>
<</if>>

<<if ($HeadGirl.rivalry != 0) && ($HeadGirl.relationshipTarget == $slaves[$i].ID)>>
	$HeadGirl.slaveName @@.lightgreen;resolves the rivalry@@ between her and $slaves[$i].slaveName, mostly by the expedient of punishing $slaves[$i].slaveName savagely whenever she gives any trouble.
	<<set $HeadGirl.rivalry = 0, $HeadGirl.rivalryTarget = 0, $slaves[$i].rivalry = 0, $slaves[$i].rivalryTarget = 0>>
<<elseif ($HeadGirl.relationship == 0)>>
	<<if $familyTesting == 1>>
		<<if $slaves[$i].mother == $HeadGirl.ID || $slaves[$i].father == $HeadGirl.ID || $slaves[$i].ID == $HeadGirl.mother || $slaves[$i].ID == $HeadGirl.father || areSisters($HeadGirl, $slaves[$i]) > 0>>
			$HeadGirl.slaveName
			<<if $HeadGirl.devotion > 95>>
				is so inured to the perversities of slavery that she @@.hotpink;enjoys@@ the prospect of sexual service from her
				<<set $HeadGirl.devotion += 1>>
			<<elseif $HeadGirl.devotion > 60>>
				is so devoted to you that she accepts the prospect of sexual service from her
			<<else>>
				is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexual service from her
				<<set $HeadGirl.devotion -= 2>>
			<</if>>
			<<if $slaves[$i].mother == $HeadGirl.ID || $slaves[$i].father == $HeadGirl.ID>>
				daughter.
			<<elseif $HeadGirl.mother == $slaves[$i].ID>>
				mother.
			<<elseif $HeadGirl.father == $slaves[$i].ID>>
				father.
			<<else>>
				<<switch areSisters($HeadGirl, $slaves[$i])>>
				<<case 1>>twin.
				<<case 2>>sister.
				<<case 3>>half-sister.
				<</switch>>
			<</if>>
			$slaves[$i].slaveName
			<<if $slaves[$i].devotion > 95>>
				is so inured to the perversities of slavery that she @@.hotpink;enjoys@@ the prospect of sexually servicing her
				<<set $slaves[$i].devotion += 1>>
			<<elseif $slaves[$i].devotion > 60>>
				is so devoted to you that she accepts the prospect of sexually servicing her
			<<elseif $slaves[$i].devotion > 40>>
				is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexually servicing her
				<<set $slaves[$i].devotion -= 2>>
			<<elseif $slaves[$i].devotion > 20>>
				is @@.mediumorchid;disturbed@@ by the prospect of sexually servicing her
				<<set $slaves[$i].devotion -= 4>>
			<<elseif $slaves[$i].devotion >= -20>>
				is @@.mediumorchid;strongly disturbed@@ by the prospect of sexually servicing her
				<<set $slaves[$i].devotion -= 5>>
			<<else>>
				is @@.mediumorchid;revolted@@ by the prospect of sexually servicing her
				<<set $slaves[$i].devotion -= 10>>
			<</if>>
			<<if $HeadGirl.mother == $slaves[$i].ID || $HeadGirl.father == $slaves[$i].ID>>
				daughter.
			<<elseif $slaves[$i].mother == $HeadGirl.ID>>
				mother.
			<<elseif $slaves[$i].father == $HeadGirl.ID>>
				father.
			<<else>>
				<<switch areSisters($HeadGirl, $slaves[$i])>>
				<<case 1>>twin.
				<<case 2>>sister.
				<<case 3>>half-sister.
				<</switch>>
			<</if>>
		<</if>>
	<<else>>
		<<if $slaves[$i].relation != 0 && $slaves[$i].relationTarget == $HeadGirl.ID>>
			$HeadGirl.slaveName
			<<if $HeadGirl.devotion > 95>>
				is so inured to the perversities of slavery that she @@.hotpink;enjoys@@ the prospect of sexual service from her
				<<set $HeadGirl.devotion += 1>>
			<<elseif $HeadGirl.devotion > 60>>
				is so devoted to you that she accepts the prospect of sexual service from her
			<<else>>
				is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexual service from her
				<<set $HeadGirl.devotion -= 2>>
			<</if>>
			<<if $HeadGirl.relation == "twin">>
				twin.
			<<elseif $HeadGirl.relation == "sister">>
				sister.
			<<elseif $HeadGirl.relation == "mother">>
				daughter.
			<<elseif $HeadGirl.relation == "daughter">>
				mother.
			<</if>>
			$slaves[$i].slaveName
			<<if $slaves[$i].devotion > 95>>
				is so inured to the perversities of slavery that she @@.hotpink;enjoys@@ the prospect of sexually servicing her
				<<set $slaves[$i].devotion += 1>>
			<<elseif $slaves[$i].devotion > 60>>
				is so devoted to you that she accepts the prospect of sexually servicing her
			<<elseif $slaves[$i].devotion > 40>>
				is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexually servicing her
				<<set $slaves[$i].devotion -= 2>>
			<<elseif $slaves[$i].devotion > 20>>
				is @@.mediumorchid;disturbed@@ by the prospect of sexually servicing her
				<<set $slaves[$i].devotion -= 4>>
			<<elseif $slaves[$i].devotion >= -20>>
				is @@.mediumorchid;strongly disturbed@@ by the prospect of sexually servicing her
				<<set $slaves[$i].devotion -= 5>>
			<<else>>
				is @@.mediumorchid;revolted@@ by the prospect of sexually servicing her
				<<set $slaves[$i].devotion -= 10>>
			<</if>>
			<<if $slaves[$i].relation == "twin">>
				twin.
			<<elseif $slaves[$i].relation == "sister">>
				sister.
			<<elseif $slaves[$i].relation == "mother">>
				daughter.
			<<elseif $slaves[$i].relation == "daughter">>
				mother.
			<</if>>
		<</if>>
	<</if>> /*closes extended family mode */
	<<if ($slaves[$i].relationship == 0) && ($slaves[$i].devotion > 20)>>
		$slaves[$i].slaveName sees $HeadGirl.slaveName constantly, and does her best to @@.lightgreen;become her friend.@@
		<<set $HeadGirl.relationship = 1, $HeadGirl.relationshipTarget = $slaves[$i].ID, $slaves[$i].relationship = 1, $slaves[$i].relationshipTarget = $HeadGirl.ID>>
	<<elseif ($slaves[$i].relationship == -2) && ($slaves[$i].devotion > 20) && ($slaves[$i].devotion > 50)>>
		$slaves[$i].slaveName sees $HeadGirl.slaveName so much more than she see you and begins to warm up to her instead of you, @@.lightgreen;becoming her friend.@@
		<<set $HeadGirl.relationship = 1, $HeadGirl.relationshipTarget = $slaves[$i].ID, $slaves[$i].relationship = 1, $slaves[$i].relationshipTarget = $HeadGirl.ID>>
	<<elseif ($slaves[$i].relationship != 5) && ($slaves[$i].relationship > 0) && ($slaves[$i].relationshipTarget != $HeadGirl.ID)>>
		<<set _j = $slaves.findIndex(function(s) { return s.ID == $slaves[$i].relationshipTarget; })>>
		$slaves[_j].slaveName cannot compete with $HeadGirl.slaveName, and her relationship with the Head Girl's bitch fades.
		<<set $slaves[$i].relationship = 0, $slaves[$i].relationshipTarget = 0, $slaves[_j].relationship = 0, $slaves[_j].relationshipTarget = 0>>
	<</if>>
<<else>>
	<<if ($HeadGirl.relationshipTarget == $slaves[$i].ID)>>
		<<set $slaves[$i].trust += 1, $HeadGirl.trust += 1>>
		<<if $slaves[$i].relationship <= 2>>
			Since $HeadGirl.slaveName and $slaves[$i].slaveName are already friends, they're @@.mediumaquamarine;thankful@@ to you for allowing it. After a few nights of offering each other sexual comfort, they consider themselves @@.lightgreen;friends with benefits.@@
			<<set $HeadGirl.relationship = 3, $HeadGirl.relationshipTarget = $slaves[$i].ID>>
			<<set $slaves[$i].relationship = 3, $slaves[$i].relationshipTarget = $HeadGirl.ID>>
		<<elseif $slaves[$i].relationship <= 3>>
			Since $HeadGirl.slaveName and $slaves[$i].slaveName are already lovers, they both @@.hotpink;enjoy@@ living together and are @@.mediumaquamarine;thankful@@ to you for allowing it. After living together for a few days, they draw closer emotionally, too, and consider themselves @@.lightgreen;lovers.@@
			<<set $HeadGirl.relationship = 4, $HeadGirl.relationshipTarget = $slaves[$i].ID>>
			<<set $slaves[$i].relationship = 4, $slaves[$i].relationshipTarget = $HeadGirl.ID>>
		<<elseif $slaves[$i].relationship <= 4>>
			<<if ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetishStrength <= 60) && ($HeadGirl.fetish == "sadist") && ($slaves[$i].fetish != "masochist")>>
				Since their relationship is very abusive, only $HeadGirl.slaveName @@.hotpink;enjoys@@ living together with $slaves[$i].slaveName.
				<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5>>
			<<else>>
				Since $HeadGirl.slaveName and $slaves[$i].slaveName are lovers, they @@.hotpink;enjoy@@ living together.
			<</if>>
		<<else>>
			Since $HeadGirl.slaveName and $slaves[$i].slaveName are slave wives, they @@.hotpink;enjoy@@ living together.
		<</if>>
	<</if>>
<</if>>

<<set $skillIncrease = 10>>
<<if ($slaves[$i].oralSkill <= 30)>>
	$HeadGirl.slaveName wants to come home to a talented tongue, so she trains $slaves[$i].slaveName's oral skills.
	<<OralSkillIncrease $slaves[$i]>>
<<elseif ($slaves[$i].vagina > 0) && ($slaves[$i].vaginalSkill <= 30)>>
	$HeadGirl.slaveName wants her personal sex slave to be as skilled with her pussy as possible, so she trains $slaves[$i].slaveName's vaginal skills.
	<<VaginalSkillIncrease $slaves[$i]>>
<<elseif ($slaves[$i].anus > 0) && ($slaves[$i].analSkill <= 30)>>
	$HeadGirl.slaveName wants her personal sex slave to be a skillful backdoor whore, so she trains $slaves[$i].slaveName's anal skills.
	<<AnalSkillIncrease $slaves[$i]>>
<<elseif ($slaves[$i].entertainSkill <= 10)>>
	$HeadGirl.slaveName wants to be kept amused in her occasional free time, so she trains $slaves[$i].slaveName's entertainment skills.
	<<EntertainSkillIncrease $slaves[$i]>>
<<elseif ($slaves[$i].sexualFlaw != "none")>>
	$HeadGirl.slaveName is annoyed by $slaves[$i].slaveName's sexual flaws, so she @@.green;trains@@ her out of them.
	<<set $slaves[$i].sexualFlaw = "none">>
<<elseif ($slaves[$i].behavioralFlaw != "none")>>
	$HeadGirl.slaveName is irritated by $slaves[$i].slaveName's flaws, so she @@.green;trains@@ her out of them.
	<<set $slaves[$i].behavioralFlaw = "none">>
<</if>>

<<if canPenetrate($HeadGirl)>>
	<<if canDoVaginal($slaves[$i])>>
		<<if ($slaves[$i].vagina == 0)>>
			$HeadGirl.slaveName @@.hotpink;loves@@ @@.lime;taking@@ $slaves[$i].slaveName's virginity, and spends much of the week ogling her conquest complacently.
			<<set $slaves[$i].vagina = 1, $HeadGirl.devotion += 4>>
		<<elseif ($slaves[$i].vagina == 1)>>
			<<if ($HeadGirl.dick > 4) && ($HeadGirl.energy > 95)>>
				$HeadGirl.slaveName has such a ferocious sex drive and such a big dick that her constant pounding of $slaves[$i].slaveName @@.lime;loosens@@ the poor girl's pussy.
				<<set $slaves[$i].vagina += 1>>
			<<elseif ($HeadGirl.dick > 5)>>
				Serving $HeadGirl.slaveName's monster cock @@.lime;loosens@@ $slaves[$i].slaveName's pussy.
				<<set $slaves[$i].vagina += 1>>
			<</if>>
		<<elseif ($slaves[$i].vagina == 2)>>
			<<if ($HeadGirl.dick > 5) && ($HeadGirl.energy > 95)>>
				$HeadGirl.slaveName has such a ferocious sex drive and such a monster cock that her constant pounding of $slaves[$i].slaveName @@.lime;loosens@@ the poor girl's pussy.
				<<set $slaves[$i].vagina += 1>>
			<</if>>
		<<elseif ($slaves[$i].vagina == 3)>>
			<<if ($HeadGirl.dick > 5) && ($HeadGirl.energy > 95) && random(1,100) > 80>>
				$HeadGirl.slaveName has such a ferocious sex drive and such a monster cock that her constant pounding of $slaves[$i].slaveName's loose pussy inevitably leaves it @@.lime;gaping.@@
				<<set $slaves[$i].vagina += 1>>
			<</if>>
		<</if>>
	<</if>>
	<<if canDoAnal($slaves[$i])>>
		<<if ($slaves[$i].anus == 0)>>
			$HeadGirl.slaveName @@.hotpink;relishes@@ @@.lime;taking@@ $slaves[$i].slaveName's anal virginity, and spends much of the week groping her conquest's rear end possessively.
			<<set $slaves[$i].anus = 1, $HeadGirl.devotion += 4>>
		<<elseif ($slaves[$i].anus == 1)>>
			<<if ($HeadGirl.dick > 4) && ($HeadGirl.energy > 95)>>
				$HeadGirl.slaveName uses $slaves[$i].slaveName's anus to vent her sexual addiction. Constant assrape from such a huge dick @@.lime;loosens@@ her sphincter.
				<<set $slaves[$i].anus += 1>>
			<<elseif ($HeadGirl.dick > 5)>>
				Taking $HeadGirl.slaveName's monster cock up the butt @@.lime;loosens@@ $slaves[$i].slaveName's anal sphincter.
				<<set $slaves[$i].anus += 1>>
			<</if>>
		<<elseif ($slaves[$i].anus == 2)>>
			<<if ($HeadGirl.dick > 5) && ($HeadGirl.energy > 95)>>
				$HeadGirl.slaveName uses $slaves[$i].slaveName's anus to vent her sexual addiction. Constant assrape from the Head Girl's monster cock @@.lime;loosens@@ her sphincter.
				<<set $slaves[$i].anus += 1>>
			<</if>>
		<<elseif ($slaves[$i].anus == 3)>>
			<<if ($HeadGirl.dick > 5) && ($HeadGirl.energy > 95) && random(1,100) > 80>>
				$HeadGirl.slaveName uses $slaves[$i].slaveName's loose anus to vent her sexual addiction. Constant assrape from the Head Girl's monster cock eventually leaves it @@.lime;gaping.@@
				<<set $slaves[$i].anus += 1>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if $seePreg != 0>>
	<<if ($HeadGirl.fetish == "pregnancy") && canImpreg($slaves[$i], $HeadGirl)>>
		<<if $arcologies[0].FSRestart == "unset">>
			$HeadGirl.slaveName promptly @@.lime;impregnates@@
			<<if $HeadGirl.fetishKnown == 1>>
				$slaves[$i].slaveName, to your Head Girl's considerable @@.hotpink;satisfaction.@@ $slaves[$i].slaveName spent the week regularly getting held down and ejaculated into anytime her superior had cum to spare.
				<<set $HeadGirl.devotion += 4>>
			<<else>>
				$slaves[$i].slaveName. Her eagerness completely exposes her hidden @@.lightcoral;pregnancy kink.@@
				<<set $HeadGirl.fetishKnown = 1>>
			<</if>>
			<<KnockMeUp $slaves[$i] 100 2 $HeadGirl.ID>>
			<<if ($HeadGirl.fetishStrength > 70) && canImpreg($HeadGirl, $slaves[$i])>>
				Unsurprisingly, she gives in to her own cravings and also takes $slaves[$i].slaveName's loads until she @@.lime;gets pregnant@@ too.
				<<KnockMeUp $HeadGirl 100 2 $slaves[$i].ID>>
			<</if>>
		<<elseif $HeadGirl.fetishKnown == 1>>
			$HeadGirl.slaveName knows better than to even consider knocking up $slaves[$i].slaveName.
		<</if>>
	<<elseif ($HeadGirl.fetish == "pregnancy") && canImpreg($HeadGirl, $slaves[$i])>>
		<<if $arcologies[0].FSRestart == "unset" && ($HeadGirl.fetishStrength > 70)>>
			$HeadGirl.slaveName promptly @@.lime;knocks herself up@@ with $slaves[$i].slaveName's
			<<if $HeadGirl.fetishKnown == 1>>
				seed, to your Head Girl's considerable @@.hotpink;satisfaction.@@
				<<set $HeadGirl.devotion += 4>>
			<<else>>
				seed. Her @@.hotpink;pride@@ over her new pregnancy and eagerness to get pregnant completely exposes her hidden, and powerful, @@.lightcoral;pregnancy fetish.@@
				<<set $HeadGirl.fetishKnown = 1, $HeadGirl.devotion += 4>>
			<</if>>
			<<KnockMeUp $HeadGirl 100 2 $slaves[$i].ID>>
		<<elseif  $HeadGirl.fetishKnown == 1>>
			$HeadGirl.slaveName knows better than to even consider getting knocked up by $slaves[$i].slaveName.
		<</if>>
	<<elseif $HeadGirl.fetish != "pregnancy" && $slaves[$i].pregKnown == 1 && $slaves[$i].preg < 30 && $arcologies[0].FSRepopulationFocus == "unset" && $HGSuiteDrugs == 1>>
		$HeadGirl.slaveName promptly aborts the child growing in $slaves[$i].slaveName since she prefers her girls not harboring someone else's child or loaded down with her own unwanted spawn.
		<<set $slaves[$i].preg = 0, WombFlush($slaves[$i]), $slaves[$i].pregType = 0, $slaves[$i].pregSource = 0, $slaves[$i].pregWeek = 0, $slaves[$i].pregKnown = 0>>
		<<SetBellySize $slaves[$i]>>
	<</if>>
<</if>>

<<if ($slaves[$i].devotion > 50)>>
	<<if (($slaves[$i].fetishStrength <= 95) || ($slaves[$i].fetishKnown == 0)) && ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetishStrength > 60) && ($slaves[$i].fetish != $HeadGirl.fetish) && ($slaves[$i].fetish != "mindbroken")>>
		<<if ($HeadGirl.fetish == "submissive")>>
			$slaves[$i].slaveName slowly gets used to $HeadGirl.slaveName's need to be sexually dominated, and begins to @@.pink;enjoy being a top@@ within the confines of the suite.
			<<set $slaves[$i].fetish = "dom", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
		<<elseif ($HeadGirl.fetish == "dom")>>
			<<if ($slaves[$i].fetish != "submissive") || ($slaves[$i].fetish == 0)>>
				$slaves[$i].slaveName slowly gets used to being tied up and fucked regularly, and accepts that it's how $HeadGirl.slaveName sexual attraction to her expresses itself. She begins to @@.pink;enjoy being a sub,@@ especially for $HeadGirl.slaveName.
				<<set $slaves[$i].fetish = "submissive", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
			<</if>>
		<<elseif ($HeadGirl.fetish == "boobs")>>
			$HeadGirl.slaveName lavishes so much attention on $slaves[$i].slaveName's boobs that $slaves[$i].slaveName really starts to @@.pink;fetishize tits@@ too.
			<<set $slaves[$i].fetish = "boobs", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
		<<elseif ($HeadGirl.fetish == "pregnancy")>>
			$slaves[$i].slaveName and $HeadGirl.slaveName spend so much time talking about pregnancy and fertility that $slaves[$i].slaveName really starts to @@.pink;fetishize pregnancy@@ too.
			<<set $slaves[$i].fetish = "pregnancy", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
		<<elseif ($HeadGirl.fetish == "cumslut")>>
			$slaves[$i].slaveName participates in enough of $HeadGirl.slaveName's cum games that she can't help but @@.pink;enjoy oral sex@@ herself.
			<<set $slaves[$i].fetish = "cumslut", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
		<<elseif ($HeadGirl.fetish == "humiliation")>>
			$slaves[$i].slaveName has so much public sex with $HeadGirl.slaveName that she really starts to @@.pink;enjoy humiliation@@ herself.
			<<set $slaves[$i].fetish = "humiliation", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
		<<elseif ($HeadGirl.fetish == "buttslut")>>
			<<if canDoAnal($slaves[$i])>>
				$slaves[$i].slaveName takes $HeadGirl.slaveName's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on and dildos<</if>> up her poor anus so often that she starts to @@.pink;enjoy buttsex@@ herself.
			<<else>>
				$HeadGirl.slaveName lavishes so much attention on $slaves[$i].slaveName's butt, since she can't use it, that $slaves[$i].slaveName really starts to @@.pink;fetishize rears@@ too.
			<</if>>
			<<set $slaves[$i].fetish = "buttslut", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
		<<elseif ($HeadGirl.fetish == "masochist")>>
			<<if ($slaves[$i].fetish != "submissive") || ($slaves[$i].fetish == 0)>>
				$slaves[$i].slaveName is initially shocked to be asked to cause $HeadGirl.slaveName pain, but she slowly begins to understand the honestly sexual nature of the arrangement. She starts to @@.pink;enjoy causing pain,@@ since $HeadGirl.slaveName is clearly enjoying it so much.
				<<set $slaves[$i].fetish = "sadist", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
			<</if>>
		<<else>>
			$slaves[$i].slaveName often takes $HeadGirl.slaveName's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> in the missionary position, after some light foreplay and before bed; she honestly enjoys the respectful lovemaking, and begins to @@.pink;enjoy vanilla sex@@ herself.
			<<set $slaves[$i].fetish = "none", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
		<</if>>
	<</if>>
	<<if ($HeadGirl.attrKnown == 1)>>
		<<if ($HeadGirl.attrXX > 85) && ($slaves[$i].attrXX > 65) && ($slaves[$i].attrXX <= 85)>>
			$slaves[$i].slaveName and $HeadGirl.slaveName spend so much time giggling over which of your other slaves they think is prettiest (typically followed by giggling sex) that $slaves[$i].slaveName really starts to @@.green;fetishize girls@@ too.
			<<set $slaves[$i].attrXX += 2, $slaves[$i].attrKnown = 1>>
		<</if>>
		<<if ($HeadGirl.attrXY > 85) && ($slaves[$i].attrXY > 65) && ($slaves[$i].attrXY <= 85)>>
			$slaves[$i].slaveName and $HeadGirl.slaveName have so much fun debating which male citizens and slave dickgirls are cutest (typically followed by <<if canDoAnal($slaves[$i]) || canDoVaginal($slaves[$i])>>$HeadGirl.slaveName banging her girltoy <<if canPenetrate($HeadGirl)>>with a strap-on<<else>>senseless<</if>><<else>>giggling sex<</if>>) that $slaves[$i].slaveName really starts to @@.green;fetishize boys@@ too.
			<<set $slaves[$i].attrXY += 2, $slaves[$i].attrKnown = 1>>
		<</if>>
		<<if ($HeadGirl.energy > 95) && ($slaves[$i].energy <= 95)>>
			$slaves[$i].slaveName has so much fun sex with $HeadGirl.slaveName that @@.green;her sex drive is slowly enhanced.@@
			<<set $slaves[$i].energy += 2>>
		<</if>>
	<</if>>
<</if>>

<<set _cervixPump = 0>>
<<if ($HeadGirl.fetishKnown == 1)>>
	<<if ($HeadGirl.energy > 95)>>
		$slaves[$i].slaveName spends a lot of time getting fucked in whichever hole $HeadGirl.slaveName decides to shove her <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> into next.
		<<set _oralUse += 5>>
		<<if canDoAnal($slaves[$i])>>
			<<set _analUse += 5>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 5 1 $HeadGirl.ID>>
			<</if>>
		<<elseif $slaves[$i] >= 500>>
			<<set _mammaryUse += 5>>
		<<else>>
			<<set _oralUse += 5>>
		<</if>>
		<<if ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
			<<set _vaginalUse += 5>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 5 0 $HeadGirl.ID>>
			<</if>>
			<<set _cervixPump += 5>>
		<<elseif canDoAnal($slaves[$i])>>
			<<set _analUse += 5>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 5 1 $HeadGirl.ID>>
			<</if>>
		<<else>>
			<<set _oralUse += 5>>
		<</if>>
		<<set $HeadGirl.penetrativeCount += 15, $penetrativeTotal += 15>>
	<<elseif ($HeadGirl.fetish == "submissive")>>
		$HeadGirl.slaveName walks a fine line with $slaves[$i].slaveName. They work out a sexual life in which $HeadGirl.slaveName is in charge, but $slaves[$i].slaveName takes the sexual lead: $slaves[$i].slaveName serves her superior by taking her firmly.
		<<set _oralUse += 4>>
		<<if canDoAnal($slaves[$i])>>
			<<set _analUse += 3>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 3 1 $HeadGirl.ID>>
			<</if>>
		<<elseif $slaves[$i] >= 500>>
			<<set _mammaryUse += 3>>
		<<else>>
			<<set _oralUse += 3>>
		<</if>>
		<<if ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
			<<set _vaginalUse += 3>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 3 0 $HeadGirl.ID>>
			<</if>>
			<<set _cervixPump += 3>>
		<<elseif canDoAnal($slaves[$i])>>
			<<set _analUse += 3>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 3 1 $HeadGirl.ID>>
			<</if>>
		<<else>>
			<<set _oralUse += 3>>
		<</if>>
		<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
	<<elseif ($HeadGirl.fetish == "dom")>>
		$slaves[$i].slaveName serves $HeadGirl.slaveName as her sexual and moral inferior, taking the Head Girl's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> in all her holes. Though it isn't necessary with such an obedient partner, $slaves[$i].slaveName is often tied up for use.
		<<set _oralUse += 4>>
		<<if canDoAnal($slaves[$i])>>
			<<set _analUse += 3>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 3 1 $HeadGirl.ID>>
			<</if>>
		<<elseif $slaves[$i] >= 500>>
			<<set _mammaryUse += 3>>
		<<else>>
			<<set _oralUse += 3>>
		<</if>>
		<<if ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
			<<set _vaginalUse += 3>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 3 0 $HeadGirl.ID>>
			<</if>>
			<<set _cervixPump += 3>>
		<<elseif canDoAnal($slaves[$i])>>
			<<set _analUse += 3>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 3 1 $HeadGirl.ID>>
			<</if>>
		<<else>>
			<<set _oralUse += 3>>
		<</if>>
		<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
	<<elseif ($HeadGirl.fetish == "humiliation")>>
		$HeadGirl.slaveName is such an exhibitionist that $slaves[$i].slaveName finds herself taking $HeadGirl.slaveName's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> in public quite often.
		<<set _oralUse += 4>>
		<<if canDoAnal($slaves[$i])>>
			<<set _analUse += 3>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 3 1 $HeadGirl.ID>>
			<</if>>
		<<elseif $slaves[$i] >= 500>>
			<<set _mammaryUse += 3>>
		<<else>>
			<<set _oralUse += 3>>
		<</if>>
		<<if ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
			<<set _vaginalUse += 3>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 3 0 $HeadGirl.ID>>
			<</if>>
			<<set _cervixPump += 3>>
		<<elseif canDoAnal($slaves[$i])>>
			<<set _analUse += 3>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 3 1 $HeadGirl.ID>>
			<</if>>
		<<else>>
			<<set _oralUse += 3>>
		<</if>>
		<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
	<<elseif ($HeadGirl.fetish == "boobs")>>
		$HeadGirl.slaveName is such a boob fetishist that $slaves[$i].slaveName sometimes wonders whether $HeadGirl.slaveName thinks there are four clits in the suite: the four nipples between the two of them.
		<<set _oralUse += 4>>
		<<set _mammaryUse += 6>>
		<<set $HeadGirl.mammaryCount += 10, $mammaryTotal += 10>>
	<<elseif ($HeadGirl.fetish == "buttslut")>>
		$HeadGirl.slaveName takes a dominant sexual role with $slaves[$i].slaveName; she indulges her <<if canDoAnal($slaves[$i])>>anal addiction by constantly buttfucking $slaves[$i].slaveName<<else>>ass obsession by constantly molesting and using $slaves[$i].slaveName's buttcheeks as a sex toy<</if>> while wearing a vibrating plug herself.
		<<if canDoAnal($slaves[$i])>>
			<<set _analUse += 10>>
			<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 10 1 $HeadGirl.ID>>
			<</if>>
		<</if>>
	<<elseif ($HeadGirl.fetish == "cumslut")>>
		$HeadGirl.slaveName takes a dominant sexual role with $slaves[$i].slaveName; she indulges her oral fixation with constant oral sex. She certainly applies her mouth to $slaves[$i].slaveName when she gets the chance, but $slaves[$i].slaveName does most of the sucking.
		<<set _oralUse += 20>>
		<<set $HeadGirl.oralCount += 10, $oralTotal += 10>>
		<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
	<<elseif ($HeadGirl.fetish == "masochist")>>
		$HeadGirl.slaveName carefully structures her sexual games with $slaves[$i].slaveName to gratify her deep need to be physically hurt during sex without damaging her leadership. Usually, $slaves[$i].slaveName tortures $HeadGirl.slaveName until she's quite sated, and then takes a rough <<if canDoAnal($slaves[$i])>>buttfuck<<else>>facefucking<</if>> from the aroused $HeadGirl.slaveName's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> to restore their relative positions.
		<<if canDoAnal($slaves[$i])>>
			<<set _analUse += 10>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 10 1 $HeadGirl.ID>>
			<</if>>
		<<else>>
			<<set _oralUse += 10>>
		<</if>>
		<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
	<<elseif ($HeadGirl.attrXX > 65)>>
		$HeadGirl.slaveName expects $slaves[$i].slaveName to be girlish sexually, and $slaves[$i].slaveName spends a lot of time on her knees.
		<<set _oralUse += 6>>
		<<if canDoAnal($slaves[$i])>>
			<<set _analUse++>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 1 1 $HeadGirl.ID>>
			<</if>>
		<<elseif $slaves[$i] >= 500>>
			<<set _mammaryUse++>>
		<<else>>
			<<set _oralUse++>>
		<</if>>
		<<if ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
			<<set _vaginalUse++>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 1 0 $HeadGirl.ID>>
			<</if>>
			<<set _cervixPump++>>
		<<elseif canDoAnal($slaves[$i])>>
			<<set _analUse++>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 1 1 $HeadGirl.ID>>
			<</if>>
		<<else>>
			<<set _oralUse++>>
		<</if>>
		<<set $HeadGirl.penetrativeCount += 8, $penetrativeTotal += 8>>
	<<else>>
		$HeadGirl.slaveName takes a dominant sexual role with $slaves[$i].slaveName, mostly getting oral<<if canPenetrate($HeadGirl) && (canDoVaginal($slaves[$i]) || canDoAnal($slaves[$i]))>> and fucking her in the missionary position<<elseif $slaves[$i] >= 300>> and molesting her breasts<</if>>.
		<<set _oralUse += 4>>
		<<if canDoAnal($slaves[$i])>>
			<<set _analUse += 3>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 3 1 $HeadGirl.ID>>
			<</if>>
		<<elseif $slaves[$i] >= 300>>
			<<set _mammaryUse += 3>>
		<<else>>
			<<set _oralUse += 3>>
		<</if>>
		<<if ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
			<<set _vaginalUse += 3>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 3 0 $HeadGirl.ID>>
			<</if>>
			<<set _cervixPump += 3>>
		<<elseif canDoAnal($slaves[$i])>>
			<<set _analUse += 3>>
			<<if canImpreg($slaves[$i], $HeadGirl)>>
				<<KnockMeUp $slaves[$i] 3 1 $HeadGirl.ID>>
			<</if>>
		<<elseif $slaves[$i] >= 300>>
			<<set _mammaryUse += 3>>
		<<else>>
			<<set _oralUse += 3>>
		<</if>>
		<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
	<</if>>
<</if>>

<<set $slaves[$i].oralCount += _oralUse, $oralTotal += _oralUse>>
<<set $slaves[$i].analCount += _analUse, $analTotal += _analUse>>
<<set $slaves[$i].vaginalCount += _vaginalUse, $vaginalTotal += _vaginalUse>>
<<set $slaves[$i].mammaryCount += _mammaryUse, $mammaryTotal += _mammaryUse>>
<<set $slaves[$i].penetrativeCount += _penetrativeUse, $penetrativeTotal += _penetrativeUse>>

<<if $slaves[$i].need>>
<<if $slaves[$i].fetishKnown>>
	<<switch $slaves[$i].fetish>>
	<<case "submissive" "masochist">>
		<<if _analUse+_vaginalUse > 0>>
			Being someone's submissive toy really satisfies $slaves[$i].slaveName.
			<<set $slaves[$i].need = 0>>
		<</if>>
	<<case "dom" "sadist">>
		<<if _penetrativeUse > 0>>
			Getting to be on top is precious, and it really satisfies $slaves[$i].slaveName.
			<<set $slaves[$i].need = 0>>
		<</if>>
	<<case "cumslut">>
		<<if _oralUse > 0>>
			Being someone's oral toy really satisfies $slaves[$i].slaveName.
			<<set $slaves[$i].need = 0>>
		<</if>>
	<<case "buttslut">>
		<<if _analUse > 0>>
			Having her butthole serve as someone's toy really satisfies $slaves[$i].slaveName.
			<<set $slaves[$i].need = 0>>
		<</if>>
	<<case "pregnancy">>
		<<if _vaginalUse > 0 && $slaves[$i].mpreg == 0>>
			Having her pussy serve as someone's toy really satisfies $slaves[$i].slaveName.
			<<set $slaves[$i].need = 0>>
		<<elseif _analUse > 0 && $slaves[$i].mpreg == 1>>
			Having her asspussy serve as someone's toy really satisfies $slaves[$i].slaveName.
			<<set $slaves[$i].need = 0>>
		<</if>>
	<<case "humiliation">>
		Having all the other slaves see her in such a humiliating role really satisfies $slaves[$i].slaveName.
		<<set $slaves[$i].need = 0>>
	<</switch>>
<</if>>
<</if>>

<<set $slaves[$i].need -= ((_vaginalUse+_penetrativeUse+_analUse)*5)>>
<<set $HeadGirl.need = 0>>

<<if $slaves[$i].cervixImplant == 1 && _cervixPump > 0 && canDoVaginal($slaves[$i])>>
	$slaves[$i] notices her @@.lime;belly swell@@ after vaginal sex throughout the week.
	<<set $slaves[$i].bellyImplant += _cervixPump*20>>
<</if>>

<<if ($HeadGirl.fetishKnown == 1)>>
	<<if ($HeadGirl.energy > 95)>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName naked so she doesn't have to waste any time tearing her clothes off.
		<<set $slaves[$i].clothes = "no clothing">>
	<<elseif $slaves[$i].devotion <= 20>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName in a torturous habit since she still clings to her dignity and remains defiant.
		<<set $slaves[$i].clothes = "a penitent nuns habit">>
	<<elseif ($HeadGirl.fetish == "submissive")>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed up in slutty power clothing, since she's attracted to competence.
		<<set $slaves[$i].clothes = "slutty business attire">>
	<<elseif ($HeadGirl.fetish == "masochist")>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName in battledress, since she likes the fantasy of being raped by a soldier girl.
		<<set $slaves[$i].clothes = "battledress">>
	<<elseif ($HeadGirl.fetish == "dom")>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed up as a schoolgirl to infantilize her sub.
		<<set $slaves[$i].clothes = "a schoolgirl outfit">>
	<<elseif ($HeadGirl.fetish == "boobs")>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing a string bikini, since she likes seeing those tits.
		<<set $slaves[$i].clothes = "a string bikini">>
	<<elseif ($HeadGirl.fetish == "cumslut")>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName in restrictive latex, because she likes how it draws attention to her mouth.
		<<set $slaves[$i].clothes = "restrictive latex">>
	<<elseif ($HeadGirl.fetish == "humiliation")>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName in humiliating bondage gear, because she likes to see others blush, too.
		<<set $slaves[$i].clothes = "uncomfortable straps">>
	<<elseif ($HeadGirl.fetish == "sadist")>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName in humiliating bondage gear, because it can easily be tightened to cause considerable anguish.
		<<set $slaves[$i].clothes = "uncomfortable straps">>
	<<elseif ($HeadGirl.fetish == "buttslut")>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing nothing but slutty bangles, since she likes dressing her up but wants that butt bare.
		<<set $slaves[$i].clothes = "slutty jewelry">>
	<<elseif ($HeadGirl.fetish == "pregnancy") && ($slaves[$i].belly < 1500) && ($slaves[$i].weight <= 130) && isItemAccessible("a small empathy belly")>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing an empathy belly, since she likes her girls with a bun in the oven.
		<<set $slaves[$i].bellyAccessory = "a large empathy belly">>
	<<elseif ($HeadGirl.fetish == "pregnancy") && ($slaves[$i].preg > 0) && ($slaves[$i].pregSource == $HeadGirl.ID) >>
		$HeadGirl.slaveName keeps the pregnant $slaves[$i].slaveName dressed as a slutty maid, since she wants her to look motherly yet fuckable while she fantasizes about fucking her pregnant again.
		<<set $slaves[$i].clothes = "a slutty maid outfit">>
	<<elseif ($HeadGirl.fetish == "pregnancy")>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed as a slutty maid, since she wants her to look motherly yet fuckable while she fantasizes about putting a bun in her oven.
		<<set $slaves[$i].clothes = "a slutty maid outfit">>
	<<elseif ($HeadGirl.attrXX > 85)>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing nice lingerie, since girls and girliness turn her on.
		<<set $slaves[$i].clothes = "attractive lingerie">>
	<<elseif ($HeadGirl.attrXY > 85) && ($slaves[$i].dick > 0)>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing slutty netting with a hole for her dick to stick through, since she likes it bare.
		<<set $slaves[$i].clothes = "clubslut netting">>
	<<else>>
		$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed as a slutty maid, since she likes seeing her body as she looks after their suite.
		<<set $slaves[$i].clothes = "a slutty maid outfit">>
	<</if>>
<<else>>
	$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed as a slutty maid, since she likes seeing her body as she looks after their suite.
	<<set $slaves[$i].clothes = "a slutty maid outfit">>
<</if>>
<<set $slaves[$i].devotion += 1>>

<<if $HeadGirl.energy > 95>>
	<<if $HeadGirl.bald != 1&& $HeadGirl.hLength > 0>>
		<<if $slaves[$i].bald != 1>>
			<<if !hasHColorRule($slaves[$i],$defaultRules)>>
				<<if ($slaves[$i].hColor != $HeadGirl.hColor)>>
					$HeadGirl.slaveName dyes $slaves[$i].slaveName's hair $HeadGirl.hColor, just like her own, since with nymphomania comes narcissism.
					<<set $slaves[$i].hColor = $HeadGirl.hColor>>
				<</if>>
			<</if>>
			<<if !hasHStyleRule($slaves[$i],$defaultRules)>>
				<<if ($slaves[$i].hStyle != $HeadGirl.hStyle)>>
					$HeadGirl.slaveName styles $slaves[$i].slaveName's hair just like her own, since with nymphomania comes narcissism.
					<<set $slaves[$i].hStyle = $HeadGirl.hStyle>>
					<<set $slaves[$i].hLength = $HeadGirl.hLength>>
				<</if>>
			<</if>>
		<<else>>
			<<if !hasHColorRule($slaves[$i],$defaultRules)>>
				<<if ($slaves[$i].hColor != $HeadGirl.hColor)>>
					$HeadGirl.slaveName changes $slaves[$i].slaveName's wig to $HeadGirl.hColor, just like her own hair, since with nymphomania comes narcissism.
					<<set $slaves[$i].hColor = $HeadGirl.hColor>>
				<</if>>
			<</if>>
			<<if !hasHStyleRule($slaves[$i],$defaultRules)>>
				<<if ($slaves[$i].hStyle != $HeadGirl.hStyle)>>
					$HeadGirl.slaveName changes $slaves[$i].slaveName's wig style to look just like her own hair, since with nymphomania comes narcissism.
					<<set $slaves[$i].hStyle = $HeadGirl.hStyle>>
					<<set $slaves[$i].hLength = $HeadGirl.hLength>>
				<</if>>
			<</if>>
		<</if>>
	<</if>>
	<<if $slaves[$i].origEye == "none">>
		<<if !hasEyeColorRule($slaves[$i],$defaultRules)>>
			<<if ($slaves[$i].eyeColor != $HeadGirl.eyeColor)>>
				<<set $slaves[$i].eyeColor = $HeadGirl.eyeColor>>
				$HeadGirl.slaveName gives $slaves[$i].slaveName $slaves[$i].eyeColor glass eyes, to match her own eyes, since with nymphomania comes narcissism.
			<</if>>
		<</if>>
	<<elseif $slaves[$i].origEye == "implant">>
		<<if !hasEyeColorRule($slaves[$i],$defaultRules)>>
			<<if ($slaves[$i].eyeColor != $HeadGirl.eyeColor)>>
				<<set $slaves[$i].eyeColor = $HeadGirl.eyeColor>>
				$HeadGirl.slaveName changes $slaves[$i].slaveName $slaves[$i].eyeColor eye lenses, to match her own eyes, since with nymphomania comes narcissism.
			<</if>>
		<</if>>
	<<else>>
		<<if !hasEyeColorRule($slaves[$i],$defaultRules)>>
			<<if ($slaves[$i].eyeColor != $HeadGirl.eyeColor)>>
				<<set $slaves[$i].eyeColor = $HeadGirl.eyeColor>>
				$HeadGirl.slaveName gives $slaves[$i].slaveName $slaves[$i].eyeColor contact lenses, to match her own eyes, since with nymphomania comes narcissism.
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if ($slaves[$i].weight < 100 && $arcologies[0].FSHedonisticDecadence >= 20) || ($slaves[$i].weight < -10)>>
	$HeadGirl.slaveName thinks $slaves[$i].slaveName could use a little extra weight <<if $arcologies[0].FSHedonisticDecadence >= 20>>since plump girls are all the rage in your arcology <</if>>
	<<if $slaves[$i].diet != "fattening">>
		and assigns her a diet to fatten her up.
		<<set $slaves[$i].diet = "fattening">>
	<<else>>
		and keeps her on her fattening diet.
	<</if>>
<<elseif $slaves[$i].weight > 30 && $arcologies[0].FSHedonisticDecadence == "unset">>
	$HeadGirl.slaveName thinks $slaves[$i].slaveName is a little too porky
	<<if $slaves[$i].diet != "restricted">>
		and puts her on a diet.
		<<set $slaves[$i].diet = "restricted">>
	<<else>>
		and keeps her on her diet.
	<</if>>
<<elseif (($slaves[$i].muscles <= 95 && ($arcologies[0].FSPhysicalIdealist > 0 || (($HeadGirl.fetish == "submissive" || $HeadGirl.fetish == "masochist") && $HeadGirl.fetishKnown == 1))) || $slaves[$i].muscles <= 5) && $slaves[$i].amp != 1>>
	$HeadGirl.slaveName thinks $slaves[$i].slaveName
	<<if $arcologies[0].FSPhysicalIdealist > 0>>
		could use bigger muscles to support your societal goals
	<<elseif $HeadGirl.fetish == "submissive">>
		could use bigger muscles to better dominate her with in bed
	<<elseif $HeadGirl.fetish == "masochist">>
		could use bigger muscles to better spank her
	<<else>>
		could use a bit of muscle
	<</if>>
	<<if $slaves[$i].diet != "muscle building">>
		and makes her work out hard.
		<<set $slaves[$i].diet = "muscle building">>
	<<else>>
		and keeps her working out.
	<</if>>
<<elseif $slaves[$i].balls > 0 && $HeadGirl.fetish == "cumslut" && $HeadGirl.fetishKnown == 1 && $cumProDiet == 1>>
	HeadGirl.slaveName loves cum, so she
	<<if $slaves[$i].diet != "cum production">>
		puts
		<<set $slaves[$i].diet = "cum production">>
	<<else>>
		keeps
	<</if>>
	$slaves[$i].slaveName on a diet designed to make her cum harder and stronger.
<<else>>
	$HeadGirl.slaveName thinks $slaves[$i].slaveName is fine as is
	<<if $slaves[$i].diet != "healthy">>
		and puts her on a normal diet.
		<<set $slaves[$i].diet = "healthy">>
	<<else>>
		and keeps her on her healthy diet
	<</if>>
<</if>>

<<if $HGSuiteHormones != 0 && $slaves[$i].hormones != 2>>
	$HeadGirl.slaveName puts $slaves[$i].slaveName on intensive female hormones, since she expects her to act as the submissive, feminine partner.
	<<set $slaves[$i].hormones = 2>>
<</if>>

<<if $arcologies[0].FSSlimnessEnthusiast != "unset">>
	<<set $HGTastes = 1>>
<<elseif $arcologies[0].FSRepopulationFocus != "unset">>
	<<set $HGTastes = 4>>
<<elseif $arcologies[0].FSBodyPurist != "unset">>
	<<set $HGTastes = 1>>
<<elseif $arcologies[0].FSDegradationist != "unset">>
	<<set $HGTastes = 3>>
<<elseif $arcologies[0].FSAssetExpansionist != "unset">>
	<<set $HGTastes = 3>>
<<elseif $arcologies[0].FSTransformationFetishist != "unset">>
	<<set $HGTastes = 3>>
<<else>>
	<<set $HGTastes = 2>>
<</if>>

<<if $HGSuiteDrugs != 0>>
	<<if ($slaves[$i].health < 60)>>
		$HeadGirl.slaveName gives $slaves[$i].slaveName curatives, since she wants a shiningly healthy living partner.
		<<set $slaves[$i].curatives = 2>>
	<</if>>
	<<if ($slaves[$i].lips <= 20)>>
		$HeadGirl.slaveName gives $slaves[$i].slaveName lip injections, since she wants to get oral from plump, luscious lips.
		<<set $slaves[$i].drugs = "lip injections">>
	<<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "buttslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].butt < 18>>
		$HeadGirl.slaveName gives $slaves[$i].slaveName hyper ass injections, since she never once thought it possible to fuck an ass as big as she is.
		<<set $slaves[$i].drugs = "hyper butt injections">>
	<<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "buttslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].butt < 8>>
		$HeadGirl.slaveName gives $slaves[$i].slaveName ass injections, since she likes comfortable padding as she fucks a butt.
		<<set $slaves[$i].drugs = "butt injections">>
	<<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "cumslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].balls < 100 && $slaves[$i].balls > 0 && $slaves[$i].dick > 0>>
		$HeadGirl.slaveName gives $slaves[$i].slaveName hyper testicle injections, since she wants to swim in a river of cum.
		<<set $slaves[$i].drugs = "hyper testicle enhancement">>
	<<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "cumslut") && $slaves[$i].balls < 10 && $slaves[$i].balls > 0 && $slaves[$i].dick > 0>>
		$HeadGirl.slaveName gives $slaves[$i].slaveName testicle injections, since she wants $slaves[$i].slaveName shooting bigger loads.
		<<set $slaves[$i].drugs = "testicle enhancement">>
	<<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "masochist") && $slaves[$i].height < Math.clamp((Height.mean($slaves[$i]) * 1.25),0,274)>>
		$HeadGirl.slaveName has a subconscious need to be hurt by the biggest, strongest girl possible, so $pronoun gives $slaves[$i].slaveName injections of growth stimulants to make her grow taller.
		<<set $slaves[$i].drugs = "growth stimulants">>
	<<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "submissive") && $slaves[$i].height < Math.clamp((Height.mean($slaves[$i]) * 1.25),0,274)>>
		$HeadGirl.slaveName has a subconscious need to be dominated by the biggest, strongest girl possible, so $pronoun gives $slaves[$i].slaveName injections of growth stimulants to make her grow taller.
		<<set $slaves[$i].drugs = "growth stimulants">>
	<<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "boobs") && ($slaves[$i].boobs < 8000)>>
		$HeadGirl.slaveName gives $slaves[$i].slaveName <<if $arcologies[0].FSAssetExpansionistResearch == 1>>hyper <</if>> tit injections, since as far as she's concerned there's no such thing as too much boob.
		<<if $arcologies[0].FSAssetExpansionistResearch == 1>>
			<<set $slaves[$i].drugs = "hyper breast injections">>
		<<else>>
			<<set $slaves[$i].drugs = "breast injections">>
		<</if>>
	<<elseif ($HGTastes == 4 || $HeadGirl.fetish == "pregnancy") && canImpreg($slaves[$i], $HeadGirl) && $arcologies[0].FSRestart == "unset">>
		$HeadGirl.slaveName gives $slaves[$i].slaveName ferility enhancers, since she wants to see $slaves[$i].slaveName heavy with child.
		<<set $slaves[$i].drugs = "fertility drugs">>
	<<elseif $HGTastes > 1>>
		<<if ($slaves[$i].lips <= 70)>>
			$HeadGirl.slaveName gives $slaves[$i].slaveName lip injections, since she thinks $slaves[$i].slaveName should have lips so big she can barely speak.
			<<set $slaves[$i].drugs = "lip injections">>
		<<elseif ($slaves[$i].butt < $slaves[$i].boobs/1000)>>
			$HeadGirl.slaveName gives $slaves[$i].slaveName ass injections, since she loves curves and thinks $slaves[$i].slaveName's butt needs the most work.
			<<set $slaves[$i].drugs = "butt injections">>
		<<else>>
			$HeadGirl.slaveName gives $slaves[$i].slaveName boob injections, since she loves curves and thinks $slaves[$i].slaveName's tits need the most work.
			<<set $slaves[$i].drugs = "breast injections">>
		<</if>>
	<<else>>
		<<set $slaves[$i].drugs = "no drugs">>
	<</if>>
<<else>>
	<<if ($slaves[$i].health < 100)>>
		$HeadGirl.slaveName gives $slaves[$i].slaveName curatives, since her assistant could be healthier.
		<<set $slaves[$i].curatives = 2>>
	<</if>>
<</if>>

<<if $HGSuiteSurgery != 0>>
	<<if ($slaves[$i].health > 40) && $arcologies[0].FSBodyPurist == "unset">>
		$HeadGirl.slaveName sends $assistantName notes on what surgical modifications she wants for $slaves[$i].slaveName.
		<<include "Rules Autosurgery">>
	<</if>>
	<<if $HeadGirl.fetishKnown == 1>>
		<<if ($HeadGirl.fetish == "sadist") && ($HeadGirl.fetishStrength > 95) && ($seeExtreme == 1) && ($slaves[$i].fetish != "mindbroken")>>
			<<if ($slaves[$i].health > 40)>>
				<<if ($slaves[$i].amp != 1) && ($slaves[$i].devotion < -20)>>
					$HeadGirl.slaveName decides to extract the ultimate in sadistic pleasure from $slaves[$i].slaveName, and directs the autosurgery to @@.red;amputate her arms and legs.@@ She carefully describes the entire process to the sobbing slave @@.gold;in minute detail@@ before allowing her to be sedated.
					<<set $slaves[$i].devotion -= 20, $slaves[$i].trust -= 20, $slaves[$i].health -= 40, $slaves[$i].amp = 1>>
				<</if>>
				<<if ($slaves[$i].balls > 0) && ($slaves[$i].devotion <= 50)>>
					$HeadGirl.slaveName decides to have some once-only sadistic pleasure, and carefully straps $slaves[$i].slaveName into the surgery until she's completely immobile. $HeadGirl.slaveName situates a mirror so the terrified girl can see her own crotch, gets behind her, and carefully sodomizes her during the entire process of @@.red;castration.@@ $slaves[$i].slaveName is anesthetized down there and can't feel the brutal anal rape, but her abuser orgasms repeatedly to her @@.gold;weeping at the sight of being gelded and raped at once.@@
					<<set $slaves[$i].devotion -= 20, $slaves[$i].trust -= 20, $slaves[$i].health -= 20, $slaves[$i].balls = 0>>
				<</if>>
			<</if>>
			<<if ($slaves[$i].devotion < -90) && ($slaves[$i].fetish != "mindbroken")>>
				$HeadGirl.slaveName tires of $slaves[$i].slaveName's protests that $HeadGirl.slaveName is a monster for hurting her this way and her complaints that she deserves better. $HeadGirl.slaveName decides that it'll be just as much fun and a lot less trouble to mistreat $slaves[$i].slaveName once she's mindbroken, and sends her in for @@.red;chemical lobotomization.@@
				<<set $slaves[$i].health -= 20, $slaves[$i].fetish = "mindbroken">>
			<</if>>
		<<elseif ($HeadGirl.fetish == "dom") && ($HeadGirl.fetishStrength > 60) && ($seeExtreme == 1) && ($slaves[$i].fetish != "mindbroken") && ($slaves[$i].devotion <= 50)>>
			<<if ($slaves[$i].health > 40)>>
				<<if ($slaves[$i].heels == 0) && ($slaves[$i].amp != 1)>>
					$HeadGirl.slaveName is not satisfied with $slaves[$i].slaveName's submissiveness, and directs the autosurgery to @@.red;clip her Achilles tendons.@@ Once the slave is recovered from surgery, $HeadGirl.slaveName removes all shoes from the suite, too, so $slaves[$i].slaveName is forced to crawl like a good little bitch. $slaves[$i].slaveName is @@.gold;angry@@ and @@.gold;frightened.@@
					<<set $slaves[$i].devotion -= 5, $slaves[$i].health -= 20, $slaves[$i].heels = 1, $slaves[$i].shoes = "none">>
				<</if>>
				<<if ($slaves[$i].balls > 0)>>
					$HeadGirl.slaveName decides that it's counterproductive for $slaves[$i].slaveName to be able to get hard, and sends her in to have her @@.red;balls removed.@@ $slaves[$i].slaveName is horrified, but $HeadGirl.slaveName uses her anus with such persistence and mercilessness that the poor gelding doesn't have much time to mourn. $slaves[$i].slaveName is badly @@.gold;frightened@@ by her new role as nothing but a recipient of anal.
					<<set $slaves[$i].trust -= 10, $slaves[$i].health -= 20, $slaves[$i].balls = 0>>
				<</if>>
			<</if>>
		<<elseif $HeadGirl.energy > 95>>
			<<if ($slaves[$i].health > 40) && ($slaves[$i].heels == 0) && ($slaves[$i].amp != 1) && ($slaves[$i].devotion <= 50) && ($slaves[$i].fetish != "mindbroken")>>
				$HeadGirl.slaveName wants a good little bimbo who sticks her butt out all the time, and directs the autosurgery to @@.red;clip $slaves[$i].slaveName's Achilles tendons.@@ Once the slave is recovered from surgery, $HeadGirl.slaveName presents $slaves[$i].slaveName with a new pair of extra-tall heels to totter around in like a good little slut. $slaves[$i].slaveName is @@.gold;angry@@ and @@.gold;frightened.@@
				<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5, $slaves[$i].health -= 20, $slaves[$i].heels = 1, $slaves[$i].shoes = "heels">>
			<</if>>
		<<elseif $HeadGirl.fetish == "masochist">>
			<<if ($slaves[$i].health > 40) && ($slaves[$i].heightImplant == 0) && ($slaves[$i].height < 185) && ($slaves[$i].amp != 1)>>
					$HeadGirl.slaveName has a subconscious need to be hurt by the biggest, strongest girl possible, and directs the autosurgery to extend $slaves[$i].slaveName's arm and leg bones to make her a little @@.lime;taller.@@
					<<set $slaves[$i].health -= 20, $slaves[$i].heightImplant = 1, $slaves[$i].height += 1>>
			<</if>>
		<<elseif $HeadGirl.fetish == "submissive">>
			<<if ($slaves[$i].health > 40) && ($slaves[$i].heightImplant == 0) && ($slaves[$i].height < 185) && ($slaves[$i].amp != 1)>>
				$HeadGirl.slaveName wants to be topped by the biggest, strongest girl possible, and directs the autosurgery to extend $slaves[$i].slaveName's arm and leg bones to make her a little @@.lime;taller.@@
				<<set $slaves[$i].health -= 20, $slaves[$i].heightImplant = 1, $slaves[$i].height += 1>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if $HGSuiteEquality != 0>>
	<<if $slaves[$i].devotion > 50>>
		$HeadGirl.slaveName and $slaves[$i].slaveName @@.hotpink;really appreciate@@ the equal, alternating Head Girl system, and @@.yellow;switch places at the end of the week.@@
		<<set $HeadGirl.devotion += 1, $slaves[$i].devotion += 1>>
	<<else>>
		$slaves[$i].slaveName is not a decent Head Girl candidate, so $HeadGirl.slaveName keeps the position for now.
	<</if>>
<<else>>
	<<set $seed = $HGSuiteSurgery + $HGSuiteDrugs + $HGSuiteHormones>>
	<<if $seed > 2>>
		Your Head Girl @@.hotpink;really enjoys@@ being given total freedom to customize her very own bitch.
		<<set $HeadGirl.devotion += 2>>
	<<elseif $seed == 2>>
		Your Head Girl @@.hotpink;enjoys@@ being given freedom to customize her very own girl.
		<<set $HeadGirl.devotion += 1>>
	<<elseif $seed == 1>>
		Your Head Girl @@.hotpink;appreciates@@ being given some freedom to customize her own servant.
		<<set $HeadGirl.devotion += 1>>
	<</if>>
<</if>>

<<if $slaves[$i].livingRules != "luxurious">>
	<<set $slaves[$i].livingRules = "luxurious">>
<</if>>

<<if ($HeadGirl.relationshipTarget == $slaves[$i].ID)>>
	<<set ($HeadGirl.relationship = $slaves[$i].relationship)>>
<</if>>
<<set $slaves[_iTemp] = $HeadGirl>>

<<if $showEWD == 0>>
	<<silently>>
	<<include "SA chooses own clothes">>
	<<include "SA rules">>
	<<include "SA diet">>
	<<include "SA long term effects">>
	<<include "SA drugs">>
	<<include "SA relationships">>
	<<include "SA rivalries">>
	<<include "SA devotion">>
	<</silently>>
<<else>>
	<<include "SA chooses own clothes">>
	<<include "SA rules">>
	<<include "SA diet">>
	<<include "SA long term effects">>
	<<include "SA drugs">>
	<<include "SA relationships">>
	<<include "SA rivalries">>
	<br><<include "SA devotion">>
<</if>>

<<unset $HGTastes>>

repo_name: Drosil/fc

license: mit