diff --git a/src/pregmod/fSlaveSlaveVagConsummate.tw b/src/pregmod/fSlaveSlaveVagConsummate.tw
index 041d130d180dd3f60027c44afc32b404180f04a7..2be24363eed9d67cca17d4d39fd0e43b3ff108c5 100644
--- a/src/pregmod/fSlaveSlaveVagConsummate.tw
+++ b/src/pregmod/fSlaveSlaveVagConsummate.tw
@@ -93,7 +93,7 @@ You take a look at the slave you selected.
 
 <<elseif ($slaverapistx.devotion >= -20)>>
 	Since $slaverapistx.slaveName does not resist your will, she should comply reasonably well.
-	<<if (if $slaverapistx.dick == 0)>>She dons a strap-on and applies lube in a mechanical, detached fashion,
+	<<if $slaverapistx.dick == 0>>She dons a strap-on and applies lube in a mechanical, detached fashion,
 	<<else>>She has to work to get herself hard despite her doubts,
 	<</if>>
 	fear and disgust showing on her face as she absorbs the perversion of the natural order of things she's about to experience.
diff --git a/src/uncategorized/pCitizensAndCivilians.tw b/src/uncategorized/pCitizensAndCivilians.tw
index ea8fd85cf7c21139c484b3e824a708abcea7e387..6ae98a9963442ea438b29a45c6f62fbe42099d66 100644
--- a/src/uncategorized/pCitizensAndCivilians.tw
+++ b/src/uncategorized/pCitizensAndCivilians.tw
@@ -1,5 +1,11 @@
 :: P citizens and civilians [nobr]
 
+<<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>
+	<<set _cost = 10000>>
+<<else>> 
+	<<set _cost = 20000>>
+<</if>>
+
 <<set $nextButton = "Continue", $nextLink = "Random Nonindividual Event">>
 
 <<if $assistant > 0>>
@@ -57,21 +63,21 @@
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Knight-Captain reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Knights - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with the latest weapons. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Knights">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <<if $arcologies[0].FSRomanRevivalist >= 10>>
 <br><<link "They shall be my Evocati">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Centurion reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Evocati - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with the latest weapons and bearing a Roman standard. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Evocati">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSAztecRevivalist >= 10>>\
 <<link "They shall be my Shorn Ones">>
@@ -79,11 +85,11 @@
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Centurion reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Shorn Ones - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with the latest weapons and bearing an Aztec standard adorned on a spear. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $nextButton = "Continue">>
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Shorn Ones">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSChineseRevivalist >= 10>>\
 <<link "They shall be my Imperial Guards">>
@@ -91,219 +97,219 @@
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "General of the Imperial Guard, reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Imperial Guards - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with the latest weapons and bearing an Imperial Chinese war banner. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $nextButton = "Continue">>
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Imperial Guards">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSEgyptianRevivalist >= 10>>
 <br><<link "They shall be my Medjay">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "First Medjay reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Medjay - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with the latest weapons and bearing a faux cheetah cloak. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Medjay">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSEdoRevivalist >= 10>>
 <br><<link "Naturally, they shall be the Samurai">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Your Samurai-Lord reports for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Samurai - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with the latest weapons, exterior plates styled after lacquered Samurai armor, and an enraged mask covering the face. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Samurai">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSArabianRevivalist >= 10>>
 <br><<link "They shall be my Janissaries">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Corbaci reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Janissaries - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with the latest weapons and cloaked in an outer garment of fine oriental silks. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Janissaries">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSChattelReligionist >= 10>>
 <br><<link "They shall be the Knights Templar">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Inquisitor-General reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Knights Templar - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with the latest weapons and bearing a cloak emblazoned with the symbol of God. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Knights Templar">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSDegradationist >= 10>>
 <br><<link "They shall be my Immortals">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Satrap reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Immortals - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with the latest weapons and more than one wicked, curved blade. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Immortals">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSAssetExpansionist >= 10>>
 <br><<link "They shall be the Vast Legions">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "The Vast Legions reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Vast Legions - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of bulky, heavily armored prototype armor. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Vast Legions">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSTransformationFetishist >= 10>>
 <br><<link "They shall be the Surgical Corps">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Surgeon-General reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Surgical Corps - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with the latest medical equipment. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Surgical Corps">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSGenderRadicalist >= 10>>
 <br><<link "They shall be the Inglorious Bitches">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Guess that makes me a bitch, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Inglorious Bitches - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor slathered in garish neon paint. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Inglorious Bitches">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSGenderFundamentalist >= 10>>
 <br><<link "They shall be the Thousand Sons">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Allfather reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Thousand Sons - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, a private gym, and a suit of prototype armor that preserves a sample of the wearer's genetic material in the event of death. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Thousand Sons">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSRepopulationFocus >= 10>>
 <br><<link "They shall be the Guardians of the Unborn">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Fetal Guardian reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Guardians of the Unborn - are well looked after. They are each assigned a nice apartment, three fertile slavegirls for the men, assured maternity leave for the ladies, and a suit of prototype armor designed to keep even the most heavily pregnant mercanary's child safe and sound. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Guardians of the Unborn">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSRestart >= 10>>
 <br><<link "They shall be my Shadowed Hand">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Your Right Hand reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Shadowed Hand of the Societal Elite - are well looked after. They are each assigned a glorious apartment, a slave of their choice, what ever luxuries they can think of, and a suit of prototype armor equipped with the latest weapons and defenses. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Shadowed Hand">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSPhysicalIdealist >= 10>>
 <br><<link "They shall be the Asgardians">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Foehammer reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Asgardians - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, a private gym, and a suit of prototype armor equipped with the latest weapons. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Asgardians">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSHedonisticDecadence >= 10>>
 <br><<link "They shall be the Tasters">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Lead Foodie reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Tasters - are well looked after. They are each assigned a comfy apartment, a freshly enslaved, plush servant, all the food and drink they can want (while off duty), and a suit of self-propelling prototype armor designed for maximum comfort without sacrificing protection. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Tasters">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSSupremacist >= 10>>
 <br><<link "They shall be the Knights of the Blood">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Knights of the Blood reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Knights of the Blood - are well looked after. They are each assigned a nice apartment, three freshly enslaved servants of inferior races, and a suit of prototype armor equipped with the latest weapons. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Knights of the Blood">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSSubjugationist >= 10>>
 <br><<link "They shall be the Knights of the Purge">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Knights of the Purge reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Knights of the Purge - are well looked after. They are each assigned a nice apartment, three freshly enslaved servants of the inferior race, and a suit of prototype armor equipped with the latest weapons. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Knights of the Purge">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSPaternalist >= 10>>
 <br><<link "They shall be the Wardens">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a redesigned contract between you. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if $PC.title isnot 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "First Warden reporting for duty, <<if $PC.title isnot 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Wardens - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with the latest weapons and a collapsible riot shield. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Wardens">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSBodyPurist >= 10>>
 <br><<link "They shall be the Purifiers">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Master Purifier reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Purifiers - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with a cleansing flamethrower. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Purifiers">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSSlimnessEnthusiast >= 10>>
 <br><<link "They shall be the Abstemious">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Lord-Abstinent reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Abstemious - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of sleek prototype armor equipped with advanced restraining weapons. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Abstemious">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 <<if $arcologies[0].FSPastoralist >= 10>>
 <br><<link "They shall be the Rangers">>
 	<<replace "#result">>
 	You ask for a meeting with your mercenaries' captain and lay out a proposal for a new contract between you over $PC.refreshment. As he reviews the terms, he looks skeptical, then surprised, then interested, and finally, he breaks out into laughter. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," he says, "you have no idea how fun this is going to be." He rises and gives you a short bow. "Lead Ranger reporting for duty, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>." The mercenaries - no, the Rangers - are well looked after. They are each assigned a nice apartment, a freshly enslaved servant, and a suit of prototype armor equipped with the latest weapons - and an improbably massive revolver on the hip. Word of the innovation runs through the Free Cities @@.green;like wildfire.@@
 	<<set $rep += 1000>>
-	<<set $cash -= 20000>>
+	<<set $cash -= _cost>>
 	<<set $mercenaries = 5>>
 	<<set $mercenariesTitle = "Rangers">>
 	<</replace>>
-<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</link>>  <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>
 </span>
diff --git a/src/uncategorized/ptWorkaround.tw b/src/uncategorized/ptWorkaround.tw
index 641dcd3c866903176e6b17d0ac7ec336a3cdc022..5fd7b5811c9fea5c27c8ba97367957027e294667 100644
--- a/src/uncategorized/ptWorkaround.tw
+++ b/src/uncategorized/ptWorkaround.tw
@@ -944,7 +944,7 @@
 <<case "induce hatred of oral">>
 	Since you've decided to force her to dislike oral sex, you're forced to use a complicated and refined slave breaking technique: constantly raping her face.
 	<<InduceFlawAbuseEffects>>
-	<<AnalVCheck 10>>
+	<<set $activeSlave.oralTotal += 10, $oralTotal += 10>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
 	<<if ($PC.slaving >= 100)>>
 		<<set $activeSlave.training += 20>>
diff --git a/src/uncategorized/saChoosesOwnClothes.tw b/src/uncategorized/saChoosesOwnClothes.tw
index 4d96ee27dc49b437664b586cd34b8bcf883650c8..82071f022d7eddac7b6d5197e7118091cbd7c8bb 100644
--- a/src/uncategorized/saChoosesOwnClothes.tw
+++ b/src/uncategorized/saChoosesOwnClothes.tw
@@ -21,57 +21,99 @@
 		<</if>>
 	<</if>>
 	Faced with so many choices and no thought on the matter;
+	<<set _clothingPool = []>>
 	<<if ($arcologies[0].FSChattelReligionist > 0)>>
 		$pronoun commonly sees others wearing chattel habits and is drawn to doing so <<print $object>>self.
 		<<set $slaves[$i].clothes = "a chattel habit">>
-	<<elseif ($arcologies[0].FSEgyptianRevivalist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees others wearing nothing but jewelry and is drawn to doing so <<print $object>>self.
-		<<set $slaves[$i].clothes = "slutty jewelry">>
-	<<elseif ($arcologies[0].FSRomanRevivalist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees others wearing togas and is drawn to doing so <<print $object>>self.
-		<<set $slaves[$i].clothes = "a toga">>
-	<<elseif ($arcologies[0].FSAztecRevivalist > 0) && (random(1,3) == 1)>>
-		$pronoun wears a very revealing huipil that accentuates $possessive body.
-		<<set $slaves[$i].clothes = "a huipil">>
-	<<elseif ($arcologies[0].FSEdoRevivalist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees others wearing kimonos and is drawn to doing so <<print $object>>self.
-		<<set $slaves[$i].clothes = "a kimono">>
-	<<elseif ($arcologies[0].FSArabianRevivalist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees others wearing silk and is drawn to doing so <<print $object>>self.
-		<<set $slaves[$i].clothes = "harem gauze">>
-	<<elseif ($arcologies[0].FSChineseRevivalist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees others wearing qipaos and is drawn to doing so <<print $object>>self.
-		<<set $slaves[$i].clothes = "a slutty qipao">>
-	<<elseif ($arcologies[0].FSGenderFundamentalist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees cheerleaders around and instinctually follows along.
-		<<set $slaves[$i].clothes = either("a cheerleader outfit", "a schoolgirl outfit")>>
-	<<elseif ($arcologies[0].FSGenderFundamentalist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees bunnies around and instinctually follows along.
-		<<set $slaves[$i].clothes = "a bunny outfit">>
-	<<elseif ($arcologies[0].FSPaternalist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees others wearing clothing and is drawn to doing so <<print $object>>self.
-		<<set $slaves[$i].clothes = "conservative clothing">>
-	<<elseif ($arcologies[0].FSMaturityPreferentialist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees others wearing suits and is drawn to doing so <<print $object>>self.
-		<<set $slaves[$i].clothes = either("slutty business attire", "a nice maid outfit", "a military uniform", "nice business attire")>>
-	<<elseif ($arcologies[0].FSYouthPreferentialist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees schoolgirls around and instinctually follows along.
-		<<set $slaves[$i].clothes = either("a schoolgirl outfit", "a cheerleader outfit")>>
-	<<elseif ($arcologies[0].FSDegradationist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees others wearing chains and is drawn to doing so <<print $object>>self.
-		<<set $slaves[$i].clothes = either("chains", "uncomfortable straps", "shibari ropes")>>
-	<<elseif ($arcologies[0].FSPhysicalIdealist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees naked girls around and seldom realizes they are coated in oil.
-		<<set $slaves[$i].clothes = either("body oil", "no clothing", "no clothing")>>
-	<<elseif ($arcologies[0].FSPastoralist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees cowgirls around and instinctually follows along.
-		<<set $slaves[$i].clothes = "Western clothing">>
-	<<elseif ($arcologies[0].FSBodyPurist > 0) && (random(1,3) == 1)>>
-		$pronoun commonly sees others wearing tight, form-fitting clothes and is drawn to doing so <<print $object>>self.
-		<<set $slaves[$i].clothes = either("a leotard", "a string bikini", "a slave gown", "a comfortable bodysuit", "restrictive latex", "clubslut netting", "a leotard", "a halter top dress")>>
 	<<else>>
-		$pronoun chooses to put on underwear, the reasons lost to $possessive, and moves on.
-		<<set $slaves[$i].clothes = "attractive lingerie">>
+		<<if ($arcologies[0].FSEgyptianRevivalist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("egyptian")>>
+		<<elseif ($arcologies[0].FSRomanRevivalist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("roman")>>
+		<<elseif ($arcologies[0].FSAztecRevivalist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("aztec")>>
+		<<elseif ($arcologies[0].FSEdoRevivalist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("edo")>>
+		<<elseif ($arcologies[0].FSArabianRevivalist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("arabic")>>
+		<<elseif ($arcologies[0].FSChineseRevivalist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("chinese")>>
+		<</if>>
+		<<if ($arcologies[0].FSGenderFundamentalist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("genderFund")>>
+		<</if>>
+		<<if ($arcologies[0].FSPaternalist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("paternalist")>>
+		<<elseif ($arcologies[0].FSDegradationist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("degradationist")>>
+		<</if>>
+		<<if ($arcologies[0].FSMaturityPreferentialist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("mature")>>
+		<<elseif ($arcologies[0].FSYouthPreferentialist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("youth")>>
+		<</if>>
+		<<if ($arcologies[0].FSPhysicalIdealist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("physicalIdealist")>>
+		<</if>>
+		<<if ($arcologies[0].FSPastoralist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("pastoralist")>>
+		<</if>>
+		<<if ($arcologies[0].FSBodyPurist > 0) && (random(1,3) == 1)>>
+			<<set _clothingPool.push("bodyPurist")>>
+		<</if>>
+		<<set _clothingPool.push("panties")>>
+		<<switch _randomClothes>>
+		<<case "egyptian">>
+			$pronoun commonly sees others wearing nothing but jewelry and is drawn to doing so <<print $object>>self.
+			<<set $slaves[$i].clothes = "slutty jewelry">>
+		<<case "roman">>
+			$pronoun commonly sees others wearing togas and is drawn to doing so <<print $object>>self.
+			<<set $slaves[$i].clothes = "a toga">>
+		<<case "aztec">>
+			$pronoun commonly sees others wearing huipils and is drawn to doing so <<print $object>>self.
+			<<set $slaves[$i].clothes = "a huipil">>
+		<<case "edo">>
+			$pronoun commonly sees others wearing kimonos and is drawn to doing so <<print $object>>self.
+			<<set $slaves[$i].clothes = "a kimono">>
+		<<case "arabic">>
+			$pronoun commonly sees others wearing silk and is drawn to doing so <<print $object>>self.
+			<<set $slaves[$i].clothes = "harem gauze">>
+		<<case "chinese">>
+			$pronoun commonly sees others wearing qipaos and is drawn to doing so <<print $object>>self.
+			<<set $slaves[$i].clothes = "a slutty qipao">>
+		<<case "genderFund">>
+			<<if random(1,2) == 1>>
+				$pronoun commonly sees cheerleaders around and instinctually follows along.
+				<<set $slaves[$i].clothes = either("a cheerleader outfit", "a schoolgirl outfit")>>
+			<<else>>
+				$pronoun commonly sees bunnies around and instinctually follows along.
+				<<set $slaves[$i].clothes = "a bunny outfit">>
+			<</if>>
+		<<case "paternalist">>
+			$pronoun commonly sees others wearing clothing and is drawn to doing so <<print $object>>self.
+			<<set $slaves[$i].clothes = "conservative clothing">>
+		<<case "mature">>
+			$pronoun commonly sees others wearing suits and is drawn to doing so <<print $object>>self.
+			<<set $slaves[$i].clothes = either("slutty business attire", "a nice maid outfit", "a military uniform", "nice business attire")>>
+		<<case "youth">>
+			$pronoun commonly sees schoolgirls around and instinctually follows along.
+			<<set $slaves[$i].clothes = either("a schoolgirl outfit", "a cheerleader outfit")>>
+		<<case "degradationist">>
+			$pronoun commonly sees others wearing chains and is drawn to doing so <<print $object>>self.
+			<<set $slaves[$i].clothes = either("chains", "uncomfortable straps", "shibari ropes")>>
+		<<case "physicalIdealist">>
+			$pronoun commonly sees naked girls around and seldom realizes they are coated in oil.
+			<<set $slaves[$i].clothes = either("body oil", "no clothing", "no clothing")>>
+		<<case "pastoralist">>
+			$pronoun commonly sees cowgirls around and instinctually follows along.
+			<<set $slaves[$i].clothes = "Western clothing">>
+		<<case "bodyPurist">>
+			$pronoun commonly sees others wearing tight, form-fitting clothes and is drawn to doing so <<print $object>>self.
+			<<set $slaves[$i].clothes = either("a leotard", "a string bikini", "a slave gown", "a comfortable bodysuit", "restrictive latex", "clubslut netting", "a leotard", "a halter top dress")>>
+		<<default>>
+			$pronoun chooses to put on underwear, the reasons lost to $possessive, and moves on.
+			<<set $slaves[$i].clothes = "attractive lingerie">>
+		<</switch>>
 	<</if>>
 <<else>>
 
@@ -79,13 +121,13 @@
 	$pronounCap uses the ability to select outfits to cover up with comfortable cut-offs and a t-shirt,
 	<<set $slaves[$i].clothes = "cutoffs and a t-shirt">>
 	<<if ($slaves[$i].amp != 1)>>
-	<<if ($slaves[$i].heels == 0)>>
-	and wears comfortable flats,
-	<<set $slaves[$i].shoes = "flats">>
-	<<else>>
-	and angrily wears the heels $pronoun needs to walk,
-	<<set $slaves[$i].shoes = "heels">>
-	<</if>>
+		<<if ($slaves[$i].heels == 0)>>
+			and wears comfortable flats,
+			<<set $slaves[$i].shoes = "flats">>
+		<<else>>
+			and angrily wears the heels $pronoun needs to walk,
+			<<set $slaves[$i].shoes = "heels">>
+		<</if>>
 	<</if>>
 	@@.mediumorchid;increasing $possessive independence.@@
 	<<set $slaves[$i].devotion -= 5>>
@@ -321,7 +363,7 @@
 <<if $arcologies[0].FSRestart != "unset">>
 	<<if $slaves[$i].choosesOwnChastity == 1>>
 		<<if $slaves[$i].vagina > -1 && $slaves[$i].breedingMark == 1 && ($slaves[$i].vaginalAccessory == "chastity belt" || $slaves[$i].vaginalAccessory == "combined chastity")>>
-			$pronounCap unfastens $possessive chastity belt knowing full well $possessive role in life is to carry $possessive <<if def $PC.customTitle>><<print $PC.customTitle>>'s<<elseif $PC.title != 0>>Master's<<else>>Mistress'<</if>> children.
+			$pronounCap unfastens $possessive chastity belt knowing full well $possessive role in life is to carry $possessive <<WrittenMaster $slaves[$i]>>'s children.
 			<<set $slaves[$i].vaginalAccessory = "none">>
 		<<elseif $slaves[$i].vagina > -1 && $slaves[$i].ovaries == 1 && $slaves[$i].preg == 0 && $slaves[$i].vaginalAccessory != "chastity belt">>
 			$pronounCap also affixes a chastity belt over $possessive vagina to discourage use of $possessive reproductive organ.
@@ -341,22 +383,22 @@
 <</if>>
 
 <<if ($slaves[$i].amp != 1)>>
-<<if ($slaves[$i].fetishKnown == 1) && ($slaves[$i].fetish == "dom")>>
-	$pronounCap wears boots to look like a proper dominant.
-	<<set $slaves[$i].shoes = "boots">>
-<<elseif ($slaves[$i].fetishKnown == 1) && ($slaves[$i].fetish == "sadist")>>
-	$pronounCap wears boots, since $pronoun thinks they make $possessive look dangerous.
-	<<set $slaves[$i].shoes = "boots">>
-<<elseif ($slaves[$i].heels == 1)>>
-	$pronounCap wears the heels $pronoun needs to walk.
-	<<set $slaves[$i].shoes = "heels">>
-<<elseif ($slaves[$i].fetishKnown == 1) && ($slaves[$i].fetish == "none")>>
-	$pronounCap wears comfortable flats, since $pronoun doesn't have a fetish to show off.
-	<<set $slaves[$i].shoes = "flats">>
-<<else>>
-	$pronounCap wears heels to strut $possessive stuff.
-	<<set $slaves[$i].shoes = "heels">>
-<</if>>
+	<<if ($slaves[$i].fetishKnown == 1) && ($slaves[$i].fetish == "dom")>>
+		$pronounCap wears boots to look like a proper dominant.
+		<<set $slaves[$i].shoes = "boots">>
+	<<elseif ($slaves[$i].fetishKnown == 1) && ($slaves[$i].fetish == "sadist")>>
+		$pronounCap wears boots, since $pronoun thinks they make $possessive look dangerous.
+		<<set $slaves[$i].shoes = "boots">>
+	<<elseif ($slaves[$i].heels == 1)>>
+		$pronounCap wears the heels $pronoun needs to walk.
+		<<set $slaves[$i].shoes = "heels">>
+	<<elseif ($slaves[$i].fetishKnown == 1) && ($slaves[$i].fetish == "none")>>
+		$pronounCap wears comfortable flats, since $pronoun doesn't have a fetish to show off.
+		<<set $slaves[$i].shoes = "flats">>
+	<<else>>
+		$pronounCap wears heels to strut $possessive stuff.
+		<<set $slaves[$i].shoes = "heels">>
+	<</if>>
 <</if>>
 
 <</if>> /* closes devotion > 20 */
diff --git a/src/uncategorized/saDiet.tw b/src/uncategorized/saDiet.tw
index b633987dc7579b1b9cb4dc741bead19bc0841f5f..46ea11eaa09c41be67eedcdbe9629b459205346a 100644
--- a/src/uncategorized/saDiet.tw
+++ b/src/uncategorized/saDiet.tw
@@ -325,7 +325,7 @@
 	<<elseif ($slaves[$i].hormoneBalance <= -100)>>
 		Her heavy workouts focus on lifting, and with artificial testosterone in her system, she @@.lime;gains muscle.@@
 		<<set $slaves[$i].muscles += 5>>
-	<<elseif ($slaves[$i].hormoneBalance >= -100)>>
+	<<elseif ($slaves[$i].hormoneBalance >= 100)>>
 		Her heavy workouts focus on lifting, but with lots of female hormones in her system, she barely @@.lime;gains muscle.@@
 		<<set $slaves[$i].muscles += 2>>
 	<<else>>
diff --git a/src/uncategorized/slaveSummary.tw b/src/uncategorized/slaveSummary.tw
index 30fa746860b976daf42fe9e4720aa5806bce7c09..8ea58d5ff42558bd675f150a7620e7f08b26fa60 100644
--- a/src/uncategorized/slaveSummary.tw
+++ b/src/uncategorized/slaveSummary.tw
@@ -153,7 +153,7 @@
 <<case "Head Girl Suite">>
 <<if $Flag == 0>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		[[_slaveName|Slave Interact][$activeSlave = $slaves[ssi]]]
+		[[_slaveName|Slave Interact][$activeSlave = $slaves[_ssi]]]
 <<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
 		[[_slaveName|Slave Interact][$activeSlave = $slaves[_ssi]]]
diff --git a/src/utility/descriptionWidgetsFlesh.tw b/src/utility/descriptionWidgetsFlesh.tw
index 3d43ba844379dbaeac56ca992dc27ed33ad59de2..6c15b6d52622b32adff392ffbe2373a0a1774573 100644
--- a/src/utility/descriptionWidgetsFlesh.tw
+++ b/src/utility/descriptionWidgetsFlesh.tw
@@ -4221,7 +4221,7 @@ $pronounCap has
 		<<if $activeSlave.physicalAge <= 3>>
 			and $possessive belly pins $possessive to the ground. $possessiveCap toddlerish form is dwarfed by $possessive pregnancy, and try as $pronoun might $pronoun can not even drag the oversized thing.<<if $activeSlave.amp == 0>> $pronounCap requires assistance to get to $possessive feet<<if $saleDescription == 0>>, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere<</if>>.<</if>>
 		<<elseif $activeSlave.physicalAge <= 12>>
-			and $pronoun can barely function with $possessive oversized belly.
+			and $pronoun can barely function with $possessive oversized belly.<<if $activeSlave.amp == 0>> $pronounCap requires assistance to get to $possessive feet<<if $saleDescription == 0>>, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere<</if>>.<</if>>
 		<<elseif $activeSlave.height >= 185>>
 			but $possessive tall frame barely bears $possessive oversized, drum-taut belly.
 		<<elseif $activeSlave.height < 150>>