From 69b403467a1ff3a0e5ece5c9959a9da90aa698d8 Mon Sep 17 00:00:00 2001
From: Pregmodder <pregmodder@gmail.com>
Date: Mon, 2 Nov 2020 01:52:53 -0500
Subject: [PATCH] fixes

---
 src/endWeek/saLiveWithHG.js       |    3 +-
 src/uncategorized/saLiveWithHG.tw | 1053 -----------------------------
 2 files changed, 2 insertions(+), 1054 deletions(-)
 delete mode 100644 src/uncategorized/saLiveWithHG.tw

diff --git a/src/endWeek/saLiveWithHG.js b/src/endWeek/saLiveWithHG.js
index 023514609a9..217781b5135 100644
--- a/src/endWeek/saLiveWithHG.js
+++ b/src/endWeek/saLiveWithHG.js
@@ -10,6 +10,7 @@ App.SlaveAssignment.liveWithHG = (function() {
 	let he2, him2, his2, himself2, He2, His2, wife2;
 
 	let diet;
+	let hormones;
 
 	let oralUse;
 	let analUse;
@@ -1432,7 +1433,7 @@ App.SlaveAssignment.liveWithHG = (function() {
 		let frag;
 		if (arcology.FSBodyPurist === "unset") {
 			r.push(`${HG.slaveName} sends ${V.assistant.name} notes on what surgical modifications ${he2} wants for ${slave.slaveName}.`);
-			r.push(`${V.rulesAutosurgery(slave)}`);
+			r.push(rulesAutosurgery(slave));
 		}
 		if (HG.fetishKnown === 1) {
 			if (HG.fetish === "sadist" && HG.fetishStrength > 95 && V.seeExtreme === 1 && slave.fetish !== "mindbroken") {
diff --git a/src/uncategorized/saLiveWithHG.tw b/src/uncategorized/saLiveWithHG.tw
deleted file mode 100644
index 48f53186004..00000000000
--- a/src/uncategorized/saLiveWithHG.tw
+++ /dev/null
@@ -1,1053 +0,0 @@
-:: SA live with HG [nobr]
-
-<<set _oralUse = 0, _analUse = 0, _vaginalUse = 0, _mammaryUse = 0, _penetrativeUse = 0>>
-
-<<if $seeImages && $seeReportImages>>
-	<div class="imageRef medImg">
-		<<= SlaveArt($slaves[$i], 2, 0)>>
-	</div>
-<</if>>
-
-<<setLocalPronouns $slaves[$i]>>
-<<setLocalPronouns _S.HeadGirl 2>>
-
-/* run this up here so that it affects things better */
-<<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>>
-<<set _diet = $slaves[$i].diet>>
-<<if ($arcologies[0].FSRepopulationFocusPregPolicy == 1 || ($arcologies[0].FSRestart == "unset" && _S.HeadGirl.fetish == "pregnancy")) && canImpreg($slaves[$i], _S.HeadGirl) && ($dietFertility == 1)>>
-	<<if $slaves[$i].diet != "fertility">>
-		<<set $slaves[$i].diet = "fertility">>
-	<</if>>
-<<elseif ($slaves[$i].weight < 100 && $arcologies[0].FSHedonisticDecadence >= 20) || ($slaves[$i].weight < -10)>>
-	<<if $slaves[$i].diet != "fattening">>
-		<<set $slaves[$i].diet = "fattening">>
-	<</if>>
-<<elseif $slaves[$i].weight > 30 && $arcologies[0].FSHedonisticDecadence == "unset">>
-	<<if $slaves[$i].diet != "restricted">>
-		<<set $slaves[$i].diet = "restricted">>
-	<</if>>
-<<elseif (($slaves[$i].muscles <= 95 && (($arcologies[0].FSPhysicalIdealist > 0 && $arcologies[0].FSPhysicalIdealistLaw == 0) || ((_S.HeadGirl.fetish == "submissive" || _S.HeadGirl.fetish == "masochist") && _S.HeadGirl.fetishKnown == 1))) || ($slaves[$i].muscles <= 45 && ($arcologies[0].FSPhysicalIdealist > 0 && $arcologies[0].FSPhysicalIdealistLaw == 1)) || $slaves[$i].muscles <= 5) && !isAmputee($slaves[$i])>>
-	<<if $slaves[$i].diet != "muscle building">>
-		<<set $slaves[$i].diet = "muscle building">>
-	<</if>>
-<<elseif $slaves[$i].balls > 0 && _S.HeadGirl.fetish == "cumslut" && _S.HeadGirl.fetishKnown == 1 && $cumProDiet == 1>>
-	<<if $slaves[$i].diet != "cum production">>
-		<<set $slaves[$i].diet = "cum production">>
-	<</if>>
-<<else>>
-	<<if $slaves[$i].diet != "healthy">>
-		<<set $slaves[$i].diet = "healthy">>
-	<</if>>
-<</if>>
-<<set _hormones = $slaves[$i].hormones>>
-<<if $HGSuiteHormones != 0 && $slaves[$i].hormones != 2>>
-	<<set $slaves[$i].hormones = 2>>
-<</if>>
-<<if $HGSuiteDrugs != 0>>
-	<<if ($slaves[$i].health.condition < 60)>>
-		<<set $slaves[$i].curatives = 2>>
-	<</if>>
-	<<if ($slaves[$i].lips <= 20)>>
-		<<set $slaves[$i].drugs = "lip injections">>
-	<<elseif $arcologies[0].FSSlaveProfessionalismResearch == 1 && $HGSuiteEquality != 0 && canImproveIntelligence($slaves[$i])>>
-		<<set $slaves[$i].drugs = "psychostimulants">>
-	<<elseif (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetish == "buttslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].butt < 18>>
-		<<set $slaves[$i].drugs = "hyper butt injections">>
-	<<elseif (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetish == "buttslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].butt < 8>>
-		<<set $slaves[$i].drugs = "butt injections">>
-	<<elseif (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetish == "cumslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].balls < 100 && $slaves[$i].balls > 0 && $slaves[$i].dick > 0>>
-		<<set $slaves[$i].drugs = "hyper testicle enhancement">>
-	<<elseif (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetish == "cumslut") && $slaves[$i].balls < 10 && $slaves[$i].balls > 0 && $slaves[$i].dick > 0>>
-		<<set $slaves[$i].drugs = "testicle enhancement">>
-	<<elseif (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetish == "masochist" || _S.HeadGirl.fetish == "submissive") && canImproveHeight($slaves[$i])>>
-		<<set $slaves[$i].drugs = "growth stimulants">>
-	<<elseif (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetish == "boobs") && ($slaves[$i].boobs < 8000)>>
-		<<if $arcologies[0].FSAssetExpansionistResearch == 1>>
-			<<set $slaves[$i].drugs = "hyper breast injections">>
-		<<else>>
-			<<set $slaves[$i].drugs = "breast injections">>
-		<</if>>
-	<<elseif canImpreg($slaves[$i], _S.HeadGirl) && $arcologies[0].FSRestart == "unset" && ($HGTastes == 4 || _S.HeadGirl.fetish == "pregnancy" || $arcologies[0].FSRepopulationFocusPregPolicy == 1)>>
-		<<set $slaves[$i].drugs = "fertility drugs">>
-	<<elseif $HGTastes > 1>>
-		<<if ($slaves[$i].lips <= 70)>>
-			<<set $slaves[$i].drugs = "lip injections">>
-		<<elseif ($slaves[$i].boobs > (125*Math.pow($slaves[$i].butt, 2)))>>
-			<<set $slaves[$i].drugs = "butt injections">>
-		<<else>>
-			<<set $slaves[$i].drugs = "breast injections">>
-		<</if>>
-	<<else>>
-		<<set $slaves[$i].drugs = "no drugs">>
-	<</if>>
-	<<if ($slaves[$i].health.condition < 100)>>
-		<<set $slaves[$i].curatives = 2>>
-	<</if>>
-<</if>>
-<<if $slaves[$i].rules.living != "luxurious">>
-	<<set $slaves[$i].rules.living = "luxurious">>
-<</if>>
-
-<<if $slaves[$i].devotion > 20>>
-	<<if App.EndWeek.saVars.HGSlaveSuccess>>
-		looks after your Head Girl <<= SlaveFullName(_S.HeadGirl)>> domestically and sexually, freeing _him2 to devote more of _his2 time to looking after your other slaves.
-	<<else>>
-		does $his best to look after your Head Girl <<= SlaveFullName(_S.HeadGirl)>> domestically and sexually, but doesn't free up much of _his2 time this week.
-	<</if>>
-<<elseif $slaves[$i].trust < -20>>
-	<<if App.EndWeek.saVars.HGSlaveSuccess>>
-		obeys Head Girl <<= SlaveFullName(_S.HeadGirl)>> domestically and sexually, freeing _him2 to devote more of _his2 time to looking after your other slaves.
-	<<else>>
-		tries to look after your Head Girl <<= SlaveFullName(_S.HeadGirl)>> domestically and sexually, but doesn't free up much of _his2 time this week.
-	<</if>>
-<<else>>
-	<<if App.EndWeek.saVars.HGSlaveSuccess>>
-		resists Head Girl <<= SlaveFullName(_S.HeadGirl)>>'s domestic and sexual use, but still frees _him2 to devote more of _his2 time to looking after your other slaves.
-	<<else>>
-		resists Head Girl <<= SlaveFullName(_S.HeadGirl)>>'s domestic and sexual use, and doesn't free up much of _his2 time this week.
-	<</if>>
-<</if>>
-
-<<if (_S.HeadGirl.fetish == "sadist") && (_S.HeadGirl.fetishStrength > 60) && (_S.HeadGirl.fetishKnown == 1)>>
-	Since _S.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, $he 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)>>
-				$He finds deep @@.hotpink;sexual satisfaction@@ being a pain slave.
-				<<set $slaves[$i].devotion += 4>>
-			<<else>>
-				This forces $him to find solace in @@.lightcoral;deeper masochism.@@
-				<<set $slaves[$i].fetishStrength += 4>>
-			<</if>>
-		<<else>>
-			Oddly enough, $he seems to find it enjoyable; @@.lightcoral;$he's a natural masochist.@@
-			<<set $slaves[$i].fetishKnown = 1>>
-		<</if>>
-		<<set $slaves[$i].need = 0>>
-	<<elseif ($slaves[$i].devotion < -20)>>
-		This rapidly fills $him with @@.mediumorchid;hatred@@ and @@.mediumorchid;fear.@@
-		<<set $slaves[$i].devotion -= 10, $slaves[$i].trust -= 10>>
-	<<elseif ($slaves[$i].devotion > 20)>>
-		This fills $him 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 $he is not yet obedient, _S.HeadGirl.slaveName @@.gold;punishes@@ $him constantly, training $him to be a decent assistant or suffer pain.
-		<<set $slaves[$i].trust -= 5>>
-	<<else>>
-		Since $he isn't suitably broken into slavery yet, _S.HeadGirl.slaveName trains $him to be @@.hotpink;obedient@@ or suffer pain.
-		<<set $slaves[$i].devotion += 5>>
-	<</if>>
-<<elseif ($slaves[$i].devotion <= 20)>>
-	Since $he is not yet well trained, _S.HeadGirl.slaveName instructs $him, @@.hotpink;training@@ $him to be a proper assistant.
-	<<set $slaves[$i].devotion += 4>>
-<<elseif ($slaves[$i].devotion <= 50)>>
-	Since $he is not yet a devoted slave, _S.HeadGirl.slaveName works with $him, @@.hotpink;training@@ $him to be a good assistant.
-	<<set $slaves[$i].devotion += 2>>
-<<else>>
-	Since $he is a devoted assistant, _S.HeadGirl.slaveName @@.hotpink;praises@@ and encourages $him.
-	<<set $slaves[$i].devotion += 1>>
-<</if>>
-
-<<if (_S.HeadGirl.rivalry != 0) && (_S.HeadGirl.rivalryTarget == $slaves[$i].ID)>>
-	_S.HeadGirl.slaveName @@.lightgreen;resolves the rivalry@@ between _him2 and $slaves[$i].slaveName, mostly by the expedient of punishing $slaves[$i].slaveName savagely whenever $he gives any trouble.
-	<<set _S.HeadGirl.rivalry = 0, _S.HeadGirl.rivalryTarget = 0, $slaves[$i].rivalry = 0, $slaves[$i].rivalryTarget = 0>>
-<<elseif (_S.HeadGirl.relationship == 0)>>
-	<<if areRelated($slaves[$i], _S.HeadGirl)>>
-		_S.HeadGirl.slaveName
-		<<if _S.HeadGirl.devotion > 95>>
-			is so inured to the perversities of slavery that _he2 @@.hotpink;enjoys@@ the prospect of sexual service from _his2
-			<<set _S.HeadGirl.devotion += 1>>
-		<<elseif _S.HeadGirl.devotion > 60>>
-			is so devoted to you that _he2 accepts the prospect of sexual service from _his2
-		<<else>>
-			is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexual service from _his2
-			<<set _S.HeadGirl.devotion -= 2>>
-		<</if>>
-		<<print relativeTerm(_S.HeadGirl, $slaves[$i])>>.
-		$slaves[$i].slaveName
-		<<if $slaves[$i].devotion > 95>>
-			is so inured to the perversities of slavery that $he @@.hotpink;enjoys@@ the prospect of sexually servicing $his
-			<<set $slaves[$i].devotion += 1>>
-		<<elseif $slaves[$i].devotion > 60>>
-			is so devoted to you that $he accepts the prospect of sexually servicing $his
-		<<elseif $slaves[$i].devotion > 40>>
-			is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexually servicing $his
-			<<set $slaves[$i].devotion -= 2>>
-		<<elseif $slaves[$i].devotion > 20>>
-			is @@.mediumorchid;disturbed@@ by the prospect of sexually servicing $his
-			<<set $slaves[$i].devotion -= 4>>
-		<<elseif $slaves[$i].devotion >= -20>>
-			is @@.mediumorchid;strongly disturbed@@ by the prospect of sexually servicing $his
-			<<set $slaves[$i].devotion -= 5>>
-		<<else>>
-			is @@.mediumorchid;revolted@@ by the prospect of sexually servicing $his
-			<<set $slaves[$i].devotion -= 10>>
-		<</if>>
-		<<print relativeTerm($slaves[$i], _S.HeadGirl)>>.
-	<</if>>
-	<<if ($slaves[$i].relationship == 0) && ($slaves[$i].devotion > 20)>>
-		$slaves[$i].slaveName sees _S.HeadGirl.slaveName constantly, and does $his best to @@.lightgreen;become _his2 friend.@@
-		<<set _S.HeadGirl.relationship = 1, _S.HeadGirl.relationshipTarget = $slaves[$i].ID, $slaves[$i].relationship = 1, $slaves[$i].relationshipTarget = $HeadGirlID>>
-	<<elseif ($slaves[$i].relationship == -2) && ($slaves[$i].devotion > 20) && ($slaves[$i].devotion > 50)>>
-		$slaves[$i].slaveName sees _S.HeadGirl.slaveName so much more than $he sees you and begins to warm up to _him2 instead of you, @@.lightgreen;becoming _his2 friend.@@
-		<<set _S.HeadGirl.relationship = 1, _S.HeadGirl.relationshipTarget = $slaves[$i].ID, $slaves[$i].relationship = 1, $slaves[$i].relationshipTarget = $HeadGirlID>>
-	<<elseif ($slaves[$i].relationship != 5) && ($slaves[$i].relationship > 0) && ($slaves[$i].relationshipTarget != $HeadGirlID)>>
-		<<set _j = $slaves.findIndex(function(s) { return s.ID == $slaves[$i].relationshipTarget; })>>
-		$slaves[$i].slaveName, as _S.HeadGirl.slaveName's bitch, knows $slaves[_j].slaveName cannot compete with the Head Girl, and so their relationship fades.
-		<<set $slaves[$i].relationship = 0, $slaves[$i].relationshipTarget = 0, $slaves[_j].relationship = 0, $slaves[_j].relationshipTarget = 0>>
-	<</if>>
-<<else>>
-	<<if (_S.HeadGirl.relationshipTarget == $slaves[$i].ID)>>
-		<<set $slaves[$i].trust += 1, _S.HeadGirl.trust += 1>>
-		<<if $slaves[$i].relationship <= 2>>
-			Since _S.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 _S.HeadGirl.relationship = 3, _S.HeadGirl.relationshipTarget = $slaves[$i].ID>>
-			<<set $slaves[$i].relationship = 3, $slaves[$i].relationshipTarget = $HeadGirlID>>
-		<<elseif $slaves[$i].relationship <= 3>>
-			Since _S.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 _S.HeadGirl.relationship = 4, _S.HeadGirl.relationshipTarget = $slaves[$i].ID>>
-			<<set $slaves[$i].relationship = 4, $slaves[$i].relationshipTarget = $HeadGirlID>>
-		<<elseif $slaves[$i].relationship <= 4>>
-			<<if (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetishStrength <= 60) && (_S.HeadGirl.fetish == "sadist") && ($slaves[$i].fetish != "masochist")>>
-				Since their relationship is very abusive, only _S.HeadGirl.slaveName @@.hotpink;enjoys@@ living together with $slaves[$i].slaveName.
-				<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5>>
-			<<else>>
-				Since _S.HeadGirl.slaveName and $slaves[$i].slaveName are lovers, they @@.hotpink;enjoy@@ living together.
-			<</if>>
-		<<else>>
-			Since _S.HeadGirl.slaveName and $slaves[$i].slaveName are <<if $wife == _wife2>>slave $wives<<else>>married<</if>>, they @@.hotpink;enjoy@@ living together.
-		<</if>>
-	<</if>>
-<</if>>
-
-<<set _skillIncrease = 10>>
-<<if ($slaves[$i].skill.oral <= 30)>>
-	_S.HeadGirl.slaveName wants to come home to a talented tongue, so _he2 trains $slaves[$i].slaveName's oral skills.
-	<<= slaveSkillIncrease('oral', $slaves[$i], _skillIncrease)>>
-<<elseif ($slaves[$i].vagina > 0) && ($slaves[$i].skill.vaginal <= 30)>>
-	_S.HeadGirl.slaveName wants _his2 personal sex slave to be as skilled with $his pussy as possible, so _he2 trains $slaves[$i].slaveName's vaginal skills.
-	<<= slaveSkillIncrease('vaginal', $slaves[$i], _skillIncrease)>>
-<<elseif ($slaves[$i].anus > 0) && ($slaves[$i].skill.anal <= 30)>>
-	_S.HeadGirl.slaveName wants _his2 personal sex slave to be a skillful backdoor whore, so _he2 trains $slaves[$i].slaveName's anal skills.
-	<<= slaveSkillIncrease('anal', $slaves[$i], _skillIncrease)>>
-<<elseif ($slaves[$i].skill.entertainment <= 10)>>
-	_S.HeadGirl.slaveName wants to be kept amused in _his2 occasional free time, so _he2 trains $slaves[$i].slaveName's entertainment skills.
-	<<= slaveSkillIncrease('entertainment', $slaves[$i], _skillIncrease)>>
-<<elseif ($slaves[$i].sexualFlaw != "none")>>
-	_S.HeadGirl.slaveName is annoyed by $slaves[$i].slaveName's sexual flaws, so _he2 @@.green;trains@@ $him out of them.
-	<<set $slaves[$i].sexualFlaw = "none">>
-<<elseif ($slaves[$i].behavioralFlaw != "none")>>
-	_S.HeadGirl.slaveName is irritated by $slaves[$i].slaveName's flaws, so _he2 @@.green;trains@@ $him out of them.
-	<<set $slaves[$i].behavioralFlaw = "none">>
-<</if>>
-
-<<if canPenetrate(_S.HeadGirl)>>
-	<<if canDoVaginal($slaves[$i])>>
-		<<if ($slaves[$i].vagina == 0)>>
-			_S.HeadGirl.slaveName @@.hotpink;loves@@ @@.lime;taking@@ $slaves[$i].slaveName's virginity, and spends much of the week ogling _his2 conquest complacently.
-			<<set $slaves[$i].vagina = 1, _S.HeadGirl.devotion += 4>>
-		<<elseif ($slaves[$i].vagina == 1)>>
-			<<if (_S.HeadGirl.dick > 4) && (_S.HeadGirl.energy > 95)>>
-				_S.HeadGirl.slaveName has such a ferocious sex drive and such a big dick that _his2 constant pounding of $slaves[$i].slaveName @@.lime;loosens@@ the poor $girl's pussy.
-				<<set $slaves[$i].vagina += 1>>
-			<<elseif (_S.HeadGirl.dick > 5)>>
-				Serving _S.HeadGirl.slaveName's monster cock @@.lime;loosens@@ $slaves[$i].slaveName's pussy.
-				<<set $slaves[$i].vagina += 1>>
-			<</if>>
-		<<elseif ($slaves[$i].vagina == 2)>>
-			<<if (_S.HeadGirl.dick > 5) && (_S.HeadGirl.energy > 95)>>
-				_S.HeadGirl.slaveName has such a ferocious sex drive and such a monster cock that _his2 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 (_S.HeadGirl.dick > 5) && (_S.HeadGirl.energy > 95) && random(1,100) > 80>>
-				_S.HeadGirl.slaveName has such a ferocious sex drive and such a monster cock that _his2 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)>>
-			_S.HeadGirl.slaveName @@.hotpink;relishes@@ @@.lime;taking@@ $slaves[$i].slaveName's anal virginity, and spends much of the week groping _his2 conquest's rear end possessively.
-			<<set $slaves[$i].anus = 1, _S.HeadGirl.devotion += 4>>
-		<<elseif ($slaves[$i].anus == 1)>>
-			<<if (_S.HeadGirl.dick > 4) && (_S.HeadGirl.energy > 95)>>
-				_S.HeadGirl.slaveName uses $slaves[$i].slaveName's anus to vent _his2 sexual addiction. Constant assrape from such a huge dick @@.lime;loosens@@ $his sphincter.
-				<<set $slaves[$i].anus += 1>>
-			<<elseif (_S.HeadGirl.dick > 5)>>
-				Taking _S.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 (_S.HeadGirl.dick > 5) && (_S.HeadGirl.energy > 95)>>
-				_S.HeadGirl.slaveName uses $slaves[$i].slaveName's anus to vent _his2 sexual addiction. Constant assrape from the Head Girl's monster cock @@.lime;loosens@@ $his sphincter.
-				<<set $slaves[$i].anus += 1>>
-			<</if>>
-		<<elseif ($slaves[$i].anus == 3)>>
-			<<if (_S.HeadGirl.dick > 5) && (_S.HeadGirl.energy > 95) && random(1,100) > 80>>
-				_S.HeadGirl.slaveName uses $slaves[$i].slaveName's loose anus to vent _his2 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 (_S.HeadGirl.fetish == "pregnancy") && canImpreg($slaves[$i], _S.HeadGirl)>>
-		<<if $arcologies[0].FSRestart == "unset">>
-			_S.HeadGirl.slaveName promptly @@.lime;impregnates@@
-			<<if _S.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 $his superior had cum to spare.
-				<<set _S.HeadGirl.devotion += 4>>
-			<<else>>
-				$slaves[$i].slaveName. _His2 eagerness completely exposes _his2 hidden @@.lightcoral;pregnancy kink.@@
-				<<set _S.HeadGirl.fetishKnown = 1>>
-			<</if>>
-			<<= knockMeUp($slaves[$i], 100, 2, $HeadGirlID, 1)>>
-			<<if (_S.HeadGirl.fetishStrength > 70) && canImpreg(_S.HeadGirl, $slaves[$i])>>
-				Unsurprisingly, _his2 gives in to _his2 own cravings and also takes $slaves[$i].slaveName's loads until _he2 @@.lime;gets pregnant@@ too.
-				<<= knockMeUp(_S.HeadGirl, 100, 2, $slaves[$i].ID, 1)>>
-			<</if>>
-		<<elseif _S.HeadGirl.fetishKnown == 1>>
-			_S.HeadGirl.slaveName knows better than to even consider knocking up $slaves[$i].slaveName.
-		<</if>>
-	<<elseif (_S.HeadGirl.fetish == "pregnancy") && canImpreg(_S.HeadGirl, $slaves[$i])>>
-		<<if $arcologies[0].FSRestart == "unset" && (_S.HeadGirl.fetishStrength > 70)>>
-			_S.HeadGirl.slaveName promptly @@.lime;knocks _himself2 up@@ with $slaves[$i].slaveName's
-			<<if _S.HeadGirl.fetishKnown == 1>>
-				seed, to your Head Girl's considerable @@.hotpink;satisfaction.@@
-				<<set _S.HeadGirl.devotion += 4>>
-			<<else>>
-				seed. _His2 @@.hotpink;pride@@ over _his2 new pregnancy and eagerness to get pregnant completely exposes _his2 hidden, and powerful, @@.lightcoral;pregnancy fetish.@@
-				<<set _S.HeadGirl.fetishKnown = 1, _S.HeadGirl.devotion += 4>>
-			<</if>>
-			<<= knockMeUp(_S.HeadGirl, 100, 2, $slaves[$i].ID, 1)>>
-		<<elseif _S.HeadGirl.fetishKnown == 1>>
-			_S.HeadGirl.slaveName knows better than to even consider getting knocked up by $slaves[$i].slaveName.
-		<</if>>
-	<<elseif $arcologies[0].FSRepopulationFocusPregPolicy == 1 && canImpreg($slaves[$i], _S.HeadGirl)>>
-		_S.HeadGirl.slaveName wastes no time in chasing the current trend and hurries to @@.lime;impregnate@@ $slaves[$i].slaveName.
-		<<= knockMeUp($slaves[$i], 100, 2, $HeadGirlID, 1)>>
-	<<elseif $slaves[$i].pregKnown == 1>>
-		<<if $slaves[$i].breedingMark == 1>>
-			Since $slaves[$i].slaveName is marked as a breeding slave, _S.HeadGirl.slaveName feels it is _his2 duty to keep $his pregnancy safe.
-		<<elseif $slaves[$i].pregSource == -1>>
-			Since $slaves[$i].slaveName is bearing your child<<if $slaves[$i].pregType > 1>>ren<</if>>, _S.HeadGirl.slaveName feels _he2 has been tasked with keeping $his pregnancy safe.
-		<<elseif _S.HeadGirl.fetish == "pregnancy">>
-			_S.HeadGirl.slaveName
-			<<if _S.HeadGirl.fetishKnown == 1>>
-				<<if $slaves[$i].bellyPreg > 500>>
-					enjoys the swell of $slaves[$i].slaveName's baby bump, giving _him2 plenty of reason to keep $his pregnancy.
-				<<else>>
-					keeps $slaves[$i].slaveName pregnant so that _he2 may savor $his growth.
-				<</if>>
-			<<else>>
-				pays an unusual amount of attention to $slaves[$i].slaveName's pregnancy.
-			<</if>>
-		<<elseif $arcologies[0].FSRepopulationFocusPregPolicy == 0 && $arcologies[0].FSRepopulationFocus == "unset" && $HGSuiteDrugs == 1>>
-			<<if $slaves[$i].preg > $slaves[$i].pregData.normalBirth-2 && $slaves[$i].preg > $slaves[$i].pregData.minLiveBirth && $slaves[$i].broodmother === 0 && !isInLabor($slaves[$i])>>
-				_S.HeadGirl.slaveName has no interest in a slut stuffed full of unwanted spawn, so _he2 promptly doses slaves[$i].slaveName with labor inducing agents to get $him back in fucking shape.
-				<<run induce($slaves[$i])>>
-				<<run startLabor($slaves[$i])>>
-			<<else>>
-				_S.HeadGirl.slaveName promptly aborts the child growing in $slaves[$i].slaveName since _he2 prefers _his2 <<= $girl>>s not harboring someone else's child or loaded down with _his2 own unwanted spawn.
-				<<run TerminatePregnancy($slaves[$i])>>
-				<<run actX($slaves[$i], "abortions")>>
-			<</if>>
-		<</if>>
-	<</if>>
-<</if>>
-
-<<if ($slaves[$i].devotion > 50)>>
-	<<if (($slaves[$i].fetishStrength <= 95) || ($slaves[$i].fetishKnown == 0)) && (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetishStrength > 60) && ($slaves[$i].fetish != _S.HeadGirl.fetish) && ($slaves[$i].fetish != "mindbroken")>>
-		<<if (_S.HeadGirl.fetish == "submissive")>>
-			$slaves[$i].slaveName slowly gets used to _S.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 (_S.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 _S.HeadGirl.slaveName's sexual attraction to $him expresses itself. $He begins to @@.pink;enjoy being a sub,@@ especially for _S.HeadGirl.slaveName.
-				<<set $slaves[$i].fetish = "submissive", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
-			<</if>>
-		<<elseif (_S.HeadGirl.fetish == "boobs")>>
-			_S.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 (_S.HeadGirl.fetish == "pregnancy")>>
-			$slaves[$i].slaveName and _S.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 (_S.HeadGirl.fetish == "cumslut")>>
-			$slaves[$i].slaveName participates in enough of _S.HeadGirl.slaveName's cum games that $he can't help but @@.pink;enjoy oral sex@@ $himself.
-			<<set $slaves[$i].fetish = "cumslut", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
-		<<elseif (_S.HeadGirl.fetish == "humiliation")>>
-			$slaves[$i].slaveName has so much public sex with _S.HeadGirl.slaveName that $he really starts to @@.pink;enjoy humiliation@@ $himself.
-			<<set $slaves[$i].fetish = "humiliation", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
-		<<elseif (_S.HeadGirl.fetish == "buttslut")>>
-			<<if canDoAnal($slaves[$i])>>
-				$slaves[$i].slaveName takes _S.HeadGirl.slaveName's <<if canPenetrate(_S.HeadGirl)>>dick<<else>>strap-on and dildos<</if>> up $his poor anus so often that $he starts to @@.pink;enjoy buttsex@@ $himself.
-			<<else>>
-				_S.HeadGirl.slaveName lavishes so much attention on $slaves[$i].slaveName's butt, since _he2 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 (_S.HeadGirl.fetish == "masochist")>>
-			<<if ($slaves[$i].fetish != "submissive") || ($slaves[$i].fetish == 0)>>
-				$slaves[$i].slaveName is initially shocked to be asked to cause _S.HeadGirl.slaveName pain, but $he slowly begins to understand the honestly sexual nature of the arrangement. $He starts to @@.pink;enjoy causing pain,@@ since _S.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 _S.HeadGirl.slaveName's <<if canPenetrate(_S.HeadGirl)>>dick<<else>>strap-on<</if>> in the missionary position, after some light foreplay and before bed; $he honestly enjoys the respectful lovemaking, and begins to @@.pink;enjoy vanilla sex@@ $himself.
-			<<set $slaves[$i].fetish = "none", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
-		<</if>>
-	<</if>>
-	<<if (_S.HeadGirl.attrKnown == 1)>>
-		<<if (_S.HeadGirl.attrXX > 85) && ($slaves[$i].attrXX > 65) && ($slaves[$i].attrXX <= 85)>>
-			$slaves[$i].slaveName and _S.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 (_S.HeadGirl.attrXY > 85) && ($slaves[$i].attrXY > 65) && ($slaves[$i].attrXY <= 85)>>
-			$slaves[$i].slaveName and _S.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])>>_S.HeadGirl.slaveName banging _his2 girltoy <<if canPenetrate(_S.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 (_S.HeadGirl.energy > 95) && ($slaves[$i].energy <= 95)>>
-			$slaves[$i].slaveName has so much fun sex with _S.HeadGirl.slaveName that @@.green;$his sex drive is slowly enhanced.@@
-			<<set $slaves[$i].energy += 2>>
-		<</if>>
-	<</if>>
-<</if>>
-
-<<if (_S.HeadGirl.fetishKnown == 1)>>
-	<<if (_S.HeadGirl.energy > 95)>>
-		$slaves[$i].slaveName spends a lot of time getting fucked in whichever hole or cranny _S.HeadGirl.slaveName decides to shove _his2 <<if canPenetrate(_S.HeadGirl)>>dick<<else>>strap-on<</if>> into next.
-		<<set _oralUse += 5>>
-		<<if canDoAnal($slaves[$i])>>
-			<<set _analUse += 5>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 5, 1, $HeadGirlID)>>
-			<</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], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 5, 0, $HeadGirlID)>>
-			<</if>>
-		<<elseif canDoAnal($slaves[$i])>>
-			<<set _analUse += 5>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 5, 1, $HeadGirlID)>>
-			<</if>>
-		<<else>>
-			<<set _oralUse += 5>>
-		<</if>>
-		<<set _S.HeadGirl.counter.penetrative += 15, $penetrativeTotal += 15>>
-	<<elseif (_S.HeadGirl.fetish == "submissive")>>
-		_S.HeadGirl.slaveName walks a fine line with $slaves[$i].slaveName. They work out a sexual life in which _S.HeadGirl.slaveName is in charge, but $slaves[$i].slaveName takes the sexual lead: $slaves[$i].slaveName serves $his superior by taking _him2 firmly.
-		<<set _oralUse += 4>>
-		<<if canDoAnal($slaves[$i])>>
-			<<set _analUse += 3>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 3, 1, $HeadGirlID)>>
-			<</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], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 3, 0, $HeadGirlID)>>
-			<</if>>
-		<<elseif canDoAnal($slaves[$i])>>
-			<<set _analUse += 3>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 3, 1, $HeadGirlID)>>
-			<</if>>
-		<<else>>
-			<<set _oralUse += 3>>
-		<</if>>
-		<<set _S.HeadGirl.counter.penetrative += 10, $penetrativeTotal += 10>>
-	<<elseif (_S.HeadGirl.fetish == "dom")>>
-		$slaves[$i].slaveName serves _S.HeadGirl.slaveName as _his2 sexual and moral inferior, taking the Head Girl's <<if canPenetrate(_S.HeadGirl)>>dick<<else>>strap-on<</if>> in all $his 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], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 3, 1, $HeadGirlID)>>
-			<</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], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 3, 0, $HeadGirlID)>>
-			<</if>>
-		<<elseif canDoAnal($slaves[$i])>>
-			<<set _analUse += 3>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 3, 1, $HeadGirlID)>>
-			<</if>>
-		<<else>>
-			<<set _oralUse += 3>>
-		<</if>>
-		<<set _S.HeadGirl.counter.penetrative += 10, $penetrativeTotal += 10>>
-	<<elseif (_S.HeadGirl.fetish == "humiliation")>>
-		_S.HeadGirl.slaveName is such an exhibitionist that $slaves[$i].slaveName finds $himself taking _S.HeadGirl.slaveName's <<if canPenetrate(_S.HeadGirl)>>dick<<else>>strap-on<</if>> in public quite often.
-		<<set _oralUse += 4>>
-		<<if canDoAnal($slaves[$i])>>
-			<<set _analUse += 3>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 3, 1, $HeadGirlID)>>
-			<</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], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 3, 0, $HeadGirlID)>>
-			<</if>>
-		<<elseif canDoAnal($slaves[$i])>>
-			<<set _analUse += 3>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 3, 1, $HeadGirlID)>>
-			<</if>>
-		<<else>>
-			<<set _oralUse += 3>>
-		<</if>>
-		<<set _S.HeadGirl.counter.penetrative += 10, $penetrativeTotal += 10>>
-	<<elseif (_S.HeadGirl.fetish == "boobs")>>
-		_S.HeadGirl.slaveName is such a boob fetishist that $slaves[$i].slaveName sometimes wonders whether _S.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 _S.HeadGirl.counter.mammary += 10, $mammaryTotal += 10>>
-	<<elseif (_S.HeadGirl.fetish == "buttslut")>>
-		_S.HeadGirl.slaveName takes a dominant sexual role with $slaves[$i].slaveName; _he2 indulges _his2 <<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 _himself2.
-		<<if canDoAnal($slaves[$i])>>
-			<<set _analUse += 10>>
-			<<set _S.HeadGirl.counter.penetrative += 10, $penetrativeTotal += 10>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 10, 1, $HeadGirlID)>>
-			<</if>>
-		<</if>>
-	<<elseif (_S.HeadGirl.fetish == "cumslut")>>
-		_S.HeadGirl.slaveName takes a dominant sexual role with $slaves[$i].slaveName; _he2 indulges _his2 oral fixation with constant oral sex. _He2 certainly applies _his2 mouth to $slaves[$i].slaveName when _he2 gets the chance, but $slaves[$i].slaveName does most of the sucking.
-		<<set _oralUse += 20>>
-		<<set _S.HeadGirl.counter.oral += 10, $oralTotal += 10>>
-		<<set _S.HeadGirl.counter.penetrative += 10, $penetrativeTotal += 10>>
-	<<elseif (_S.HeadGirl.fetish == "masochist")>>
-		_S.HeadGirl.slaveName carefully structures _his2 sexual games with $slaves[$i].slaveName to gratify _his2 deep need to be physically hurt during sex without damaging _his2 leadership. Usually, $slaves[$i].slaveName tortures _S.HeadGirl.slaveName until _he2's quite sated, and then takes a rough <<if canDoAnal($slaves[$i])>>buttfuck<<else>>facefucking<</if>> from the aroused _S.HeadGirl.slaveName's <<if canPenetrate(_S.HeadGirl)>>dick<<else>>strap-on<</if>> to restore their relative positions.
-		<<if canDoAnal($slaves[$i])>>
-			<<set _analUse += 10>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 10, 1, $HeadGirlID)>>
-			<</if>>
-		<<else>>
-			<<set _oralUse += 10>>
-		<</if>>
-		<<set _S.HeadGirl.counter.penetrative += 10, $penetrativeTotal += 10>>
-	<<elseif (_S.HeadGirl.attrXX > 65)>>
-		_S.HeadGirl.slaveName expects $slaves[$i].slaveName to be girlish sexually, and $slaves[$i].slaveName spends a lot of time <<if hasBothLegs($slaves[$i])>>on $his knees<<else>>servicing _him2<</if>>.
-		<<set _oralUse += 6>>
-		<<if canDoAnal($slaves[$i])>>
-			<<set _analUse++>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 1, 1, $HeadGirlID)>>
-			<</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], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 1, 0, $HeadGirlID)>>
-			<</if>>
-		<<elseif canDoAnal($slaves[$i])>>
-			<<set _analUse++>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 1, 1, $HeadGirlID)>>
-			<</if>>
-		<<else>>
-			<<set _oralUse++>>
-		<</if>>
-		<<set _S.HeadGirl.counter.penetrative += 8, $penetrativeTotal += 8>>
-	<<else>>
-		_S.HeadGirl.slaveName takes a dominant sexual role with $slaves[$i].slaveName, mostly getting oral<<if canPenetrate(_S.HeadGirl) && (canDoVaginal($slaves[$i]) || canDoAnal($slaves[$i]))>> and fucking $him in the missionary position<<elseif $slaves[$i] >= 300>> and molesting $his breasts<</if>>.
-		<<set _oralUse += 4>>
-		<<if canDoAnal($slaves[$i])>>
-			<<set _analUse += 3>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 3, 1, $HeadGirlID)>>
-			<</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], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 3, 0, $HeadGirlID)>>
-			<</if>>
-		<<elseif canDoAnal($slaves[$i])>>
-			<<set _analUse += 3>>
-			<<if canImpreg($slaves[$i], _S.HeadGirl)>>
-				<<= knockMeUp($slaves[$i], 3, 1, $HeadGirlID)>>
-			<</if>>
-		<<elseif $slaves[$i] >= 300>>
-			<<set _mammaryUse += 3>>
-		<<else>>
-			<<set _oralUse += 3>>
-		<</if>>
-		<<set _S.HeadGirl.counter.penetrative += 10, $penetrativeTotal += 10>>
-	<</if>>
-<</if>>
-
-<<set $slaves[$i].counter.oral += _oralUse, $oralTotal += _oralUse>>
-<<set $slaves[$i].counter.anal += _analUse, $analTotal += _analUse>>
-<<set $slaves[$i].counter.vaginal += _vaginalUse, $vaginalTotal += _vaginalUse>>
-<<set $slaves[$i].counter.mammary += _mammaryUse, $mammaryTotal += _mammaryUse>>
-<<set $slaves[$i].counter.penetrative += _penetrativeUse, $penetrativeTotal += _penetrativeUse>>
-
-<<set _cervixPump = 0>>
-<<if $slaves[$i].cervixImplant == 1 || $slaves[$i].cervixImplant == 3>>
-	<<set _cervixPump += 20*_vaginalUse>>
-<</if>>
-<<if $slaves[$i].cervixImplant == 2 || $slaves[$i].cervixImplant == 3>>
-	<<set _cervixPump += 20*_analUse>>
-<</if>>
-
-<<if $slaves[$i].need>>
-	<<if $slaves[$i].fetishKnown>>
-		<<switch $slaves[$i].fetish>>
-		<<case "masochist" "submissive">>
-			<<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 $his 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 $his pussy serve as someone's toy really satisfies $slaves[$i].slaveName.
-				<<set $slaves[$i].need = 0>>
-			<<elseif _analUse > 0 && $slaves[$i].mpreg == 1>>
-				Having $his 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 $him 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 _S.HeadGirl.need = 0>>
-
-<<if _cervixPump > 0>>
-	$slaves[$i].slaveName notices $his @@.lime;belly swell@@ after
-	<<if $slaves[$i].cervixImplant == 1>>
-		vaginal
-	<<elseif $slaves[$i].cervixImplant == 2>>
-		anal
-	<</if>>
-	sex throughout the week.
-	<<set $slaves[$i].bellyImplant += _cervixPump>>
-<</if>>
-
-<<if $slaves[$i].health.tired > 60>>
-	_S.HeadGirl.slaveName sees $he is becoming exhausted and gives $him lighter duties so $he doesn't break.
-<</if>>
-<<run tired($slaves[$i])>>
-
-<<if (_S.HeadGirl.fetishKnown == 1)>>
-	<<if (_S.HeadGirl.energy > 95)>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName naked so _he2 doesn't have to waste any time tearing $his clothes off.
-		<<set $slaves[$i].clothes = "no clothing">>
-	<<elseif $slaves[$i].devotion <= 20>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName in a torturous habit since $he still clings to $his dignity and remains defiant.
-		<<set $slaves[$i].clothes = "a penitent nuns habit">>
-	<<elseif (_S.HeadGirl.fetish == "submissive")>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName dressed up in slutty power clothing, since _he2's attracted to competence.
-		<<set $slaves[$i].clothes = "slutty business attire">>
-	<<elseif (_S.HeadGirl.fetish == "masochist")>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName
-		<<if isItemAccessible.entry("battledress", "clothing")>>
-			in battledress, since _he2 likes the fantasy of being raped by a soldier $girl.
-			<<set $slaves[$i].clothes = "battledress">>
-		<<else>>
-			in a scalemail bikini, since _he2 likes the fantasy of being raped by a horny barbarian.
-			<<set $slaves[$i].clothes = "a scalemail bikini">>
-		<</if>>
-	<<elseif (_S.HeadGirl.fetish == "dom")>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName dressed up as a school<<= $girl>>
-		<<if $slaves[$i].physicalAge > 16>>
-			to infantilize _his2 sub.
-		<<else>>
-			to highlight _his2 authority over _his2 young sub.
-		<</if>>
-		<<set $slaves[$i].clothes = "a schoolgirl outfit">>
-	<<elseif (_S.HeadGirl.fetish == "boobs")>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName wearing a string bikini, since _he2 likes seeing those tits.
-		<<set $slaves[$i].clothes = "a string bikini">>
-	<<elseif (_S.HeadGirl.fetish == "cumslut")>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName in restrictive latex, because _he2 likes how it draws attention to $his mouth.
-		<<set $slaves[$i].clothes = "restrictive latex">>
-	<<elseif (_S.HeadGirl.fetish == "humiliation")>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName in humiliating bondage gear, because _he2 likes to see others blush, too.
-		<<set $slaves[$i].clothes = "uncomfortable straps">>
-	<<elseif (_S.HeadGirl.fetish == "sadist")>>
-		_S.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 (_S.HeadGirl.fetish == "buttslut")>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName wearing nothing but slutty bangles, since _he2 likes dressing $him up but wants that butt bare.
-		<<set $slaves[$i].clothes = "slutty jewelry">>
-	<<elseif (_S.HeadGirl.fetish == "pregnancy" && isItemAccessible.entry("a huge empathy belly", "bellyAccessory", $slaves[$i]) == true)>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName wearing an empathy belly, since _he2 likes _his2 <<= $girl>>s with a bun in the oven.
-		<<set $slaves[$i].bellyAccessory = "a large empathy belly">>
-	<<elseif (_S.HeadGirl.fetish == "pregnancy") && ($slaves[$i].preg > 0) && ($slaves[$i].pregSource == $HeadGirlID)>>
-		_S.HeadGirl.slaveName keeps the pregnant $slaves[$i].slaveName dressed as a slutty maid, since _he2 wants $him to look motherly yet fuckable while _he2 fantasizes about fucking $him pregnant again.
-		<<set $slaves[$i].clothes = "a slutty maid outfit">>
-	<<elseif (_S.HeadGirl.fetish == "pregnancy")>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName dressed as a slutty maid, since _he2 wants $him to look motherly yet fuckable while _he2 fantasizes about putting a bun in $his oven.
-		<<set $slaves[$i].clothes = "a slutty maid outfit">>
-	<<elseif (_S.HeadGirl.attrXX > 85)>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName wearing nice lingerie, since girls and girliness turn _him2 on.
-		<<set $slaves[$i].clothes = "attractive lingerie">>
-	<<elseif (_S.HeadGirl.attrXY > 85) && ($slaves[$i].dick > 0)>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName wearing slutty netting with a hole for $his dick to stick through, since _he2 likes it bare.
-		<<set $slaves[$i].clothes = "clubslut netting">>
-	<<else>>
-		_S.HeadGirl.slaveName keeps $slaves[$i].slaveName dressed as a slutty maid, since _he2 likes seeing $his body as $he looks after their suite.
-		<<set $slaves[$i].clothes = "a slutty maid outfit">>
-	<</if>>
-<<else>>
-	_S.HeadGirl.slaveName keeps $slaves[$i].slaveName dressed as a slutty maid, since _he2 likes seeing $his body as $he looks after their suite.
-	<<set $slaves[$i].clothes = "a slutty maid outfit">>
-<</if>>
-<<set $slaves[$i].devotion += 1>>
-
-<<if _S.HeadGirl.energy > 95>>
-	<<if _S.HeadGirl.bald != 1&& _S.HeadGirl.hLength > 0>>
-		<<if $slaves[$i].bald != 1>>
-			<<if !hasHColorRule($slaves[$i],$defaultRules)>>
-				<<if ($slaves[$i].hColor != _S.HeadGirl.hColor)>>
-					_S.HeadGirl.slaveName dyes $slaves[$i].slaveName's hair _S.HeadGirl.hColor, just like _his2 own, since with nymphomania comes narcissism.
-					<<set $slaves[$i].hColor = _S.HeadGirl.hColor>>
-				<</if>>
-			<</if>>
-			<<if !hasHStyleRule($slaves[$i],$defaultRules)>>
-				<<if ($slaves[$i].hStyle != _S.HeadGirl.hStyle)>>
-					_S.HeadGirl.slaveName styles $slaves[$i].slaveName's hair just like _his2 own, since with nymphomania comes narcissism.
-					<<set $slaves[$i].hStyle = _S.HeadGirl.hStyle>>
-					<<set $slaves[$i].hLength = _S.HeadGirl.hLength>>
-				<</if>>
-			<</if>>
-		<<else>>
-			<<if !hasHColorRule($slaves[$i],$defaultRules)>>
-				<<if ($slaves[$i].hColor != _S.HeadGirl.hColor)>>
-					_S.HeadGirl.slaveName changes $slaves[$i].slaveName's wig to _S.HeadGirl.hColor, just like _his2 own hair, since with nymphomania comes narcissism.
-					<<set $slaves[$i].hColor = _S.HeadGirl.hColor>>
-				<</if>>
-			<</if>>
-			<<if !hasHStyleRule($slaves[$i],$defaultRules)>>
-				<<if ($slaves[$i].hStyle != _S.HeadGirl.hStyle)>>
-					_S.HeadGirl.slaveName changes $slaves[$i].slaveName's wig style to look just like _his2 own hair, since with nymphomania comes narcissism.
-					<<set $slaves[$i].hStyle = _S.HeadGirl.hStyle>>
-					<<set $slaves[$i].hLength = _S.HeadGirl.hLength>>
-				<</if>>
-			<</if>>
-		<</if>>
-	<</if>>
-
-	<<if !hasEyeColorRule($slaves[$i], $defaultRules)>>
-	/* HG wants sub slave to have same eye color as her */
-	/* make sure the sub slave has both eyes, missing ones are replaced with glass */
-	<<if !hasLeftEye($slaves[$i])>>
-		<<run eyeSurgery($slaves[$i], "left", "glass")>>
-	<</if>>
-	<<if !hasRightEye($slaves[$i])>>
-		<<run eyeSurgery($slaves[$i]), "right", "glass">>
-	<</if>>
-
-	/* get eye colors, HG can be expected to have at least one working eye due to job requirements */
-	<<set _left = hasLeftEye(_S.HeadGirl) ? getLeftEyeColor(_S.HeadGirl) : getRightEyeColor(_S.HeadGirl)>>
-	<<set _right = hasRightEye(_S.HeadGirl) ? getRightEyeColor(_S.HeadGirl) : _left>>
-
-	/* make sure the slave has the same eye color as the HG */
-	<<if getLeftEyeColor($slaves[$i]) !== _left>>
-		<<run setEyeColor($slaves[$i], _left, "left")>>
-		_S.HeadGirl.slaveName <<if getLeftEyeType($slaves[$i] === 3)>> changes <<else>> gives <</if>> $slaves[$i].slaveName _left <<if getLeftEyeType($slaves[$i]) === 3>> eye lenses <<elseif getLeftEyeType($slaves[$i]) === 2>> glass eyes <<else>> contact lenses <</if>>, to match _his2 own left eye, since with nymphomania comes narcissism.
-	<</if>>
-	<<if getRightEyeColor($slaves[$i]) !== _right>>
-		<<run setEyeColor($slaves[$i], _right, "right")>>
-		_S.HeadGirl.slaveName <<if getRightEyeType($slaves[$i] === 3)>> changes <<else>> gives <</if>> $slaves[$i].slaveName _right <<if getLeftRightType($slaves[$i]) === 3>> eye lenses <<elseif getLeftRightType($slaves[$i]) === 2>> glass eyes <<else>> contact lenses <</if>>, to match _his2 own right eye, since with nymphomania comes narcissism.
-	<</if>>
-	<</if>>
-<</if>>
-
-<<if ($arcologies[0].FSRepopulationFocusPregPolicy == 1 || ($arcologies[0].FSRestart == "unset" && _S.HeadGirl.fetish == "pregnancy")) && canImpreg($slaves[$i], _S.HeadGirl) && ($dietFertility == 1)>>
-	_S.HeadGirl.slaveName thinks $slaves[$i].slaveName could do with a bigger bump <<if $arcologies[0].FSRepopulationFocusPregPolicy>>since pregnant <<= $girl>>s are all the rage in your arcology <</if>>
-	<<if _diet != "fertility">>
-		and assigns $him a diet to promote ovulation.
-	<<else>>
-		and keeps $him on $his fertility diet.
-	<</if>>
-<<elseif ($slaves[$i].weight < 100 && $arcologies[0].FSHedonisticDecadence >= 20) || ($slaves[$i].weight < -10)>>
-	_S.HeadGirl.slaveName thinks $slaves[$i].slaveName could use a little extra weight <<if $arcologies[0].FSHedonisticDecadence >= 20>>since plump <<= $girl>>s are all the rage in your arcology <</if>>
-	<<if _diet != "fattening">>
-		and assigns $him a diet to fatten $him up.
-	<<else>>
-		and keeps $him on $his fattening diet.
-	<</if>>
-<<elseif $slaves[$i].weight > 30 && $arcologies[0].FSHedonisticDecadence == "unset">>
-	_S.HeadGirl.slaveName thinks $slaves[$i].slaveName is a little too porky
-	<<if _diet != "restricted">>
-		and puts $him on a diet.
-	<<else>>
-		and keeps $him on $his diet.
-	<</if>>
-<<elseif
-	(
-		($slaves[$i].muscles <= 95 &&
-		(
-			($arcologies[0].FSPhysicalIdealist > 0 && $arcologies[0].FSPhysicalIdealistLaw == 0) ||
-			(
-				(_S.HeadGirl.fetish == "submissive" || _S.HeadGirl.fetish == "masochist") &&
-				_S.HeadGirl.fetishKnown == 1)
-			)
-		)
-		||
-		($slaves[$i].muscles <= 45 &&
-		(
-			$arcologies[0].FSPhysicalIdealist > 0 &&
-			$arcologies[0].FSPhysicalIdealistLaw == 1)
-		)
-		||
-		$slaves[$i].muscles <= 5 &&
-		(
-			!isAmputee($slaves[$i])
-		)
-	)>>
-	_S.HeadGirl.slaveName thinks $slaves[$i].slaveName
-	<<if _S.HeadGirl.fetish == "submissive">>
-		could use bigger muscles to better dominate _him2 with in bed
-	<<elseif _S.HeadGirl.fetish == "masochist">>
-		could use bigger muscles to better spank _him2
-	<<elseif $arcologies[0].FSPhysicalIdealist > 0>>
-		could use bigger muscles to support your societal goals
-	<<else>>
-		could use a bit of muscle
-	<</if>>
-	<<if _diet != "muscle building">>
-		and makes $him work out hard.
-	<<else>>
-		and keeps $him working out.
-	<</if>>
-<<elseif $slaves[$i].balls > 0 && _S.HeadGirl.fetish == "cumslut" && _S.HeadGirl.fetishKnown == 1 && $cumProDiet == 1>>
-	_S.HeadGirl.slaveName loves cum, so _he2
-	<<if _diet != "cum production">>
-		puts
-	<<else>>
-		keeps
-	<</if>>
-	$slaves[$i].slaveName on a diet designed to make $him cum harder and stronger.
-<<else>>
-	_S.HeadGirl.slaveName thinks $slaves[$i].slaveName is fine as is
-	<<if _diet != "healthy">>
-		and puts $him on a normal diet.
-	<<else>>
-		and keeps $him on $his healthy diet.
-	<</if>>
-<</if>>
-
-<<if $HGSuiteHormones != 0 && _hormones != 2>>
-	_S.HeadGirl.slaveName puts $slaves[$i].slaveName on intensive female hormones, since _he2 expects $him to act as the submissive, feminine partner.
-<</if>>
-
-<<if $HGSuiteDrugs != 0>>
-	<<if ($slaves[$i].health.condition < 60)>>
-		_S.HeadGirl.slaveName gives $slaves[$i].slaveName curatives, since _he2 wants a shiningly healthy living partner.
-	<</if>>
-	<<if ($slaves[$i].lips <= 20)>>
-		_S.HeadGirl.slaveName gives $slaves[$i].slaveName lip injections, since _he2 wants to get oral from plump, luscious lips.
-	<<elseif $arcologies[0].FSSlaveProfessionalismResearch == 1 && $HGSuiteEquality != 0 && canImproveIntelligence($slaves[$i])>>
-		_S.HeadGirl.slaveName gives $slaves[$i].slaveName psychostimulants, since $him being smarter will benefit them both when $he is in charge.
-	<<elseif (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetish == "buttslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].butt < 18>>
-		_S.HeadGirl.slaveName gives $slaves[$i].slaveName hyper ass injections, since _he2 never once thought it possible to fuck an ass as big as _he2 is.
-	<<elseif (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetish == "buttslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].butt < 8>>
-		_S.HeadGirl.slaveName gives $slaves[$i].slaveName ass injections, since _he2 likes comfortable padding as _he2 fucks a butt.
-	<<elseif (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetish == "cumslut") && $arcologies[0].FSAssetExpansionistResearch == 1 && $slaves[$i].balls < 100 && $slaves[$i].balls > 0 && $slaves[$i].dick > 0>>
-		_S.HeadGirl.slaveName gives $slaves[$i].slaveName hyper testicle injections, since _he2 wants to swim in a river of cum.
-	<<elseif (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetish == "cumslut") && $slaves[$i].balls < 10 && $slaves[$i].balls > 0 && $slaves[$i].dick > 0>>
-		_S.HeadGirl.slaveName gives $slaves[$i].slaveName testicle injections, since _he2 wants $slaves[$i].slaveName shooting bigger loads.
-	<<elseif (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetish == "masochist" || _S.HeadGirl.fetish == "submissive") && canImproveHeight($slaves[$i])>>
-		_S.HeadGirl.slaveName has a subconscious need to be hurt by the biggest, strongest $girl possible, so $he gives $slaves[$i].slaveName injections of growth stimulants to make $him grow taller.
-	<<elseif (_S.HeadGirl.fetishKnown == 1) && (_S.HeadGirl.fetish == "boobs") && ($slaves[$i].boobs < 8000)>>
-		_S.HeadGirl.slaveName gives $slaves[$i].slaveName <<if $arcologies[0].FSAssetExpansionistResearch == 1>>hyper <</if>> tit injections, since as far as _he2's concerned there's no such thing as too much boob.
-	<<elseif ($HGTastes == 4 || _S.HeadGirl.fetish == "pregnancy") && canImpreg($slaves[$i], _S.HeadGirl) && $arcologies[0].FSRestart == "unset">>
-		_S.HeadGirl.slaveName gives $slaves[$i].slaveName fertility enhancers, since _he2 wants to see $slaves[$i].slaveName heavy with child.
-	<<elseif $arcologies[0].FSRepopulationFocusPregPolicy == 1 && canImpreg($slaves[$i], _S.HeadGirl)>>
-		_S.HeadGirl.slaveName gives $slaves[$i].slaveName fertility enhancers, since pregnancy is popular and _he2 wants $slaves[$i].slaveName to look hot.
-	<<elseif $HGTastes > 1>>
-		<<if ($slaves[$i].lips <= 70)>>
-			_S.HeadGirl.slaveName gives $slaves[$i].slaveName lip injections, since _he2 thinks $slaves[$i].slaveName should have lips so big $he can barely speak.
-		<<elseif ($slaves[$i].boobs > (125*Math.pow($slaves[$i].butt, 2)))>>
-			_S.HeadGirl.slaveName gives $slaves[$i].slaveName ass injections, since _he2 loves curves and thinks $slaves[$i].slaveName's butt needs the most work.
-		<<else>>
-			_S.HeadGirl.slaveName gives $slaves[$i].slaveName boob injections, since _he2 loves curves and thinks $slaves[$i].slaveName's tits need the most work.
-		<</if>>
-	<</if>>
-<<else>>
-	<<if ($slaves[$i].health.condition < 100)>>
-		_S.HeadGirl.slaveName gives $slaves[$i].slaveName curatives, since _his2 assistant could be healthier.
-	<</if>>
-<</if>>
-
-<<if $HGSuiteSurgery != 0>>
-	<<if $arcologies[0].FSBodyPurist == "unset">>
-		_S.HeadGirl.slaveName sends $assistant.name notes on what surgical modifications _he2 wants for $slaves[$i].slaveName.
-		<<= rulesAutosurgery($slaves[$i])>>
-	<</if>>
-	<<if _S.HeadGirl.fetishKnown == 1>>
-		<<if (_S.HeadGirl.fetish == "sadist") && (_S.HeadGirl.fetishStrength > 95) && ($seeExtreme == 1) && ($slaves[$i].fetish != "mindbroken")>>
-			<<if ($slaves[$i].health.condition > 40)>>
-				<<if hasAnyNaturalLimbs($slaves[$i]) && ($slaves[$i].devotion < -20)>>
-					_S.HeadGirl.slaveName decides to extract the ultimate in sadistic pleasure from $slaves[$i].slaveName, and directs the autosurgery to @@.red;amputate $his <<if hasAnyArms($slaves[$i])>>arm<<if hasBothArms($slaves[$i])>>s<</if>> <<if hasAnyLegs($slaves[$i])>>and<</if>><</if>><<if hasAnyLegs($slaves[$i])>> leg<<if hasBothLegs($slaves[$i])>>s<</if>><</if>>.@@ _He2 carefully describes the entire process to the sobbing slave @@.gold;in minute detail@@ before allowing $him to be sedated.
-					<<set $slaves[$i].devotion -= 20, $slaves[$i].trust -= 20>>
-					<<run removeLimbs($slaves[$i], "all"), surgeryDamage($slaves[$i], 40)>>
-				<</if>>
-				<<if ($slaves[$i].balls > 0) && ($slaves[$i].devotion <= 50)>>
-					_S.HeadGirl.slaveName decides to have some once-only sadistic pleasure, and carefully straps $slaves[$i].slaveName into the surgery until $he's completely immobile. _S.HeadGirl.slaveName situates <<if canSee($slaves[$i])>>a mirror so the terrified $girl can see $his own crotch<<else>>$him so that the terrified $girl can sense what part of $his body is being manipulated even through the anesthetics<</if>>, gets behind $him, and carefully sodomizes $him during the entire process of @@.red;castration.@@ $slaves[$i].slaveName is anesthetized down there and can't feel the brutal anal rape, but $his abuser orgasms repeatedly to $him @@.gold;weeping at the <<if canSee($slaves[$i])>>sight<<else>>muted sensation<</if>> of being gelded and raped at once.@@
-					<<set $slaves[$i].devotion -= 20, $slaves[$i].trust -= 20, $slaves[$i].balls = 0>>
-					<<run surgeryDamage($slaves[$i], 20)>>
-				<</if>>
-			<</if>>
-			<<if ($slaves[$i].devotion < -90) && ($slaves[$i].fetish != "mindbroken")>>
-				_S.HeadGirl.slaveName tires of $slaves[$i].slaveName's protests that _S.HeadGirl.slaveName is a monster for hurting $him this way and $his complaints that $he deserves better. _S.HeadGirl.slaveName decides that it'll be just as much fun and a lot less trouble to mistreat $slaves[$i].slaveName once $he's mindbroken, and sends $him in for @@.red;chemical lobotomization.@@
-				<<set $slaves[$i].fetish = "mindbroken">>
-				<<run surgeryDamage($slaves[$i], 20)>>
-			<</if>>
-		<<elseif (_S.HeadGirl.fetish == "dom") && (_S.HeadGirl.fetishStrength > 60) && ($seeExtreme == 1) && ($slaves[$i].fetish != "mindbroken") && ($slaves[$i].devotion <= 50)>>
-			<<if ($slaves[$i].health.condition > 40)>>
-				<<if ($slaves[$i].heels == 0) && hasAnyNaturalLegs($slaves[$i])>>
-					_S.HeadGirl.slaveName is not satisfied with $slaves[$i].slaveName's submissiveness, and directs the autosurgery to @@.red;clip $his Achilles tendons.@@ Once the slave is recovered from surgery, _S.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].heels = 1, $slaves[$i].shoes = "none">>
-					<<run surgeryDamage($slaves[$i], 20)>>
-				<</if>>
-				<<if ($slaves[$i].balls > 0)>>
-					_S.HeadGirl.slaveName decides that it's counterproductive for $slaves[$i].slaveName to be able to get hard, and sends $him in to have $his @@.red;balls removed.@@ $slaves[$i].slaveName is horrified, but _S.HeadGirl.slaveName uses $his 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 $his new role as nothing but a recipient of anal.
-					<<set $slaves[$i].trust -= 10, $slaves[$i].balls = 0>>
-					<<run surgeryDamage($slaves[$i], 20)>>
-				<</if>>
-			<</if>>
-		<<elseif _S.HeadGirl.energy > 95>>
-			<<if ($slaves[$i].health.condition > 40) && ($slaves[$i].heels == 0) && hasAnyNaturalLegs($slaves[$i]) && ($slaves[$i].devotion <= 50) && ($slaves[$i].fetish != "mindbroken")>>
-				_S.HeadGirl.slaveName wants a good little bimbo who sticks $his 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, _S.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].heels = 1, $slaves[$i].shoes = "heels">>
-				<<run surgeryDamage($slaves[$i], 20)>>
-			<</if>>
-		<<elseif _S.HeadGirl.fetish == "masochist">>
-			<<if ($slaves[$i].health.condition > 40) && ($slaves[$i].heightImplant == 0) && ($slaves[$i].height < 185) && hasAllLimbs($slaves[$i])>>
-				_S.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 $him a little @@.lime;taller.@@
-				<<set $slaves[$i].heightImplant = 1, $slaves[$i].height += 10>>
-				<<run surgeryDamage($slaves[$i], 20)>>
-			<</if>>
-		<<elseif _S.HeadGirl.fetish == "submissive">>
-			<<if ($slaves[$i].health.condition > 40) && ($slaves[$i].heightImplant == 0) && ($slaves[$i].height < 185) && hasAllLimbs($slaves[$i])>>
-				_S.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 $him a little @@.lime;taller.@@
-				<<set $slaves[$i].heightImplant = 1, $slaves[$i].height += 10>>
-				<<run surgeryDamage($slaves[$i], 20)>>
-			<</if>>
-		<</if>>
-	<</if>>
-<</if>>
-
-<<if $HGSuiteEquality != 0>>
-	<<if $slaves[$i].devotion > 50>>
-		_S.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 _S.HeadGirl.devotion += 1, $slaves[$i].devotion += 1>>
-	<<else>>
-		$slaves[$i].slaveName is not a decent Head Girl candidate, so _S.HeadGirl.slaveName keeps the position for now.
-	<</if>>
-<<else>>
-	<<set _hgEnjoyment = $HGSuiteSurgery + $HGSuiteDrugs + $HGSuiteHormones>>
-	<<if _hgEnjoyment > 2>>
-		Your Head Girl @@.hotpink;really enjoys@@ being given total freedom to customize _his2 very own bitch.
-		<<set _S.HeadGirl.devotion += 2>>
-	<<elseif _hgEnjoyment == 2>>
-		Your Head Girl @@.hotpink;enjoys@@ being given freedom to customize _his2 very own $girl.
-		<<set _S.HeadGirl.devotion += 1>>
-	<<elseif _hgEnjoyment == 1>>
-		Your Head Girl @@.hotpink;appreciates@@ being given some freedom to customize _his2 own servant.
-		<<set _S.HeadGirl.devotion += 1>>
-	<</if>>
-<</if>>
-
-<<if (_S.HeadGirl.relationshipTarget == $slaves[$i].ID)>>
-	<<set (_S.HeadGirl.relationship = $slaves[$i].relationship)>>
-<</if>>
-
-<<if $showEWD == 0>>
-	/*<<run App.SlaveAssignment.choosesOwnClothes($slaves[$i])>>*/
-	<<run App.SlaveAssignment.rules($slaves[$i])>>
-	<<run App.SlaveAssignment.diet($slaves[$i])>>
-	<<run App.SlaveAssignment.longTermEffects($slaves[$i])>>
-	<<run App.SlaveAssignment.drugs($slaves[$i])>>
-	<<run App.SlaveAssignment.relationships($slaves[$i])>>
-	<<run App.SlaveAssignment.rivalries($slaves[$i])>>
-	<<run App.SlaveAssignment.devotion($slaves[$i])>>
-<<else>>
-	/*<<= App.SlaveAssignment.choosesOwnClothes($slaves[$i])>>*/
-	<<includeDOM App.SlaveAssignment.rules($slaves[$i])>>
-	<<= App.SlaveAssignment.diet($slaves[$i])>>
-	<<includeDOM App.SlaveAssignment.longTermEffects($slaves[$i])>>
-	<<= App.SlaveAssignment.drugs($slaves[$i])>>
-	<<= App.SlaveAssignment.relationships($slaves[$i])>>
-	<<= App.SlaveAssignment.rivalries($slaves[$i])>>
-	<br>&nbsp;&nbsp;&nbsp;&nbsp;<<= App.SlaveAssignment.devotion($slaves[$i])>>
-<</if>>
-
-<<unset $HGTastes>>
-- 
GitLab