diff --git a/src/uncategorized/saChoosesOwnClothes.tw b/src/uncategorized/saChoosesOwnClothes.tw
index 1a67492786e031561378ee1510263f1f0d30c488..ef0df3fe15cbe9dd7beea60c4b304c3c1048922b 100644
--- a/src/uncategorized/saChoosesOwnClothes.tw
+++ b/src/uncategorized/saChoosesOwnClothes.tw
@@ -12,9 +12,13 @@
 		$pronounCap finds $pronoun can inexplicably walk if $pronoun wears heels; a daily lesson for $object, as $pronoun forgets shortly after leaving.
 		<<set $slaves[$i].shoes = either("heels", "extreme heels", "boots")>>
 	<</if>>
-	<<if ($arcologies[0].FSRepopulationFocus > 0) && ($slaves[$i].preg <= 10) && ($slaves[$i].bellyImplant < 2000) && ($slaves[$i].inflation == 0)>>
+	<<if ($arcologies[0].FSRepopulationFocus > 0) && (!visibleBelly($slaves[$i]))>>
 		$pronounCap sees the fake bellies; since every girl $pronoun has ever met has a rounded middle, it's only natuaral $pronoun is compelled to wear one.
-		<<set $slaves[$i].bellyAccessory = "a large empathy belly">>
+		<<if $slaves[$i].weight > 130>>
+			She struggles to fit it around her huge gut, only stopping when another slave takes it away from her so she moves on and stops blocking the wardrobe with her fat ass.
+		<<else>>
+			<<set $slaves[$i].bellyAccessory = "a large empathy belly">>
+		<</if>>
 	<</if>>
 	Faced with so many choices and no thought on the matter;
 	<<if ($arcologies[0].FSChattelReligionist > 0)>>
@@ -95,16 +99,20 @@
 	<<set $slaves[$i].collar = "ancient Egyptian">>
 <</if>>
 
-<<if ($arcologies[0].FSRepopulationFocus > 0) && ($slaves[$i].preg <= 10) && ($slaves[$i].bellyImplant < 2000) && ($slaves[$i].inflation == 0) && $slaves[$i].sexualFlaw != "breeder">>
-	straps on a fake pregnant belly to fit in with all the other pregnant girls,
-	<<set $slaves[$i].bellyAccessory = "a large empathy belly">>
-<<elseif ($slaves[$i].preg <= 10) && $slaves[$i].inflation == 0 && ($slaves[$i].bellyImplant < 2000) && ($slaves[$i].fetish is "pregnancy") && ($clothesBoughtBelly == 1 || $cheatMode == 1 || $arcologies[0].FSRepopulationFocus != "unset") && $slaves[$i].sexualFlaw != "breeder">>
+<<if ($arcologies[0].FSRepopulationFocus > 0) && (!visibleBelly($slaves[$i])) && $slaves[$i].sexualFlaw != "breeder">>
+	<<if $slaves[$i].weight > 130>>
+		struggles to fit a fake pregnant belly around her gut before giving up and hoping she can pass as fecund,
+	<<else>>
+		straps on a fake pregnant belly to fit in with all the other pregnant girls,
+		<<set $slaves[$i].bellyAccessory = "a large empathy belly">>
+	<</if>>
+<<elseif (!visibleBelly($slaves[$i]) && ($slaves[$i].fetish == "pregnancy") && ($clothesBoughtBelly == 1 || $cheatMode == 1 || $arcologies[0].FSRepopulationFocus != "unset") && $slaves[$i].sexualFlaw != "breeder" && $slaves[$i].weight <= 130>>
 	<<if ($slaves[$i].fetishStrength <= 30)>>
-	  <<set $bellySeed = random(1,3)>>
-	  <<if $bellySeed == 1>>
+	  <<set _bellySeed = random(1,3)>>
+	  <<if _bellySeed == 1>>
 		straps on a 1st trimester belly to satisfy $possessive curiosity,
 		<<set $slaves[$i].bellyAccessory = "a small empathy belly">>
-	  <<elseif $bellySeed == 2>>
+	  <<elseif _bellySeed == 2>>
 		straps on a 2nd trimester belly to satisfy $possessive curiosity,
 		<<set $slaves[$i].bellyAccessory = "a medium empathy belly">>
 	  <<else>>
diff --git a/src/uncategorized/saLiveWithHG.tw b/src/uncategorized/saLiveWithHG.tw
index 1e3100f1dcfe1080c715319e401f696feb162b7a..860373c7f6dd0b348e166b828a18520a63afca28 100644
--- a/src/uncategorized/saLiveWithHG.tw
+++ b/src/uncategorized/saLiveWithHG.tw
@@ -4,50 +4,56 @@
 
 <<if $slaves[$i].devotion > 20>>
 	<<if $HGSlaveSuccess == 1>>
-	looks after your Head Girl <<SlaveFullName $HeadGirl>> domestically and sexually, freeing her to devote more of her time to looking after your other slaves.
+		looks after your Head Girl <<SlaveFullName $HeadGirl>> domestically and sexually, freeing her to devote more of her time to looking after your other slaves.
 	<<else>>
-	does her best to look after your Head Girl <<SlaveFullName $HeadGirl>> domestically and sexually, but doesn't free up much of her time this week.
+		does her best to look after your Head Girl <<SlaveFullName $HeadGirl>> domestically and sexually, but doesn't free up much of her time this week.
 	<</if>>
 <<elseif $slaves[$i].trust < -20>>
 	<<if $HGSlaveSuccess == 1>>
-	obeys Head Girl <<SlaveFullName $HeadGirl>> domestically and sexually, freeing her to devote more of her time to looking after your other slaves.
+		obeys Head Girl <<SlaveFullName $HeadGirl>> domestically and sexually, freeing her to devote more of her time to looking after your other slaves.
 	<<else>>
-	tries to look after your Head Girl <<SlaveFullName $HeadGirl>> domestically and sexually, but doesn't free up much of her time this week.
+		tries to look after your Head Girl <<SlaveFullName $HeadGirl>> domestically and sexually, but doesn't free up much of her time this week.
 	<</if>>
 <<else>>
 	<<if $HGSlaveSuccess == 1>>
-	resists Head Girl <<SlaveFullName $HeadGirl>>'s domestic and sexual use, but still frees her to devote more of her time to looking after your other slaves.
+		resists Head Girl <<SlaveFullName $HeadGirl>>'s domestic and sexual use, but still frees her to devote more of her time to looking after your other slaves.
 	<<else>>
-	resists Head Girl <<SlaveFullName $HeadGirl>>'s domestic and sexual use, and doesn't free up much of her time this week.
+		resists Head Girl <<SlaveFullName $HeadGirl>>'s domestic and sexual use, and doesn't free up much of her time this week.
 	<</if>>
 <</if>>
 
 <<if ($HeadGirl.fetish == "sadist") && ($HeadGirl.fetishStrength > 60) && ($HeadGirl.fetishKnown == 1)>>
 	Since $HeadGirl.slaveName is a sadist, poor $slaves[$i].slaveName lives a life of fear and pain.
 	<<if ($slaves[$i].energy > 95)>>
-	Though it's hard, she manages to find @@.hotpink;sexual satisfaction@@ being a pain slave.
-	<<set $slaves[$i].devotion += 4>>
-	<<elseif ($slaves[$i].fetish == "masochist")>>
-	<<if ($slaves[$i].fetishStrength > 95)>>
-		She finds deep @@.hotpink;sexual satisfaction@@ being a pain slave.
+		Though it's hard, she manages to find @@.hotpink;sexual satisfaction@@ being a pain slave.
 		<<set $slaves[$i].devotion += 4>>
-	<<else>>
-		This forces her to find solace in @@.lightcoral;deeper masochism.@@
-		<<set $slaves[$i].fetishStrength += 4>>
-	<</if>>
+	<<elseif ($slaves[$i].fetish == "masochist")>>
+		<<if $slaves[$i].fetishKnown == 1>>
+			<<if ($slaves[$i].fetishStrength > 95)>>
+				She finds deep @@.hotpink;sexual satisfaction@@ being a pain slave.
+				<<set $slaves[$i].devotion += 4>>
+			<<else>>
+				This forces her to find solace in @@.lightcoral;deeper masochism.@@
+				<<set $slaves[$i].fetishStrength += 4>>
+			<</if>>
+		<<else>>
+			Oddly enough, she seems to find it enjoyable; @@.lightcoral;she's a natural masochist.@@
+			<<set $slaves[$i].fetishKnown = 1>>
+		<</if>>
 	<<elseif ($slaves[$i].devotion < -20)>>
-	This rapidly fills her with @@.mediumorchid;hatred@@ and @@.mediumorchid;fear.@@
-	<<set $slaves[$i].devotion -= 10>>
-	<<set $slaves[$i].trust -= 10>>
+		This rapidly fills her with @@.mediumorchid;hatred@@ and @@.mediumorchid;fear.@@
+		<<set $slaves[$i].devotion -= 10, $slaves[$i].trust -= 10>>
 	<<elseif ($slaves[$i].devotion > 20)>>
-	This fills her with @@.mediumorchid;bitterness@@ and @@.mediumorchid;fear.@@
-	<<set $slaves[$i].devotion -= 5>>
-	<<set $slaves[$i].trust -= 5>>
+		This fills her with @@.mediumorchid;bitterness@@ and @@.mediumorchid;fear.@@
+		<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5>>
 	<</if>>
 <<elseif ($slaves[$i].devotion < -20)>>
 	<<if ($slaves[$i].trust >= -20)>>
-	Since she is not yet obedient, $HeadGirl.slaveName @@.gold;punishes@@ her constantly, training her to be a decent assistant or suffer pain.
-	<<set $slaves[$i].trust -= 5>>
+		Since she is not yet obedient, $HeadGirl.slaveName @@.gold;punishes@@ her constantly, training her to be a decent assistant or suffer pain.
+		<<set $slaves[$i].trust -= 5>>
+	<<else>>
+		Since she isn't suitably broken into slavery yet, $HeadGirl.slaveName trains her to be @@.hotpink;obediant@@ or suffer pain.
+		<<set $slaves[$i].devotion += 5>>
 	<</if>>
 <<elseif ($slaves[$i].devotion <= 20)>>
 	Since she is not yet well trained, $HeadGirl.slaveName instructs her, @@.hotpink;training@@ her to be a proper assistant.
@@ -65,147 +71,146 @@
 	<<set $HeadGirl.rivalry = 0, $HeadGirl.rivalryTarget = 0, $slaves[$i].rivalry = 0, $slaves[$i].rivalryTarget = 0>>
 <<elseif ($HeadGirl.relationship == 0)>>
 	<<if $familyTesting == 1>>
-	<<if $slaves[$i].mother == $HeadGirl.ID || $slaves[$i].father == $HeadGirl.ID || $slaves[$i].ID == $HeadGirl.mother || $slaves[$i].ID == $HeadGirl.father || areSisters($HeadGirl, $slaves[$i]) > 0>>
-	$HeadGirl.slaveName
-	<<if $HeadGirl.devotion > 95>>
-		is so inured to the perversities of slavery that she @@.hotpink;enjoys@@ the prospect of sexual service from her
-		<<set $HeadGirl.devotion += 1>>
-	<<elseif $HeadGirl.devotion > 60>>
-		is so devoted to you that she accepts the prospect of sexual service from her
-	<<else>>
-		is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexual service from her
-		<<set $HeadGirl.devotion -= 2>>
-	<</if>>
-	<<if $slaves[$i].mother == $HeadGirl.ID || $slaves[$i].father == $HeadGirl.ID>>
-		daughter.
-	<<elseif $HeadGirl.mother == $slaves[$i].ID>>
-		mother.
-	<<elseif $HeadGirl.father == $slaves[$i].ID>>
-		father.
-	<<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 @@.hotpink;enjoys@@ the prospect of sexually servicing her
-		<<set $slaves[$i].devotion += 1>>
-	<<elseif $slaves[$i].devotion > 60>>
-		is so devoted to you that she accepts the prospect of sexually servicing her
-	<<elseif $slaves[$i].devotion > 40>>
-		is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexually servicing her
-		<<set $slaves[$i].devotion -= 2>>
-	<<elseif $slaves[$i].devotion > 20>>
-		is @@.mediumorchid;disturbed@@ by the prospect of sexually servicing her
-		<<set $slaves[$i].devotion -= 4>>
-	<<elseif $slaves[$i].devotion >= -20>>
-		is @@.mediumorchid;strongly disturbed@@ by the prospect of sexually servicing her
-		<<set $slaves[$i].devotion -= 5>>
-	<<else>>
-		is @@.mediumorchid;revolted@@ by the prospect of sexually servicing her
-		<<set $slaves[$i].devotion -= 10>>
-	<</if>>
-	<<if $HeadGirl.mother == $slaves[$i].ID || $HeadGirl.father == $slaves[$i].ID>>
-		daughter.
-	<<elseif $slaves[$i].mother == $HeadGirl.ID>>
-		mother.
-	<<elseif $slaves[$i].father == $HeadGirl.ID>>
-		father.
-	<<elseif areSisters($HeadGirl, $slaves[$i]) == 1>>
-		twin.
-	<<elseif areSisters($HeadGirl, $slaves[$i]) == 2>>
-		sister.
-	<<elseif areSisters($HeadGirl, $slaves[$i]) == 3>>
-		half-sister.
-	<</if>>
-	<</if>>
+		<<if $slaves[$i].mother == $HeadGirl.ID || $slaves[$i].father == $HeadGirl.ID || $slaves[$i].ID == $HeadGirl.mother || $slaves[$i].ID == $HeadGirl.father || areSisters($HeadGirl, $slaves[$i]) > 0>>
+			$HeadGirl.slaveName
+			<<if $HeadGirl.devotion > 95>>
+				is so inured to the perversities of slavery that she @@.hotpink;enjoys@@ the prospect of sexual service from her
+				<<set $HeadGirl.devotion += 1>>
+			<<elseif $HeadGirl.devotion > 60>>
+				is so devoted to you that she accepts the prospect of sexual service from her
+			<<else>>
+				is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexual service from her
+				<<set $HeadGirl.devotion -= 2>>
+			<</if>>
+			<<if $slaves[$i].mother == $HeadGirl.ID || $slaves[$i].father == $HeadGirl.ID>>
+				daughter.
+			<<elseif $HeadGirl.mother == $slaves[$i].ID>>
+				mother.
+			<<elseif $HeadGirl.father == $slaves[$i].ID>>
+				father.
+			<<else>>
+				<<switch areSisters($HeadGirl, $slaves[$i])>>
+				<<case 1>>twin.
+				<<case 2>>sister.
+				<<case 3>>half-sister.
+				<</switch>>
+			<</if>>
+			$slaves[$i].slaveName
+			<<if $slaves[$i].devotion > 95>>
+				is so inured to the perversities of slavery that she @@.hotpink;enjoys@@ the prospect of sexually servicing her
+				<<set $slaves[$i].devotion += 1>>
+			<<elseif $slaves[$i].devotion > 60>>
+				is so devoted to you that she accepts the prospect of sexually servicing her
+			<<elseif $slaves[$i].devotion > 40>>
+				is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexually servicing her
+				<<set $slaves[$i].devotion -= 2>>
+			<<elseif $slaves[$i].devotion > 20>>
+				is @@.mediumorchid;disturbed@@ by the prospect of sexually servicing her
+				<<set $slaves[$i].devotion -= 4>>
+			<<elseif $slaves[$i].devotion >= -20>>
+				is @@.mediumorchid;strongly disturbed@@ by the prospect of sexually servicing her
+				<<set $slaves[$i].devotion -= 5>>
+			<<else>>
+				is @@.mediumorchid;revolted@@ by the prospect of sexually servicing her
+				<<set $slaves[$i].devotion -= 10>>
+			<</if>>
+			<<if $HeadGirl.mother == $slaves[$i].ID || $HeadGirl.father == $slaves[$i].ID>>
+				daughter.
+			<<elseif $slaves[$i].mother == $HeadGirl.ID>>
+				mother.
+			<<elseif $slaves[$i].father == $HeadGirl.ID>>
+				father.
+			<<else>>
+				<<switch areSisters($HeadGirl, $slaves[$i])>>
+				<<case 1>>twin.
+				<<case 2>>sister.
+				<<case 3>>half-sister.
+				<</switch>>
+			<</if>>
+		<</if>>
 	<<else>>
 	<<if $slaves[$i].relation != 0 && $slaves[$i].relationTarget == $HeadGirl.ID>>
-	$HeadGirl.slaveName
-	<<if $HeadGirl.devotion > 95>>
-		is so inured to the perversities of slavery that she @@.hotpink;enjoys@@ the prospect of sexual service from her
-		<<set $HeadGirl.devotion += 1>>
-	<<elseif $HeadGirl.devotion > 60>>
-		is so devoted to you that she accepts the prospect of sexual service from her
-	<<else>>
-		is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexual service from her
-		<<set $HeadGirl.devotion -= 2>>
-	<</if>>
-	<<if $HeadGirl.relation == "twin">>
-		twin.
-	<<elseif $HeadGirl.relation == "sister">>
-		sister.
-	<<elseif $HeadGirl.relation == "mother">>
-		daughter.
-	<<elseif $HeadGirl.relation == "daughter">>
-		mother.
-	<</if>>
-	$slaves[$i].slaveName
-	<<if $slaves[$i].devotion > 95>>
-		is so inured to the perversities of slavery that she @@.hotpink;enjoys@@ the prospect of sexually servicing her
-		<<set $slaves[$i].devotion += 1>>
-	<<elseif $slaves[$i].devotion > 60>>
-		is so devoted to you that she accepts the prospect of sexually servicing her
-	<<elseif $slaves[$i].devotion > 40>>
-		is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexually servicing her
-		<<set $slaves[$i].devotion -= 2>>
-	<<elseif $slaves[$i].devotion > 20>>
-		is @@.mediumorchid;disturbed@@ by the prospect of sexually servicing her
-		<<set $slaves[$i].devotion -= 4>>
-	<<elseif $slaves[$i].devotion >= -20>>
-		is @@.mediumorchid;strongly disturbed@@ by the prospect of sexually servicing her
-		<<set $slaves[$i].devotion -= 5>>
-	<<else>>
-		is @@.mediumorchid;revolted@@ by the prospect of sexually servicing her
-		<<set $slaves[$i].devotion -= 10>>
-	<</if>>
-	<<if $slaves[$i].relation == "twin">>
-		twin.
-	<<elseif $slaves[$i].relation == "sister">>
-		sister.
-	<<elseif $slaves[$i].relation == "mother">>
-		daughter.
-	<<elseif $slaves[$i].relation == "daughter">>
-		mother.
-	<</if>>
+		$HeadGirl.slaveName
+		<<if $HeadGirl.devotion > 95>>
+			is so inured to the perversities of slavery that she @@.hotpink;enjoys@@ the prospect of sexual service from her
+			<<set $HeadGirl.devotion += 1>>
+		<<elseif $HeadGirl.devotion > 60>>
+			is so devoted to you that she accepts the prospect of sexual service from her
+		<<else>>
+			is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexual service from her
+			<<set $HeadGirl.devotion -= 2>>
+		<</if>>
+		<<if $HeadGirl.relation == "twin">>
+			twin.
+		<<elseif $HeadGirl.relation == "sister">>
+			sister.
+		<<elseif $HeadGirl.relation == "mother">>
+			daughter.
+		<<elseif $HeadGirl.relation == "daughter">>
+			mother.
+		<</if>>
+		$slaves[$i].slaveName
+		<<if $slaves[$i].devotion > 95>>
+			is so inured to the perversities of slavery that she @@.hotpink;enjoys@@ the prospect of sexually servicing her
+			<<set $slaves[$i].devotion += 1>>
+		<<elseif $slaves[$i].devotion > 60>>
+			is so devoted to you that she accepts the prospect of sexually servicing her
+		<<elseif $slaves[$i].devotion > 40>>
+			is somewhat @@.mediumorchid;disturbed@@ by the prospect of sexually servicing her
+			<<set $slaves[$i].devotion -= 2>>
+		<<elseif $slaves[$i].devotion > 20>>
+			is @@.mediumorchid;disturbed@@ by the prospect of sexually servicing her
+			<<set $slaves[$i].devotion -= 4>>
+		<<elseif $slaves[$i].devotion >= -20>>
+			is @@.mediumorchid;strongly disturbed@@ by the prospect of sexually servicing her
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			is @@.mediumorchid;revolted@@ by the prospect of sexually servicing her
+			<<set $slaves[$i].devotion -= 10>>
+		<</if>>
+		<<if $slaves[$i].relation == "twin">>
+			twin.
+		<<elseif $slaves[$i].relation == "sister">>
+			sister.
+		<<elseif $slaves[$i].relation == "mother">>
+			daughter.
+		<<elseif $slaves[$i].relation == "daughter">>
+			mother.
+		<</if>>
 	<</if>>
 	<</if>> /*closes extended family mode */
 	<<if ($slaves[$i].relationship == 0) && ($slaves[$i].devotion > 20)>>
-	$slaves[$i].slaveName sees $HeadGirl.slaveName constantly, and does her best to @@.lightgreen;become her friend.@@
-	<<set $HeadGirl.relationship = 1, $HeadGirl.relationshipTarget = $slaves[$i].ID, $slaves[$i].relationship = 1, $slaves[$i].relationshipTarget = $HeadGirl.ID>>
-	<<elseif ($slaves[$i].relationship != 5) && ($slaves[$i].relationshipTarget != $HeadGirl.ID)>>
-	<<for $j = 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 = 0, $slaves[$i].relationshipTarget = 0, $slaves[$j].relationship = 0, $slaves[$j].relationshipTarget = 0>>
-		<<break>>
-		<</if>>
-	<</for>>
+		$slaves[$i].slaveName sees $HeadGirl.slaveName constantly, and does her best to @@.lightgreen;become her friend.@@
+		<<set $HeadGirl.relationship = 1, $HeadGirl.relationshipTarget = $slaves[$i].ID, $slaves[$i].relationship = 1, $slaves[$i].relationshipTarget = $HeadGirl.ID>>
+	<<elseif ($slaves[$i].relationship == -2) && ($slaves[$i].devotion > 20) && ($slaves[$i].devotion > 50)>>
+		$slaves[$i].slaveName sees $HeadGirl.slaveName so much more than she see you and begins to warm up to her instead of you, @@.lightgreen;becoming her friend.@@
+		<<set $HeadGirl.relationship = 1, $HeadGirl.relationshipTarget = $slaves[$i].ID, $slaves[$i].relationship = 1, $slaves[$i].relationshipTarget = $HeadGirl.ID>>
+	<<elseif ($slaves[$i].relationship != 5) && ($slaves[$i].relationship > 0) && ($slaves[$i].relationshipTarget != $HeadGirl.ID)>>
+		<<set _j = $slaves.findIndex(function(s) { return s.ID == $slaves[$i].relationshipTarget; })>>
+		$slaves[_j].slaveName cannot compete with $HeadGirl.slaveName, and her relationship with the Head Girl's bitch fades.
+		<<set $slaves[$i].relationship = 0, $slaves[$i].relationshipTarget = 0, $slaves[_j].relationship = 0, $slaves[_j].relationshipTarget = 0>>
 	<</if>>
 <<else>>
 	<<if ($HeadGirl.relationshipTarget == $slaves[$i].ID)>>
-	<<set $slaves[$i].trust += 1, $HeadGirl.trust += 1>>
-	<<if $slaves[$i].relationship <= 2>>
-		Since $HeadGirl.slaveName and $slaves[$i].slaveName are already friends, they're @@.mediumaquamarine;thankful@@ to you for allowing it. After a few nights of offering each other sexual comfort, they consider themselves @@.lightgreen;friends with benefits.@@
-		<<set $HeadGirl.relationship = 3, $HeadGirl.relationshipTarget = $slaves[$i].ID>>
-		<<set $slaves[$i].relationship = 3, $slaves[$i].relationshipTarget = $HeadGirl.ID>>
-	<<elseif $slaves[$i].relationship <= 3>>
-		Since $HeadGirl.slaveName and $slaves[$i].slaveName are already lovers, they both @@.hotpink;enjoy@@ living together and are @@.mediumaquamarine;thankful@@ to you for allowing it. After living together for a few days, they draw closer emotionally, too, and consider themselves @@.lightgreen;lovers.@@
-		<<set $HeadGirl.relationship = 4, $HeadGirl.relationshipTarget = $slaves[$i].ID>>
-		<<set $slaves[$i].relationship = 4, $slaves[$i].relationshipTarget = $HeadGirl.ID>>
-	<<elseif $slaves[$i].relationship <= 4>>
-		<<if ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetishStrength <= 60) && ($HeadGirl.fetish == "sadist") && ($slaves[$i].fetish != "masochist")>>
-		Since their relationship is very abusive, only $HeadGirl.slaveName @@.hotpink;enjoys@@ living together with $slaves[$i].slaveName.
-		<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5>>
+		<<set $slaves[$i].trust += 1, $HeadGirl.trust += 1>>
+		<<if $slaves[$i].relationship <= 2>>
+			Since $HeadGirl.slaveName and $slaves[$i].slaveName are already friends, they're @@.mediumaquamarine;thankful@@ to you for allowing it. After a few nights of offering each other sexual comfort, they consider themselves @@.lightgreen;friends with benefits.@@
+			<<set $HeadGirl.relationship = 3, $HeadGirl.relationshipTarget = $slaves[$i].ID>>
+			<<set $slaves[$i].relationship = 3, $slaves[$i].relationshipTarget = $HeadGirl.ID>>
+		<<elseif $slaves[$i].relationship <= 3>>
+			Since $HeadGirl.slaveName and $slaves[$i].slaveName are already lovers, they both @@.hotpink;enjoy@@ living together and are @@.mediumaquamarine;thankful@@ to you for allowing it. After living together for a few days, they draw closer emotionally, too, and consider themselves @@.lightgreen;lovers.@@
+			<<set $HeadGirl.relationship = 4, $HeadGirl.relationshipTarget = $slaves[$i].ID>>
+			<<set $slaves[$i].relationship = 4, $slaves[$i].relationshipTarget = $HeadGirl.ID>>
+		<<elseif $slaves[$i].relationship <= 4>>
+			<<if ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetishStrength <= 60) && ($HeadGirl.fetish == "sadist") && ($slaves[$i].fetish != "masochist")>>
+				Since their relationship is very abusive, only $HeadGirl.slaveName @@.hotpink;enjoys@@ living together with $slaves[$i].slaveName.
+				<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5>>
+			<<else>>
+				Since $HeadGirl.slaveName and $slaves[$i].slaveName are lovers, they @@.hotpink;enjoy@@ living together.
+			<</if>>
 		<<else>>
-		Since $HeadGirl.slaveName and $slaves[$i].slaveName are lovers, they @@.hotpink;enjoy@@ living together.
+			Since $HeadGirl.slaveName and $slaves[$i].slaveName are slave wives, they @@.hotpink;enjoy@@ living together.
 		<</if>>
-	<<else>>
-		Since $HeadGirl.slaveName and $slaves[$i].slaveName are slave wives, they @@.hotpink;enjoy@@ living together.
-	<</if>>
 	<</if>>
 <</if>>
 
@@ -230,198 +235,288 @@
 	<<set $slaves[$i].behavioralFlaw = "none">>
 <</if>>
 
-<<if canDoVaginal($slaves[$i])>>
-<<if ($slaves[$i].vagina == 0)>>
-	$HeadGirl.slaveName @@.hotpink;loves@@ @@.lime;taking@@ $slaves[$i].slaveName's virginity, and spends much of the week ogling her conquest complacently.
-	<<set $slaves[$i].vagina = 1, $HeadGirl.devotion += 4>>
-<<elseif ($slaves[$i].vagina == 1)>>
-	<<if canPenetrate($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 @@.lime;loosens@@ the poor girl's pussy.
-		<<set $slaves[$i].vagina += 1>>
-	<<elseif ($HeadGirl.dick > 5)>>
-		Serving $HeadGirl.slaveName's monster cock @@.lime;loosens@@ $slaves[$i].slaveName's pussy.
-		<<set $slaves[$i].vagina += 1>>
-	<</if>>
-	<</if>>
-<<elseif ($slaves[$i].vagina == 2)>>
-	<<if canPenetrate($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 @@.lime;loosens@@ the poor girl's pussy.
-		<<set $slaves[$i].vagina += 1>>
-	<</if>>
-	<</if>>
-<</if>>
-<</if>>
-<<if canDoAnal($slaves[$i])>>
-<<if ($slaves[$i].anus == 0)>>
-	$HeadGirl.slaveName @@.hotpink;relishes@@ @@.lime;taking@@ $slaves[$i].slaveName's anal virginity, and spends much of the week groping her conquest's rear end possessively.
-	<<set $slaves[$i].anus = 1, $HeadGirl.devotion += 4>>
-<<elseif ($slaves[$i].anus == 1)>>
-	<<if canPenetrate($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 @@.lime;loosens@@ her sphincter.
-		<<set $slaves[$i].anus += 1>>
-	<<elseif ($HeadGirl.dick > 5)>>
-		Taking $HeadGirl.slaveName's monster cock up the butt @@.lime;loosens@@ $slaves[$i].slaveName's anal sphincter.
-		<<set $slaves[$i].anus += 1>>
-	<</if>>
+<<if canPenetrate($HeadGirl)>>
+	<<if canDoVaginal($slaves[$i])>>
+		<<if ($slaves[$i].vagina == 0)>>
+			$HeadGirl.slaveName @@.hotpink;loves@@ @@.lime;taking@@ $slaves[$i].slaveName's virginity, and spends much of the week ogling her conquest complacently.
+			<<set $slaves[$i].vagina = 1, $HeadGirl.devotion += 4>>
+		<<elseif ($slaves[$i].vagina == 1)>>
+			<<if ($HeadGirl.dick > 4) && ($HeadGirl.energy > 95)>>
+				$HeadGirl.slaveName has such a ferocious sex drive and such a big dick that her constant pounding of $slaves[$i].slaveName @@.lime;loosens@@ the poor girl's pussy.
+				<<set $slaves[$i].vagina += 1>>
+			<<elseif ($HeadGirl.dick > 5)>>
+				Serving $HeadGirl.slaveName's monster cock @@.lime;loosens@@ $slaves[$i].slaveName's pussy.
+				<<set $slaves[$i].vagina += 1>>
+			<</if>>
+		<<elseif ($slaves[$i].vagina == 2)>>
+			<<if ($HeadGirl.dick > 5) && ($HeadGirl.energy > 95)>>
+				$HeadGirl.slaveName has such a ferocious sex drive and such a monster cock that her constant pounding of $slaves[$i].slaveName @@.lime;loosens@@ the poor girl's pussy.
+				<<set $slaves[$i].vagina += 1>>
+			<</if>>
+		<<elseif ($slaves[$i].vagina == 3)>>
+			<<if ($HeadGirl.dick > 5) && ($HeadGirl.energy > 95) && random(1,100) > 80>>
+				$HeadGirl.slaveName has such a ferocious sex drive and such a monster cock that her constant pounding of $slaves[$i].slaveName's loose pussy inevitably leaves it @@.lime;gaping.@@
+				<<set $slaves[$i].vagina += 1>>
+			<</if>>
+		<</if>>
 	<</if>>
-<<elseif ($slaves[$i].anus == 2)>>
-	<<if canPenetrate($HeadGirl) && ($HeadGirl.dick > 5) && ($HeadGirl.energy > 95)>>
-		$HeadGirl.slaveName uses $slaves[$i].slaveName's anus to vent her sexual addiction. Constant assrape from the Head Girl's monster cock @@.lime;loosens@@ her sphincter.
-		<<set $slaves[$i].anus += 1>>
+	<<if canDoAnal($slaves[$i])>>
+		<<if ($slaves[$i].anus == 0)>>
+			$HeadGirl.slaveName @@.hotpink;relishes@@ @@.lime;taking@@ $slaves[$i].slaveName's anal virginity, and spends much of the week groping her conquest's rear end possessively.
+			<<set $slaves[$i].anus = 1, $HeadGirl.devotion += 4>>
+		<<elseif ($slaves[$i].anus == 1)>>
+			<<if ($HeadGirl.dick > 4) && ($HeadGirl.energy > 95)>>
+				$HeadGirl.slaveName uses $slaves[$i].slaveName's anus to vent her sexual addiction. Constant assrape from such a huge dick @@.lime;loosens@@ her sphincter.
+				<<set $slaves[$i].anus += 1>>
+			<<elseif ($HeadGirl.dick > 5)>>
+				Taking $HeadGirl.slaveName's monster cock up the butt @@.lime;loosens@@ $slaves[$i].slaveName's anal sphincter.
+				<<set $slaves[$i].anus += 1>>
+			<</if>>
+		<<elseif ($slaves[$i].anus == 2)>>
+			<<if ($HeadGirl.dick > 5) && ($HeadGirl.energy > 95)>>
+				$HeadGirl.slaveName uses $slaves[$i].slaveName's anus to vent her sexual addiction. Constant assrape from the Head Girl's monster cock @@.lime;loosens@@ her sphincter.
+				<<set $slaves[$i].anus += 1>>
+			<</if>>
+		<<elseif ($slaves[$i].anus == 3)>>
+			<<if ($HeadGirl.dick > 5) && ($HeadGirl.energy > 95) && random(1,100) > 80>>
+				$HeadGirl.slaveName uses $slaves[$i].slaveName's loose anus to vent her sexual addiction. Constant assrape from the Head Girl's monster cock eventually leaves it @@.lime;gaping.@@
+				<<set $slaves[$i].anus += 1>>
+			<</if>>
+		<</if>>
 	<</if>>
 <</if>>
-<</if>>
-
-<<if ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetish == "pregnancy") && canImpreg($slaves[$i], $HeadGirl)>>
-<<if $arcologies[0].FSRestart == "unset">>
-	$HeadGirl.slaveName promptly @@.lime;impregnates@@ $slaves[$i].slaveName, to your Head Girl's considerable @@.hotpink;satisfaction.@@
-	<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = $HeadGirl.ID, $HeadGirl.devotion += 4>>
-	<<SetPregType $slaves[$i]>>
-<<else>>
-	$HeadGirl.slaveName knows better than to even consider knocking up $slaves[$i].slaveName.
-<</if>>
-<</if>>
 
-<<if ($slaves[$i].devotion > 50)>>
-<<if (($slaves[$i].fetishStrength <= 95) || ($slaves[$i].fetishKnown == 0)) && ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetishStrength > 60) && ($slaves[$i].fetish != $HeadGirl.fetish) && ($slaves[$i].fetish != "mindbroken")>>
-	<<if ($HeadGirl.fetish == "submissive")>>
-		$slaves[$i].slaveName slowly gets used to $HeadGirl.slaveName's need to be sexually dominated, and begins to @@.pink;enjoy being a top@@ within the confines of the suite.
-		<<set $slaves[$i].fetish = "dom", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
-	<<elseif ($HeadGirl.fetish == "dom")>>
-		<<if ($slaves[$i].fetish != "submissive") || ($slaves[$i].fetish == 0)>>
-			$slaves[$i].slaveName slowly gets used to being tied up and fucked regularly, and accepts that it's how $HeadGirl.slaveName sexual attraction to her expresses itself. She begins to @@.pink;enjoy being a sub,@@ especially for $HeadGirl.slaveName.
-			<<set $slaves[$i].fetish = "submissive", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
+<<if ($HeadGirl.fetish == "pregnancy") && canImpreg($slaves[$i], $HeadGirl)>>
+	<<if $arcologies[0].FSRestart == "unset">>
+		$HeadGirl.slaveName promptly @@.lime;impregnates@@ 
+		<<if $HeadGirl.fetishKnown == 1>>
+			$slaves[$i].slaveName, to your Head Girl's considerable @@.hotpink;satisfaction.@@
+			<<set $HeadGirl.devotion += 4>>
+		<<else>>
+			$slaves[$i].slaveName. Her eagerness completely exposes her hidden @@.lightcoral;pregnancy kink.@@
+			<<set $HeadGirl.fetishKnown = 1>>
 		<</if>>
-	<<elseif ($HeadGirl.fetish == "boobs")>>
-		$HeadGirl.slaveName lavishes so much attention on $slaves[$i].slaveName's boobs that $slaves[$i].slaveName really starts to @@.pink;fetishize tits@@ too.
-		<<set $slaves[$i].fetish = "boobs", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
-	<<elseif ($HeadGirl.fetish == "pregnancy")>>
-		$slaves[$i].slaveName and $HeadGirl.slaveName spend so much time talking about pregnancy and fertility $slaves[$i].slaveName really starts to @@.pink;fetishize pregnancy@@ too.
-		<<set $slaves[$i].fetish = "pregnancy", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
-	<<elseif ($HeadGirl.fetish == "cumslut")>>
-		$slaves[$i].slaveName participates in enough of $HeadGirl.slaveName's cum games that she can't help but @@.pink;enjoy oral sex@@ herself.
-		<<set $slaves[$i].fetish = "cumslut", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
-	<<elseif ($HeadGirl.fetish == "humiliation")>>
-		$slaves[$i].slaveName has so much public sex with $HeadGirl.slaveName that she really starts to @@.pink;enjoy humiliation@@ herself.
-		<<set $slaves[$i].fetish = "humiliation", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
-	<<elseif ($HeadGirl.fetish == "buttslut")>>
-		$slaves[$i].slaveName takes $HeadGirl.slaveName's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on and dildos<</if>> up her poor anus so often that she starts to @@.pink;enjoy buttsex@@ herself.
-		<<set $slaves[$i].fetish = "buttslut", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
-	<<elseif ($HeadGirl.fetish == "masochist")>>
-		<<if ($slaves[$i].fetish != "submissive") || ($slaves[$i].fetish == 0)>>
-			$slaves[$i].slaveName is initially shocked to be asked to cause $HeadGirl.slaveName pain, but she slowly begins to understand the honestly sexual nature of the arrangement. She starts to @@.pink;enjoy causing pain,@@ since $HeadGirl.slaveName is clearly enjoying it so much.
-			<<set $slaves[$i].fetish = "sadist", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
+		<<KnockMeUp $slaves[$i] 100 2 $HeadGirl.ID>>
+		<<if ($HeadGirl.fetishStrength > 70) && canImpreg($HeadGirl, $slaves[$i])>>
+			Unsuprisingly, she gives in to her own cravings and takes $slaves[$i].slaveName's loads until she @@.lime;gets pregnant@@ too.
+			<<KnockMeUp $HeadGirl 100 2 $slaves[$i].ID>>
 		<</if>>
-	<<else>>
-		$slaves[$i].slaveName often takes $HeadGirl.slaveName's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> in the missionary position, after some light foreplay and before bed; she honestly enjoys the respectful lovemaking, and begins to @@.pink;enjoy vanilla sex@@ herself.
-		<<set $slaves[$i].fetish = "none", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
+	<<elseif  $HeadGirl.fetishKnown == 1>>
+		$HeadGirl.slaveName knows better than to even consider knocking up $slaves[$i].slaveName.
+	<</if>>
+<<elseif ($HeadGirl.fetish == "pregnancy") && canImpreg($HeadGirl, $slaves[$i])>>
+	<<if $arcologies[0].FSRestart == "unset" && ($HeadGirl.fetishStrength > 70)>>
+		$HeadGirl.slaveName promptly @@.lime;knocks herself up@@ with $slaves[$i].slaveName's 
+		<<if $HeadGirl.fetishKnown == 1>>
+			seed, to your Head Girl's considerable @@.hotpink;satisfaction.@@
+			<<set $HeadGirl.devotion += 4>>
+		<<else>>
+			seed. Her @@.hotpink;pride@@ over her new pregnancy and eagerness to get pregnant completely exposes her hidden, and powerful, @@.lightcoral;pregnancy fetish.@@
+			<<set $HeadGirl.fetishKnown = 1, $HeadGirl.devotion += 4>>
+		<</if>>
+		<<KnockMeUp $HeadGirl 100 2 $slaves[$i].ID>>
+	<<elseif  $HeadGirl.fetishKnown == 1>>
+		$HeadGirl.slaveName knows better than to even consider getting knocked up by $slaves[$i].slaveName.
 	<</if>>
 <</if>>
-<<if ($HeadGirl.attrKnown == 1)>>
-	<<if ($HeadGirl.attrXX > 85) && ($slaves[$i].attrXX > 65) && ($slaves[$i].attrXX <= 85)>>
-	$slaves[$i].slaveName and $HeadGirl.slaveName spend so much time giggling over which of your other slaves they think is prettiest (typically followed by giggling sex) that $slaves[$i].slaveName really starts to @@.green;fetishize girls@@ too.
-	<<set $slaves[$i].attrXX += 2, $slaves[$i].attrKnown = 1>>
-	<</if>>
-	<<if ($HeadGirl.attrXY > 85) && ($slaves[$i].attrXY > 65) && ($slaves[$i].attrXY <= 85)>>
-	$slaves[$i].slaveName and $HeadGirl.slaveName have so much fun debating which male citizens and slave dickgirls are cutest (typically followed by $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 @@.green;fetishize boys@@ too.
-	<<set $slaves[$i].attrXY += 2, $slaves[$i].attrKnown = 1>>
+
+<<if ($slaves[$i].devotion > 50)>>
+	<<if (($slaves[$i].fetishStrength <= 95) || ($slaves[$i].fetishKnown == 0)) && ($HeadGirl.fetishKnown == 1) && ($HeadGirl.fetishStrength > 60) && ($slaves[$i].fetish != $HeadGirl.fetish) && ($slaves[$i].fetish != "mindbroken")>>
+		<<if ($HeadGirl.fetish == "submissive")>>
+			$slaves[$i].slaveName slowly gets used to $HeadGirl.slaveName's need to be sexually dominated, and begins to @@.pink;enjoy being a top@@ within the confines of the suite.
+			<<set $slaves[$i].fetish = "dom", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
+		<<elseif ($HeadGirl.fetish == "dom")>>
+			<<if ($slaves[$i].fetish != "submissive") || ($slaves[$i].fetish == 0)>>
+				$slaves[$i].slaveName slowly gets used to being tied up and fucked regularly, and accepts that it's how $HeadGirl.slaveName sexual attraction to her expresses itself. She begins to @@.pink;enjoy being a sub,@@ especially for $HeadGirl.slaveName.
+				<<set $slaves[$i].fetish = "submissive", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
+			<</if>>
+		<<elseif ($HeadGirl.fetish == "boobs")>>
+			$HeadGirl.slaveName lavishes so much attention on $slaves[$i].slaveName's boobs that $slaves[$i].slaveName really starts to @@.pink;fetishize tits@@ too.
+			<<set $slaves[$i].fetish = "boobs", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
+		<<elseif ($HeadGirl.fetish == "pregnancy")>>
+			$slaves[$i].slaveName and $HeadGirl.slaveName spend so much time talking about pregnancy and fertility $slaves[$i].slaveName really starts to @@.pink;fetishize pregnancy@@ too.
+			<<set $slaves[$i].fetish = "pregnancy", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
+		<<elseif ($HeadGirl.fetish == "cumslut")>>
+			$slaves[$i].slaveName participates in enough of $HeadGirl.slaveName's cum games that she can't help but @@.pink;enjoy oral sex@@ herself.
+			<<set $slaves[$i].fetish = "cumslut", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
+		<<elseif ($HeadGirl.fetish == "humiliation")>>
+			$slaves[$i].slaveName has so much public sex with $HeadGirl.slaveName that she really starts to @@.pink;enjoy humiliation@@ herself.
+			<<set $slaves[$i].fetish = "humiliation", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
+		<<elseif ($HeadGirl.fetish == "buttslut")>>
+			<<if canDoAnal($slaves[$i])>>
+				$slaves[$i].slaveName takes $HeadGirl.slaveName's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on and dildos<</if>> up her poor anus so often that she starts to @@.pink;enjoy buttsex@@ herself.
+			<<else>>
+				$HeadGirl.slaveName lavishes so much attention on $slaves[$i].slaveName's butt, since she can't use it, that $slaves[$i].slaveName really starts to @@.pink;fetishize rears@@ too.
+			<</if>>
+			<<set $slaves[$i].fetish = "buttslut", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
+		<<elseif ($HeadGirl.fetish == "masochist")>>
+			<<if ($slaves[$i].fetish != "submissive") || ($slaves[$i].fetish == 0)>>
+				$slaves[$i].slaveName is initially shocked to be asked to cause $HeadGirl.slaveName pain, but she slowly begins to understand the honestly sexual nature of the arrangement. She starts to @@.pink;enjoy causing pain,@@ since $HeadGirl.slaveName is clearly enjoying it so much.
+				<<set $slaves[$i].fetish = "sadist", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
+			<</if>>
+		<<else>>
+			$slaves[$i].slaveName often takes $HeadGirl.slaveName's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> in the missionary position, after some light foreplay and before bed; she honestly enjoys the respectful lovemaking, and begins to @@.pink;enjoy vanilla sex@@ herself.
+			<<set $slaves[$i].fetish = "none", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 10>>
+		<</if>>
 	<</if>>
-	<<if ($HeadGirl.energy > 95) && ($slaves[$i].energy <= 95)>>
-	$slaves[$i].slaveName has so much fun sex with $HeadGirl.slaveName that @@.green;her sex drive is slowly enhanced.@@
-	<<set $slaves[$i].energy += 2>>
+	<<if ($HeadGirl.attrKnown == 1)>>
+		<<if ($HeadGirl.attrXX > 85) && ($slaves[$i].attrXX > 65) && ($slaves[$i].attrXX <= 85)>>
+			$slaves[$i].slaveName and $HeadGirl.slaveName spend so much time giggling over which of your other slaves they think is prettiest (typically followed by giggling sex) that $slaves[$i].slaveName really starts to @@.green;fetishize girls@@ too.
+			<<set $slaves[$i].attrXX += 2, $slaves[$i].attrKnown = 1>>
+		<</if>>
+		<<if ($HeadGirl.attrXY > 85) && ($slaves[$i].attrXY > 65) && ($slaves[$i].attrXY <= 85)>>
+			$slaves[$i].slaveName and $HeadGirl.slaveName have so much fun debating which male citizens and slave dickgirls are cutest (typically followed by <<if canDoAnal($slaves[$i]) || canDoVaginal($slaves[$i])>>$HeadGirl.slaveName banging her girltoy <<if canPenetrate($HeadGirl)>>with a strap-on<<else>>senseless<</if>><<else>>giggling sex<</if>>) that $slaves[$i].slaveName really starts to @@.green;fetishize boys@@ too.
+			<<set $slaves[$i].attrXY += 2, $slaves[$i].attrKnown = 1>>
+		<</if>>
+		<<if ($HeadGirl.energy > 95) && ($slaves[$i].energy <= 95)>>
+			$slaves[$i].slaveName has so much fun sex with $HeadGirl.slaveName that @@.green;her sex drive is slowly enhanced.@@
+			<<set $slaves[$i].energy += 2>>
+		<</if>>
 	<</if>>
 <</if>>
-<</if>>
 
 <<set _cervixPump = 0>>
 <<if ($HeadGirl.fetishKnown == 1)>>
 	<<if ($HeadGirl.energy > 95)>>
-	$slaves[$i].slaveName spends a lot of time getting fucked in whichever hole $HeadGirl.slaveName decides to shove her <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> into next.
-	<<set $slaves[$i].oralCount += 5, $oralTotal += 5>>
-	<<set $slaves[$i].analCount += 5, $analTotal += 5>>
-	<<if ($slaves[$i].vagina > 0)>>
-		<<set $slaves[$i].vaginalCount += 5, $vaginalTotal += 5>>
-		<<set _cervixPump += 5>>
-	<<else>>
-		<<set $slaves[$i].analCount += 5, $analTotal += 5>>
-	<</if>>
-	<<set $HeadGirl.penetrativeCount += 15, $penetrativeTotal += 15>>
+		$slaves[$i].slaveName spends a lot of time getting fucked in whichever hole $HeadGirl.slaveName decides to shove her <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> into next.
+		<<set $slaves[$i].oralCount += 5, $oralTotal += 5>>
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += 5, $analTotal += 5>>
+		<<elseif $slaves[$i] >= 500>>
+			<<set $slaves[$i].mammaryCount += 5, $mammaryTotal += 5>>
+		<<else>>
+			<<set $slaves[$i].oralCount += 5, $oralTotal += 5>>
+		<</if>>
+		<<if ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
+			<<set $slaves[$i].vaginalCount += 5, $vaginalTotal += 5>>
+			<<set _cervixPump += 5>>
+		<<elseif canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += 5, $analTotal += 5>>
+		<<else>>
+			<<set $slaves[$i].oralCount += 5, $oralTotal += 5>>
+		<</if>>
+		<<set $HeadGirl.penetrativeCount += 15, $penetrativeTotal += 15>>
 	<<elseif ($HeadGirl.fetish == "submissive")>>
-	$HeadGirl.slaveName walks a fine line with $slaves[$i].slaveName. They work out a sexual life in which $HeadGirl.slaveName is in charge, but $slaves[$i].slaveName takes the sexual lead: $slaves[$i].slaveName serves her superior by taking her firmly.
-	<<set $slaves[$i].oralCount += 4, $oralTotal += 4>>
-	<<set $slaves[$i].analCount += 3, $analTotal += 3>>
-	<<if ($slaves[$i].vagina > 0)>>
-		<<set $slaves[$i].vaginalCount += 3, $vaginalTotal += 3>>
-		<<set _cervixPump += 3>>
-	<<else>>
-		<<set $slaves[$i].analCount += 3, $analTotal += 3>>
-	<</if>>
-	<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
+		$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, $oralTotal += 4>>
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += 3, $analTotal += 3>>
+		<<elseif $slaves[$i] >= 500>>
+			<<set $slaves[$i].mammaryCount += 3, $mammaryTotal += 3>>
+		<<else>>
+			<<set $slaves[$i].oralCount += 3, $oralTotal += 3>>
+		<</if>>
+		<<if ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
+			<<set $slaves[$i].vaginalCount += 3, $vaginalTotal += 3>>
+			<<set _cervixPump += 3>>
+		<<elseif canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += 3, $analTotal += 3>>
+		<<else>>
+			<<set $slaves[$i].oralCount += 3, $oralTotal += 3>>
+		<</if>>
+		<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
 	<<elseif ($HeadGirl.fetish == "dom")>>
-	$slaves[$i].slaveName serves $HeadGirl.slaveName as her sexual and moral inferior, taking the Head Girl's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> in all her holes. Though it isn't necessary with such an obedient partner, $slaves[$i].slaveName is often tied up for use.
-	<<set $slaves[$i].oralCount += 4, $oralTotal += 4>>
-	<<set $slaves[$i].analCount += 3, $analTotal += 3>>
-	<<if ($slaves[$i].vagina > 0)>>
-		<<set $slaves[$i].vaginalCount += 3, $vaginalTotal += 3>>
-		<<set _cervixPump += 3>>
-	<<else>>
-		<<set $slaves[$i].analCount += 3, $analTotal += 3>>
-	<</if>>
-	<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
+		$slaves[$i].slaveName serves $HeadGirl.slaveName as her sexual and moral inferior, taking the Head Girl's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> in all her holes. Though it isn't necessary with such an obedient partner, $slaves[$i].slaveName is often tied up for use.
+		<<set $slaves[$i].oralCount += 4, $oralTotal += 4>>
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += 3, $analTotal += 3>>
+		<<elseif $slaves[$i] >= 500>>
+			<<set $slaves[$i].mammaryCount += 3, $mammaryTotal += 3>>
+		<<else>>
+			<<set $slaves[$i].oralCount += 3, $oralTotal += 3>>
+		<</if>>
+		<<if ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
+			<<set $slaves[$i].vaginalCount += 3, $vaginalTotal += 3>>
+			<<set _cervixPump += 3>>
+		<<elseif canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += 3, $analTotal += 3>>
+		<<else>>
+			<<set $slaves[$i].oralCount += 3, $oralTotal += 3>>
+		<</if>>
+		<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
 	<<elseif ($HeadGirl.fetish == "humiliation")>>
-	$HeadGirl.slaveName is such an exhibitionist that $slaves[$i].slaveName finds herself taking $HeadGirl.slaveName's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> in public quite often.
-	<<set $slaves[$i].oralCount += 4, $oralTotal += 4>>
-	<<set $slaves[$i].analCount += 3, $analTotal += 3>>
-	<<if ($slaves[$i].vagina > 0)>>
-		<<set $slaves[$i].vaginalCount += 3, $vaginalTotal += 3>>
-		<<set _cervixPump += 3>>
-	<<else>>
-		<<set $slaves[$i].analCount += 3, $analTotal += 3>>
-	<</if>>
-	<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
+		$HeadGirl.slaveName is such an exhibitionist that $slaves[$i].slaveName finds herself taking $HeadGirl.slaveName's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> in public quite often.
+		<<set $slaves[$i].oralCount += 4, $oralTotal += 4>>
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += 3, $analTotal += 3>>
+		<<elseif $slaves[$i] >= 500>>
+			<<set $slaves[$i].mammaryCount += 3, $mammaryTotal += 3>>
+		<<else>>
+			<<set $slaves[$i].oralCount += 3, $oralTotal += 3>>
+		<</if>>
+		<<if ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
+			<<set $slaves[$i].vaginalCount += 3, $vaginalTotal += 3>>
+			<<set _cervixPump += 3>>
+		<<elseif canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += 3, $analTotal += 3>>
+		<<else>>
+			<<set $slaves[$i].oralCount += 3, $oralTotal += 3>>
+		<</if>>
+		<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
 	<<elseif ($HeadGirl.fetish == "boobs")>>
-	$HeadGirl.slaveName is such a boob fetishist that $slaves[$i].slaveName sometimes wonders whether $HeadGirl.slaveName thinks there are four clits in the suite: the four nipples between the two of them.
-	<<set $slaves[$i].oralCount += 4, $oralTotal += 4>>
-	<<set $slaves[$i].mammaryCount += 6, $mammaryTotal += 6>>
-	<<set $HeadGirl.mammaryCount += 10, $mammaryTotal += 10>>
+		$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, $oralTotal += 4>>
+		<<set $slaves[$i].mammaryCount += 6, $mammaryTotal += 6>>
+		<<set $HeadGirl.mammaryCount += 10, $mammaryTotal += 10>>
 	<<elseif ($HeadGirl.fetish == "buttslut")>>
-	$HeadGirl.slaveName takes a dominant sexual role with $slaves[$i].slaveName; she indulges her anal addiction by constantly buttfucking $slaves[$i].slaveName while wearing a vibrating plug herself.
-	<<set $slaves[$i].analCount += 10, $analTotal += 10>>
-	<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
+		$HeadGirl.slaveName takes a dominant sexual role with $slaves[$i].slaveName; she indulges her <<if canDoAnal($slaves[$i])anal addiction by constantly buttfucking $slaves[$i].slaveName<<else>>ass obsession by constantly molesting and using $slaves[$i].slaveName's buttcheeks as a sex toy<</if>> while wearing a vibrating plug herself.
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += 10, $analTotal += 10>>
+			<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
+		<</if>>
 	<<elseif ($HeadGirl.fetish == "cumslut")>>
-	$HeadGirl.slaveName takes a dominant sexual role with $slaves[$i].slaveName; she indulges her oral fixation with constant oral sex. She certainly applies her mouth to $slaves[$i].slaveName when she gets the chance, but $slaves[$i].slaveName does most of the sucking.
-	<<set $slaves[$i].oralCount += 20, $oralTotal += 20>>
-	<<set $HeadGirl.oralCount += 10, $oralTotal += 10>>
-	<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
+		$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, $oralTotal += 20>>
+		<<set $HeadGirl.oralCount += 10, $oralTotal += 10>>
+		<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
 	<<elseif ($HeadGirl.fetish == "masochist")>>
-	$HeadGirl.slaveName carefully structures her sexual games with $slaves[$i].slaveName to gratify her deep need to be physically hurt during sex without damaging her leadership. Usually, $slaves[$i].slaveName tortures $HeadGirl.slaveName until she's quite sated, and then takes a rough buttfuck from the aroused $HeadGirl.slaveName's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> to restore their relative positions.
-	<<set $slaves[$i].analCount += 10, $analTotal += 10>>
-	<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
+		$HeadGirl.slaveName carefully structures her sexual games with $slaves[$i].slaveName to gratify her deep need to be physically hurt during sex without damaging her leadership. Usually, $slaves[$i].slaveName tortures $HeadGirl.slaveName until she's quite sated, and then takes a rough <<if canDoAnal($slaves[$i])>>buttfuck<<else>>facefucking<</if>> from the aroused $HeadGirl.slaveName's <<if canPenetrate($HeadGirl)>>dick<<else>>strap-on<</if>> to restore their relative positions.
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += 10, $analTotal += 10>>
+		<<else>>
+			<<set $slaves[$i].oralCount += 10, $oralTotal += 10>>
+		<</if>>
+		<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
 	<<elseif ($HeadGirl.attrXX > 65)>>
-	$HeadGirl.slaveName expects $slaves[$i].slaveName to be girlish sexually, and $slaves[$i].slaveName spends a lot of time on her knees.
-	<<set $slaves[$i].oralCount += 6, $oralTotal += 6>>
-	<<set $slaves[$i].analCount += 2, $analTotal += 2>>
-	<<if ($slaves[$i].vagina > 0)>>
-		<<set $slaves[$i].vaginalCount += 2, $vaginalTotal += 2>>
-		<<set _cervixPump += 2>>
-	<<else>>
-		<<set $slaves[$i].analCount += 2, $analTotal += 2>>
-	<</if>>
-	<<set $HeadGirl.penetrativeCount += 8, $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, $oralTotal += 4>>
-	<<set $slaves[$i].analCount += 3, $analTotal += 3>>
-	<<if ($slaves[$i].vagina > 0)>>
-		<<set $slaves[$i].vaginalCount += 3, $vaginalTotal += 3>>
-		<<set _cervixPump += 3>>
+		$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, $oralTotal += 6>>
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount++, $analTotal++>>
+		<<elseif $slaves[$i] >= 500>>
+			<<set $slaves[$i].mammaryCount++, $mammaryTotal++>>
+		<<else>>
+			<<set $slaves[$i].oralCount++, $oralTotal++>>
+		<</if>>
+		<<if ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
+			<<set $slaves[$i].vaginalCount++, $vaginalTotal++>>
+			<<set _cervixPump++>>
+		<<elseif canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount++, $analTotal++>>
+		<<else>>
+			<<set $slaves[$i].oralCount++, $oralTotal++>>
+		<</if>>
+		<<set $HeadGirl.penetrativeCount += 8, $penetrativeTotal += 8>>
 	<<else>>
-		<<set $slaves[$i].analCount += 3, $analTotal += 3>>
-	<</if>>
-	<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
+		$HeadGirl.slaveName takes a dominant sexual role with $slaves[$i].slaveName, mostly getting oral<<if canPenetrate($HeadGirl) && (canDoVaginal($slaves[$i]) || canDoAnal($slaves[$i]))>> and fucking her in the missionary position<<elseif $slaves[$i] >= 300>> and molesting her breasts<</if>>.
+		<<set $slaves[$i].oralCount += 4, $oralTotal += 4>>
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += 3, $analTotal += 3>>
+		<<elseif $slaves[$i] >= 300>>
+			<<set $slaves[$i].mammaryCount += 3, $mammaryTotal += 3>>
+		<<else>>
+			<<set $slaves[$i].oralCount += 3, $oralTotal += 3>>
+		<</if>>
+		<<if ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
+			<<set $slaves[$i].vaginalCount += 3, $vaginalTotal += 3>>
+			<<set _cervixPump += 3>>
+		<<elseif canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += 3, $analTotal += 3>>
+		<<elseif $slaves[$i] >= 300>>
+					<<set $slaves[$i].mammaryCount += 3, $mammaryTotal += 3>>
+		<<else>>
+			<<set $slaves[$i].oralCount += 3, $oralTotal += 3>>
+		<</if>>
+		<<set $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
 	<</if>>
 <</if>>
 
@@ -432,44 +527,47 @@
 
 <<if ($HeadGirl.fetishKnown == 1)>>
 	<<if ($HeadGirl.energy > 95)>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName naked so she doesn't have to waste any time tearing her clothes off.
-	<<set $slaves[$i].clothes = "no clothing">>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName naked so she doesn't have to waste any time tearing her clothes off.
+		<<set $slaves[$i].clothes = "no clothing">>
 	<<elseif ($HeadGirl.fetish == "submissive")>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed up in slutty power clothing, since she's attracted to competence.
-	<<set $slaves[$i].clothes = "slutty business attire">>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed up in slutty power clothing, since she's attracted to competence.
+		<<set $slaves[$i].clothes = "slutty business attire">>
 	<<elseif ($HeadGirl.fetish == "masochist")>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName in battledress, since she likes the fantasy of being raped by a soldier girl.
-	<<set $slaves[$i].clothes = "battledress">>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName in battledress, since she likes the fantasy of being raped by a soldier girl.
+		<<set $slaves[$i].clothes = "battledress">>
 	<<elseif ($HeadGirl.fetish == "dom")>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed up as a schoolgirl to infantilize her sub.
-	<<set $slaves[$i].clothes = "a schoolgirl outfit">>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed up as a schoolgirl to infantilize her sub.
+		<<set $slaves[$i].clothes = "a schoolgirl outfit">>
 	<<elseif ($HeadGirl.fetish == "boobs")>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing a string bikini, since she likes seeing those tits.
-	<<set $slaves[$i].clothes = "a string bikini">>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing a string bikini, since she likes seeing those tits.
+		<<set $slaves[$i].clothes = "a string bikini">>
 	<<elseif ($HeadGirl.fetish == "cumslut")>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName in restrictive latex, because she likes how it draws attention to her mouth.
-	<<set $slaves[$i].clothes = "restrictive latex">>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName in restrictive latex, because she likes how it draws attention to her mouth.
+		<<set $slaves[$i].clothes = "restrictive latex">>
 	<<elseif ($HeadGirl.fetish == "humiliation")>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName in humiliating bondage gear, because she likes to see others blush, too.
-	<<set $slaves[$i].clothes = "uncomfortable straps">>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName in humiliating bondage gear, because she likes to see others blush, too.
+		<<set $slaves[$i].clothes = "uncomfortable straps">>
 	<<elseif ($HeadGirl.fetish == "sadist")>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName in humiliating bondage gear, because it can easily be tightened to cause considerable anguish.
-	<<set $slaves[$i].clothes = "uncomfortable straps">>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName in humiliating bondage gear, because it can easily be tightened to cause considerable anguish.
+		<<set $slaves[$i].clothes = "uncomfortable straps">>
 	<<elseif ($HeadGirl.fetish == "buttslut")>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing nothing but slutty bangles, since she likes dressing her up but wants that butt bare.
-	<<set $slaves[$i].clothes = "slutty jewelry">>
-	<<elseif ($HeadGirl.fetish == "pregnancy") && ($slaves[$i].preg <= 10) && ($clothesBoughtBelly == 1 || $cheatMode == 1)>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing an empathy belly, since she likes her girls with a bun in the oven.
-	<<set $slaves[$i].bellyAccessory = "a large empathy belly">>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing nothing but slutty bangles, since she likes dressing her up but wants that butt bare.
+		<<set $slaves[$i].clothes = "slutty jewelry">>
+	<<elseif ($HeadGirl.fetish == "pregnancy") && (!visibleBelly($slaves[$i])) && ($slaves[$i].weight <= 130) && ($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 = "a large empathy belly">>
+	<<elseif ($HeadGirl.fetish == "pregnancy")>>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed as a slutty maid, since she wants her to look motherly yet fuckable while she fantasizes about putting a bun in her oven.
+		<<set $slaves[$i].clothes = "a slutty maid outfit">>
 	<<elseif ($HeadGirl.attrXX > 85)>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing nice lingerie, since girls and girliness turn her on.
-	<<set $slaves[$i].clothes = "attractive lingerie">>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing nice lingerie, since girls and girliness turn her on.
+		<<set $slaves[$i].clothes = "attractive lingerie">>
 	<<elseif ($HeadGirl.attrXY > 85) && ($slaves[$i].dick > 0)>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing slutty netting with a hole for her dick to stick through, since she likes it bare.
-	<<set $slaves[$i].clothes = "clubslut netting">>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName wearing slutty netting with a hole for her dick to stick through, since she likes it bare.
+		<<set $slaves[$i].clothes = "clubslut netting">>
 	<<else>>
-	$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed as a slutty maid, since she likes seeing her body as she looks after their suite.
-	<<set $slaves[$i].clothes = "a slutty maid outfit">>
+		$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed as a slutty maid, since she likes seeing her body as she looks after their suite.
+		<<set $slaves[$i].clothes = "a slutty maid outfit">>
 	<</if>>
 <<else>>
 	$HeadGirl.slaveName keeps $slaves[$i].slaveName dressed as a slutty maid, since she likes seeing her body as she looks after their suite.
@@ -477,78 +575,60 @@
 <</if>>
 <<set $slaves[$i].devotion += 1>>
 
-<<if $HeadGirl.fetishKnown == 1 && $HeadGirl.energy > 95>>
-	<<if $slaves[$i].origHColor != "bald">>
-		<<if !hasHColorRule($slaves[$i],$defaultRules)>>
-			<<if ($slaves[$i].hColor != $HeadGirl.hColor)>>
-			$HeadGirl.slaveName dyes $slaves[$i].slaveName's hair $HeadGirl.hColor, just like her own, since with nymphomania comes narcissism.
-			<<set $slaves[$i].hColor = $HeadGirl.hColor>>
+<<if $HeadGirl.energy > 95>>
+	<<if $HeadGirl.bald != 1&& $HeadGirl.hLength > 0>>
+		<<if $slaves[$i].bald != 1>>
+			<<if !hasHColorRule($slaves[$i],$defaultRules)>>
+				<<if ($slaves[$i].hColor != $HeadGirl.hColor)>>
+					$HeadGirl.slaveName dyes $slaves[$i].slaveName's hair $HeadGirl.hColor, just like her own, since with nymphomania comes narcissism.
+					<<set $slaves[$i].hColor = $HeadGirl.hColor>>
+				<</if>>
 			<</if>>
-		<</if>>
-		<<if !hasHStyleRule($slaves[$i],$defaultRules)>>
-			<<if ($slaves[$i].hStyle != $HeadGirl.hStyle)>>
-			$HeadGirl.slaveName styles $slaves[$i].slaveName's hair just like her own, since with nymphomania comes narcissism.
-			<<set $slaves[$i].hStyle = $HeadGirl.hStyle>>
-			<<set $slaves[$i].hLength = $HeadGirl.hLength>>
+			<<if !hasHStyleRule($slaves[$i],$defaultRules)>>
+				<<if ($slaves[$i].hStyle != $HeadGirl.hStyle)>>
+					$HeadGirl.slaveName styles $slaves[$i].slaveName's hair just like her own, since with nymphomania comes narcissism.
+					<<set $slaves[$i].hStyle = $HeadGirl.hStyle>>
+					<<set $slaves[$i].hLength = $HeadGirl.hLength>>
+				<</if>>
 			<</if>>
-		<</if>>
-	<<else>>
-		<<if !hasHColorRule($slaves[$i],$defaultRules)>>
-			<<if ($slaves[$i].hColor != $HeadGirl.hColor)>>
-			$HeadGirl.slaveName changes $slaves[$i].slaveName's wig to $HeadGirl.hColor, just like her own hair, since with nymphomania comes narcissism.
-			<<set $slaves[$i].hColor = $HeadGirl.hColor>>
+		<<else>>
+			<<if !hasHColorRule($slaves[$i],$defaultRules)>>
+				<<if ($slaves[$i].hColor != $HeadGirl.hColor)>>
+					$HeadGirl.slaveName changes $slaves[$i].slaveName's wig to $HeadGirl.hColor, just like her own hair, since with nymphomania comes narcissism.
+					<<set $slaves[$i].hColor = $HeadGirl.hColor>>
+				<</if>>
 			<</if>>
-		<</if>>
-		<<if !hasHStyleRule($slaves[$i],$defaultRules)>>
-			<<if ($slaves[$i].hStyle != $HeadGirl.hStyle)>>
-			$HeadGirl.slaveName changes $slaves[$i].slaveName's wig style to look just like her own hair, since with nymphomania comes narcissism.
-			<<set $slaves[$i].hStyle = $HeadGirl.hStyle>>
-			<<set $slaves[$i].hLength = $HeadGirl.hLength>>
+			<<if !hasHStyleRule($slaves[$i],$defaultRules)>>
+				<<if ($slaves[$i].hStyle != $HeadGirl.hStyle)>>
+					$HeadGirl.slaveName changes $slaves[$i].slaveName's wig style to look just like her own hair, since with nymphomania comes narcissism.
+					<<set $slaves[$i].hStyle = $HeadGirl.hStyle>>
+					<<set $slaves[$i].hLength = $HeadGirl.hLength>>
+				<</if>>
 			<</if>>
 		<</if>>
 	<</if>>
 	<<if $slaves[$i].origEye == "none">>
 		<<if !hasEyeColorRule($slaves[$i],$defaultRules)>>
 			<<if ($slaves[$i].eyeColor != $HeadGirl.eyeColor)>>
-			<<set $slaves[$i].eyeColor = $HeadGirl.eyeColor>>
-			$HeadGirl.slaveName gives $slaves[$i].slaveName $slaves[$i].eyeColor glass eyes, to match her own eyes, since with nymphomania comes narcissism.
+				<<set $slaves[$i].eyeColor = $HeadGirl.eyeColor>>
+				$HeadGirl.slaveName gives $slaves[$i].slaveName $slaves[$i].eyeColor glass eyes, to match her own eyes, since with nymphomania comes narcissism.
 			<</if>>
 		<</if>>
 	<<elseif $slaves[$i].origEye == "implant">>
 		<<if !hasEyeColorRule($slaves[$i],$defaultRules)>>
 			<<if ($slaves[$i].eyeColor != $HeadGirl.eyeColor)>>
-			<<set $slaves[$i].eyeColor = $HeadGirl.eyeColor>>
-			$HeadGirl.slaveName changes $slaves[$i].slaveName $slaves[$i].eyeColor eye lenses, to match her own eyes, since with nymphomania comes narcissism.
+				<<set $slaves[$i].eyeColor = $HeadGirl.eyeColor>>
+				$HeadGirl.slaveName changes $slaves[$i].slaveName $slaves[$i].eyeColor eye lenses, to match her own eyes, since with nymphomania comes narcissism.
 			<</if>>
 		<</if>>
 	<<else>>
 		<<if !hasEyeColorRule($slaves[$i],$defaultRules)>>
 			<<if ($slaves[$i].eyeColor != $HeadGirl.eyeColor)>>
-			<<set $slaves[$i].eyeColor = $HeadGirl.eyeColor>>
-			$HeadGirl.slaveName gives $slaves[$i].slaveName $slaves[$i].eyeColor contact lenses, to match her own eyes, since with nymphomania comes narcissism.
+				<<set $slaves[$i].eyeColor = $HeadGirl.eyeColor>>
+				$HeadGirl.slaveName gives $slaves[$i].slaveName $slaves[$i].eyeColor contact lenses, to match her own eyes, since with nymphomania comes narcissism.
 			<</if>>
 		<</if>>
 	<</if>>
-
-	<<if !hasHColorRule($slaves[$i],$defaultRules)>>
-		<<if ($slaves[$i].hColor != $HeadGirl.hColor)>>
-		$HeadGirl.slaveName dyes $slaves[$i].slaveName's hair $HeadGirl.hColor, just like her own, since with nymphomania comes narcissism.
-		<<set $slaves[$i].hColor = $HeadGirl.hColor>>
-		<</if>>
-	<</if>>
-	<<if !hasHStyleRule($slaves[$i],$defaultRules)>>
-		<<if ($slaves[$i].hStyle != $HeadGirl.hStyle)>>
-		$HeadGirl.slaveName styles $slaves[$i].slaveName's hair just like her own, since with nymphomania comes narcissism.
-		<<set $slaves[$i].hStyle = $HeadGirl.hStyle>>
-		<<set $slaves[$i].hLength = $HeadGirl.hLength>>
-		<</if>>
-	<</if>>
-	<<if !hasEyeColorRule($slaves[$i],$defaultRules)>>
-		<<if ($slaves[$i].eyeColor != $HeadGirl.eyeColor)>>
-		<<set $slaves[$i].eyeColor = $HeadGirl.eyeColor>>
-		$HeadGirl.slaveName gives $slaves[$i].slaveName $slaves[$i].eyeColor contact lenses, to match her own eyes, since with nymphomania comes narcissism.
-		<</if>>
-	<</if>>
 <</if>>
 
 <<if ($slaves[$i].weight > 30) && ($slaves[$i].diet != "restricted")>>
@@ -576,11 +656,9 @@
 	<<set $slaves[$i].diet = "healthy">>
 <</if>>
 
-<<if $HGSuiteHormones != 0>>
-	<<if $slaves[$i].hormones != 2>>
+<<if $HGSuiteHormones != 0 && $slaves[$i].hormones != 2>>
 	$HeadGirl.slaveName puts $slaves[$i].slaveName on intensive female hormones, since she expects her to act as the submissive, feminine partner.
 	<<set $slaves[$i].hormones = 2>>
-	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSSlimnessEnthusiast != "unset">>
@@ -613,14 +691,14 @@
 		<<set $slaves[$i].drugs = "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 = "lip injections">>
+			$HeadGirl.slaveName gives $slaves[$i].slaveName lip injections, since she thinks $slaves[$i].slaveName should have lips so big she can barely speak.
+			<<set $slaves[$i].drugs = "lip injections">>
 		<<elseif ($slaves[$i].butt < $slaves[$i].boobs/1000)>>
-		$HeadGirl.slaveName gives $slaves[$i].slaveName ass injections, since she loves curves and thinks $slaves[$i].slaveName's butt needs the most work.
-		<<set $slaves[$i].drugs = "butt injections">>
+			$HeadGirl.slaveName gives $slaves[$i].slaveName ass injections, since she loves curves and thinks $slaves[$i].slaveName's butt needs the most work.
+			<<set $slaves[$i].drugs = "butt injections">>
 		<<else>>
-		$HeadGirl.slaveName gives $slaves[$i].slaveName boob injections, since she loves curves and thinks $slaves[$i].slaveName's tits need the most work.
-		<<set $slaves[$i].drugs = "breast injections">>
+			$HeadGirl.slaveName gives $slaves[$i].slaveName boob injections, since she loves curves and thinks $slaves[$i].slaveName's tits need the most work.
+			<<set $slaves[$i].drugs = "breast injections">>
 		<</if>>
 	<<else>>
 		<<set $slaves[$i].drugs = "none">>
@@ -638,69 +716,69 @@
 		<<include "Assistant Autosurgery">>
 	<</if>>
 	<<if $HeadGirl.fetishKnown == 1>>
-	<<if ($HeadGirl.fetish == "sadist") && ($HeadGirl.fetishStrength > 95) && ($seeExtreme == 1) && ($slaves[$i].fetish != "mindbroken")>>
-		<<if ($slaves[$i].health > 40)>>
-		<<if ($slaves[$i].amp != 1) && ($slaves[$i].devotion < -20)>>
-			$HeadGirl.slaveName decides to extract the ultimate in sadistic pleasure from $slaves[$i].slaveName, and directs the autosurgery to @@.red;amputate her arms and legs.@@ She carefully describes the entire process to the sobbing slave @@.gold;in minute detail@@ before allowing her to be sedated.
-			<<set $slaves[$i].devotion -= 20, $slaves[$i].trust -= 20, $slaves[$i].health -= 40, $slaves[$i].amp = 1>>
-		<</if>>
-		<<if ($slaves[$i].balls > 0) && ($slaves[$i].devotion <= 50)>>
-			$HeadGirl.slaveName decides to have some once-only sadistic pleasure, and carefully straps $slaves[$i].slaveName into the surgery until she's completely immobile. $HeadGirl.slaveName situates a mirror so the terrified girl can see her own crotch, gets behind her, and carefully sodomizes her during the entire process of @@.red;castration.@@ $slaves[$i].slaveName is anesthetized down there and can't feel the brutal anal rape, but her abuser orgasms repeatedly to her @@.gold;weeping at the sight of being gelded and raped at once.@@
-			<<set $slaves[$i].devotion -= 20, $slaves[$i].trust -= 20, $slaves[$i].health -= 20, $slaves[$i].balls = 0>>
-		<</if>>
-		<</if>>
-		<<if ($slaves[$i].devotion < -90) && ($slaves[$i].fetish != "mindbroken")>>
-			$HeadGirl.slaveName tires of $slaves[$i].slaveName's protests that $HeadGirl.slaveName is a monster for hurting her this way and her complaints that she deserves better. $HeadGirl.slaveName decides that it'll be just as much fun and a lot less trouble to mistreat $slaves[$i].slaveName once she's mindbroken, and sends her in for @@.red;chemical lobotomization.@@
-			<<set $slaves[$i].health -= 20, $slaves[$i].fetish = "mindbroken">>
-		<</if>>
-	<<elseif ($HeadGirl.fetish == "dom") && ($HeadGirl.fetishStrength > 60) && ($seeExtreme == 1) && ($slaves[$i].fetish != "mindbroken") && ($slaves[$i].devotion <= 50)>>
-		<<if ($slaves[$i].health > 40)>>
-			<<if ($slaves[$i].heels == 0) && ($slaves[$i].amp != 1)>>
-				$HeadGirl.slaveName is not satisfied with $slaves[$i].slaveName's submissiveness, and directs the autosurgery to @@.red;clip her Achilles tendons.@@ Once the slave is recovered from surgery, $HeadGirl.slaveName removes all shoes from the suite, too, so $slaves[$i].slaveName is forced to crawl like a good little bitch. $slaves[$i].slaveName is @@.gold;angry@@ and @@.gold;frightened.@@
-				<<set $slaves[$i].devotion -= 5, $slaves[$i].health -= 20, $slaves[$i].heels = 1, $slaves[$i].shoes = "none">>
+		<<if ($HeadGirl.fetish == "sadist") && ($HeadGirl.fetishStrength > 95) && ($seeExtreme == 1) && ($slaves[$i].fetish != "mindbroken")>>
+			<<if ($slaves[$i].health > 40)>>
+				<<if ($slaves[$i].amp != 1) && ($slaves[$i].devotion < -20)>>
+					$HeadGirl.slaveName decides to extract the ultimate in sadistic pleasure from $slaves[$i].slaveName, and directs the autosurgery to @@.red;amputate her arms and legs.@@ She carefully describes the entire process to the sobbing slave @@.gold;in minute detail@@ before allowing her to be sedated.
+					<<set $slaves[$i].devotion -= 20, $slaves[$i].trust -= 20, $slaves[$i].health -= 40, $slaves[$i].amp = 1>>
+				<</if>>
+				<<if ($slaves[$i].balls > 0) && ($slaves[$i].devotion <= 50)>>
+					$HeadGirl.slaveName decides to have some once-only sadistic pleasure, and carefully straps $slaves[$i].slaveName into the surgery until she's completely immobile. $HeadGirl.slaveName situates a mirror so the terrified girl can see her own crotch, gets behind her, and carefully sodomizes her during the entire process of @@.red;castration.@@ $slaves[$i].slaveName is anesthetized down there and can't feel the brutal anal rape, but her abuser orgasms repeatedly to her @@.gold;weeping at the sight of being gelded and raped at once.@@
+					<<set $slaves[$i].devotion -= 20, $slaves[$i].trust -= 20, $slaves[$i].health -= 20, $slaves[$i].balls = 0>>
+				<</if>>
 			<</if>>
-			<<if ($slaves[$i].balls > 0)>>
-				$HeadGirl.slaveName decides that it's counterproductive for $slaves[$i].slaveName to be able to get hard, and sends her in to have her @@.red;balls removed.@@ $slaves[$i].slaveName is horrified, but $HeadGirl.slaveName uses her anus with such persistence and mercilessness that the poor gelding doesn't have much time to mourn. $slaves[$i].slaveName is badly @@.gold;frightened@@ by her new role as nothing but a recipient of anal.
-				<<set $slaves[$i].trust -= 10, $slaves[$i].health -= 20, $slaves[$i].balls = 0>>
+			<<if ($slaves[$i].devotion < -90) && ($slaves[$i].fetish != "mindbroken")>>
+				$HeadGirl.slaveName tires of $slaves[$i].slaveName's protests that $HeadGirl.slaveName is a monster for hurting her this way and her complaints that she deserves better. $HeadGirl.slaveName decides that it'll be just as much fun and a lot less trouble to mistreat $slaves[$i].slaveName once she's mindbroken, and sends her in for @@.red;chemical lobotomization.@@
+				<<set $slaves[$i].health -= 20, $slaves[$i].fetish = "mindbroken">>
 			<</if>>
-		<</if>>
-	<<elseif $HeadGirl.energy > 95>>
-		<<if ($slaves[$i].health > 40) && ($slaves[$i].heels == 0) && ($slaves[$i].amp != 1) && ($slaves[$i].devotion <= 50) && ($slaves[$i].fetish != "mindbroken")>>
-			$HeadGirl.slaveName wants a good little bimbo who sticks her butt out all the time, and directs the autosurgery to @@.red;clip $slaves[$i].slaveName's Achilles tendons.@@ Once the slave is recovered from surgery, $HeadGirl.slaveName presents $slaves[$i].slaveName with a new pair of extra-tall heels to totter around in like a good little slut. $slaves[$i].slaveName is @@.gold;angry@@ and @@.gold;frightened.@@
-			<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5, $slaves[$i].health -= 20, $slaves[$i].heels = 1, $slaves[$i].shoes = "heels">>
-		<</if>>
-	<<elseif $HeadGirl.fetish == "masochist">>
-		<<if ($slaves[$i].health > 40) && ($slaves[$i].heightImplant == 0) && ($slaves[$i].height < 185) && ($slaves[$i].amp != 1)>>
-				$HeadGirl.slaveName has a subconscious need to be hurt by the biggest, strongest girl possible, and directs the autosurgery to extend $slaves[$i].slaveName's arm and leg bones to make her a little @@.lime;taller.@@
+		<<elseif ($HeadGirl.fetish == "dom") && ($HeadGirl.fetishStrength > 60) && ($seeExtreme == 1) && ($slaves[$i].fetish != "mindbroken") && ($slaves[$i].devotion <= 50)>>
+			<<if ($slaves[$i].health > 40)>>
+				<<if ($slaves[$i].heels == 0) && ($slaves[$i].amp != 1)>>
+					$HeadGirl.slaveName is not satisfied with $slaves[$i].slaveName's submissiveness, and directs the autosurgery to @@.red;clip her Achilles tendons.@@ Once the slave is recovered from surgery, $HeadGirl.slaveName removes all shoes from the suite, too, so $slaves[$i].slaveName is forced to crawl like a good little bitch. $slaves[$i].slaveName is @@.gold;angry@@ and @@.gold;frightened.@@
+					<<set $slaves[$i].devotion -= 5, $slaves[$i].health -= 20, $slaves[$i].heels = 1, $slaves[$i].shoes = "none">>
+				<</if>>
+				<<if ($slaves[$i].balls > 0)>>
+					$HeadGirl.slaveName decides that it's counterproductive for $slaves[$i].slaveName to be able to get hard, and sends her in to have her @@.red;balls removed.@@ $slaves[$i].slaveName is horrified, but $HeadGirl.slaveName uses her anus with such persistence and mercilessness that the poor gelding doesn't have much time to mourn. $slaves[$i].slaveName is badly @@.gold;frightened@@ by her new role as nothing but a recipient of anal.
+					<<set $slaves[$i].trust -= 10, $slaves[$i].health -= 20, $slaves[$i].balls = 0>>
+				<</if>>
+			<</if>>
+		<<elseif $HeadGirl.energy > 95>>
+			<<if ($slaves[$i].health > 40) && ($slaves[$i].heels == 0) && ($slaves[$i].amp != 1) && ($slaves[$i].devotion <= 50) && ($slaves[$i].fetish != "mindbroken")>>
+				$HeadGirl.slaveName wants a good little bimbo who sticks her butt out all the time, and directs the autosurgery to @@.red;clip $slaves[$i].slaveName's Achilles tendons.@@ Once the slave is recovered from surgery, $HeadGirl.slaveName presents $slaves[$i].slaveName with a new pair of extra-tall heels to totter around in like a good little slut. $slaves[$i].slaveName is @@.gold;angry@@ and @@.gold;frightened.@@
+				<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5, $slaves[$i].health -= 20, $slaves[$i].heels = 1, $slaves[$i].shoes = "heels">>
+			<</if>>
+		<<elseif $HeadGirl.fetish == "masochist">>
+			<<if ($slaves[$i].health > 40) && ($slaves[$i].heightImplant == 0) && ($slaves[$i].height < 185) && ($slaves[$i].amp != 1)>>
+					$HeadGirl.slaveName has a subconscious need to be hurt by the biggest, strongest girl possible, and directs the autosurgery to extend $slaves[$i].slaveName's arm and leg bones to make her a little @@.lime;taller.@@
+					<<set $slaves[$i].health -= 20, $slaves[$i].heightImplant = 1, $slaves[$i].height += 1>>
+			<</if>>
+		<<elseif $HeadGirl.fetish == "submissive">>
+			<<if ($slaves[$i].health > 40) && ($slaves[$i].heightImplant == 0) && ($slaves[$i].height < 185) && ($slaves[$i].amp != 1)>>
+				$HeadGirl.slaveName wants to be topped by the biggest, strongest girl possible, and directs the autosurgery to extend $slaves[$i].slaveName's arm and leg bones to make her a little @@.lime;taller.@@
 				<<set $slaves[$i].health -= 20, $slaves[$i].heightImplant = 1, $slaves[$i].height += 1>>
+			<</if>>
 		<</if>>
-	<<elseif $HeadGirl.fetish == "submissive">>
-		<<if ($slaves[$i].health > 40) && ($slaves[$i].heightImplant == 0) && ($slaves[$i].height < 185) && ($slaves[$i].amp != 1)>>
-			$HeadGirl.slaveName wants to be topped by the biggest, strongest girl possible, and directs the autosurgery to extend $slaves[$i].slaveName's arm and leg bones to make her a little @@.lime;taller.@@
-			<<set $slaves[$i].health -= 20, $slaves[$i].heightImplant = 1, $slaves[$i].height += 1>>
-		<</if>>
-	<</if>>
 	<</if>>
 <</if>>
 
 <<if $HGSuiteEquality != 0>>
 	<<if $slaves[$i].devotion > 50>>
-	$HeadGirl.slaveName and $slaves[$i].slaveName @@.hotpink;really appreciate@@ the equal, alternating Head Girl system, and @@.yellow;switch places at the end of the week.@@
-	<<set $HeadGirl.devotion += 1, $slaves[$i].devotion += 1>>
+		$HeadGirl.slaveName and $slaves[$i].slaveName @@.hotpink;really appreciate@@ the equal, alternating Head Girl system, and @@.yellow;switch places at the end of the week.@@
+		<<set $HeadGirl.devotion += 1, $slaves[$i].devotion += 1>>
 	<<else>>
-	$slaves[$i].slaveName is not a decent Head Girl candidate, so $HeadGirl.slaveName keeps the position for now.
+		$slaves[$i].slaveName is not a decent Head Girl candidate, so $HeadGirl.slaveName keeps the position for now.
 	<</if>>
 <<else>>
 	<<set $seed = $HGSuiteSurgery + $HGSuiteDrugs + $HGSuiteHormones>>
 	<<if $seed > 2>>
-	Your Head Girl @@.hotpink;really enjoys@@ being given total freedom to customize her very own bitch.
-	<<set $HeadGirl.devotion += 2>>
+		Your Head Girl @@.hotpink;really enjoys@@ being given total freedom to customize her very own bitch.
+		<<set $HeadGirl.devotion += 2>>
 	<<elseif $seed == 2>>
-	Your Head Girl @@.hotpink;enjoys@@ being given freedom to customize her very own girl.
-	<<set $HeadGirl.devotion += 1>>
+		Your Head Girl @@.hotpink;enjoys@@ being given freedom to customize her very own girl.
+		<<set $HeadGirl.devotion += 1>>
 	<<elseif $seed == 1>>
-	Your Head Girl @@.hotpink;appreciates@@ being given some freedom to customize her own servant.
-	<<set $HeadGirl.devotion += 1>>
+		Your Head Girl @@.hotpink;appreciates@@ being given some freedom to customize her own servant.
+		<<set $HeadGirl.devotion += 1>>
 	<</if>>
 <</if>>
 
diff --git a/src/uncategorized/saLongTermEffects.tw b/src/uncategorized/saLongTermEffects.tw
index ba46e22c5c5c0f9a020f213d034be10e543ba8c3..a79d5066e14dfc4c54a84f44e62d6f9bf5c05d41 100644
--- a/src/uncategorized/saLongTermEffects.tw
+++ b/src/uncategorized/saLongTermEffects.tw
@@ -4520,6 +4520,8 @@
 			Society is @@.green;pleased@@ by $slaves[$i].slaveName's advanced pregnancy.
 			<<FSChangePorn "Repopulationist" 2>>
 		<</if>>
+	<<elseif $slaves[$i].weight > 130>>
+		$slaves[$i].slaveName is so fat, society just assumes there is a baby somewhere in there, though they wish it was more obvious.
 	<<elseif $slaves[$i].preg > 10>>
 		Society is @@.green;pleased@@ by $slaves[$i].slaveName's pregnancy.
 		<<FSChangePorn "Repopulationist" 1>>
diff --git a/src/utility/raWidgets.tw b/src/utility/raWidgets.tw
index 3757326a179a64ddd7798c65b3a740a7e77db12d..1251d43ccb988871dc95c3d41dd119d20be0e635 100644
--- a/src/utility/raWidgets.tw
+++ b/src/utility/raWidgets.tw
@@ -3796,7 +3796,7 @@ check if a rule attribute, any one, is defined and otherwise skip everything.
 
 <<if (def _combinedRule.bellyAccessory) && (_combinedRule.bellyAccessory !== "no default setting")>>
 <<if ($args[0].bellyAccessory !== _combinedRule.bellyAccessory)>>
-	<<if visibleBelly($args[0]) && setup.fakeBellies.includes(_combinedRule.bellyAccessory)>>
+	<<if (visibleBelly($args[0]) || $args[0].weight > 130) && setup.fakeBellies.includes(_combinedRule.bellyAccessory)>>
 		<br>$args[0].slaveName's natural belly is too big to properly wear an empathy belly.
 	<<else>>
 		<<set $args[0].bellyAccessory = _combinedRule.bellyAccessory>>