code:
:: SA get milked [nobr]

<<if ndef $slaves[$i].lactationAdaptation>>
	<<set $slaves[$i].lactationAdaptation to 0>>
<</if>>

<<set $milk to 0>>
<<set $cum to 0>>

gets milked this week.
<<if $dairy > 0>>
<<if $dairyRestraintsSetting < 2>>
	<<if (($universalRulesFacilityWork == 1) && ($slaves[$i].assignment is "get milked") && ($dairySpots > 0)) || ($slaves[$i].assignment is "work in the dairy")>>
	Since there's extra space in $dairyName, she spends most of her milkings there.
	<<set $dairySpots -= 1>>
	<<if ($Milkmaid != 0)>>
		While there, she gets the benefit of $Milkmaid.slaveName's <<if ($Milkmaid.physicalAge < 21)>>youthful energy<<else>>care<</if>><<if ($Milkmaid.oralSkill >= 100)>>and talented tongue<<else>>.<</if>>
		<<if ($slaves[$i].devotion < $milkmaidDevotionThreshold)>>
			<<set $slaves[$i].devotion += $milkmaidDevotionBonus>>
		<</if>>
		<<if ($slaves[$i].trust < $milkmaidTrustThreshold)>>
			<<set $slaves[$i].trust += $milkmaidTrustBonus>>
		<</if>>
		<<if ($slaves[$i].health < 100)>>
			<<set $slaves[$i].health += $milkmaidHealthBonus>>
		<</if>>
	<</if>>
	<</if>>
<</if>>
<</if>>

<<if $slaves[$i].lactation > 0>>

	<<set $milk = milkAmount($slaves[$i])>>

	She produces from her <<print either("tits", "breasts", "mammaries", "udders", "boobs")>>, which have a combined volume of <<print $slaves[$i].boobs*2>> CCs;
	<<if ($slaves[$i].lactation == 1)>>
		she is lactating naturally and produces a healthy stream of milk.
	<<elseif ($slaves[$i].lactation is 2)>>
		she is on lactation drugs and produces a river of milk.
		<<if $slaves[$i].lactationAdaptation < 100>>
			Her udders are forced to adapt to this unnatural productivity.
			<<set $slaves[$i].lactationAdaptation += 1>>
		<</if>>
		<<if $slaves[$i].curatives == 0>>
			The stress of extreme milk production @@color:red;damages her health.@@
			<<set $slaves[$i].health -= 3>>
		<</if>>
	<</if>>

	<<if ($slaves[$i].devotion > 50)>>
		She's such a happy cow that her mental state has a positive impact on her production.
	<<elseif ($slaves[$i].devotion < -50)>>
		She's such an unhappy cow that her mental state has a negative impact on her production.
	<</if>>

	<<if ($slaves[$i].boobsImplant > 200)>>
		However, her breast implants impede milk production.
	<</if>>

	<<set $hormones to $slaves[$i].hormones>>
	<<if ($slaves[$i].balls != 0) && ($hormones > -2)>>
		<<set $hormones -= 1>>
	<</if>>
	<<if ($slaves[$i].ovaries != 0) && ($hormones < 2)>>
		<<set $hormones += 1>>
	<</if>>
	<<if ($hormones > 1)>>
		Her internal chemistry is perfectly suited to milk production.
	<<elseif ($hormones > 0)>>
		Her hormonal balance favors milk production.
	<<elseif ($hormones < 0)>>
		Her hormonal balance impedes milk production.
	<<elseif ($hormones < -1)>>
		Her internal chemistry is poorly suited to milk production.
	<</if>>

	<<if $slaves[$i].lactationAdaptation < 100>>
	<<if ($slaves[$i].assignment is "get milked") || ($slaves[$i].assignment is "work in the dairy")>>
		Living as a cow helps her body and mind adapt to producing milk.
		<<set $slaves[$i].lactationAdaptation += 1>>
	<</if>>
	<</if>>

	<<if ($slaves[$i].preg > 5)>>
		Her pregnancy helps her body produce more milk naturally<<if $slaves[$i].lactationAdaptation < 100>>, and also helps it adapt to milk production<<set $slaves[$i].lactationAdaptation += 1>><</if>>.
	<</if>>

	<<if ($slaves[$i].health > 50)>>
		Her shining health helps her really produce.
	<<elseif ($slaves[$i].health < -50)>>
		Her poor health impedes milk production.
	<</if>>

	<<if ($slaves[$i].weight > 10)>>
		Her extra weight supports her productivity.
	<<elseif ($slaves[$i].weight < -10)>>
		Her thinness hinders her productivity.
	<</if>>

	<<if $slaves[$i].lactationAdaptation > 10>>
	<<if $slaves[$i].lactationAdaptation > 50>>
		Her body has adapted heavily to milk production, making her extremely productive.
	<<else>>
		Her body has gotten used to producing milk, making her very productive.
	<</if>>
	<</if>>

	<<if $dairySlimMaintainUpgrade == 1>>
	<<if $dairySlimMaintain == 1>>
		<<if ($slaves[$i].boobs <= 700)>>
			<<if ($arcologies[0].FSSlimnessEnthusiast > 80)>>
				Your arcology's milkers are optimized to extract maximum output from small breasted slaves, which substantially increases her otherwise modest productivity.
				<<set $milk *= 1.5>>
			<<elseif ($arcologies[0].FSSlimnessEnthusiast > 20)>>
				Your arcology's milkers have been carefully modified to more readily accommodate slaves with tiny breasts, which slightly mitigates her less than ideal physiology for milk production.
				<<set $milk *= 1.1>>
			<</if>>
		<</if>>
	<</if>>
	<</if>>

	<<if ($slaves[$i].assignment is "work in the dairy")>>
		<<if ($dairyFeedersUpgrade == 1)>>
		<<if ($dairyFeedersSetting > 0)>>
			<<set $milk += $milk*(0.1*($dairyFeedersUpgrade+$dairyRestraintsSetting+((50-$slaves[$i].physicalAge)/20)))>>
			<<if ($slaves[$i].chem > 360)>>
				<<set $milk *= 0.6>>
			<<elseif ($slaves[$i].chem > 100)>>
				<<set $milk *= ((600-$slaves[$i].chem)/600)>>
			<</if>>
		<</if>>
		<</if>>
	<<elseif ($slaves[$i].assignment is "be confined in the arcade")>>
		<<set $milk *= 0.5>>
	<</if>>

	<<set $milk *= $servantMilkersMultiplier>>

	<<set $milk = Math.trunc($milk)>>
	<<set $slaves[$i].milk += $milk>>
	<<set $milkTotal += $milk>>

	As a result, she produces $milk liters of milk over the week.

	<<if ($arcologies[0].FSPastoralistLaw == 1)>>
		<<set $milkSale to $milk*(9+Math.trunc($arcologies[0].FSPastoralist/30))>>
		Since breast milk is $arcologies[0].name's only legal dairy product, she can scarcely be milked fast enough, and she makes @@color:yellowgreen;¤$milkSale.@@
	<<elseif ($arcologies[0].FSPastoralist != "unset")>>
		<<set $milkSale to $milk*(7+Math.trunc($arcologies[0].FSPastoralist/30))>>
		Since milk is fast becoming a major part of the $arcologies[0].name's dietary culture, her milk is in demand, and she makes @@color:yellowgreen;¤$milkSale.@@
	<<else>>
		<<set $milkSale to $milk*8>>
		Her milk is sold for @@color:yellowgreen;¤$milkSale.@@
	<</if>>
	<<set $cash += $milkSale>>

	<<if ($slaves[$i].fetish is "boobs") && ($slaves[$i].fetishStrength > 95)>>
		Getting constantly milked is almost as good as getting constant loving sex as far as she's concerned. @@color:hotpink;She is extremely pleased@@ to have her breasts receive so much attention.
		<<set $slaves[$i].devotion += 1>>
	<<elseif ($slaves[$i].fetish is "boobs") || ($slaves[$i].energy > 95)>>
		Getting constantly milked is great, as far as she's concerned. @@color:hotpink;She is happy@@ to have her breasts receive so much attention.
		<<set $slaves[$i].devotion += 1>>
	<</if>>

	<<if ($slaves[$i].lactation > 1)>>
		<<if ($slaves[$i].nipples != "huge")>>
		<<if ($slaves[$i].nipples is "inverted")>>
			<<if ($slaves[$i].fetish is "masochist") && ($slaves[$i].fetishKnown == 1)>>
			Having the milkers constantly haul her inverted nipples out is @@color:hotpink;extremely uncomfortable; she loves it.@@
			<<set $slaves[$i].devotion += 3>>
			<<else>>
			Having the milkers constantly haul her inverted nipples out is @@color:mediumorchid;extremely uncomfortable.@@
			<<set $slaves[$i].devotion -= 3>>
			<</if>>
			<<if (random(1,100) > 50)>>
			The constant suction @@color:lime;permanently protrudes them,@@ and
			<<if (random(1,2) == 1)>>
				it turns out they're absolutely massive.
				<<set $slaves[$i].nipples to "huge">>
			<<else>>
				it turns out they're nice and puffy.
				<<set $slaves[$i].nipples to "puffy">>
			<</if>>
			<</if>>
		<<elseif ($slaves[$i].nipples is "partially inverted")>>
			<<if ($slaves[$i].fetish is "masochist") && ($slaves[$i].fetishKnown == 1)>>
			Having the milkers constantly haul her inverted nipples out is @@color:hotpink;quite uncomfortable; she loves it.@@
			<<set $slaves[$i].devotion += 1>>
			<<else>>
			Having the milkers constantly haul her inverted nipples out is @@color:mediumorchid;quite uncomfortable.@@
			<<set $slaves[$i].devotion -= 1>>
			<</if>>
			<<if (random(1,100) > 30)>>
			The constant suction @@color:lime;permanently protrudes them,@@ and
			<<if (random(1,2) == 1)>>
				it turns out they're pretty cute.
				<<set $slaves[$i].nipples to "cute">>
			<<else>>
				it turns out they're nice and puffy.
				<<set $slaves[$i].nipples to "puffy">>
			<</if>>
			<</if>>
		<<elseif ($slaves[$i].nipples is "puffy") && (random(1,100) > 90)>>
			Producing this river of milk @@color:lime;enlarges her nipples:@@ they're now enormous.
			<<set $slaves[$i].nipples to "huge">>
		<<elseif ($slaves[$i].nipples is "cute") && (random(1,100) > 80)>>
			Producing this river of milk @@color:lime;makes her nipples nice and puffy.@@
			<<set $slaves[$i].nipples to "puffy">>
		<<elseif ($slaves[$i].nipples is "tiny")>>
			Producing this river of milk @@color:lime;makes her nipples grow to a nice size.@@
			<<set $slaves[$i].nipples to "cute">>
		<<elseif ($slaves[$i].areolae < 3) && (random(1,100) > 30+($slaves[$i].areolae*20))>>
			Producing this river of milk @@color:lime;broadens her areolae.@@
			<<set $slaves[$i].areolae += 1>>
		<</if>>
		<</if>>
	<<else>>
		<<if ($slaves[$i].nipples != "huge")>>
		<<if ($slaves[$i].nipples is "inverted")>>
			<<if ($slaves[$i].fetish is "masochist") && ($slaves[$i].fetishKnown == 1)>>
			Having the milkers constantly haul her inverted nipples out is @@color:hotpink;extremely uncomfortable; she loves it.@@
			<<set $slaves[$i].devotion += 3>>
			<<else>>
			Having the milkers constantly haul her inverted nipples out is @@color:mediumorchid;extremely uncomfortable.@@
			<<set $slaves[$i].devotion -= 3>>
			<</if>>
			<<if (random(1,100) > 50)>>
			The constant suction @@color:lime;permanently protrudes them,@@ and
			<<if (random(1,2) == 1)>>
				it turns out they're absolutely massive.
				<<set $slaves[$i].nipples to "huge">>
			<<else>>
				it turns out they're nice and puffy.
				<<set $slaves[$i].nipples to "puffy">>
			<</if>>
			<</if>>
		<<elseif ($slaves[$i].nipples is "partially inverted")>>
			<<if ($slaves[$i].fetish is "masochist") && ($slaves[$i].fetishKnown == 1)>>
			Having the milkers constantly haul her inverted nipples out is @@color:hotpink;quite uncomfortable; she loves it.@@
			<<set $slaves[$i].devotion += 1>>
			<<else>>
			Having the milkers constantly haul her inverted nipples out is @@color:mediumorchid;quite uncomfortable.@@
			<<set $slaves[$i].devotion -= 1>>
			<</if>>
			<<if (random(1,100) > 30)>>
			The constant suction @@color:lime;permanently protrudes them,@@ and
			<<if (random(1,2) == 1)>>
				it turns out they're pretty cute.
				<<set $slaves[$i].nipples to "cute">>
			<<else>>
				it turns out they're nice and puffy.
				<<set $slaves[$i].nipples to "puffy">>
			<</if>>
			<</if>>
		<<elseif ($slaves[$i].nipples is "tiny") && (random(1,100) > 50)>>
			Producing milk @@color:lime;makes her nipples grow to a nice size.@@
			<<set $slaves[$i].nipples to "cute">>
		<</if>>
		<</if>>
	<</if>>

<</if>> /* CLOSES BREAST MILKING */

<<if ($slaves[$i].balls > 0)>>

	<<set $cumSlaves += 1>>
	<<set $cum = cumAmount($slaves[$i])>>

	<<if $slaves[$i].lactation > 0>>
		Her
	<<else>>
		$slaves[$i].slaveName's
	<</if>>

	<<if ($slaves[$i].dick > 6)>>
		inhuman
	<<elseif ($slaves[$i].dick > 5)>>
		massive
	<<elseif ($slaves[$i].dick > 4)>>
		big
	<<elseif ($slaves[$i].dick > 3)>>
		sizeable
	<<elseif ($slaves[$i].dick > 2)>>
		moderate
	<<elseif ($slaves[$i].dick > 1)>>
		little
	<<else>>
		tiny
	<</if>>

	prick is
	<<if $slaves[$i].lactation > 0>>
		also
	<</if>>
	machine-milked to extract the cum from her
	<<if ($slaves[$i].scrotum == 0)>>
		invisible
	<<elseif ($slaves[$i].balls > 5)>>
		titanic
	<<elseif ($slaves[$i].balls > 4)>>
		enormous
	<<elseif ($slaves[$i].balls > 3)>>
		pendulous
	<<elseif ($slaves[$i].balls > 2)>>
		average
	<<elseif ($slaves[$i].balls > 1)>>
		pathetic
	<<else>>
		invisible
	<</if>>
	<<if $slaves[$i].drugs is "testicle enhancement">>
		balls, relieving them of the excessive cum production caused by the testicle enhancement drugs.
	<<elseif $slaves[$i].drugs is "hyper testicle enhancement">>
		balls, relieving them of the excessive cum production caused by the hyper testicle enhancement drugs.
	<<else>>
		balls.
	<</if>>

	<<if $slaves[$i].diet is "cum production">>
		Her diet is designed for cum production.
	<</if>>

	<<set $hormones to $slaves[$i].hormones>>
	<<if $hormones < -1>>
		Her internal chemistry is perfectly suited to cum production.
	<<elseif $hormones < 0>>
		Her hormonal balance favors cum production.
	<<elseif $hormones > 0>>
		Her hormonal balance impedes cum production.
	<<elseif $hormones > 1>>
		Her internal chemistry is poorly suited to cum production.
	<</if>>

	<<if $slaves[$i].scrotum == 0>>
		She does produce cum despite her apparent ballslessness, but less than she would if they weren't hidden inside her.
	<</if>>

	<<if ($slaves[$i].devotion > 50)>>
		She's so happy that her mental state has a positive impact on her semen production.
	<<elseif ($slaves[$i].devotion < -50)>>
		She's so unhappy that her mental state has a negative impact on her semen production.
	<</if>>

	<<if ($slaves[$i].health > 50)>>
		Her shining health helps her really produce.
	<<elseif ($slaves[$i].health < -50)>>
		Her poor health impedes semen production.
	<</if>>

	<<if ($slaves[$i].assignment is "work in the dairy")>>
		<<if ($dairyStimulatorsUpgrade == 1)>>
			<<if ($dairyStimulatorsSetting > 0)>>
				<<set $cum += $cum*(0.2*($dairyStimulatorsSetting+$dairyRestraintsSetting+Math.trunc((50-$slaves[$i].physicalAge)/20)))>>
			<</if>>
			<<if ($slaves[$i].chem > 360)>>
				<<set $cum = Math.trunc($cum*0.6)>>
			<<elseif ($slaves[$i].chem > 100)>>
				<<set $cum = Math.trunc($cum*((600-$slaves[$i].chem)/600))>>
			<</if>>
		<<elseif ($Milkmaid != 0)>>
			<<if ($Milkmaid.dick > 4) && canAchieveErection($Milkmaid)>>
				$Milkmaid.slaveName sometimes stands in for the machines, which is a polite way of saying she sometimes fucks $slaves[$i].slaveName's ass to help her cum.
				<<set $cum += $cum*0.2>>
			<</if>>
		<</if>>
	<<elseif ($slaves[$i].assignment is "be confined in the arcade")>>
		<<set $cum to $cum*0.5>>
	<</if>>

	<<set $cum = Math.trunc($cum)>>
	<<set $slaves[$i].cum += $cum>>
	<<set $cumTotal += $cum>>

	<<if ($arcologies[0].FSPastoralist is "unset")>>
		<<set $seed to ($cum*random(25,35))>>
		She produces <<print $cum>> deciliters of cum over the week; the fresh ejaculate is sold for @@color:yellowgreen;¤<<print $seed>>.@@
	<<elseif $arcologies[0].FSPastoralistLaw == 1>>
		<<set $seed to ($cum*(random(40,50)))>>
		She produces <<print $cum>> deciliters of cum over the week; the fresh ejaculate, which is in extremely high demand as one of $arcologies[0].name's few legal sources of animal protein, is sold for @@color:yellowgreen;¤<<print $seed>>.@@
	<<else>>
		<<set $seed to ($cum*(random(25,35)+Math.trunc($arcologies[0].FSPastoralist/10)))>>
		She produces <<print $cum>> deciliters of cum over the week; the fresh ejaculate, which is in high demand given the new cultural preference for slave products, is sold for @@color:yellowgreen;¤<<print $seed>>.@@
	<</if>>
	<<set $cash += $seed>>

	<<if ($slaves[$i].energy > 95)>>
		Getting her dick constantly milked is almost as good as getting constant blowjobs as far as she's concerned. @@color:hotpink;She is happy@@ to have her member receive so much attention.
		<<set $slaves[$i].devotion += 1>>
	<</if>>

	<<if ($slaves[$i].hormones > 0)>>
		Since she cannot maintain an erection, she requires @@color:gold;painful@@ and @@color:mediumorchid;degrading@@ anal electrostimulation to produce.
		<<set $slaves[$i].devotion -= 2>>
		<<set $slaves[$i].trust -= 2>>
		<<if ($slaves[$i].anus == 0)>>
			The electrostimulator @@color:lime;breaks in her virgin asshole.@@
			<<set $slaves[$i].anus to 1>>
		<</if>>
	<<elseif ($slaves[$i].devotion <= 20)>>
		Since she's unaroused by her situation, she requires @@color:gold;painful@@ and @@color:mediumorchid;degrading@@ anal electrostimulation to produce.
		<<set $slaves[$i].devotion -= 2>>
		<<set $slaves[$i].trust -= 2>>
		<<if ($slaves[$i].anus == 0)>>
			The electrostimulator @@color:lime;breaks in her virgin asshole.@@
			<<set $slaves[$i].anus to 1>>
		<</if>>
	<</if>>

	<<if ($slaves[$i].balls < 3)>>
		<<if ($slaves[$i].balls < 2)>>
			<<if (random(1,100) > 70)>>
				Constant semen production and continual emptying and refilling @@color:lime;increases the size of her tiny testicles.@@
				<<set $slaves[$i].balls += 1>>
			<</if>>
		<<elseif (random(1,100) > 90)>>
			Constant semen production and continual emptying and refilling @@color:lime;increases the size of her small testicles.@@
			<<set $slaves[$i].balls += 1>>
		<</if>>
	<</if>>

<</if>> /* CLOSES COCK MILKING */

<<if ($slaves[$i].behavioralQuirk is "fitness")>>
	$slaves[$i].slaveName @@color:hotpink;privately enjoys@@ the focus on her health and fitness that comes with being a cow.
	<<set $slaves[$i].devotion += 1>>
<</if>>

/* FACILITY DECORATION IMPACTS */

<<if $slaves[$i].assignment is "work in the dairy">>
<<if $dairyDecoration != "standard">>
<<set $seed to 0.0001*$FSSingleSlaveRep*($milk+5*$cum)>>
<<switch $dairyDecoration>>
<<case "Roman Revivalist">>
	<<set $arcologies[0].FSRomanRevivalist += $seed>>
<<case "Egyptian Revivalist">>
	<<set $arcologies[0].FSEgyptianRevivalist += $seed>>
<<case "Edo Revivalist">>
	<<set $arcologies[0].FSEdoRevivalist += $seed>>
<<case "Arabian Revivalist">>
	<<set $arcologies[0].FSArabianRevivalist += $seed>>
<<case "Chinese Revivalist">>
	<<set $arcologies[0].FSChineseRevivalist += $seed>>
<<case "Chattel Religionist">>
	<<set $arcologies[0].FSChattelReligionist += $seed>>
<<case "Degradationist">>
	<<set $arcologies[0].FSDegradationist += $seed>>
<<case "Repopulation Focus">>
	<<set $arcologies[0].FSRepopulationFocus += $seed>>
<<case "Eugenics">>
	<<set $arcologies[0].FSRestart += $seed>>
<<case "Asset Expansionist">>
	<<set $arcologies[0].FSAssetExpansionist += $seed>>
<<case "Transformation Fetishist">>
	<<set $arcologies[0].FSTransformationFetishist += $seed>>
<<case "Gender Radicalist">>
	<<set $arcologies[0].FSGenderRadicalist += $seed>>
<<case "Gender Fundamentalist">>
	<<set $arcologies[0].FSGenderFundamentalist += $seed>>
<<case "Physical Idealist">>
	<<set $arcologies[0].FSPhysicalIdealist += $seed>>
<<case "Supremacist">>
	<<set $arcologies[0].FSSupremacist += $seed>>
<<case "Subjugationist">>
	<<set $arcologies[0].FSSubjugationist += $seed>>
<<case "Paternalist">>
	<<set $arcologies[0].FSPaternalist += $seed>>
<<case "Pastoralist">>
	<<set $arcologies[0].FSPastoralist += $seed>>
<<case "Maturity Preferentialist">>
	<<set $arcologies[0].FSMaturityPreferentialist += $seed>>
<<case "Youth Preferentialist">>
	<<set $arcologies[0].FSYouthPreferentialist += $seed>>
<<case "Body Purist">>
	<<set $arcologies[0].FSBodyPurist += $seed>>
<<case "Slimness Enthusiast">>
	<<set $arcologies[0].FSSlimnessEnthusiast += $seed>>
<</switch>>
<</if>>
<</if>>


code:
:: SA guard you [nobr]

carries arms in your defense.

<<Deadliness $slaves[$i]>>

<<if $slaves[$i].combatSkill > 0>>
	Her combat skills greatly increase her deadliness.
<</if>>

<<if $bodyguardCareers.contains($Bodyguard.career)>>
	She has experience in personal defense from before she was a slave.
<</if>>

<<if ($slaves[$i].muscles > 30) && ($slaves[$i].muscles <= 95)>>
	She is strong and powerful yet quick and flexible.
<<elseif $slaves[$i].muscles > 95 && $slaves[$i].height >= 190>>
	Her huge muscles are an intimidating sight and, despite their massive size, she is tall enough to use them effectively.
<<elseif $slaves[$i].muscles > 95>>
	Her huge muscles are an intimidating sight, but are so big that they actually detract from her combat effectiveness.
<<elseif $slaves[$i].muscles > 5>>
	She is reasonably fit, but not enough to significantly affect her combat effectiveness.
<<elseif $slaves[$i].muscles < -95>>
	She can barely stand, let alone fight. A single shot from her own weapon is liable to incapacitate her, making her an absolute travesty of a bodyguard.
<<elseif $slaves[$i].muscles < -30>>
	She tires from just standing, rendering her both ineffective and embarrasing to have as your guard.
<<elseif $slaves[$i].muscles < -5>>
	She is rather unfit, enough to negatively impact her combat effectiveness.
<</if>>

<<if $slaves[$i].amp == -4>>
	Her tough combat limbs make her an intimidating sight to behold.
<<elseif $slaves[$i].amp == -5>>
	The artificial muscles of her cybernetic limbs increase her strength and flexibility to enhance her combat abilities and give her the intimidating appearance of a super-soldier.
<</if>>

<<if $slaves[$i].height >= 170>>
	Her height gives her a reach advantage with her sword.
<</if>>

<<if $slaves[$i].health > 50>>
	Her shining health makes her a better combatant.
<</if>>

<<if $slaves[$i].boobs > 4000>>
	Her titanic tits are a terrible hindrance in actual fighting.
<<elseif $slaves[$i].boobs > 2000>>
	Her big breasts get in her way and reduce her efficiency.
<</if>>

<<if $slaves[$i].dick >= 10>>
	Her massive dick gets in her way and reduces her efficiency.
<</if>>

<<if $slaves[$i].balls >= 15>>
	Her massive balls slow her down and limit her range of motion.
<</if>>

<<if $slaves[$i].butt > 6>>
	Her massive ass slows her down and limits her range of motion.
<</if>>

<<if $slaves[$i].hips > 2>>
	She struggles to move with her inhumanly wide hips and frequently gets caught between things trying to follow you.
<</if>>

<<if $slaves[$i].weight > 30>>
	Her heavy weight is an impediment as a bodyguard.
<</if>>

<<if $slaves[$i].weight < -10>>
	Her light weight is an impediment as a bodyguard.
<</if>>

<<if $slaves[$i].health < -50>>
	Her poor health makes her a weaker combatant.
<</if>>

<<if $slaves[$i].inflation == 3>>
	Her hugely bloated, <<print $slaves[$i].inflationType>>-filled belly is taut and painful, hindering her ability to guard you.
<<elseif $slaves[$i].inflation == 2>>
	Her bloated, <<print $slaves[$i].inflationType>>-stuffed belly is constantly jiggling and moving, distracting her and throwing off her weight.
<<elseif $slaves[$i].inflation == 1>>
	Her distended, <<print $slaves[$i].inflationType>>-belly is uncomfortable and heavy, distracting her.
<</if>>

<<if $slaves[$i].bellyImplant >= 32000>>
	Her immense, <<print $slaves[$i].bellyImplant>>cc implant filled belly greatly hinders her movement and terribly reduces her effectiveness in combat.  It also limits where she can follow you, as doors and small passages don't agree with her bloated figure.
<<elseif $slaves[$i].bellyImplant >= 16000>>
	Her massive, <<print $slaves[$i].bellyImplant>>cc implant filled belly greatly hinders her movement and terribly reduces her effectiveness in combat.  It also limits where she can follow you, as doors and small passages don't agree with her bloated figure.
<<elseif $slaves[$i].bellyImplant >= 8000>>
	Her huge, <<print $slaves[$i].bellyImplant>>cc implant filled belly is very heavy and unwieldy, throwing off her weight and making her far less effective.
<<elseif $slaves[$i].bellyImplant >= 4000>>
	Her large, <<print $slaves[$i].bellyImplant>>cc implant filled belly is heavy and unwieldy, rendering her less effective.
<<elseif $slaves[$i].bellyImplant >= 2000>>
	Her swollen, <<print $slaves[$i].bellyImplant>>cc implant filled belly is heavy and makes her less effective.
<</if>>

<<if ($slaves[$i].preg > 10) && ($slaves[$i].pregType >= 10)>>
	Her massive belly greatly hinders her movement and terribly reduces her effectiveness in combat.  It also limits where she can follow you, as doors and small passages don't agree with her bloated figure.
<<elseif ($slaves[$i].preg > 10)>>
	Her advanced pregnancy limits her effectiveness.
<</if>>

<<if $slaves[$i].teeth is "pointy">>
	Her sharp teeth add nothing to her actual effectiveness, but they're certainly intimidating.
<</if>>

<<if ($slaves[$i].combatSkill < 1) && (random(1,100) < 50+($slaves[$i].intelligence*20))>>
	After some experience guarding you, and diligent practice in the armory, @@color:green;her combat skills increase.@@
	<<set $slaves[$i].combatSkill += 1>>
<<elseif $slaves[$i].combatSkill >= 1>>
	She maintains her combat skill with practice in the armory.
<<else>>
	Though she practices diligently her basic combat skills do not improve this week.
<</if>>

Her constant presence is
<<if $deadliness > 6>>
	extremely intimidating, @@color:green;adding much to your reputation.@@
	<<if $slaves[$i].career is "an arcology owner">>
	You've made a onetime rival arcology owner into a deadly and loyal protector, a feat of slaveownership that's @@color:green;internationally famous.@@
	<<set $repGain += $deadliness*10>>
	<</if>>
<<elseif $deadliness > 3>>
	intimidating, @@color:green;adding to your reputation.@@
<<else>>
	hardly intimidating, @@color:yellow;barely adding to your reputation.@@
<</if>>

<<set $repGain += $deadliness*10>>

Being continually trusted with your life @@color:hotpink;increases her devotion to you@@ and encourages her to @@color:mediumaquamarine;trust you in turn.@@
	<<set $slaves[$i].devotion += 2>>
	<<set $slaves[$i].trust += 4>>

<<if $dojo > 1>>
	She @@color:hotpink;appreciates@@ how special it is that she has a nice room off the armory to rest in.
	<<set $slaves[$i].devotion += 1>>
<</if>>

<<if $bodyguardTrains == 1>>
<<if $slaves[$i].devotion > 95>>
<<if $slaves[$i].trust > 50>>
<<if $slaves[$i].combatSkill > 0>>
<<if $slaves[$i].intelligence > 0>>
	She's confident in her martial skills, but smart enough to know that she isn't immortal, and devoted enough to worry about who will protect you should she die.
	<<set $seed to 0>>
	<<for $j to 0; $j < $slaves.length; $j++>>
	<<if $slaves[$j].assignmentVisible == 1>>
	<<if $slaves[$j].combatSkill > 0>>
	<<if canWalk($slaves[$j])>>
	<<if $slaves[$j].fetish != "mindbroken">>
	<<if $slaves[$j].devotion > 50>>
	<<if $slaves[$j].boobs < 8000>>
	<<if $slaves[$j].preg < 20>>
		<<set $seed += 1>>
	<</if>>
	<</if>>
	<</if>>
	<</if>>
	<</if>>
	<</if>>
	<</if>>
	<</for>>
	<<if $seed < 2>>
	<<set $subSlave to 0>>
	<<if $slaves[$i].relationship > 1>>
		<<for $j to 0; $j < $slaves.length; $j++>>
		<<if $slaves[$j].ID is $slaves[$i].relationshipTarget>>
		<<if $slaves[$j].combatSkill == 0>>
		<<if canWalk($slaves[$j])>>
		<<if $slaves[$j].fetish != "mindbroken">>
		<<if $slaves[$j].devotion > 50>>
		<<if $slaves[$j].boobs < 8000>>
		<<if $slaves[$j].preg < 20>>
			She does her best to train $slaves[$j].slaveName whenever she can, hoping that her
			<<if $slaves[$i].relationship > 4>>
			wife
			<<elseif $slaves[$i].relationship is 4>>
			lover
			<<elseif $slaves[$i].relationship is 3>>
			girlfriend
			<<else>>
			best friend
			<</if>>
			can be made capable of stepping into her place.
			<<set $subSlave to $slaves[$j]>>
			<<set $seed to 1>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</for>>
	<</if>>
	<<if $seed == 0>>
		<<if $Concubine != 0>>
		<<if $Concubine.combatSkill == 0>>
		<<if canWalk($Concubine)>>
		<<if $Concubine.fetish != "mindbroken">>
		<<if $Concubine.devotion > 50>>
		<<if $Concubine.boobs < 8000>>
		<<if $Concubine.preg < 20>>
			She does her best to train $Concubine.slaveName whenever she can, hoping that your Concubine can be made capable of stepping into her place.
			<<set $subSlave to $Concubine>>
			<<set $seed to 1>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
	<</if>>
	<<if $seed == 0>>
		<<if $HeadGirl != 0>>
		<<if $HeadGirl.combatSkill == 0>>
		<<if canWalk($HeadGirl)>>
		<<if $HeadGirl.fetish != "mindbroken">>
		<<if $HeadGirl.devotion > 50>>
		<<if $HeadGirl.boobs < 8000>>
		<<if $HeadGirl.preg < 20>>
			She does her best to train $HeadGirl.slaveName whenever she can, hoping that your Head Girl can be made capable of stepping into her place.
			<<set $subSlave to $HeadGirl>>
			<<set $seed to 1>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
	<</if>>
	<<if $seed == 0>>
		<<if $Wardeness != 0>>
		<<if $Wardeness.combatSkill == 0>>
		<<if canWalk($Wardeness)>>
		<<if $Wardeness.fetish != "mindbroken">>
		<<if $Wardeness.devotion > 50>>
		<<if $Wardeness.boobs < 8000>>
		<<if $Wardeness.preg < 20>>
			She does her best to train $Wardeness.slaveName whenever she can, hoping that your Wardeness can be made capable of stepping into her place.
			<<set $subSlave to $Wardeness>>
			<<set $seed to 1>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
	<</if>>
	<<if $subSlave != 0>>
	<<if ($slaves[$i].intelligence + $slaves[$i].intelligenceImplant) > random(1,10)>>
		By the end of the week, she is satisfied that $subSlave.slaveName @@color:green;has the combat skill@@ to contribute to your defense.
		<<for $j to 0; $j < $slaves.length; $j++>>
		<<if $slaves[$j].ID is $subSlave.ID>>
			<<set $slaves[$j].combatSkill = 1>>
			<<break>>
		<</if>>
		<</for>>
	<</if>>
	<</if>>
	<<else>>
	She takes care to look after the skills of your other defensively capable slaves, satisfied that there are enough of them living in your penthouse.
	<</if>>
<</if>>
<</if>>
<</if>>
<</if>>
<</if>>

repo_name: Akane/fc


code:
:: SA hormone effects [nobr]

<<set $hormones to $slaves[$i].hormones>>
<<if ($hormones > -2)>>
<<if ($slaves[$i].balls != 0)>>
<<if ($hormones != 0) || ($hormoneUpgradePower < 2)>>
	<<set $hormones -= 1>>
<</if>>
<</if>>
<</if>>
<<if ($hormones < 2)>>
<<if ($slaves[$i].ovaries != 0)>>
<<if ($hormones != 0) || ($hormoneUpgradePower < 2)>>
	<<set $hormones += 1>>
<</if>>
<</if>>
<</if>>

<<if ($hormones > 1)>>
  $possessiveCap hormonal balance is heavily feminine.
<<elseif ($hormones < -1)>>
  $possessiveCap hormonal balance is heavily masculine.
<<elseif ($hormones > 0)>>
  $possessiveCap hormonal balance is feminine.
<<elseif ($hormones < 0)>>
  $possessiveCap hormonal balance is masculine.
<<else>>
  $pronounCap has a neutral hormonal balance.
<</if>>

<<if $hormoneUpgradeMood == 0>>
<<if $slaves[$i].$hormones > 0>>
<<if $slaves[$i].balls != 0>>
	$possessiveCap <<if $hormoneUpgradeMood == 0>>feminine treatments have to fight<<else>>advanced treatments brutally overpower<</if>> $possessive natural hormones,
	<<if $slaves[$i].devotion > 50>>
		but $pronoun's a good enough slave to suppress the occasional moodiness.
	<<else>>
		causing @@color:mediumorchid;occasional moodiness.@@
		<<set $slaves[$i].devotion -= 1>>
	<</if>>
<</if>>
<</if>>
<<if $slaves[$i].$hormones < 0>>
<<if $slaves[$i].ovaries != 0>>
	$possessiveCap <<if $hormoneUpgradeMood == 0>>masculine treatments have to fight<<else>>advanced treatments brutally overpower<</if>> $possessive natural hormones,
	<<if $slaves[$i].devotion > 50>>
		but $pronoun's a good enough slave to suppress the occasional moodiness.
	<<else>>
		causing @@color:mediumorchid;occasional moodiness.@@
		<<set $slaves[$i].devotion -= 1>>
	<</if>>
<</if>>
<</if>>
<</if>>

<<set _Effects = []>>

<<if ($hormones >= 2)>>
	<<if ($hormoneUpgradeShrinkage == 0)>>
		<<if ($slaves[$i].dick > 1)>>
			<<set _Effects.push("DickShrink")>>
		<</if>>
		<<if ($slaves[$i].balls > 1)>>
			<<set _Effects.push("BallsShrink")>>
		<</if>>
		<<if ($slaves[$i].clit > 0)>>
			<<set _Effects.push("ClitSmaller")>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].voice < 3) && ($slaves[$i].voice > 0)>>
		<<set _Effects.push("VoiceHigher")>>
	<</if>>
	<<if ($slaves[$i].vagina > -1) && ($slaves[$i].ovaries != 0) && ($slaves[$i].vaginaLube < 2)>>
		<<set _Effects.push("VaginaWetter")>>
	<</if>>
	<<if (($slaves[$i].butt-$slaves[$i].buttImplant) < 2)>>
		<<set _Effects.push("ButtBigger")>>
	<</if>>
	<<if (($slaves[$i].boobs-$slaves[$i].boobsImplant) < 500)>>
		<<set _Effects.push("BoobsBigger")>>
	<</if>>
	<<if (($slaves[$i].face-$slaves[$i].faceImplant) < 0) && ($slaves[$i].face < 3)>>
		<<set _Effects.push("FaceSofter")>>
	<</if>>
	<<if ($slaves[$i].faceShape is "masculine")>>
		<<set _Effects.push("FaceSofterAndrogynous")>>
	<<elseif ($slaves[$i].faceShape is "androgynous")>>
		<<set _Effects.push("FaceNormal")>>
	<</if>>
	<<if ($slaves[$i].physicalAge < 25)>>
		<<if ($slaves[$i].shoulders > -1)>>
			<<set _Effects.push("ShouldersNarrower")>>
		<</if>>
		<<if ($slaves[$i].hips < 1)>>
			<<set _Effects.push("HipsBroader")>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].muscles > 30) && ($slaves[$i].diet != "muscle building")>>
		<<set _Effects.push("MusclesSofter")>>
	<</if>>
	<<if ($slaves[$i].nipples is "tiny")>>
		<<set _Effects.push("NipplesBigger")>>
	<</if>>
	<<if ($slaves[$i].height > 180)>>
		<<set _Effects.push("Shorter")>>
	<</if>>
	<<if ($slaves[$i].devotion <= 20)>>
		<<set _Effects.push("Devoted")>>
	<</if>>
	<<if ($slaves[$i].trust <= 20)>>
		<<set _Effects.push("Trusting")>>
	<</if>>
	<<if ($slaves[$i].attrXY < 95)>>
		<<set _Effects.push("MaleAttracted")>>
	<</if>>

<<elseif ($hormones > 0) && ($slaves[$i].ovaries == 0)>>
	<<if ($hormoneUpgradeShrinkage == 0)>>
		<<if ($slaves[$i].dick > 2)>>
			<<set _Effects.push("DickShrink")>>
		<</if>>
		<<if ($slaves[$i].balls > 2)>>
			<<set _Effects.push("BallsShrink")>>
		<</if>>
		<<if ($slaves[$i].clit > 1)>>
			<<set _Effects.push("ClitSmaller")>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].voice < 2) && ($slaves[$i].voice > 0)>>
		<<set _Effects.push("VoiceHigher")>>
	<</if>>
	<<if ($slaves[$i].vagina > -1) && ($slaves[$i].ovaries != 0) && ($slaves[$i].vaginaLube < 1)>>
		<<set _Effects.push("VaginaWetter")>>
	<</if>>
	<<if (($slaves[$i].butt-$slaves[$i].buttImplant) < 2)>>
		<<set _Effects.push("ButtBigger")>>
	<</if>>
	<<if (($slaves[$i].boobs-$slaves[$i].boobsImplant) < 300)>>
		<<set _Effects.push("BoobsBigger")>>
	<</if>>
	<<if (($slaves[$i].face-$slaves[$i].faceImplant) < 0) && ($slaves[$i].face < 2)>>
		<<set _Effects.push("FaceSofter")>>
	<</if>>
	<<if ($slaves[$i].faceShape is "masculine")>>
		<<set _Effects.push("FaceSofterAndrogynous")>>
	<</if>>
	<<if ($slaves[$i].physicalAge < 22)>>
		<<if ($slaves[$i].shoulders > 0)>>
			<<set _Effects.push("ShouldersNarrower")>>
		<</if>>
		<<if ($slaves[$i].hips < 0)>>
			<<set _Effects.push("HipsBroader")>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].muscles > 30) && ($slaves[$i].diet != "muscle building")>>
		<<set _Effects.push("MusclesSofter")>>
	<</if>>
	<<if ($slaves[$i].attrXY < 80)>>
		<<set _Effects.push("MaleAttracted")>>
	<</if>>

<<elseif ($hormones <= -2)>>
	<<if ($slaves[$i].dick > 0) && ($slaves[$i].dick < 3)>>
		<<set _Effects.push("DickGrow")>>
	<</if>>
	<<if ($slaves[$i].balls > 0) && ($slaves[$i].balls < 3)>>
		<<set _Effects.push("BallsGrow")>>
	<</if>>
	<<if ($slaves[$i].clit < 2) && ($slaves[$i].dick == 0)>>
		<<set _Effects.push("ClitBigger")>>
	<</if>>
	<<if ($slaves[$i].voice > 1)>>
		<<set _Effects.push("VoiceLower")>>
	<</if>>
	<<if ($slaves[$i].vagina > -1) && ($slaves[$i].vaginaLube > 0)>>
		<<set _Effects.push("VaginaDrier")>>
	<</if>>
	<<if ($hormoneUpgradeShrinkage == 0)>>
		<<if (($slaves[$i].butt-$slaves[$i].buttImplant) > 2)>>
			<<set _Effects.push("ButtSmaller")>>
		<</if>>
		<<if (($slaves[$i].boobs-$slaves[$i].boobsImplant) > 500)>>
			<<set _Effects.push("BoobsSmaller")>>
		<</if>>
	<</if>>
	<<if (($slaves[$i].face-$slaves[$i].faceImplant) < 0) && ($slaves[$i].face > 0)>>
		<<set _Effects.push("FaceHarder")>>
	<</if>>
	<<if ($slaves[$i].faceShape is "androgynous")>>
		<<set _Effects.push("FaceMasculine")>>
	<<else>>
		<<set _Effects.push("FaceHarderAndrogynous")>>
	<</if>>
	<<if ($slaves[$i].physicalAge < 25)>>
		<<if ($slaves[$i].shoulders < 1)>>
			<<set _Effects.push("ShouldersBroader")>>
		<</if>>
		<<if ($slaves[$i].hips > -1)>>
			<<set _Effects.push("HipsNarrower")>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].muscles <= 95) && ($slaves[$i].diet != "slimming")>>
		<<set _Effects.push("MusclesHarder")>>
	<</if>>
	<<if ($slaves[$i].nipples is "huge")>>
		<<set _Effects.push("NipplesSmaller")>>
	<</if>>
	<<if ($slaves[$i].height < 155)>>
		<<set _Effects.push("Taller")>>
	<</if>>
	<<if ($slaves[$i].devotion > 20)>>
		<<set _Effects.push("Rebellious")>>
	<</if>>
	<<if ($slaves[$i].attrXY < 95)>>
		<<set _Effects.push("FemaleAttracted")>>
	<</if>>

<<elseif ($hormones < 0) && ($slaves[$i].balls == 0)>>
	<<if ($slaves[$i].dick > 0) && ($slaves[$i].dick < 2)>>
		<<set _Effects.push("DickGrow")>>
	<</if>>
	<<if ($slaves[$i].balls > 0) && ($slaves[$i].balls < 2)>>
		<<set _Effects.push("BallsGrow")>>
	<</if>>
	<<if ($slaves[$i].clit < 1) && ($slaves[$i].dick == 0)>>
		<<set _Effects.push("ClitBigger")>>
	<</if>>
	<<if ($slaves[$i].voice > 2)>>
		<<set _Effects.push("VoiceLower")>>
	<</if>>
	<<if ($slaves[$i].vagina > -1) && ($slaves[$i].vaginaLube > 1)>>
		<<set _Effects.push("VaginaDrier")>>
	<</if>>
	<<if ($hormoneUpgradeShrinkage == 0)>>
		<<if (($slaves[$i].butt-$slaves[$i].buttImplant) > 2)>>
			<<set _Effects.push("ButtSmaller")>>
		<</if>>
		<<if (($slaves[$i].boobs-$slaves[$i].boobsImplant) > 800)>>
			<<set _Effects.push("BoobsSmaller")>>
		<</if>>
	<</if>>
	<<if (($slaves[$i].face-$slaves[$i].faceImplant) < 0) && ($slaves[$i].face > 1)>>
		<<set _Effects.push("FaceHarder")>>
	<</if>>
	<<if ($slaves[$i].faceShape is "androgynous")>>
		<<set _Effects.push("FaceMasculine")>>
	<</if>>
	<<if ($slaves[$i].physicalAge < 22)>>
		<<if ($slaves[$i].shoulders < 0)>>
			<<set _Effects.push("ShouldersBroader")>>
		<</if>>
		<<if ($slaves[$i].hips > 0)>>
			<<set _Effects.push("HipsNarrower")>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].muscles <= 5) && ($slaves[$i].diet != "slimming")>>
		<<set _Effects.push("MusclesHarder")>>
	<</if>>
	<<if ($slaves[$i].height < 155)>>
		<<set _Effects.push("Taller")>>
	<</if>>
	<<if ($slaves[$i].attrXY < 80)>>
		<<set _Effects.push("FemaleAttracted")>>
	<</if>>

<</if>>

<<if _Effects.length < 1>>
	$possessiveCap body has fully adapted to its hormones.
<<elseif (_Effects.length < random(-10,10)) && ($hormoneUpgradePower == 0)>>
	$pronounCap does not experience significant hormone effects this week.
<<else>>

<<set _Effects = _Effects.random()>>
<<switch _Effects>>
<<case "DickShrink">>
	Hormonal effects cause @@color:orange;$possessive dick to atrophy.@@
	<<set $slaves[$i].dick -= 1>>
<<case "DickGrow">>
	Hormonal effects cause @@color:lime;$possessive micropenis to return to a more normal size.@@
	<<set $slaves[$i].dick += 1>>
<<case "BallsShrink">>
	Hormonal effects cause @@color:orange;$possessive testicles to atrophy.@@
	<<set $slaves[$i].balls -= 1>>
<<case "BallsGrow">>
	Hormonal effects cause @@color:lime;$possessive balls to drop.@@
	<<set $slaves[$i].balls += 1>>
<<case "VoiceHigher">>
	Hormonal effects cause @@color:lime;$possessive voice to become higher and more feminine.@@
	<<set $slaves[$i].voice += 1>>
<<case "VoiceLower">>
	Hormonal effects cause @@color:orange;$possessive voice to become deeper and less feminine.@@
	<<set $slaves[$i].voice -= 1>>
<<case "VaginaWetter">>
	Hormonal effects cause @@color:lime;$possessive vagina to produce more copious natural lubricant.@@
	<<set $slaves[$i].vaginaLube += 1>>
<<case "VaginaDrier">>
	Hormonal effects cause @@color:orange;$possessive vagina to produce less natural lubricant.@@
	<<set $slaves[$i].vaginaLube -= 1>>
<<case "ButtBigger">>
	Hormonal effects cause @@color:lime;the natural size of $possessive butt to increase.@@
	<<set $slaves[$i].butt += 1>>
<<case "ButtSmaller">>
	Hormonal effects cause @@color:orange;the natural size of $possessive butt to decrease.@@
	<<set $slaves[$i].butt -= 1>>
<<case "BoobsBigger">>
	Hormonal effects cause @@color:lime;the natural size of $possessive tits to increase.@@
	<<set $slaves[$i].boobs += 100>>
<<case "BoobsSmaller">>
	Hormonal effects cause @@color:orange;the natural size of $possessive tits to shrink.@@
	<<set $slaves[$i].boobs += 100>>
<<case "FaceSofter">>
	Hormonal effects cause @@color:lime;$possessive facial structure to soften and become less unattractive.@@
	<<set $slaves[$i].face += 1>>
<<case "FaceHarder">>
	Hormonal effects cause @@color:orange;$possessive facial structure to harden and become less attractive.@@
	<<set $slaves[$i].face -= 1>>
<<case "FaceSofterAndrogynous">>
	Hormonal effects cause @@color:lime;$possessive face to soften into androgyny.@@
	<<set $slaves[$i].faceShape to "androgynous">>
<<case "FaceHarderAndrogynous">>
	Hormonal effects cause @@color:orange;$possessive face to harden into androgyny.@@
	<<set $slaves[$i].faceShape to "androgynous">>
<<case "FaceNormal">>
	Hormonal effects cause @@color:lime;$possessive face to soften into femininity.@@
	<<set $slaves[$i].faceShape to "normal">>
<<case "FaceMasculine">>
	Hormonal effects cause @@color:orange;$possessive face to harden into masculinity.@@
	<<set $slaves[$i].faceShape to "masculine">>
<<case "ClitSmaller">>
	Hormonal effects cause @@color:orange;$possessive clit to shrink significantly.@@
	<<set $slaves[$i].clit -= 1>>
<<case "ClitBigger">>
	Hormonal effects cause @@color:lime;$possessive clit to grow significantly.@@
	<<set $slaves[$i].clit += 1>>
<<case "ShouldersNarrower">>
	$possessiveCap body has not yet found its final bone structure, which typically happens in the mid-twenties. Hormonal effects cause @@color:lime;$possessive shoulders to develop into a more feminine narrowness@@ than they would have done naturally.
	<<set $slaves[$i].shoulders -= 1>>
<<case "ShouldersBroader">>
	$possessiveCap body has not yet found its final bone structure, which typically happens in the mid-twenties. Hormonal effects cause @@color:orange;$possessive shoulders to develop more broadly@@ than they would have done naturally.
	<<set $slaves[$i].shoulders += 1>>
<<case "HipsBroader">>
	$possessiveCap body has not yet found its final bone structure, which typically happens in the mid-twenties. Hormonal effects cause @@color:lime;$possessive hips to develop more broadly@@ than they would have done naturally.
	<<set $slaves[$i].hips += 1>>
<<case "HipsNarrower">>
	$possessiveCap body has not yet found its final bone structure, which typically happens in the mid-twenties. Hormonal effects cause @@color:orange;$possessive hips to develop more narrowly@@ than they would have done naturally.
	<<set $slaves[$i].hips -= 1>>
<<case "MusclesSofter">>
	Hormonal effects @@color:orange;reduce $possessive musculature.@@
	<<set $slaves[$i].muscles -= 2>>
<<case "MusclesHarder">>
	Hormonal effects @@color:lime;build up $possessive musculature.@@
	<<set $slaves[$i].muscles += 2>>
<<case "NipplesBigger">>
	Hormonal effects cause $possessive tiny @@color:lime;nipples to grow to a more normal size.@@
	<<set $slaves[$i].nipples to "cute">>
<<case "NipplesSmaller">>
	Hormonal effects cause $possessive huge @@color:orange;nipples to shrink to a more reasonable size.@@
	<<set $slaves[$i].nipples to "cute">>
<<case "Shorter">>
	$pronounCap has not yet reached the age at which height becomes fixed. Hormonal effects cause @@color:orange;$object to lose a bit of height@@ that $pronoun would  naturally have maintained.
	<<set $slaves[$i].height -= 1>>
<<case "Taller">>
	$pronounCap has not yet reached the age at which height becomes fixed. Hormonal effects cause @@color:lime;$object to gain a slight height advantage@@ that $pronoun would not naturally have reached.
	<<set $slaves[$i].height += 1>>
<<case "Devoted">>
	Hormonal effects make $object a bit more @@color:hotpink;docile.@@
	<<set $slaves[$i].devotion += 1>>
<<case "Rebellious">>
	Hormonal effects @@color:mediumorchid;make $object a bit less docile.@@
	<<set $slaves[$i].devotion -= 1>>
<<case "Trusting">>
	Hormonal effects make $object a bit more @@color:mediumaquamarine;trusting.@@
	<<set $slaves[$i].trust += 1>>
<<case "MaleAttracted">>
	Hormonal effects cause $object to become @@color:green;more attracted to men.@@
	<<set $slaves[$i].attrXY += 2+$hormoneUpgradePower>>
<<case "FemaleAttracted">>
	Hormonal effects cause $object to become @@color:green;more attracted to women.@@
	<<set $slaves[$i].attrXX += 2+$hormoneUpgradePower>>
<<default>>
	ERROR: bad hormone effect: _Effects
<</switch>>

<</if>>

<<if ($hormones < 0)>>
<<if ($slaves[$i].dick > 0)>>
<<if ($slaves[$i].devotion > 0)>>
<<if ($slaves[$i].career is "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 is "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 is "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 is "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 @@color: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 @@color: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 Math.abs($slaves[$i].hormones) > 1>>
	<<set $slaves[$i].chem += 0.5>>
<</if>>


code:
:: SA live with HG [nobr]

<<for $j to 0; $j < $slaves.length; $j++>>
	<<if $HeadGirl.ID == $slaves[$j].ID>>
	<<set $HeadGirl to $slaves[$j]>>
	<<break>>
	<</if>>
<</for>>

''$slaves[$i].slaveName''

<<if $slaves[$i].devotion > 20>>
	<<if $HGSlaveSuccess == 1>>
	looks after your Head Girl $HeadGirl.slaveName 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 $HeadGirl.slaveName 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 $HeadGirl.slaveName 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 $HeadGirl.slaveName domestically and sexually, but doesn't free up much of her time this week.
	<</if>>
<<else>>
	<<if $HGSlaveSuccess == 1>>
	resists Head Girl $HeadGirl.slaveName'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 $HeadGirl.slaveName's domestic and sexual use, and doesn't free up much of her time this week.
	<</if>>
<</if>>

<<if ($HeadGirl.fetish is "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 @@color:hotpink;sexual satisfaction@@ being a pain slave.
	<<set $slaves[$i].devotion += 4>>
	<<elseif ($slaves[$i].fetish is "masochist")>>
	<<if ($slaves[$i].fetishStrength > 95)>>
		She finds deep @@color:hotpink;sexual satisfaction@@ being a pain slave.
		<<set $slaves[$i].devotion += 4>>
	<<else>>
		This forces her to find solace in @@color:lightcoral;deeper masochism.@@
		<<set $slaves[$i].fetishStrength += 4>>
	<</if>>
	<<elseif ($slaves[$i].devotion < -20)>>
	This rapidly fills her with @@color:mediumorchid;hatred@@ and @@color:mediumorchid;fear.@@
	<<set $slaves[$i].devotion -= 10>>
	<<set $slaves[$i].trust -= 10>>
	<<elseif ($slaves[$i].devotion > 20)>>
	This fills her with @@color:mediumorchid;bitterness@@ and @@color:mediumorchid;fear.@@
	<<set $slaves[$i].devotion -= 5>>
	<<set $slaves[$i].trust -= 5>>
	<</if>>
<<elseif ($slaves[$i].devotion < -20)>>
	<<if ($slaves[$i].trust >= -20)>>
	Since she is not yet obedient, $HeadGirl.slaveName @@color:gold;punishes@@ her constantly, training her to be a decent assistant or suffer pain.
	<<set $slaves[$i].trust -= 5>>
	<</if>>
<<elseif ($slaves[$i].devotion <= 20)>>
	Since she is not yet well trained, $HeadGirl.slaveName instructs her, @@color: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, @@color:hotpink;training@@ her to be a good assistant.
	<<set $slaves[$i].devotion += 2>>
<<else>>
	Since she is a devoted assistant, $HeadGirl.slaveName @@color:hotpink;praises@@ and encourages her.
	<<set $slaves[$i].devotion += 1>>
<</if>>

<<if ($HeadGirl.rivalry != 0) && ($HeadGirl.relationshipTarget is $slaves[$i].ID)>>
	$HeadGirl.slaveName @@color: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 to 0>>
	<<set $HeadGirl.rivalryTarget to 0>>
	<<set $slaves[$i].rivalry to 0>>
	<<set $slaves[$i].rivalryTarget to 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 @@color: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 @@color: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.
	<<elseif areSisters($HeadGirl, $slaves[$i]) == 1>>
		twin.
	<<elseif areSisters($HeadGirl, $slaves[$i]) == 2>>
		sister.
	<<elseif areSisters($HeadGirl, $slaves[$i]) == 3>>
		half-sister.
	<</if>>
	$slaves[$i].slaveName
	<<if $slaves[$i].devotion > 95>>
		is so inured to the perversities of slavery that she @@color: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 @@color:mediumorchid;disturbed@@ by the prospect of sexually servicing her
		<<set $slaves[$i].devotion -= 2>>
	<<elseif $slaves[$i].devotion > 20>>
		is @@color:mediumorchid;disturbed@@ by the prospect of sexually servicing her
		<<set $slaves[$i].devotion -= 4>>
	<<elseif $slaves[$i].devotion >= -20>>
		is @@color:mediumorchid;strongly disturbed@@ by the prospect of sexually servicing her
		<<set $slaves[$i].devotion -= 5>>
	<<else>>
		is @@color: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.
	<<elseif areSisters($HeadGirl, $slaves[$i]) == 1>>
		twin.
	<<elseif areSisters($HeadGirl, $slaves[$i]) == 2>>
		sister.
	<<elseif areSisters($HeadGirl, $slaves[$i]) == 3>>
		half-sister.
	<</if>>
	<</if>>
	<<else>>
	<<if $slaves[$i].relation != 0>>
	<<if $slaves[$i].relationTarget is $HeadGirl.ID>>
	$HeadGirl.slaveName
	<<if $HeadGirl.devotion > 95>>
		is so inured to the perversities of slavery that she @@color: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 @@color:mediumorchid;disturbed@@ by the prospect of sexual service from her
		<<set $HeadGirl.devotion -= 2>>
	<</if>>
	<<if $HeadGirl.relation is "twin">>
		twin.
	<<elseif $HeadGirl.relation is "sister">>
		sister.
	<<elseif $HeadGirl.relation is "mother">>
		daughter.
	<<elseif $HeadGirl.relation is "daughter">>
		mother.
	<</if>>
	$slaves[$i].slaveName
	<<if $slaves[$i].devotion > 95>>
		is so inured to the perversities of slavery that she @@color: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 @@color:mediumorchid;disturbed@@ by the prospect of sexually servicing her
		<<set $slaves[$i].devotion -= 2>>
	<<elseif $slaves[$i].devotion > 20>>
		is @@color:mediumorchid;disturbed@@ by the prospect of sexually servicing her
		<<set $slaves[$i].devotion -= 4>>
	<<elseif $slaves[$i].devotion >= -20>>
		is @@color:mediumorchid;strongly disturbed@@ by the prospect of sexually servicing her
		<<set $slaves[$i].devotion -= 5>>
	<<else>>
		is @@color:mediumorchid;revolted@@ by the prospect of sexually servicing her
		<<set $slaves[$i].devotion -= 10>>
	<</if>>
	<<if $slaves[$i].relation is "twin">>
		twin.
	<<elseif $slaves[$i].relation is "sister">>
		sister.
	<<elseif $slaves[$i].relation is "mother">>
		daughter.
	<<elseif $slaves[$i].relation is "daughter">>
		mother.
	<</if>>
	<</if>>
	<</if>>
	<</if>>
	<<if ($slaves[$i].relationship == 0) && ($slaves[$i].devotion > 20)>>
	$slaves[$i].slaveName sees $HeadGirl.slaveName constantly, and does her best to @@color:lightgreen;become her friend.@@
	<<set $HeadGirl.relationship to 1>>
	<<set $HeadGirl.relationshipTarget to $slaves[$i].ID>>
	<<set $slaves[$i].relationship to 1>>
	<<set $slaves[$i].relationshipTarget to $HeadGirl.ID>>
	<<elseif ($slaves[$i].relationship != 5) && ($slaves[$i].relationshipTarget != $HeadGirl.ID)>>
	<<for $j to 0; $j < $slaves.length; $j++>>
		<<if $slaves[$i].relationshipTarget == $slaves[$j].ID>>
		$slaves[$j].slaveName cannot compete with $HeadGirl.slaveName, and her relationship with the Head Girl's bitch fades.
		<<set $slaves[$i].relationship to 0>>
		<<set $slaves[$i].relationshipTarget to 0>>
		<<set $slaves[$j].relationship to 0>>
		<<set $slaves[$j].relationshipTarget to 0>>
		<<break>>
		<</if>>
	<</for>>
	<</if>>
<<else>>
	<<if ($HeadGirl.relationshipTarget is $slaves[$i].ID)>>
	<<set $slaves[$i].trust += 1>>
	<<set $HeadGirl.trust += 1>>
	<<if $slaves[$i].relationship <= 2>>
		Since $HeadGirl.slaveName and $slaves[$i].slaveName are already friends, they're @@color:mediumaquamarine;thankful@@ to you for allowing it. After a few nights of offering each other sexual comfort, they consider themselves @@color:lightgreen;friends with benefits.@@
		<<set $HeadGirl.relationship to 3>>
		<<set $HeadGirl.relationshipTarget to $slaves[$i].ID>>
		<<set $slaves[$i].relationship to 3>>
		<<set $slaves[$i].relationshipTarget to $HeadGirl.ID>>
	<<elseif $slaves[$i].relationship <= 3>>
		Since $HeadGirl.slaveName and $slaves[$i].slaveName are already lovers, they both @@color:hotpink;enjoy@@ living together and are @@color:mediumaquamarine;thankful@@ to you for allowing it. After living together for a few days, they draw closer emotionally, too, and consider themselves @@color:lightgreen;lovers.@@
		<<set $HeadGirl.relationship to 4>>
		<<set $HeadGirl.relationshipTarget to $slaves[$i].ID>>
		<<set $slaves[$i].relationship to 4>>
		<<set $slaves[$i].relationshipTarget to $HeadGirl.ID>>
	<<elseif $slaves[$i].relationship <= 4>>
		<<if ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetishStrength <= 60) && ($HeadGirl.fetish is "sadist") && ($slaves[$i].fetish != "masochist")>>
		Since their relationship is very abusive, only $HeadGirl.slaveName @@color:hotpink;enjoys@@ living together with $slaves[$i].slaveName.
		<<set $slaves[$i].devotion -= 5>>
		<<set $slaves[$i].trust -= 5>>
		<<else>>
		Since $HeadGirl.slaveName and $slaves[$i].slaveName are  lovers, they @@color:hotpink;enjoy@@ living together.
		<</if>>
	<<else>>
		Since $HeadGirl.slaveName and $slaves[$i].slaveName are  slave wives, they @@color: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 @@color:green;trains@@ her out of them.
	<<set $slaves[$i].sexualFlaw to "none">>
<<elseif ($slaves[$i].behavioralFlaw != "none")>>
	$HeadGirl.slaveName is irritated by $slaves[$i].slaveName's flaws, so she @@color:green;trains@@ her out of them.
	<<set $slaves[$i].behavioralFlaw to "none">>
<</if>>

<<if ($slaves[$i].vaginalAccessory != "chastity belt")>>
<<if ($slaves[$i].vagina == 0)>>
	$HeadGirl.slaveName @@color:hotpink;loves@@ @@color:lime;taking@@ $slaves[$i].slaveName's virginity, and spends much of the week ogling her conquest complacently.
	<<set $slaves[$i].vagina to 1>>
	<<set $HeadGirl.devotion += 4>>
<<elseif ($slaves[$i].vagina == 1)>>
	<<if canAchieveErection($HeadGirl)>>
	<<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 @@color:lime;loosens@@ the poor girl's pussy.
		<<set $slaves[$i].vagina += 1>>
	<<elseif ($HeadGirl.dick > 5)>>
		Serving $HeadGirl.slaveName's monster cock @@color:lime;loosens@@ $slaves[$i].slaveName's pussy.
		<<set $slaves[$i].vagina += 1>>
	<</if>>
	<</if>>
<<elseif ($slaves[$i].vagina is 2)>>
	<<if canAchieveErection($HeadGirl)>>
	<<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 @@color:lime;loosens@@ the poor girl's pussy.
		<<set $slaves[$i].vagina += 1>>
	<</if>>
	<</if>>
<</if>>
<</if>>
<<if ($slaves[$i].anus == 0)>>
	$HeadGirl.slaveName @@color:hotpink;relishes@@ @@color: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 to 1>>
	<<set $HeadGirl.devotion += 4>>
<<elseif ($slaves[$i].anus == 1)>>
	<<if canAchieveErection($HeadGirl)>>
	<<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 @@color:lime;loosens@@ her sphincter.
		<<set $slaves[$i].anus += 1>>
	<<elseif ($HeadGirl.dick > 5)>>
		Taking $HeadGirl.slaveName's monster cock up the butt @@color:lime;loosens@@ $slaves[$i].slaveName's anal sphincter.
		<<set $slaves[$i].anus += 1>>
	<</if>>
	<</if>>
<<elseif ($slaves[$i].anus is 2)>>
	<<if canAchieveErection($HeadGirl)>>
	<<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 @@color:lime;loosens@@ her sphincter.
		<<set $slaves[$i].anus += 1>>
	<</if>>
	<</if>>
<</if>>

<<if ($slaves[$i].vagina > 0) || (($slaves[$i].mpreg == 0) && ($slaves[$i].anus > 0))>>
<<if isFertile($slaves[$i])>>
<<if ($HeadGirl.fetishKnown == 1)>>
<<if ($HeadGirl.fetish is "pregnancy")>>
<<if ($HeadGirl.balls > 0)>>
<<if $arcologies[0].FSRestart is "unset">>
<<if ($HeadGirl.dickAccessory != "chastity")>>
  $HeadGirl.slaveName promptly @@color:lime;impregnates@@ $slaves[$i].slaveName, to your Head Girl's considerable @@color:hotpink;satisfaction.@@
  <<set $slaves[$i].preg to 1>>
  <<if ($slaves[$i].drugs is "super fertility drugs")>>
	<<if ($slaves[$i].hormones == 2)>>
		<<set $slaves[$i].pregType to random(10,20)>>
	<<else>>
		<<set $slaves[$i].pregType to either(3, 4, 4, 4, 5, 5, 5, 10, 10, 20)>>
	<</if>>
  <<elseif ($slaves[$i].drugs is "fertility drugs")>>
	<<if ($slaves[$i].hormones == 2)>>
	  <<set $slaves[$i].pregType to random(2,5)>>
	<<else>>
	  <<set $slaves[$i].pregType to either(1, 1, 2, 2, 3, 3, 4, 4, 5, 5)>>
	<</if>>
  <<else>>
	<<set $slaves[$i].pregType to either(1, 1, 1, 1, 1, 1, 1, 1, 1, 2)>>
  <</if>>
	<<set $slaves[$i].pregSource to $HeadGirl.ID>>
	<<set $HeadGirl.devotion += 4>>
<</if>>
<<else>>
	$HeadGirl.slaveName knows better than to even consider knocking up $slaves[$i].slaveName.
<</if>>
<</if>>
<</if>>
<</if>>
<</if>>
<</if>>

<<if ($slaves[$i].devotion > 50)>>
<<if ($slaves[$i].fetishStrength <= 95) || ($slaves[$i].fetishKnown == 0)>>
<<if ($HeadGirl.fetishKnown == 1)>>
<<if ($HeadGirl.fetishStrength > 60)>>
<<if ($slaves[$i].fetish != $HeadGirl.fetish)>>
	<<if ($HeadGirl.fetish is "submissive")>>
		$slaves[$i].slaveName slowly gets used to $HeadGirl.slaveName's need to be sexually dominated, and begins to @@color:pink;enjoy being a top@@ within the confines of the suite.
		<<set $slaves[$i].fetish to "dom">>
		<<set $slaves[$i].fetishKnown to 1>>
		<<set $slaves[$i].fetishStrength = 10>>
	<<elseif ($HeadGirl.fetish is "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 @@color:pink;enjoy being a sub,@@ especially for $HeadGirl.slaveName.
			<<set $slaves[$i].fetish to "submissive">>
			<<set $slaves[$i].fetishKnown to 1>>
			<<set $slaves[$i].fetishStrength = 10>>
		<</if>>
	<<elseif ($HeadGirl.fetish is "boobs")>>
		$HeadGirl.slaveName lavishes so much attention on $slaves[$i].slaveName's boobs that $slaves[$i].slaveName really starts to @@color:pink;fetishize tits@@ too.
		<<set $slaves[$i].fetish to "boobs">>
		<<set $slaves[$i].fetishKnown to 1>>
		<<set $slaves[$i].fetishStrength = 10>>
	<<elseif ($HeadGirl.fetish is "pregnancy")>>
		$slaves[$i].slaveName and $HeadGirl.slaveName spend so much time talking about pregnancy and fertility $slaves[$i].slaveName really starts to @@color:pink;fetishize pregnancy@@ too.
		<<set $slaves[$i].fetish to "pregnancy">>
		<<set $slaves[$i].fetishKnown to 1>>
		<<set $slaves[$i].fetishStrength = 10>>
	<<elseif ($HeadGirl.fetish is "cumslut")>>
		$slaves[$i].slaveName participates in enough of $HeadGirl.slaveName's cum games that she can't help but @@color:pink;enjoy oral sex@@ herself.
		<<set $slaves[$i].fetish to "cumslut">>
		<<set $slaves[$i].fetishKnown to 1>>
		<<set $slaves[$i].fetishStrength = 10>>
	<<elseif ($HeadGirl.fetish is "humiliation")>>
		$slaves[$i].slaveName has so much public sex with $HeadGirl.slaveName that she really starts to @@color:pink;enjoy humiliation@@ herself.
		<<set $slaves[$i].fetish to "humiliation">>
		<<set $slaves[$i].fetishKnown to 1>>
		<<set $slaves[$i].fetishStrength = 10>>
	<<elseif ($HeadGirl.fetish is "buttslut")>>
		$slaves[$i].slaveName takes $HeadGirl.slaveName's <<if ($HeadGirl.dick > 0) && ($HeadGirl.balls > 0) && ($HeadGirl.dickAccessory != "chastity") && ($HeadGirl.hormones < 1)>>dick<<else>>strap-on and dildos<</if>> up her poor anus so often that she starts to @@color:pink;enjoy buttsex@@ herself.
		<<set $slaves[$i].fetish to "buttslut">>
		<<set $slaves[$i].fetishKnown to 1>>
		<<set $slaves[$i].fetishStrength = 10>>
	<<elseif ($HeadGirl.fetish is "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 @@color:pink;enjoy causing pain,@@ since $HeadGirl.slaveName is clearly enjoying it so much.
			<<set $slaves[$i].fetish to "sadist">>
			<<set $slaves[$i].fetishKnown to 1>>
			<<set $slaves[$i].fetishStrength = 10>>
		<</if>>
	<<else>>
		$slaves[$i].slaveName often takes $HeadGirl.slaveName's <<if ($HeadGirl.dick > 0) && ($HeadGirl.balls > 0) && ($HeadGirl.dickAccessory != ("chastity")) && ($HeadGirl.hormones < 1)>>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 @@color:pink;enjoy vanilla sex@@ herself.
		<<set $slaves[$i].fetish to "none">>
		<<set $slaves[$i].fetishKnown to 1>>
		<<set $slaves[$i].fetishStrength = 10>>
	<</if>>
<</if>>
<</if>>
<</if>>
<</if>>
<<if ($HeadGirl.attrKnown == 1)>>
	<<if ($HeadGirl.attrXX > 85)>>
	<<if ($slaves[$i].attrXX > 65)>>
	<<if ($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 @@color:green;fetishize girls@@ too.
	<<set $slaves[$i].attrXX += 2>>
	<<set $slaves[$i].attrKnown to 1>>
	<</if>>
	<</if>>
	<</if>>
	<<if ($HeadGirl.attrXY > 85)>>
	<<if ($slaves[$i].attrXY > 65)>>
	<<if ($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 $HeadGirl.slaveName banging her girltoy <<if ($HeadGirl.balls == 0) || ($HeadGirl.hormones > 0) || ($HeadGirl.dick == 0)>>with a strap-on<<else>>senseless<</if>>) that $slaves[$i].slaveName really starts to @@color:green;fetishize boys@@ too.
	<<set $slaves[$i].attrXY += 2>>
	<<set $slaves[$i].attrKnown to 1>>
	<</if>>
	<</if>>
	<</if>>
	<<if ($HeadGirl.energy > 95)>>
	<<if ($slaves[$i].energy <= 95)>>
	$slaves[$i].slaveName has so much fun sex with $HeadGirl.slaveName that @@color:green;her sex drive is slowly enhanced.@@
	<<set $slaves[$i].energy += 2>>
	<</if>>
	<</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 ($HeadGirl.dick > 0) and canAchieveErection($HeadGirl) && ($HeadGirl.dickAccessory != "chastity")>>dick<<else>>strap-on<</if>> into next.
	<<set $slaves[$i].oralCount += 5>>
	<<set $oralTotal += 5>>
	<<set $slaves[$i].analCount += 5>>
	<<set $analTotal += 5>>
	<<if ($slaves[$i].vagina > 0)>>
		<<set $slaves[$i].vaginalCount += 5>>
		<<set _cervixPump += 5>>
		<<set $vaginalTotal += 5>>
	<<else>>
		<<set $slaves[$i].analCount += 5>>
		<<set $analTotal += 5>>
	<</if>>
	<<set $HeadGirl.penetrativeCount += 15>>
	<<set $penetrativeTotal += 15>>
	<<elseif ($HeadGirl.fetish is "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 $slaves[$i].oralCount += 4>>
	<<set $oralTotal += 4>>
	<<set $slaves[$i].analCount += 3>>
	<<set $analTotal += 3>>
	<<if ($slaves[$i].vagina > 0)>>
		<<set $slaves[$i].vaginalCount += 3>>
		<<set $vaginalTotal += 3>>
		<<set _cervixPump += 3>>
	<<else>>
		<<set $slaves[$i].analCount += 3>>
		<<set $analTotal += 3>>
	<</if>>
	<<set $HeadGirl.penetrativeCount += 10>>
	<<set $penetrativeTotal += 10>>
	<<elseif ($HeadGirl.fetish is "dom")>>
	$slaves[$i].slaveName serves $HeadGirl.slaveName as her sexual and moral inferior, taking the Head Girl's <<if ($HeadGirl.dick > 0) && canAchieveErection($HeadGirl) && ($HeadGirl.dickAccessory != "chastity")>>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 $slaves[$i].oralCount += 4>>
	<<set $oralTotal += 4>>
	<<set $slaves[$i].analCount += 3>>
	<<set $analTotal += 3>>
	<<if ($slaves[$i].vagina > 0)>>
		<<set $slaves[$i].vaginalCount += 3>>
		<<set $vaginalTotal += 3>>
		<<set _cervixPump += 3>>
	<<else>>
		<<set $slaves[$i].analCount += 3>>
		<<set $analTotal += 3>>
	<</if>>
	<<set $HeadGirl.penetrativeCount += 10>>
	<<set $penetrativeTotal += 10>>
	<<elseif ($HeadGirl.fetish is "humiliation")>>
	$HeadGirl.slaveName is such an exhibitionist that $slaves[$i].slaveName finds herself taking $HeadGirl.slaveName's <<if ($HeadGirl.dick > 0) && canAchieveErection($HeadGirl) && ($HeadGirl.dickAccessory != "chastity")>>dick<<else>>strap-on<</if>> in public quite often.
	<<set $slaves[$i].oralCount += 4>>
	<<set $oralTotal += 4>>
	<<set $slaves[$i].analCount += 3>>
	<<set $analTotal += 3>>
	<<if ($slaves[$i].vagina > 0)>>
		<<set $slaves[$i].vaginalCount += 3>>
		<<set $vaginalTotal += 3>>
		<<set _cervixPump += 3>>
	<<else>>
		<<set $slaves[$i].analCount += 3>>
		<<set $analTotal += 3>>
	<</if>>
	<<set $HeadGirl.penetrativeCount += 10>>
	<<set $penetrativeTotal += 10>>
	<<elseif ($HeadGirl.fetish is "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 $slaves[$i].oralCount += 4>>
	<<set $oralTotal += 4>>
	<<set $slaves[$i].mammaryCount += 6>>
	<<set $mammaryTotal += 6>>
	<<set $HeadGirl.mammaryCount += 10>>
	<<set $mammaryTotal += 10>>
	<<elseif ($HeadGirl.fetish is "buttslut")>>
	$HeadGirl.slaveName takes a dominant sexual role with $slaves[$i].slaveName; she indulges her anal addiction by constantly buttfucking $slaves[$i].slaveName while wearing a vibrating plug herself.
	<<set $slaves[$i].analCount += 10>>
	<<set $analTotal += 10>>
	<<set $HeadGirl.penetrativeCount += 10>>
	<<set $penetrativeTotal += 10>>
	<<elseif ($HeadGirl.fetish is "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 $slaves[$i].oralCount += 20>>
	<<set $oralTotal += 20>>
	<<set $HeadGirl.oralCount += 10>>
	<<set $oralTotal += 10>>
	<<set $HeadGirl.penetrativeCount += 10>>
	<<set $penetrativeTotal += 10>>
	<<elseif ($HeadGirl.fetish is "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 buttfuck from the aroused $HeadGirl.slaveName's <<if ($HeadGirl.dick > 0) && canAchieveErection($HeadGirl) && ($HeadGirl.dickAccessory != "chastity")>>dick<<else>>strap-on<</if>> to restore their relative positions.
	<<set $slaves[$i].analCount += 10>>
	<<set $analTotal += 10>>
	<<set $HeadGirl.penetrativeCount += 10>>
	<<set $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 $slaves[$i].oralCount += 6>>
	<<set $oralTotal += 6>>
	<<set $slaves[$i].analCount += 2>>
	<<set $analTotal += 2>>
	<<if ($slaves[$i].vagina > 0)>>
		<<set $slaves[$i].vaginalCount += 2>>
		<<set $vaginalTotal += 2>>
		<<set _cervixPump += 2>>
	<<else>>
		<<set $slaves[$i].analCount += 2>>
		<<set $analTotal += 2>>
	<</if>>
	<<set $HeadGirl.penetrativeCount += 8>>
	<<set $penetrativeTotal += 8>>
	<<else>>
	$HeadGirl.slaveName takes a dominant sexual role with $slaves[$i].slaveName, mostly getting oral and fucking her in the missionary position.
	<<set $slaves[$i].oralCount += 4>>
	<<set $oralTotal += 4>>
	<<set $slaves[$i].analCount += 3>>
	<<set $analTotal += 3>>
	<<if ($slaves[$i].vagina > 0)>>
		<<set $slaves[$i].vaginalCount += 3>>
		<<set $vaginalTotal += 3>>
		<<set _cervixPump += 3>>
	<<else>>
		<<set $slaves[$i].analCount += 3>>
		<<set $analTotal += 3>>
	<</if>>
	<<set $HeadGirl.penetrativeCount += 10>>
	<<set $penetrativeTotal += 10>>
	<</if>>
<</if>>

<<if $slaves[$i].cervixImplant == 1 && _cervixPump > 0 >>
	She notices her @@color:orange;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 to "no clothing">>
	<<elseif ($HeadGirl.fetish is "submissive")>>
	$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed up in slutty power clothing, since she's attracted to competence.
	<<set $slaves[$i].clothes to "slutty business attire">>
	<<elseif ($HeadGirl.fetish is "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 to "battledress">>
	<<elseif ($HeadGirl.fetish is "dom")>>
	$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed up as a schoolgirl to infantilize her sub.
	<<set $slaves[$i].clothes to "a schoolgirl outfit">>
	<<elseif ($HeadGirl.fetish is "boobs")>>
	$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing a string bikini, since she likes seeing those tits.
	<<set $slaves[$i].clothes to "a string bikini">>
	<<elseif ($HeadGirl.fetish is "cumslut")>>
	$HeadGirl.slaveName keeps $slaves[$i].slaveName in restrictive latex, because she likes how it draws attention to her mouth.
	<<set $slaves[$i].clothes to "restrictive latex">>
	<<elseif ($HeadGirl.fetish is "humiliation")>>
	$HeadGirl.slaveName keeps $slaves[$i].slaveName in humiliating bondage gear, because she likes to see others blush, too.
	<<set $slaves[$i].clothes to "uncomfortable straps">>
	<<elseif ($HeadGirl.fetish is "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 to "uncomfortable straps">>
	<<elseif ($HeadGirl.fetish is "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 to "slutty jewelry">>
	<<elseif ($HeadGirl.fetish is "pregnancy") && ($slaves[$i].preg <= 10) && ($slaves[$i].inflation == 0) && ($clothesBoughtBelly == 1 || $cheatMode == 1 || $arcologies[0].FSRepopulationFocus != "unset")>>
	$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 to "a large empathy belly">>
	<<elseif ($HeadGirl.attrXX > 85)>>
	$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing nice lingerie, since girls and girliness turn her on.
	<<set $slaves[$i].clothes to "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 to "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 to "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 to "a slutty maid outfit">>
<</if>>
<<set $slaves[$i].devotion += 1>>

<<if $HeadGirl.fetishKnown == 1>>
	<<if $HeadGirl.energy > 95>>
	<<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 to $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 to $HeadGirl.hStyle>>
		<<set $slaves[$i].hLength to $HeadGirl.hLength>>
		<</if>>
	<</if>>
	<<if !hasEyeColorRule($slaves[$i],$defaultRules)>>
		<<if ($slaves[$i].eyeColor != $HeadGirl.eyeColor)>>
		<<set $slaves[$i].eyeColor to $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 > 30) && ($slaves[$i].diet != "restricted")>>
	$HeadGirl.slaveName puts $slaves[$i].slaveName on a diet.
	<<set $slaves[$i].diet to "restricted">>
<<elseif ($slaves[$i].weight < -10) && ($slaves[$i].diet != "fattening")>>
	$HeadGirl.slaveName puts $slaves[$i].slaveName on a fattening diet.
	<<set $slaves[$i].diet to "fattening">>
<<elseif ($slaves[$i].muscles <= 95) && ($arcologies[0].FSPhysicalIdealist > 0) && ($slaves[$i].amp != 1) && ($slaves[$i].diet != "muscle building")>>
	$HeadGirl.slaveName wants to support your societal goals, so she makes $slaves[$i].slaveName work out hard.
	<<set $slaves[$i].diet to "muscle building">>
<<elseif ($slaves[$i].muscles <= 95) && ($HeadGirl.fetish is "submissive") && ($HeadGirl.fetishKnown == 1) && ($slaves[$i].amp != 1) && ($slaves[$i].diet != "muscle building")>>
	$HeadGirl.slaveName wants a strong girl in bed with her, so she makes $slaves[$i].slaveName work out hard.
	<<set $slaves[$i].diet to "muscle building">>
<<elseif ($slaves[$i].muscles <= 95) && ($HeadGirl.fetish is "masochist") && ($HeadGirl.fetishKnown == 1) && ($slaves[$i].amp != 1) && ($slaves[$i].diet != "muscle building")>>
	$HeadGirl.slaveName wants a strong girl to spank her, so she makes $slaves[$i].slaveName work out hard.
	<<set $slaves[$i].diet to "muscle building">>
<<elseif ($slaves[$i].muscles <= 5) && ($slaves[$i].amp != 1) && ($slaves[$i].diet != "muscle building")>>
	$HeadGirl.slaveName likes a bit of muscle, so she makes $slaves[$i].slaveName work out hard.
	<<set $slaves[$i].diet to "muscle building">>
<<elseif ($slaves[$i].balls > 0) && ($HeadGirl.fetish is "cumslut") && ($HeadGirl.fetishKnown == 1) && ($slaves[$i].diet != "cum production") && ($cumProDiet == 1)>>
	HeadGirl.slaveName loves cum, so she puts $slaves[$i].slaveName on a diet designed to make her cum harder and stronger.
	<<set $slaves[$i].diet to "cum production">>
<<elseif ($slaves[$i].diet != "healthy")>>
	<<set $slaves[$i].diet to "healthy">>
<</if>>
<<include "SA diet">>

<<if $HGSuiteHormones != 0>>
	<<if $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 to 2>>
	<</if>>
<</if>>
<<include "SA long term effects">>

<<if $arcologies[0].FSSlimnessEnthusiast != "unset">>
	<<set $HGTastes to 1>>
<<elseif $arcologies[0].FSBodyPurist != "unset">>
	<<set $HGTastes to 1>>
<<elseif $arcologies[0].FSDegradationist != "unset">>
	<<set $HGTastes to 3>>
<<elseif $arcologies[0].FSAssetExpansionist != "unset">>
	<<set $HGTastes to 3>>
<<elseif $arcologies[0].FSTransformationFetishist != "unset">>
	<<set $HGTastes to 3>>
<<else>>
	<<set $HGTastes to 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 to "lip injections">>
	<<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish is "buttslut") && ($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 to "butt injections">>
	<<elseif ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish is "boobs") && ($slaves[$i].boobs < 8000)>>
		$HeadGirl.slaveName gives $slaves[$i].slaveName tit injections, since as far as she's concerned there's no such thing as too much boob.
		<<set $slaves[$i].drugs to "breast injections">>
	<<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 to "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 to "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 to "breast injections">>
		<</if>>
	<<else>>
		<<set $slaves[$i].drugs to "none">>
	<</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>>
<<include "SA drugs">>

<<if $HGSuiteSurgery != 0>>
	<<if ($slaves[$i].health > 40)>>
	<<if $arcologies[0].FSBodyPurist is "unset">>
		$HeadGirl.slaveName sends $assistantName notes on what surgical modifications she wants for $slaves[$i].slaveName.
		<<include "Assistant Autosurgery">>
	<</if>>
	<</if>>
	<<if $HeadGirl.fetishKnown == 1>>
	<<if ($HeadGirl.fetish is "sadist") && ($HeadGirl.fetishStrength > 95) && ($seeExtreme == 1)>>
		<<if ($slaves[$i].health > 40)>>
		<<if ($slaves[$i].amp != 1)>>
			<<if ($slaves[$i].devotion < -20)>>
			<<if ($slaves[$i].fetish != "mindbroken")>>
				$HeadGirl.slaveName decides to extract the ultimate in sadistic pleasure from $slaves[$i].slaveName, and directs the autosurgery to @@color:red;amputate her arms and legs.@@ She carefully describes the entire process to the sobbing slave @@color:gold;in minute detail@@ before allowing her to be sedated.
				<<set $slaves[$i].devotion -= 20>>
				<<set $slaves[$i].trust -= 20>>
				<<set $slaves[$i].health -= 40>>
				<<set $slaves[$i].amp to 1>>
			<</if>>
			<</if>>
		<</if>>
		<<if ($slaves[$i].balls > 0)>>
			<<if ($slaves[$i].devotion <= 50)>>
			<<if ($slaves[$i].fetish != "mindbroken")>>
				$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 @@color:red;castration.@@ $slaves[$i].slaveName is anesthetized down there and can't feel the brutal anal rape, but her abuser orgasms repeatedly to her @@color:gold;weeping at the sight of being gelded and raped at once.@@
				<<set $slaves[$i].devotion -= 20>>
				<<set $slaves[$i].trust -= 20>>
				<<set $slaves[$i].health -= 20>>
				<<set $slaves[$i].balls to 0>>
			<</if>>
			<</if>>
		<</if>>
		<</if>>
		<<if ($slaves[$i].fetish != "mindbroken")>>
		<<if ($slaves[$i].devotion < -90)>>
			$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 @@color:red;chemical lobotomization.@@
			<<set $slaves[$i].health -= 20>>
			<<set $slaves[$i].fetish to "mindbroken">>
		<</if>>
		<</if>>
	<<elseif ($HeadGirl.fetish is "dom") && ($HeadGirl.fetishStrength > 60) && ($seeExtreme == 1)>>
		<<if ($slaves[$i].health > 40)>>
		<<if ($slaves[$i].heels == 0)>>
		<<if ($slaves[$i].amp != 1)>>
			<<if ($slaves[$i].devotion <= 50)>>
			<<if ($slaves[$i].fetish != "mindbroken")>>
				$HeadGirl.slaveName is not satisfied with $slaves[$i].slaveName's submissiveness, and directs the autosurgery to @@color: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 @@color:gold;angry@@ and @@color:gold;frightened.@@
				<<set $slaves[$i].devotion -= 5>>
				<<set $slaves[$i].health -= 20>>
				<<set $slaves[$i].heels to 1>>
				<<set $slaves[$i].shoes to "none">>
			<</if>>
			<</if>>
		<</if>>
		<</if>>
		<<if ($slaves[$i].balls > 0)>>
			<<if ($slaves[$i].devotion <= 50)>>
			<<if ($slaves[$i].fetish != "mindbroken")>>
				$HeadGirl.slaveName decides that it's counterproductive for $slaves[$i].slaveName to be able to get hard, and sends her in to have her @@color: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 @@color:gold;frightened@@ by her new role as nothing but a recipient of anal.
				<<set $slaves[$i].trust -= 10>>
				<<set $slaves[$i].health -= 20>>
				<<set $slaves[$i].balls to 0>>
			<</if>>
			<</if>>
		<</if>>
		<</if>>
	<<elseif $HeadGirl.energy > 95>>
		<<if ($slaves[$i].health > 40)>>
		<<if ($slaves[$i].heels == 0)>>
		<<if ($slaves[$i].amp != 1)>>
			<<if ($slaves[$i].devotion <= 50)>>
			<<if ($slaves[$i].fetish != "mindbroken")>>
				$HeadGirl.slaveName wants a good little bimbo who sticks her butt out all the time, and directs the autosurgery to @@color: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 @@color:gold;angry@@ and @@color:gold;frightened.@@
				<<set $slaves[$i].devotion -= 5>>
				<<set $slaves[$i].trust -= 5>>
				<<set $slaves[$i].health -= 20>>
				<<set $slaves[$i].heels to 1>>
				<<set $slaves[$i].shoes to "heels">>
			<</if>>
			<</if>>
		<</if>>
		<</if>>
		<</if>>
	<<elseif $HeadGirl.fetish is "masochist">>
		<<if ($slaves[$i].health > 40)>>
		<<if ($slaves[$i].heightImplant == 0)>>
		<<if ($slaves[$i].height < 185)>>
		<<if ($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 @@color:lime;taller.@@
				<<set $slaves[$i].health -= 20>>
				<<set $slaves[$i].heightImplant to 1>>
				<<set $slaves[$i].height += 1>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
	<<elseif $HeadGirl.fetish is "submissive">>
		<<if ($slaves[$i].health > 40)>>
		<<if ($slaves[$i].heightImplant == 0)>>
		<<if ($slaves[$i].height < 185)>>
		<<if ($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 @@color:lime;taller.@@
				<<set $slaves[$i].health -= 20>>
				<<set $slaves[$i].heightImplant to 1>>
				<<set $slaves[$i].height += 1>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
	<</if>>
	<</if>>
<</if>>

<<if $HGSuiteEquality != 0>>
	<<if $slaves[$i].devotion > 50>>
	$HeadGirl.slaveName and $slaves[$i].slaveName @@color:hotpink;really appreciate@@ the equal, alternating Head Girl system, and @@color:yellow;switch places at the end of the week.@@
	<<set $HeadGirl.devotion += 1>>
	<<set $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 to $HGSuiteSurgery + $HGSuiteDrugs + $HGSuiteHormones>>
	<<if $seed > 2>>
	Your Head Girl @@color:hotpink;really enjoys@@ being given total freedom to customize her very own bitch.
	<<set $HeadGirl.devotion += 2>>
	<<elseif $seed is 2>>
	Your Head Girl @@color:hotpink;enjoys@@ being given freedom to customize her very own girl.
	<<set $HeadGirl.devotion += 1>>
	<<elseif $seed == 1>>
	Your Head Girl @@color:hotpink;appreciates@@ being given some freedom to customize her own servant.
	<<set $HeadGirl.devotion += 1>>
	<</if>>
<</if>>

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

<<for $j to 0; $j < $slaves.length; $j++>>
	<<if $HeadGirl.ID == $slaves[$j].ID>>
	<<set $slaves[$j] to $HeadGirl>>
	<<break>>
	<</if>>
<</for>>