diff --git a/devNotes/Slave Generation Widgets.txt b/devNotes/Slave Generation Widgets.txt
new file mode 100644
index 0000000000000000000000000000000000000000..242279d61582591e4c7f784e0381e420d4d00901
--- /dev/null
+++ b/devNotes/Slave Generation Widgets.txt	
@@ -0,0 +1,910 @@
+:: slave generation widgets [nobr]
+
+<<widget "NationalityToRace">>
+
+<<if $fixedRace == 0>>
+
+<<if ($activeSlave.nationality is "American")>>
+	<<set $activeSlave.race to either("black", "middle eastern", "white", "white", "white", "latina", "latina", "asian", "amerindian", "mixed race")>>
+<<elseif ($activeSlave.nationality is "Canadian")>>
+	<<set $activeSlave.race to either("white", "white", "white", "white", "amerindian")>>
+<<elseif ($activeSlave.nationality is "Puerto Rican")>>
+	<<set $activeSlave.race to either("latina")>>
+<<elseif ($activeSlave.nationality is "Cuban")>>
+	<<set $activeSlave.race to either("latina", "black")>>
+<<elseif ($activeSlave.nationality is "Haitian")>>
+	<<set $activeSlave.race to either("black")>>
+<<elseif ($activeSlave.nationality is "Jamaican")>>
+	<<set $activeSlave.race to either("black")>>
+<<elseif ($activeSlave.nationality is "Mexican")>>
+	<<set $activeSlave.race to either("latina", "latina", "latina", "latina", "latina", "amerindian")>>
+<<elseif ($activeSlave.nationality is "Dominican")>>
+	<<set $activeSlave.race to either("mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "white", "white", "black")>>
+<<elseif ($activeSlave.nationality is "Peruvian")>>
+	<<set $activeSlave.race to either("latina", "amerindian")>>
+<<elseif ($activeSlave.nationality is "Venezuelan")>>
+	<<set $activeSlave.race to either("latina")>>
+<<elseif ($activeSlave.nationality is "Bolivian")>>
+	<<set $activeSlave.race to either("latina", "amerindian")>>
+<<elseif ($activeSlave.nationality is "Guatemalan")>>
+	<<set $activeSlave.race to either("latina", "amerindian")>>
+<<elseif ($activeSlave.nationality is "Brazilian")>>
+	<<set $activeSlave.race to either("black", "latina", "mixed race", "mixed race", "amerindian", "white")>>
+<<elseif ($activeSlave.nationality is "Argentinian")>>
+	<<set $activeSlave.race to either("white", "latina", "latina")>>
+<<elseif ($activeSlave.nationality is "Chilean")>>
+	<<set $activeSlave.race to either("white", "latina", "latina", "latina")>>
+<<elseif ($activeSlave.nationality is "Colombian")>>
+	<<set $activeSlave.race to either("latina")>>
+<<elseif ($activeSlave.nationality is "Egyptian")>>
+	<<set $activeSlave.race to either("black", "middle eastern", "middle eastern", "middle eastern", "semitic")>>
+<<elseif ($activeSlave.nationality is "Turkish")>>
+	<<set $activeSlave.race to either("middle eastern", "middle eastern", "middle eastern", "semitic")>>
+<<elseif ($activeSlave.nationality is "Iranian")>>
+	<<set $activeSlave.race to either("indo-aryan", "indo-aryan", "indo-aryan", "semitic")>>
+<<elseif ($activeSlave.nationality is "Armenian")>>
+	<<set $activeSlave.race to either("indo-aryan", "semitic")>>
+<<elseif ($activeSlave.nationality is "Israeli")>>
+	<<set $activeSlave.race to either("white", "middle eastern", "semitic", "semitic")>>
+<<elseif ($activeSlave.nationality is "Saudi")>>
+	<<set $activeSlave.race to either("black", "asian", "middle eastern", "middle eastern")>>
+<<elseif ($activeSlave.nationality is "Moroccan")>>
+	<<set $activeSlave.race to either("middle eastern", "middle eastern", "black")>>
+<<elseif ($activeSlave.nationality is "Nigerian")>>
+	<<set $activeSlave.race to either("black")>>
+<<elseif ($activeSlave.nationality is "Kenyan")>>
+	<<set $activeSlave.race to either("black")>>
+<<elseif ($activeSlave.nationality is "Zimbabwean")>>
+	<<set $activeSlave.race to either("black", "black", "black", "black", "white")>>
+<<elseif ($activeSlave.nationality is "Ugandan")>>
+	<<set $activeSlave.race to either("black")>>
+<<elseif ($activeSlave.nationality is "Tanzanian")>>
+	<<set $activeSlave.race to either("black", "black", "black", "semitic")>>
+<<elseif ($activeSlave.nationality is "Ghanan")>>
+	<<set $activeSlave.race to either("black", "black", "black", "semitic")>>
+<<elseif ($activeSlave.nationality is "Congolese")>>
+	<<set $activeSlave.race to either("black")>>
+<<elseif ($activeSlave.nationality is "Ethiopian")>>
+	<<set $activeSlave.race to either("black", "black", "black", "middle eastern", "semitic")>>
+<<elseif ($activeSlave.nationality is "South African")>>
+	<<set $activeSlave.race to either("black", "black", "black", "white")>>
+<<elseif ($activeSlave.nationality is "Chinese")>>
+	<<set $activeSlave.race to either("asian")>>
+<<elseif ($activeSlave.nationality is "Korean")>>
+	<<set $activeSlave.race to either("asian")>>
+<<elseif ($activeSlave.nationality is "Japanese")>>
+	<<set $activeSlave.race to either("asian")>>
+<<elseif ($activeSlave.nationality is "Thai")>>
+	<<set $activeSlave.race to either("asian", "asian", "malay")>>
+<<elseif ($activeSlave.nationality is "Vietnamese")>>
+	<<set $activeSlave.race to either("asian")>>
+<<elseif ($activeSlave.nationality is "Indonesian")>>
+	<<set $activeSlave.race to either("asian", "malay", "malay", "pacific islander")>>
+<<elseif ($activeSlave.nationality is "Filipina")>>
+	<<set $activeSlave.race to either("asian", "malay", "malay", "pacific islander")>>
+<<elseif ($activeSlave.nationality is "Burmese")>>
+	<<set $activeSlave.race to either("asian", "asian", "indo-aryan")>>
+<<elseif ($activeSlave.nationality is "Nepalese")>>
+	<<set $activeSlave.race to either("asian", "asian", "indo-aryan")>>
+<<elseif ($activeSlave.nationality is "Uzbek")>>
+	<<set $activeSlave.race to either("asian")>>
+<<elseif ($activeSlave.nationality is "Afghan")>>
+	<<set $activeSlave.race to either("indo-aryan", "middle eastern")>>
+<<elseif ($activeSlave.nationality is "Algerian")>>
+	<<set $activeSlave.race to either("middle eastern")>>
+<<elseif ($activeSlave.nationality is "Libyan")>>
+	<<set $activeSlave.race to either("middle eastern")>>
+<<elseif ($activeSlave.nationality is "Tunisian")>>
+	<<set $activeSlave.race to either("middle eastern")>>
+<<elseif ($activeSlave.nationality is "Lebanese")>>
+	<<set $activeSlave.race to either("middle eastern", "semitic")>>
+<<elseif ($activeSlave.nationality is "Jordanian")>>
+	<<set $activeSlave.race to either("middle eastern", "semitic")>>
+<<elseif ($activeSlave.nationality is "Emirati")>>
+	<<set $activeSlave.race to either("middle eastern", "indo-aryan")>>
+<<elseif ($activeSlave.nationality is "Omani")>>
+	<<set $activeSlave.race to either("middle eastern", "indo-aryan")>>
+<<elseif ($activeSlave.nationality is "Malian")>>
+	<<set $activeSlave.race to either("black", "black", "black", "black", "black", "middle eastern")>>
+<<elseif ($activeSlave.nationality is "Sudanese")>>
+	<<set $activeSlave.race to either("black", "black", "black", "middle eastern")>>
+<<elseif ($activeSlave.nationality is "Yemeni")>>
+	<<set $activeSlave.race to either("black", "semitic", "middle eastern", "middle eastern", "middle eastern")>>
+<<elseif ($activeSlave.nationality is "Iraqi")>>
+	<<set $activeSlave.race to either("semitic", "middle eastern", "middle eastern", "middle eastern", "middle eastern")>>
+<<elseif ($activeSlave.nationality is "Indian")>>
+	<<set $activeSlave.race to either("indo-aryan")>>
+<<elseif ($activeSlave.nationality is "Malaysian")>>
+	<<set $activeSlave.race to either("asian", "malay", "malay", "malay")>>
+<<elseif ($activeSlave.nationality is "Kazakh")>>
+	<<set $activeSlave.race to either("asian", "asian", "asian", "semitic", "indo-aryan")>>
+<<elseif ($activeSlave.nationality is "Pakistani")>>
+	<<set $activeSlave.race to either("indo-aryan", "indo-aryan", "indo-aryan", "semitic")>>
+<<elseif ($activeSlave.nationality is "Bangladeshi")>>
+	<<set $activeSlave.race to either("indo-aryan")>>
+<<elseif ($activeSlave.nationality is "Belarusian")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Russian")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Ukrainian")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Irish")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Icelandic")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Finnish")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Swiss")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Danish")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Norwegian")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Austrian")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Slovak")>>
+	<<set $activeSlave.race to either("white", "white", "white", "white", "indo-aryan")>>
+<<elseif ($activeSlave.nationality is "Dutch")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Belgian")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Czech")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Serbian")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Portuguese")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Hungarian")>>
+	<<set $activeSlave.race to either("white", "white", "white", "white", "indo-aryan")>>
+<<elseif ($activeSlave.nationality is "Estonian")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Polish")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Lithuanian")>>
+	<<set $activeSlave.race to either("white")>>
+<<elseif ($activeSlave.nationality is "Romanian")>>
+	<<set $activeSlave.race to either("semitic", "white", "white", "white", "white", "indo-aryan")>>
+<<elseif ($activeSlave.nationality is "German")>>
+	<<set $activeSlave.race to either("black", "middle eastern", "white", "white", "white", "white", "white", "white")>>
+<<elseif ($activeSlave.nationality is "Swedish")>>
+	<<set $activeSlave.race to either("middle eastern", "white", "white", "white", "white")>>
+<<elseif ($activeSlave.nationality is "French")>>
+	<<set $activeSlave.race to either("black", "middle eastern", "white", "white", "white", "white", "white", "southern European")>>
+<<elseif ($activeSlave.nationality is "Italian")>>
+	<<set $activeSlave.race to either("middle eastern", "southern European", "southern European", "white", "white")>>
+<<elseif ($activeSlave.nationality is "Greek")>>
+	<<set $activeSlave.race to either("southern European")>>
+<<elseif ($activeSlave.nationality is "Spanish")>>
+	<<set $activeSlave.race to either("semitic", "southern European", "southern European")>>
+<<elseif ($activeSlave.nationality is "British")>>
+	<<set $activeSlave.race to either("indo-aryan", "white", "white", "white", "white", "white", "white", "white", "white", "white")>>
+<<elseif ($activeSlave.nationality is "Scottish")>>
+	<<set $activeSlave.race to either("middle eastern", "indo-aryan", "white", "white", "white", "white", "white", "white", "white")>>
+<<elseif ($activeSlave.nationality is "Australian")>>
+	<<set $activeSlave.race to either("white", "white", "black", "asian")>>
+<<elseif ($activeSlave.nationality is "a New Zealander")>>
+	<<set $activeSlave.race to either("white", "white", "white", "white", "pacific islander")>>
+<</if>>
+
+/% Begin mixed race rate adjustment. %/
+/% Some countries are extremely ethnically homogeneous and unlikely to change soon. %/
+<<if ($activeSlave.nationality is "Japanese")>>
+	<<if random(1,100) > 98>>
+		<<set $activeSlave.race to "mixed race">>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Korean")>>
+	<<if random(1,100) > 95>>
+		<<set $activeSlave.race to "mixed race">>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Polish") or ($activeSlave.nationality is "Romanian") or ($activeSlave.nationality is "Bulgarian") or ($activeSlave.nationality is "Lithuanian") or ($activeSlave.nationality is "Croatian")>>
+	/% Croatia isn't an origin currently but the game might add it in the future. %/
+	<<if random(1,100) > 98>>
+		<<set $activeSlave.race to "mixed race">>
+	<</if>>
+<<elseif random(1,100) > 90>>
+	/% Default rate. %/
+	<<set $activeSlave.race to "mixed race">>
+<</if>>
+/% End mixed race rate adjustment. %/
+
+<<else>>
+
+<<switch $fixedRace>>
+<<case "white">>
+	<<set $activeSlave.nationality to $whiteNationalities.random()>>
+<<case "asian">>
+	<<set $activeSlave.nationality to $asianNationalities.random()>>
+<<case "latina">>
+	<<set $activeSlave.nationality to $latinaNationalities.random()>>
+<<case "middle eastern">>
+	<<set $activeSlave.nationality to $middleEasternNationalities.random()>>
+<<case "black">>
+	<<set $activeSlave.nationality to $blackNationalities.random()>>
+<<case "indo-aryan">>
+	<<set $activeSlave.nationality to $indoAryan"Nationalities.random()>>
+<<case "pacific islander">>
+	<<set $activeSlave.nationality to $pacificIslanderNationalities.random()>>
+<<case "malay">>
+	<<set $activeSlave.nationality to $malayNationalities.random()>>
+<<case "amerindian">>
+	<<set $activeSlave.nationality to $amerindianNationalities.random()>>
+<<case "southern european">>
+	<<set $activeSlave.nationality to $southernEuropean"Nationalities.random()>>
+<<case "semitic">>
+	<<set $activeSlave.nationality to $semiticNationalities.random()>>
+<</switch>>
+<<set $activeSlave.race = $fixedRace>>
+
+<</if>>
+
+<<if $arcologies[0].FSSupremacistLawME != 0>>
+<<if $activeSlave.race == $arcologies[0].FSSupremacistRace>>
+	<<set $activeSlave.race to "mixed race">>
+<</if>>
+<</if>>
+
+<</widget>>
+
+<<widget "NationalityToName">>
+
+<<if ($activeSlave.nationality is "American")>>
+	<<if $activeSlave.race is "black">>
+		<<set $activeSlave.birthName to $africanAmericanSlaveNames.random()>>
+	<<elseif $activeSlave.race is "latina">>
+		<<set $activeSlave.birthName to $latinaSlaveNames.random()>>
+	<<elseif $activeSlave.race is "asian">>
+		<<set $activeSlave.birthName to $asianAmericanSlaveNames.random()>>
+	<<elseif $activeSlave.race is "middle eastern">>
+		<<set $activeSlave.birthName to $egyptianSlaveNames.random()>>
+	<<else>>
+		<<set $activeSlave.birthName to $whiteAmericanSlaveNames.random()>>
+	<</if>>
+<<case "Canadian">>
+	<<set $activeSlave.birthName to $canadianSlaveNames.random()>>
+<<case "Mexican">>
+	<<set $activeSlave.birthName to $mexicanSlaveNames.random()>>
+<<case "Dominican">>
+	<<set $activeSlave.birthName to $dominicanSlaveNames.random()>>
+<<case "Puerto Rican">>
+	<<set $activeSlave.birthName to $puertoRicanSlaveNames.random()>>
+<<case "Haitian">>
+	<<set $activeSlave.birthName to $haitianSlaveNames.random()>>
+<<case "Jamaican">>
+	<<set $activeSlave.birthName to $jamaicanSlaveNames.random()>>
+<<case "Cuban">>
+	<<set $activeSlave.birthName to $cubanSlaveNames.random()>>
+<<case "Guatemalan">>
+	<<set $activeSlave.birthName to $guatemalanSlaveNames.random()>>
+<<case "Chilean">>
+	<<set $activeSlave.birthName to $chileanSlaveNames.random()>>
+<<case "Peruvian">>
+	<<set $activeSlave.birthName to $peruvianSlaveNames.random()>>
+<<case "Bolivian">>
+	<<set $activeSlave.birthName to $bolivianSlaveNames.random()>>
+<<case "Venezuelan">>
+	<<set $activeSlave.birthName to $venezuelanSlaveNames.random()>>
+<<case "Belarusian">>
+	<<set $activeSlave.birthName to $belarusianSlaveNames.random()>>
+<<case "Russian">>
+	<<set $activeSlave.birthName to $russianSlaveNames.random()>>
+<<case "Ukrainian">>
+	<<set $activeSlave.birthName to $ukrainianSlaveNames.random()>>
+<<case "Italian">>
+	<<set $activeSlave.birthName to $italianSlaveNames.random()>>
+<<case "Spanish">>
+	<<set $activeSlave.birthName to $spanishSlaveNames.random()>>
+<<case "British">>
+	<<set $activeSlave.birthName to $britishSlaveNames.random()>>
+<<case "Scottish">>
+	<<set $activeSlave.birthName to $scottishSlaveNames.random()>>
+<<case "French">>
+	<<set $activeSlave.birthName to $frenchSlaveNames.random()>>
+<<case "German">>
+	<<set $activeSlave.birthName to $germanSlaveNames.random()>>
+<<case "Lithuanian">>
+	<<set $activeSlave.birthName to $lithuanianSlaveNames.random()>>
+<<case "Norwegian">>
+	<<set $activeSlave.birthName to $norwegianSlaveNames.random()>>
+<<case "Slovak">>
+	<<set $activeSlave.birthName to $slovakSlaveNames.random()>>
+<<case "Danish">>
+	<<set $activeSlave.birthName to $danishSlaveNames.random()>>
+<<case "Dutch">>
+	<<set $activeSlave.birthName to $dutchSlaveNames.random()>>
+<<case "Austrian">>
+	<<set $activeSlave.birthName to $austrianSlaveNames.random()>>
+<<case "Swiss">>
+	<<set $activeSlave.birthName to $swissSlaveNames.random()>>
+<<case "Serbian">>
+	<<set $activeSlave.birthName to $serbianSlaveNames.random()>>
+<<case "Belgian">>
+	<<set $activeSlave.birthName to $belgianSlaveNames.random()>>
+<<case "Czech">>
+	<<set $activeSlave.birthName to $czechSlaveNames.random()>>
+<<case "Portuguese">>
+	<<set $activeSlave.birthName to $portugueseSlaveNames.random()>>
+<<case "Swedish">>
+	<<set $activeSlave.birthName to $swedishSlaveNames.random()>>
+<<case "Romanian">>
+	<<set $activeSlave.birthName to $romanianSlaveNames.random()>>
+<<case "Hungarian">>
+	<<set $activeSlave.birthName to $hungarianSlaveNames.random()>>
+<<case "Estonian">>
+	<<set $activeSlave.birthName to $estonianSlaveNames.random()>>
+<<case "Irish">>
+	<<set $activeSlave.birthName to $irishSlaveNames.random()>>
+<<case "Icelandic">>
+	<<set $activeSlave.birthName to $icelandicSlaveNames.random()>>
+<<case "Finnish">>
+	<<set $activeSlave.birthName to $finnishSlaveNames.random()>>
+<<case "Greek">>
+	<<set $activeSlave.birthName to $greekSlaveNames.random()>>
+<<case "Polish">>
+	<<set $activeSlave.birthName to $polishSlaveNames.random()>>
+<<case "Brazilian">>
+	<<set $activeSlave.birthName to $brazilianSlaveNames.random()>>
+<<case "Egyptian">>
+	<<set $activeSlave.birthName to $egyptianSlaveNames.random()>>
+<<case "Colombian">>
+	<<set $activeSlave.birthName to $colombianSlaveNames.random()>>
+<<case "Argentinian">>
+	<<set $activeSlave.birthName to $argentinianSlaveNames.random()>>
+<<case "Turkish">>
+	<<set $activeSlave.birthName to $turkishSlaveNames.random()>>
+<<case "Iranian">>
+	<<set $activeSlave.birthName to $iranianSlaveNames.random()>>
+<<case "Armenian">>
+	<<set $activeSlave.birthName to $armenianSlaveNames.random()>>
+<<case "Israeli">>
+	<<set $activeSlave.birthName to $israeliSlaveNames.random()>>
+<<case "Saudi">>
+	<<set $activeSlave.birthName to $saudiSlaveNames.random()>>
+<<case "South African">>
+	<<if $activeSlave.race is "black">>
+		<<set $activeSlave.birthName to $blackSouthAfricanSlaveNames.random()>>
+	<<else>>
+		<<set $activeSlave.birthName to $whiteSouthAfricanSlaveNames.random()>>
+	<</if>>
+<<case "Nigerian">>
+	<<set $activeSlave.birthName to $nigerianSlaveNames.random()>>
+<<case "Congolese">>
+	<<set $activeSlave.birthName to $congoleseSlaveNames.random()>>
+<<case "Kenyan">>
+	<<set $activeSlave.birthName to $kenyanSlaveNames.random()>>
+<<case "Tanzanian">>
+	<<set $activeSlave.birthName to $tanzanianSlaveNames.random()>>
+<<case "Zimbabwean">>
+	<<if $activeSlave.race == "white">>
+		<<set $activeSlave.birthName to $britishSlaveNames.random()>>
+	<<else>>
+		<<set $activeSlave.birthName to $zimbabweanSlaveNames.random()>>
+	<</if>>
+<<case "Ghanan">>
+	<<set $activeSlave.birthName to $ghananSlaveNames.random()>>
+<<case "Ugandan">>
+	<<set $activeSlave.birthName to $ugandanSlaveNames.random()>>
+<<case "Ethiopian">>
+	<<set $activeSlave.birthName to $ethiopianSlaveNames.random()>>
+<<case "Moroccan">>
+	<<set $activeSlave.birthName to $moroccanSlaveNames.random()>>
+<<case "Chinese">>
+	<<set $activeSlave.birthName to $chineseSlaveNames.random()>>
+<<case "Korean">>
+	<<set $activeSlave.birthName to $koreanSlaveNames.random()>>
+<<case "Thai">>
+	<<set $activeSlave.birthName to $thaiSlaveNames.random()>>
+<<case "Vietnamese">>
+	<<set $activeSlave.birthName to $vietnameseSlaveNames.random()>>
+<<case "Japanese">>
+	<<set $activeSlave.birthName to $japaneseSlaveNames.random()>>
+<<case "Indonesian">>
+	<<set $activeSlave.birthName to $indonesianSlaveNames.random()>>
+<<case "Filipina">>
+	<<set $activeSlave.birthName to $filipinaSlaveNames.random()>>
+<<case "Bangladeshi">>
+	<<set $activeSlave.birthName to $bangladeshiSlaveNames.random()>>
+<<case "Malaysian">>
+	<<set $activeSlave.birthName to $malaysianSlaveNames.random()>>
+<<case "Uzbek">>
+	<<set $activeSlave.birthName to $uzbekSlaveNames.random()>>
+<<case "Afghan">>
+	<<set $activeSlave.birthName to $afghanSlaveNames.random()>>
+<<case "Nepalese">>
+	<<set $activeSlave.birthName to $nepaleseSlaveNames.random()>>
+<<case "Burmese">>
+	<<set $activeSlave.birthName to $burmeseSlaveNames.random()>>
+<<case "Iraqi">>
+	<<set $activeSlave.birthName to $iraqiSlaveNames.random()>>
+<<case "Yemeni">>
+	<<set $activeSlave.birthName to $yemeniSlaveNames.random()>>
+<<case "Sudanese">>
+	<<set $activeSlave.birthName to $sudaneseSlaveNames.random()>>
+<<case "Algerian">>
+	<<set $activeSlave.birthName to $algerianSlaveNames.random()>>
+<<case "Tunisian">>
+	<<set $activeSlave.birthName to $tunisianSlaveNames.random()>>
+<<case "Libyan">>
+	<<set $activeSlave.birthName to $libyanSlaveNames.random()>>
+<<case "Omani">>
+	<<set $activeSlave.birthName to $omaniSlaveNames.random()>>
+<<case "Malian">>
+	<<set $activeSlave.birthName to $malianSlaveNames.random()>>
+<<case "Jordanian">>
+	<<set $activeSlave.birthName to $jordanianSlaveNames.random()>>
+<<case "Lebanese">>
+	<<set $activeSlave.birthName to $lebaneseSlaveNames.random()>>
+<<case "Emirati">>
+	<<set $activeSlave.birthName to $emiratiSlaveNames.random()>>
+<<case "Kazakh">>
+	<<set $activeSlave.birthName to $kazakhSlaveNames.random()>>
+<<case "Pakistani">>
+	<<set $activeSlave.birthName to $pakistaniSlaveNames.random()>>
+<<case "Indian">>
+	<<set $activeSlave.birthName to $indianSlaveNames.random()>>
+<<case "Australian">>
+	<<set $activeSlave.birthName to $australianSlaveNames.random()>>
+<<case "a New Zealander">>
+	<<set $activeSlave.birthName to $newZealanderSlaveNames.random()>>
+<<default>>
+	<<set $activeSlave.birthName to $whiteAmericanSlaveNames.random()>>
+<</switch>>
+
+<</widget>>
+
+<<widget "NationalityToAccent">>
+
+<<set $seed to either(0,1,1,2,2,2,3,3,3,3)>>
+
+<<if ($activeSlave.nationality is "American")>>
+	<<if $activeSlave.race is "black">>
+	<<if $language is "English">>
+		<<set $activeSlave.accent to 0>>
+	<<else>>
+		<<set $activeSlave.accent to either(0,1,1,2,2,2,3,3,3,3)>>
+	<</if>>
+	<<elseif $activeSlave.race is "latina">>
+	<<if $language is "English">>
+		<<set $activeSlave.accent to 0>>
+	<<elseif $language is "Spanish">>
+		<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+		<<set $activeSlave.accent to $seed>>
+	<</if>>
+	<<elseif $activeSlave.race is "asian">>
+	<<if $language is "English">>
+		<<set $activeSlave.accent to 0>>
+	<<elseif $language is "Chinese">>
+		<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+		<<set $activeSlave.accent to $seed>>
+	<</if>>
+	<<elseif $activeSlave.race is "middle eastern">>
+	<<if $language is "English">>
+		<<set $activeSlave.accent to 0>>
+	<<elseif $language is "Arabic">>
+		<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+		<<set $activeSlave.accent to $seed>>
+	<</if>>
+	<<else>>
+	<<if $language is "English">>
+		<<set $activeSlave.accent to 0>>
+	<<else>>
+		<<set $activeSlave.accent to $seed>>
+	<</if>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Canadian")>>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Mexican")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Dominican")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Puerto Rican")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Haitian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Jamaican")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Cuban")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Guatemalan")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Chilean")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Peruvian")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Bolivian")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Venezuelan")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Russian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Ukrainian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Italian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Spanish")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "British")>>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Scottish")>>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 2>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "French")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "German")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Lithuanian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Belarusian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "French")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "German")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Lithuanian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Norwegian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Slovak")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Danish")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Dutch")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Austrian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Swiss")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Serbian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Belgian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Czech")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Portuguese")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Swedish")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Romanian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Hungarian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Estonian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Irish")>>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Icelandic")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Finnish")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Greek")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Polish")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Brazilian")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Egyptian")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Colombian")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Argentinian")>>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Turkish")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Iranian")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Armenian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Israeli")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Saudi")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "South African")>>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Nigerian")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Congolese")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Kenyan")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Tanzanian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Zimbabwean")>>
+	<<if $language is "English" && $activeSlave.race == "white">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Ghanan")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Ugandan")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Ethiopian")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Moroccan")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Chinese")>>
+	<<if $language is "Chinese">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Korean")>>
+	<<if $language is "Chinese">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Thai")>>
+	<<if $language is "Chinese">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Vietnamese")>>
+	<<if $language is "Chinese">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Japanese")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Indonesian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Filipina")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Bangladeshi")>>
+	<<if $language is "Indian">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Malaysian")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Uzbek")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Afghan")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Nepalese")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Burmese")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Iraqi")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Yemeni")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Sudanese")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Algerian")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Tunisian")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Libyan")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Omani")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Malian")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Jordanian")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Lebanese")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Emirati")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Kazakh")>>
+	<<set $activeSlave.accent to $seed>>
+<<elseif ($activeSlave.nationality is "Pakistani")>>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Indian")>>
+	<<if $language is "Indian">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "Australian")>>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif ($activeSlave.nationality is "a New Zealander")>>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif $activeSlave.nationality is "Roman Revivalist">>
+	<<if $language is "Latin">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif $activeSlave.nationality is "Ancient Egyptian Revivalist">>
+	<<if $language is "Ancient Egyptian">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif $activeSlave.nationality is "Edo Revivalist">>
+	<<if $language is "Japanese">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif $activeSlave.nationality is "Arabian Revivalist">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<elseif $activeSlave.nationality is "Ancient Chinese Revivalist">>
+	<<if $language is "Chinese">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<else>>
+	<<set $activeSlave.accent to $seed>>
+<</if>>
+
+<<if $activeSlave.nationality is $language>>
+	<<set $activeSlave.accent to 0>>
+<</if>>
+
+<</widget>>
\ No newline at end of file
diff --git a/slave variables documentation - Pregmod.txt b/slave variables documentation - Pregmod.txt
index 44007c505d2ba32c511fbd4f412941f3d7b37ee0..7bceba2263b5b497328181f53b5d80bb2dee5bd3 100644
--- a/slave variables documentation - Pregmod.txt	
+++ b/slave variables documentation - Pregmod.txt	
@@ -109,6 +109,7 @@ $HGCareers
 "a politician"
 "a model-UN star"
 "a student council president"
+"a leading arcology citizen"
 
 $recruiterCareers
 "a military recruiter"
diff --git a/src/events/intro/economyIntro.tw b/src/events/intro/economyIntro.tw
index ee48cf641ab1596ebdb9a4d608212153938314c5..eb288d0f571253033dfb2ca86273555d0eb1aaa4 100644
--- a/src/events/intro/economyIntro.tw
+++ b/src/events/intro/economyIntro.tw
@@ -1,9 +1,16 @@
-:: Economy Intro
- 
+:: Economy Intro [nobr]
+
+<<if $PC.career == "arcology owner">>
+	<<goto "Takeover Target">>
+<<else>>
+
 It is the year 2037, and the past 21 years have not been kind. The world is starting to fall apart. The climate is deteriorating, resources are being exhausted, and there are more people to feed every year. Technology is advancing, but not fast enough to save everyone. @@color:orange;Exactly how bad is the situation?@@
+<br>
 
-[[Very serious.|Terrain Intro][$economy to 1]] //Default difficulty.//
-[[Not truly dire. Not yet.|Terrain Intro][$economy to 0.5]] //Easy economics.//
-[[This is the last dance.|Terrain Intro][$economy to 1.5]] //Crushing challenge.//
+<br>[[Very serious.|Trade Intro][$economy to 1]] //Default difficulty.//
+<br>[[Not truly dire. Not yet.|Trade Intro][$economy to 0.5]] //Easy economics.//
+<br>[[This is the last dance.|Trade Intro][$economy to 1.5]] //Crushing challenge.//
+<br>
+<br>[[Skip Intro|Intro Summary]] //This will preclude you from taking over an established arcology.//
 
-[[Skip Intro|Intro Summary]]
+<</if>>
diff --git a/src/events/intro/extremeIntro.tw b/src/events/intro/extremeIntro.tw
index a416185a5b6df772235be91a19bef8bb970ee7d2..b273ff8e67b225d7d89268b4ed9b0e114121612d 100644
--- a/src/events/intro/extremeIntro.tw
+++ b/src/events/intro/extremeIntro.tw
@@ -2,8 +2,8 @@
 
 The early Free Cities were wild places where the writ of law did not run. In some of the most depraved, slaves' bodies, minds and even lives were playthings of the wealthy and powerful. Though modern Free Cities are tremendously varied, a majority of the new communities made a choice about whether extreme practices were a flaw in a lawless society or one of its benefits. @@color:orange;How did most Free Cities react to the excesses of the early days?@@
 
-[[They drew back from them.|Slave Age Intro][$seeExtreme to 0]] //Extreme content such as amputation and castration will not appear.//
-[[They reveled in them.|Slave Age Intro][$seeExtreme to 1]] //Extreme content will appear.//
-[[They reveled in them and were particularly inventive.|Slave Age Intro][$seeExtreme to 1,$seeHyperPreg to 1]] //Extreme content will appear, including hyper-pregnancy related content//
-[[They drew back from them, but remained creative.|Slave Age Intro][$seeExtreme to 0,$seeHyperPreg to 1]] //Extreme content will not appear, but hyper-pregnancy related content might appear.//
+[[They drew back from them.|Gender Intro][$seeExtreme to 0]] //Extreme content such as amputation and castration will not appear.//
+[[They reveled in them.|Gender Intro][$seeExtreme to 1]] //Extreme content will appear.//
+[[They reveled in them and were particularly inventive.|Gender Intro][$seeExtreme to 1,$seeHyperPreg to 1]] //Extreme content will appear, including hyper-pregnancy related content//
+[[They drew back from them, but remained creative.|Gender Intro][$seeExtreme to 0,$seeHyperPreg to 1]] //Extreme content will not appear, but hyper-pregnancy related content might appear.//
 
diff --git a/src/events/intro/genderIntro.tw b/src/events/intro/genderIntro.tw
index bc6d18acb618ad7b37c7b791a70df02b3d5bf21f..52c7c77bde296cef744009a266bef8257868db1a 100644
--- a/src/events/intro/genderIntro.tw
+++ b/src/events/intro/genderIntro.tw
@@ -1,10 +1,10 @@
 :: Gender Intro
- 
-The Free Cities are sexually libertine places, and sexual slavery is ubiquitous. Some Free Cities have upheld or even strengthened traditional gender roles, expecting men to be men and women to be women. Others subscribe to an interesting refinement of those gender roles, considering any sex slave female, regardless of her biology. A small minority even go so far as to strongly favor societal feminization of slaves born male; in these, biologically female slaves are a rare sight. @@color:orange;Which kind of Free City is your new arcology located in?@@
 
-[[A city that's open-minded about who can be a slave girl.|PC Experience Intro][$seeDicks to 25]]
+The Free Cities are sexually libertine places, and sexual slavery is ubiquitous. Some of the early Free Cities upheld or even strengthened traditional gender roles, expecting men to be men and women to be women. Others subscribed to an interesting refinement of those gender roles, considering any sex slave female, regardless of her biology. A small minority even went so far as to strongly favor societal feminization of slaves born male; in these, biologically female slaves were a rare sight. @@color:orange;Which kind of Free City came to predominate?@@
+
+[[Free Cities that were open-minded about who could be a slave girl.|Slave Age Intro][$seeDicks to 25]]
 &nbsp;&nbsp;&nbsp;&nbsp;//Default setting. A majority of slaves will be biologically female, and all content will be available.//
-[[A city that understands that girls are girls.|PC Experience Intro][$seeDicks to 0]]
+[[Free Cities that understood that girls are girls.|Slave Age Intro][$seeDicks to 0]]
 &nbsp;&nbsp;&nbsp;&nbsp;//Almost all slaves will be biologically female, restricting some content.//
-[[A city that likes its girls with dicks.|PC Experience Intro][$seeDicks to 100]]
+[[Free Cities that preferred girls with dicks.|Slave Age Intro][$seeDicks to 100]]
 &nbsp;&nbsp;&nbsp;&nbsp;//Almost all slaves will be biologically male, restricting some content.//
diff --git a/src/events/intro/initNationalities.tw b/src/events/intro/initNationalities.tw
index f115e2da07bdaa676b756ca7ac3755b889646147..06912423c99c5071e7765afa600500282db6ec21 100644
--- a/src/events/intro/initNationalities.tw
+++ b/src/events/intro/initNationalities.tw
@@ -9,6 +9,7 @@
 
 <<set $upgradeMultiplierArcology to 1>>
 <<set $upgradeMultiplierMedicine to 1>>
+
 <<if $PC.career is "wealth">>
 	<<set $trinkets.push("a collection of diplomas from expensive schools")>>
 	<<set $cash += 10000>>
@@ -29,6 +30,10 @@
 <<elseif $PC.career is "celebrity">>
 	<<set $trinkets.push("a framed copy of the first news story featuring yourself")>>
 	<<set $rep += 4000>>
+<<elseif $PC.career is "arcology owner">>
+	<<set $trinkets.push("a miniature model of your first arcology")>>
+	<<set $upgradeMultiplierArcology to 0.8>>
+	<<set $rep += 2000>>
 <<elseif $PC.career is "escort">>
 	<<set $trinkets.push("a copy the first porno you starred in")>>
 <<elseif $PC.career is "servant">>
@@ -178,10 +183,11 @@
 <</if>>
 <</if>>
 
-<<if ($terrain is "oceanic")>>
+<<switch $terrain>>
+<<case "oceanic">>
 	<<set $arcologies[0].FSSupremacistRace to "white">>
 	<<set $arcologies[0].FSSubjugationistRace to "middle eastern">>
-<<elseif ($continent is "North America")>>
+<<case "North America">>
 	<<set $arcologies[0].FSSupremacistRace to "white">>
 	<<set $arcologies[0].FSSubjugationistRace to "black">>
 	<<set $nationalities.push("American","American","American","American")>>
@@ -192,7 +198,7 @@
 	<<set $nationalities.push("Cuban")>>
 	<<set $nationalities.push("Puerto Rican")>>
 	<<set $nationalities.push("Jamaican")>>
-<<elseif ($continent is "South America")>>
+<<case "South America">>
 	<<set $arcologies[0].FSSupremacistRace to "latina">>
 	<<set $arcologies[0].FSSubjugationistRace to "black">>
 	<<set $nationalities.push("Brazilian","Brazilian","Brazilian","Brazilian")>>
@@ -203,7 +209,7 @@
 	<<set $nationalities.push("Bolivian")>>
 	<<set $nationalities.push("Chilean")>>
 	<<set $nationalities.push("Guatemalan")>>
-<<elseif ($continent is "the Middle East")>>
+<<case "the Middle East">>
 	<<set $arcologies[0].FSSupremacistRace to "middle eastern">>
 	<<set $arcologies[0].FSSubjugationistRace to "asian">>
 	<<set $nationalities.push("Egyptian", "Egyptian", "Egyptian")>>
@@ -219,7 +225,7 @@
 	<<set $nationalities.push("Iraqi")>>
 	<<set $nationalities.push("Afghan")>>
 	<<set $nationalities.push("Yemeni")>>
-<<elseif ($continent is "Africa")>>
+<<case "Africa">>
 	<<set $arcologies[0].FSSupremacistRace to "black">>
 	<<set $arcologies[0].FSSubjugationistRace to "white">>
 	<<set $nationalities.push("Nigerian", "Nigerian", "Nigerian")>>
@@ -237,7 +243,7 @@
 	<<set $nationalities.push("Zimbabwean")>>
 	<<set $nationalities.push("Tanzanian")>>
 	<<set $nationalities.push("Ugandan")>>
-<<elseif ($continent is "Asia")>>
+<<case "Asia">>
 	<<set $arcologies[0].FSSupremacistRace to "asian">>
 	<<set $arcologies[0].FSSubjugationistRace to "indo-aryan">>
 	<<set $nationalities.push("Chinese","Chinese","Chinese","Chinese","Chinese","Chinese","Chinese","Chinese","Chinese","Chinese","Chinese","Chinese","Chinese","Chinese")>>
@@ -255,7 +261,9 @@
 	<<set $nationalities.push("Uzbek")>>
 	<<set $nationalities.push("Nepalese")>>
 	<<set $nationalities.push("Kazakh")>>
-<<elseif ($continent is "Europe")>>
+<<case "Europe">>
+	<<set $arcologies[0].FSSupremacistRace to "white">>
+	<<set $arcologies[0].FSSubjugationistRace to "middle eastern">>
 	<<set $nationalities.push("Russian", "Russian", "Russian", "Russian")>>
 	<<set $nationalities.push("German", "German", "German")>>
 	<<set $nationalities.push("Belarusian","Belarusian")>>
@@ -284,16 +292,16 @@
 	<<set $nationalities.push("Portuguese")>>
 	<<set $nationalities.push("Hungarian")>>
 	<<set $nationalities.push("Estonian")>>
-<<elseif ($continent is "Australia")>>
+<<case "Australia">>
 	<<set $arcologies[0].FSSupremacistRace to "white">>
 	<<set $arcologies[0].FSSubjugationistRace to "asian">>
 	<<set $nationalities.push("Australian","Australian","Australian")>>
 	<<set $nationalities.push("a New Zealander")>>
-<<elseif ($continent is "Japan")>>
+<<case "Japan">>
 	<<set $arcologies[0].FSSupremacistRace to "asian">>
 	<<set $arcologies[0].FSSubjugationistRace to "asian">>
 	<<set $nationalities.push("Japanese","Japanese","Japanese")>>
-<</if>>
+<</switch>>
 <<set $customSlave.nationality to $nationalities.random()>>
 <<set $huskSlave.nationality to $nationalities.random()>>
 
@@ -312,8 +320,70 @@
 	<<set $activeArcology to {name: "Arcology X-", direction: "north", government: "an individual", leaderID: 0, honeymoon: 0, prosperity: 50, ownership: 50, minority: 20, PCminority: 0, demandFactor: 0, FSSupremacist: "unset", FSSupremacistRace: 0, FSSubjugationist: "unset", FSSubjugationistRace: 0, FSRestart: "unset", FSRepopulationFocus: "unset", FSGenderRadicalist: "unset", FSGenderFundamentalist: "unset", FSPaternalist: "unset", FSDegradationist: "unset", FSBodyPurist: "unset", FSTransformationFetishist: "unset", FSYouthPreferentialist: "unset", FSMaturityPreferentialist: "unset", FSSlimnessEnthusiast: "unset", FSAssetExpansionist: "unset", FSPastoralist: "unset", FSPhysicalIdealist: "unset", FSChattelReligionist: "unset", FSRomanRevivalist: "unset", FSEgyptianRevivalist: "unset", FSEdoRevivalist: "unset", FSArabianRevivalist: "unset", FSChineseRevivalist: "unset", FSNull: "unset", FSGenderRadicalistResearch: 0, FSGenderFundamentalistResearch: 0, FSPaternalistResearch: 0, FSDegradationistResearch: 0, FSBodyPuristResearch: 0, FSTransformationFetishistResearch: 0, FSYouthPreferentialistResearch: 0, FSMaturityPreferentialistResearch: 0, FSSlimnessEnthusiastResearch: 0, FSAssetExpansionistResearch: 0, FSPastoralistResearch: 0, FSPhysicalIdealistResearch: 0, FSRepopulationFocusResearch: 0, FSRestartResearch: 0, embargo: 1, embargoTarget: -1, influenceTarget: -1, influenceBonus: 0, rival: 0}>>
 	<<if $i == 0>>
 		<<set $activeArcology.direction to 0>>
+		<<set $activeArcology.name to "Arcology X-4">>
+		<<set $activeArcology.FSSupremacistDecoration to 20, $activeArcology.FSSubjugationistDecoration to 20, $activeArcology.FSGenderRadicalistDecoration to 20, $activeArcology.FSGenderFundamentalistDecoration to 20, $activeArcology.FSPaternalistDecoration to 20, $activeArcology.FSDegradationistDecoration to 20, $activeArcology.FSBodyPuristDecoration to 20, $activeArcology.FSTransformationFetishistDecoration to 20, $activeArcology.FSYouthPreferentialistDecoration to 20, $activeArcology.FSMaturityPreferentialistDecoration to 20, $activeArcology.FSSlimnessEnthusiastDecoration to 20, $activeArcology.FSAssetExpansionistDecoration to 20, $activeArcology.FSPastoralistDecoration to 20, $activeArcology.FSPhysicalIdealistDecoration to 20, $activeArcology.FSChattelReligionistDecoration to 20, $activeArcology.FSRomanRevivalistDecoration to 20, $activeArcology.FSEgyptianRevivalistDecoration to 20, $activeArcology.FSEdoRevivalistDecoration to 20, $activeArcology.FSArabianRevivalistDecoration to 20, $activeArcology.FSChineseRevivalistDecoration to 20, $activeArcology.FSRepopulationFocusDecoration to 20, $activeArcology.FSRestartDecoration to 20>>
+		<<if $targetArcology.type != "New">>
+			<<set $FSAnnounced = 1>>
+			<<set $activeArcology.name = $targetArcology.name, $activeArcology.prosperity = $targetArcology.prosperity, $ACitizens += $activeArcology.citizens*500>>
+			<<set _decoration = $targetArcology.FSProgress + 10>>
+			<<switch $targetArcology.type>>
+			<<case "Supremacist">>
+				<<set $activeArcology.FSSupremacist = $targetArcology.FSProgress, $activeArcology.FSSupremacistDecoration = _decoration, $activeArcology.FSSupremacistRace = $targetArcology.race>>
+			<<case "Subjugationist">>
+				<<set $activeArcology.FSSubjugationist = $targetArcology.FSProgress, $activeArcology.FSSubjugationistDecoration = _decoration, $activeArcology.FSSubjugationistRace = $targetArcology.race>>
+			<<case "GenderRadicalist">>
+				<<set $activeArcology.FSGenderRadicalist = $targetArcology.FSProgress, $activeArcology.FSGenderRadicalistDecoration = _decoration>>
+			<<case "GenderFundamentalist">>
+				<<set $activeArcology.FSGenderFundamentalist = $targetArcology.FSProgress, $activeArcology.FSGenderFundamentalistDecoration = _decoration>>
+			<<case "Paternalist">>
+				<<set $activeArcology.FSPaternalist = $targetArcology.FSProgress, $activeArcology.FSPaternalistDecoration = _decoration>>
+			<<case "Degradationist">>
+				<<set $activeArcology.FSDegradationist = $targetArcology.FSProgress, $activeArcology.FSDegradationistDecoration = _decoration>>
+			<<case "AssetExpansionist">>
+				<<set $activeArcology.FSAssetExpansionist = $targetArcology.FSProgress, $activeArcology.FSAssetExpansionistDecoration = _decoration>>
+			<<case "SlimnessEnthusiast">>
+				<<set $activeArcology.FSSlimnessEnthusiast = $targetArcology.FSProgress, $activeArcology.FSSlimnessEnthusiastDecoration = _decoration>>
+			<<case "TransformationFetishist">>
+				<<set $activeArcology.FSTransformationFetishist = $targetArcology.FSProgress, $activeArcology.FSTransformationFetishistDecoration = _decoration>>
+			<<case "BodyPurist">>
+				<<set $activeArcology.FSBodyPurist = $targetArcology.FSProgress, $activeArcology.FSBodyPuristDecoration = _decoration>>
+			<<case "MaturityPreferentialist">>
+				<<set $activeArcology.FSMaturityPreferentialist = $targetArcology.FSProgress, $activeArcology.FSMaturityPreferentialistDecoration = _decoration>>
+			<<case "YouthPreferentialist">>
+				<<set $activeArcology.FSYouthPreferentialist = $targetArcology.FSProgress, $activeArcology.FSYouthPreferentialistDecoration = _decoration>>
+			<<case "Pastoralist">>
+				<<set $activeArcology.FSPastoralist = $targetArcology.FSProgress, $activeArcology.FSPastoralistDecoration = _decoration>>
+			<<case "PhysicalIdealist">>
+				<<set $activeArcology.FSPhysicalIdealist = $targetArcology.FSProgress, $activeArcology.FSPhysicalIdealistDecoration = _decoration>>
+			<<case "ChattelReligionist">>
+				<<set $activeArcology.FSChattelReligionist = $targetArcology.FSProgress, $activeArcology.FSChattelReligionistDecoration = _decoration>>
+			<<case "RomanRevivalist">>
+				<<set $activeArcology.FSRomanRevivalist = $targetArcology.FSProgress, $activeArcology.FSRomanRevivalistDecoration = _decoration>>
+			<<case "EgyptianRevivalist">>
+				<<set $activeArcology.FSEgyptianRevivalist = $targetArcology.FSProgress, $activeArcology.FSEgyptianRevivalistDecoration = _decoration>>
+			<<case "EdoRevivalist">>
+				<<set $activeArcology.FSEdoRevivalist = $targetArcology.FSProgress, $activeArcology.FSEdoRevivalistDecoration = _decoration>>
+			<<case "ArabianRevivalist">>
+				<<set $activeArcology.FSArabianRevivalist = $targetArcology.FSProgress, $activeArcology.FSArabianRevivalistDecoration = _decoration>>
+			<<case "ChineseRevivalist">>
+				<<set $activeArcology.FSChineseRevivalist = $targetArcology.FSProgress, $activeArcology.FSChineseRevivalistDecoration = _decoration>>
+			<<case "Eugenics">>
+				<<set $activeArcology.FSRestart = $targetArcology.FSProgress, $activeArcology.FSRestartDecoration = _decoration>>
+			<<case "Repopulationist">>
+				<<set $activeArcology.FSRepopulationFocus = $targetArcology.FSProgress, $activeArcology.FSRepopulationFocusDecoration = _decoration>>
+			<<default>>
+				<<set $activeArcology.FSNull = 20>>
+			<</switch>>
+			<<if $PC.rumor = "social engineering">>
+				<<set $FSGotRepCreditOne to 1>>
+			<</if>>
+		<</if>>
 	<<else>>
-		<<set $activeArcology.name to $activeArcology.name+$i>>
+		<<if $i > 4>>
+			<<set $activeArcology.name to $activeArcology.name+$i>>
+		<<else>>
+			<<set $activeArcology.name to $activeArcology.name+($i+1)>>
+		<</if>>
 		<<set $activeArcology.direction to $seed.pluck()>>
 		<<set $activeArcology.government to random(0,5)>>
 		<<set $activeArcology.prosperity += random(-20,20)>>
@@ -323,29 +393,6 @@
 	<<set $arcologies.push($activeArcology)>>
 <</for>>
 
-<<set $arcologies[0].FSSupremacistDecoration to 20>>
-<<set $arcologies[0].FSSubjugationistDecoration to 20>>
-<<set $arcologies[0].FSGenderRadicalistDecoration to 20>>
-<<set $arcologies[0].FSGenderFundamentalistDecoration to 20>>
-<<set $arcologies[0].FSPaternalistDecoration to 20>>
-<<set $arcologies[0].FSDegradationistDecoration to 20>>
-<<set $arcologies[0].FSBodyPuristDecoration to 20>>
-<<set $arcologies[0].FSTransformationFetishistDecoration to 20>>
-<<set $arcologies[0].FSYouthPreferentialistDecoration to 20>>
-<<set $arcologies[0].FSMaturityPreferentialistDecoration to 20>>
-<<set $arcologies[0].FSSlimnessEnthusiastDecoration to 20>>
-<<set $arcologies[0].FSAssetExpansionistDecoration to 20>>
-<<set $arcologies[0].FSPastoralistDecoration to 20>>
-<<set $arcologies[0].FSPhysicalIdealistDecoration to 20>>
-<<set $arcologies[0].FSChattelReligionistDecoration to 20>>
-<<set $arcologies[0].FSRomanRevivalistDecoration to 20>>
-<<set $arcologies[0].FSEgyptianRevivalistDecoration to 20>>
-<<set $arcologies[0].FSEdoRevivalistDecoration to 20>>
-<<set $arcologies[0].FSArabianRevivalistDecoration to 20>>
-<<set $arcologies[0].FSChineseRevivalistDecoration to 20>>
-<<set $arcologies[0].FSRepopulationFocusDecoration to 20>>
-<<set $arcologies[0].FSRestartDecoration to 20>>
-
 <<set $arcologies[0].FSSupremacistLawME to 0>>
 <<set $arcologies[0].FSSupremacistSMR to 0>>
 <<set $arcologies[0].FSSubjugationistLawME to 0>>
@@ -406,9 +453,7 @@
 <<set $arcologies[0].FSRestartResearch to 0>>
 <<set $arcologies[0].FSRestartResearchPassed = 0>>
 
-<<set $arcologies[0].name to $arcologies[0].name + $arcologies.length>>
-
 <<set $showStartingGirlsExplanation to 1>>
 <<goto "Starting Girls">>
 
-<</silently>>
\ No newline at end of file
+<</silently>>
diff --git a/src/events/intro/introSummary.tw b/src/events/intro/introSummary.tw
index e23d1b5d1d863ce41d2ed0eb0d27751b9c0bb7eb..81f052200630a8227f793036759adb43b23c9507 100644
--- a/src/events/intro/introSummary.tw
+++ b/src/events/intro/introSummary.tw
@@ -1,5 +1,5 @@
 :: Intro Summary [nobr]
- 
+
 <<set $neighboringArcologies to Math.clamp($neighboringArcologies, 0, 8)>>
 <<set $FSCreditCount to Math.clamp($FSCreditCount, 4, 7)>>
 
@@ -336,28 +336,24 @@ The Free City features ''$neighboringArcologies'' arcologies in addition to your
 <br>&nbsp;&nbsp;&nbsp;&nbsp;
 //Setting this to 0 will disable most content involving the rest of the Free City.//
 
+<<if $targetArcology.type == "New">>
 <br>
-
 The Free City is located on ''$terrain'' terrain.
-
 [[Urban|Intro Summary][$terrain to "urban"]] |
 [[Rural|Intro Summary][$terrain to "rural"]] |
 [[Ravine|Intro Summary][$terrain to "ravine"]] |
 [[Marine|Intro Summary][$terrain to "marine"]] |
 [[Oceanic|Intro Summary][$terrain to "oceanic"]]
-
 <<if $terrain != "oceanic">>
 <br>
-
 The Free City is located in ''$continent''.
-
 [[North America|Intro Summary][$continent to "North America", $language to "English"]] | [[South America|Intro Summary][$continent to "South America", $language to "Spanish"]] | [[Europe|Intro Summary][$continent to "Europe", $language to "English"]] | [[the Middle East|Intro Summary][$continent to "the Middle East", $language to "Arabic"]] | [[Africa|Intro Summary][$continent to "Africa", $language to "Arabic"]] | [[Asia|Intro Summary][$continent to "Asia", $language to "Chinese"]] | [[Australia|Intro Summary][$continent to "Australia", $language to "English"]] | [[Japan|Intro Summary][$continent to "Japan", $language to "Japanese", $PC.race to "asian", $PC.nationality to "Japanese", $PC.hColor to "black", $PC.eyeColor to "brown"]]
 <</if>>
+<</if>>
 
+<<if ($targetArcology.type != "RomanRevivalist") && ($targetArcology.type != "EgyptianRevivalist") && ($targetArcology.type != "EdoRevivalist") && ($targetArcology.type != "ArabianRevivalist") && ($targetArcology.type != "ChineseRevivalist")>>
 <br>
-
 The lingua franca of your arcology is ''$language''.
-
 <<if $language != "English">>
 	[[English|Intro Summary][$language to "English"]] |
 <<else>>
@@ -379,7 +375,7 @@ The lingua franca of your arcology is ''$language''.
 	Chinese |
 <</if>>
 Custom: <<textbox "$language" $language "Intro Summary">>
-
+<</if>>
 
 <br>
 The Free City could develop as many as ''$FSCreditCount'' future societies.
@@ -394,7 +390,7 @@ The Free City could develop as many as ''$FSCreditCount'' future societies.
 <<elseif $FSCreditCount <= 4>>
 	<<set $FSCreditCountString = "four">>
 <</if>>
-//4 is default, max is 7.//
+//5 is default, 4 behaves the same as pre-patch 0.9.9.0, max is 7.//
 //Make sure to hit enter to confirm.//
 //This option cannot be changed during the game//
 
@@ -422,9 +418,11 @@ Custom Lisped: <<textbox "$PC.customTitleLisp" $PC.customTitleLisp "Intro Summar
 //If using a custom title, select Master or Mistress to set the gender of your title.//
 //Make sure to replace your "s"s with "th"s to have working lisps in your lisped title.//
 
+<<if $freshPC == 1 || $saveImported == 0>>
 <br>
 
-	Career: ''$PC.career''.
+Career: ''$PC.career''.
+<<if $PC.career != "arcology owner">>
 	[[Wealth|Intro Summary][$PC.career to "wealth"]] |
 	[[Business|Intro Summary][$PC.career to "capitalist"]] |
 	[[PMC work|Intro Summary][$PC.career to "mercenary"]] |
@@ -435,15 +433,16 @@ Custom Lisped: <<textbox "$PC.customTitleLisp" $PC.customTitleLisp "Intro Summar
 	[[Escort|Intro Summary][$PC.career to "escort"]] |
 	[[Servant|Intro Summary][$PC.career to "servant"]] |
 	[[Gang Leader|Intro Summary][$PC.career to "gang"]]
+<</if>>
 	
 <br>
 
-	Method of acquiring your arcology: ''$PC.rumor''.
-	[[Wealth|Intro Summary][$PC.rumor to "wealth"]] |
-	[[Hard work|Intro Summary][$PC.rumor to "diligence"]] |
-	[[Force|Intro Summary][$PC.rumor to "force"]] |
-	[[Social engineering|Intro Summary][$PC.rumor to "social engineering"]] |
-	[[Luck|Intro Summary][$PC.rumor to "luck"]]
+Method of acquiring your arcology: ''$PC.rumor''.
+[[Wealth|Intro Summary][$PC.rumor to "wealth"]] |
+[[Hard work|Intro Summary][$PC.rumor to "diligence"]] |
+[[Force|Intro Summary][$PC.rumor to "force"]] |
+[[Social engineering|Intro Summary][$PC.rumor to "social engineering"]] |
+[[Luck|Intro Summary][$PC.rumor to "luck"]]
 
 <br>
 
@@ -573,6 +572,146 @@ Preferred method of consumption: ''<<if $PC.refreshmentType == 0>>Smoked<<elseif
 <<textbox "$PC.father" $PC.father "Intro Summary">>
 <</if>>
 
+<<else>>
+	
+<br>
+Method of acquiring your arcology: ''$PC.rumor''.
+<br>
+Genitalia:
+<<if $PC.dick == 1>>
+	<<if $PC.vagina == 1>>
+		''penis and vagina''.
+	<<else>>
+		''penis''.
+	<</if>>
+<<else>>
+	''vagina''.
+<</if>>
+<<if $PC.vagina == 1>>
+<br>
+<<if $PC.preg == -1>>
+	Contraceptives: ''on''. Can't get pregnant; slight increase to living expenses.
+	[[Do not take contraceptives|Intro Summary][$PC.preg = 0]]
+<<elseif $PC.preg == 0>>
+	Contraceptives: ''off''. Can get pregnant; some scene alterations.
+	[[Take contraceptives|Intro Summary][$PC.preg = -1]]
+<<elseif $PC.preg > 0>>
+	Contraceptives: ''<<print $PC.preg>>weeks pregnant''
+<</if>>
+<br>
+<<if $PC.pregMood == 1>>
+	Hormones affect mood: ''caring and motherly''. Sex scene alterations; slaves will trust you more, but may try to take advantage of your mercy.
+	[[Change to no change|Intro Summary][$PC.pregMood = 0]] | [[Change to aggressive|Intro Summary][$PC.pregMood = 2]]
+<<elseif $PC.pregMood == 0>>
+	Hormones affect mood: ''no change''. Vanilla setting.
+	[[Change to motherly|Intro Summary][$PC.pregMood = 1]] | [[Change to aggressive|Intro Summary][$PC.pregMood = 2]]
+<<else>>
+	Hormones affect mood: ''aggressive and domineering''. Sex scene alterations; slaves will fear you more, but will become more submissive to you.
+	[[Change to no change|Intro Summary][$PC.pregMood = 0]] | [[Change to motherly|Intro Summary][$PC.pregMood = 1]]
+<</if>>
+<<if $PC.births > 0>>
+<br>
+	Number of births: ''$PC.births''
+<</if>>
+<</if>>
+<br>
+<<if $PC.boobs > 0>>
+	Chest:
+	<<if $PC.boobsBonus = 1>>
+		''big breasts''.
+	<<elseif $PC.boobsBonus = 2>>
+		''huge breasts''.
+	<<elseif $PC.boobsBonus = 3>>
+		''cow tits''.
+	<<else>>
+		''breasts''.
+	<</if>>
+<<else>>
+	Chest: ''masculine''.
+<</if>>
+<br>
+Age:
+<<if $PC.age is 3>>
+	''well into middle age''.
+<<elseif $PC.age is 2>>
+	''entering middle age''.
+<<else>>
+	''surprisingly young''.
+<</if>>
+<br>
+Change your name: <<textbox "$PCName" $PCName "Intro Summary">>
+<br>
+Nationality: ''$PC.nationality''.
+<br>
+Race: ''$PC.race''.
+<br>
+Skin: ''$PC.skin''.
+<br>
+Eye color: ''$PC.eyeColor''.
+<br>
+Hair color: ''$PC.hColor''.
+<br>
+Preferred refreshment: <<textbox "$PC.refreshment" $PC.refreshment "Intro Summary">> [[Cigars|Intro Summary][$PC.refreshment to "cigar",$PC.refreshmentType = 0]] | [[Whiskey|Intro Summary][$PC.refreshment to "whiskey",$PC.refreshmentType = 1]]
+<br>
+Preferred method of consumption: ''<<if $PC.refreshmentType == 0>>Smoked<<elseif $PC.refreshmentType == 1>>Drank<<elseif $PC.refreshmentType == 2>>Eaten<<elseif $PC.refreshmentType == 3>>Snorted<<else>>Injected<</if>>''.
+[[Smoked|Intro Summary][$PC.refreshmentType = 0]] | [[Drank|Intro Summary][$PC.refreshmentType = 1]] | [[Eaten|Intro Summary][$PC.refreshmentType = 2]] | [[Snorted|Intro Summary][$PC.refreshmentType = 3]] | [[Injected|Intro Summary][$PC.refreshmentType = 4]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;
+<<if $PC.refreshmentType == 0>>//"Smoke" must fit into the following sentence: "I smoked a $PC.refreshment" to fit events properly//<</if>>
+
+/*testtest PC mother and father */
+<<if $familyTesting == 1>>
+<br><br>
+''PC ID'' //Remember this so you can create slaves related to you next//
+<br><<print $PC.ID>>
+<br><br>
+''mother ID''
+<br>
+''father ID''
+<</if>>
+
+<</if>>
+
+<br><br>
+
+Image display
+<<if $seeImages == 1>>
+	''enabled.'' [[Disable|Intro Summary][$seeImages = 0]]
+	<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<<if $imageChoice == 1>>
+		''Vector art by NoX'' is selected. [[Switch to rendered imagepack|Intro Summary][$imageChoice = 0]]
+	<<else>>
+		''Rendered imagepack by Shokushu'' is selected. [[Switch to vector art|Intro Summary][$imageChoice = 1]]
+		<br>&nbsp;&nbsp;&nbsp;&nbsp;
+		Slave summary fetish images
+		<<if $seeMainFetishes == 1>>
+			''enabled.'' [[Disable|Intro Summary][$seeMainFetishes = 0]]
+		<<else>>
+			''disabled.'' [[Enable|Intro Summary][$seeMainFetishes = 1]]
+		<</if>>
+	<</if>>
+	<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	Slave images in lists are
+	<<if $seeSummaryImages == 1>>
+		''enabled.'' [[Disable|Intro Summary][$seeSummaryImages = 0]]
+	<<else>>
+		''disabled.'' [[Enable|Intro Summary][$seeSummaryImages = 1]]
+	<</if>>
+<<else>>
+	''disabled.'' [[Enable|Intro Summary][$seeImages = 1]] //Requires image resources.//
+<</if>>
+
+<br><br>
+
+<<if $SFMODToggle == 1>>
+	The Security Force Mod is ''enabled.''
+[[Disable|PC Body Intro][$SFMODToggle to 0]]
+<<else>>
+	The Security Force Mod is ''disabled.''
+[[Enable|PC Body Intro][$SFMODToggle to 1]]
+<</if>>
+<br>
+// This mod from anon1888 offers a lategame security force, triggered around week 80. It is non-canon where it conflicts with canonical updates to the base game.//
+
 <br><br>
 [[Continue|init Nationalities][$girls to 2]]
 
diff --git a/src/events/intro/locationIntro.tw b/src/events/intro/locationIntro.tw
index f66ffe68679a15b821c71215e8df7b24085bab21..980c4d5715fdbb906fad5292700357b7d3da0504 100644
--- a/src/events/intro/locationIntro.tw
+++ b/src/events/intro/locationIntro.tw
@@ -1,13 +1,13 @@
 :: Location Intro
 
-As the old countries crumble and technology stagnates, the gap between rich and poor increases. In order to continue living a good life without having their property taken by the mob, many of the wealthy and powerful come together to form 'Free Cities.' These are new cities on undeveloped land, in remote areas, or even afloat, fully free of any allegiance or law. These new cities are built on new ideas, with most buildings designed as futuristic, self-contained 'arcologies.' An arcology and everything in it is usually owned by a single person. And as of today, one of those single people is you. @@color:orange;In what part of the world is your new arcology located?@@
+As the old countries crumble and technology stagnates, the gap between rich and poor increases. In order to continue living a good life without having their property taken by the mob, many of the wealthy and powerful come together to form 'Free Cities.' These are new cities on undeveloped land, in remote areas, or even afloat, fully free of any allegiance or law. These new cities are built on new ideas, with most buildings designed as futuristic, self-contained 'arcologies.' An arcology and everything in it is usually owned by a single person. And you're determined that you will soon be one of those single people. @@color:orange;In what part of the world is your new arcology going to be located?@@
 
-[[North America|Trade Intro][$continent to "North America", $language to "English"]]
-[[South America|Trade Intro][$continent to "South America", $language to "Spanish"]]
-[[Europe|Trade Intro][$continent to "Europe", $language to "English"]]
-[[the Middle East|Trade Intro][$continent to "the Middle East", $language to "Arabic"]]
-[[Africa|Trade Intro][$continent to "Africa", $language to "Arabic"]]
-[[Asia|Trade Intro][$continent to "Asia", $language to "Chinese"]]
-[[Australia|Trade Intro][$continent to "Australia", $language to "English"]]
-[[Japan|Trade Intro][$continent to "Japan", $language to "Japanese", $PC.race to "asian", $PC.nationality to "Japanese", $PC.hColor to "black", $PC.eyeColor to "brown"]]
+[[North America|Intro Summary][$continent to "North America", $language to "English"]]
+[[South America|Intro Summary][$continent to "South America", $language to "Spanish"]]
+[[Europe|Intro Summary][$continent to "Europe", $language to "German"]]
+[[the Middle East|Intro Summary][$continent to "the Middle East", $language to "Arabic"]]
+[[Africa|Intro Summary][$continent to "Africa", $language to "Arabic"]]
+[[Asia|Intro Summary][$continent to "Asia", $language to "Chinese"]]
+[[Australia|Intro Summary][$continent to "Australia", $language to "English"]]
+[[Japan|Intro Summary][$continent to "Japan", $language to "Japanese", $PC.race to "asian", $PC.nationality to "Japanese", $PC.hColor to "black", $PC.eyeColor to "brown"]]
 //Slaves from countries in the selected continent will appear more frequently.//
diff --git a/src/events/intro/pcBodyIntro.tw b/src/events/intro/pcBodyIntro.tw
index 6edf9cdb199a027241ba256e63794435997cd21a..c43ddd77b1ea49ee9a4b8b28fb5fb8d89bd89da5 100644
--- a/src/events/intro/pcBodyIntro.tw
+++ b/src/events/intro/pcBodyIntro.tw
@@ -1,6 +1,6 @@
 :: PC Body Intro [nobr]
 
-Most Free Cities arcology owners and slaveowners are male. The preexisting power structures of the old world have mostly migrated to the new, and it can often be very hard to be a free woman in the Free Cities. Some manage to make their way, but in many arcologies, men are the owners, and women are the owned. You'll cut a striking figure as the owner and leader of your new arcology, but @@color:orange;what's under your business attire?@@
+Most slaveowners in the Free Cities are male. The preexisting power structures of the old world have mostly migrated to the new, and it can often be very hard to be a free woman in the Free Cities. Some manage to make their way, but in many arcologies, men are the owners, and women are the owned. You'll cut a striking figure as the owner and leader of your arcology, but @@color:orange;what's under your business attire?@@
 
 <br>
 
diff --git a/src/events/intro/pcExperienceIntro.tw b/src/events/intro/pcExperienceIntro.tw
index cf8d7016da1fe961cd06910b294083b2b01eb113..761432f08ee70aa679da5d38e0e8f4d9c6e9217e 100644
--- a/src/events/intro/pcExperienceIntro.tw
+++ b/src/events/intro/pcExperienceIntro.tw
@@ -1,25 +1,31 @@
-:: PC Experience Intro
+:: PC Experience Intro [nobr]
 
-You're a relative unknown in the Free Cities, but it's clear you're already accomplished. The meek and average don't suddenly acquire arcologies. You've got all the necessary skills to succeed as the owner of an arcology, but you should be able to leverage the skills and experience you retain from your past, too. @@color:orange;What career led you to acquire an arcology?@@
+<<if $PC.career == "arcology owner">>
+	<<goto "PC Rumor Intro">>
+<<else>>
 
-[[Idle wealth|PC Rumor Intro][$PC.career to "wealth"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//Start with extra money. Your starting slaves will have two free levels of sex skills available.//
-[[Venture capitalism|PC Rumor Intro][$PC.career to "capitalist"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//You will be more effective at business pursuits. Your starting slaves will have a free level of prostitution skill available.//
-[[Private military work|PC Rumor Intro][$PC.career to "mercenary"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//You retain mercenary contacts and security skills. Your starting slaves will have free trust available.//
-[[Slaving|PC Rumor Intro][$PC.career to "slaver"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//Your slave breaking experience will be useful. Your starting slaves will have free devotion available.//
-[[Arcology engineering|PC Rumor Intro][$PC.career to "engineer"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//Upgrading the arcology will be cheaper. Also, the arcology will start with basic economic upgrades already installed.//
-[[Slave surgery|PC Rumor Intro][$PC.career to "medicine"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//Surgery will be cheaper and healthier, and drug upgrades will be cheaper. Your starting slaves will have free implants available.//
-[[Minor celebrity|PC Rumor Intro][$PC.career to "celebrity"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//Start with extra reputation. Your starting slaves will have a free level of entertainment skill available.//
-[[High class escort|PC Rumor Intro][$PC.career to "escort"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//As an ex-whore, you will find it hard to maintain reputation. Your starting slaves will have a free level of sex skills available, along with a free level of entertainment and prostitution.//
-[[Servant|PC Rumor Intro][$PC.career to "servant"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//As an ex-servant, you will find it hard to maintain reputation. You know how to lower your upkeep, but not conduct business. Your starting slaves will have free trust and devotion.//
-[[Gang Leader|PC Rumor Intro][$PC.career to "gang"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//As a gang leader, you know how to haggle slaves, but you will find reputation quite hard to maintain. Your starting slaves will be fitter and posses a free level of combat skill.//
+You're a relative unknown in the Free Cities, but it's clear you're already accomplished. The meek and average cannot aspire to acquire arcologies. You've got all the necessary skills to take over an arcology and succeed as its owner, but you should be able to leverage the skills and experience you retain from your past, too. @@color:orange;What career brought you to the Free Cities?@@
+<br>
 
+<br>[[Idle wealth|PC Rumor Intro][$PC.career to "wealth"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;//Start with extra money. Your starting slaves will have two free levels of sex skills available.//
+<br>[[Venture capitalism|PC Rumor Intro][$PC.career to "capitalist"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;//You will be more effective at business pursuits. Your starting slaves will have a free level of prostitution skill available.//
+<br>[[Private military work|PC Rumor Intro][$PC.career to "mercenary"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;//You retain mercenary contacts and security skills. Your starting slaves will have free trust available.//
+<br>[[Slaving|PC Rumor Intro][$PC.career to "slaver"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;//Your slave breaking experience will be useful. Your starting slaves will have free devotion available.//
+<br>[[Arcology engineering|PC Rumor Intro][$PC.career to "engineer"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;//Upgrading the arcology will be cheaper. Also, the arcology will start with basic economic upgrades already installed.//
+<br>[[Slave surgery|PC Rumor Intro][$PC.career to "medicine"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;//Surgery will be cheaper and healthier, and drug upgrades will be cheaper. Your starting slaves will have free implants available.//
+<br>[[Minor celebrity|PC Rumor Intro][$PC.career to "celebrity"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;//Start with extra reputation. Your starting slaves will have a free level of entertainment skill available.//
+<br>[[High class escort|PC Rumor Intro][$PC.career to "escort"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;//As an ex-whore, you will find it hard to maintain reputation. Your starting slaves will have a free level of sex skills available, along with a free level of entertainment and prostitution.//
+<br>[[Servant|PC Rumor Intro][$PC.career to "servant"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;//As an ex-servant, you will find it hard to maintain reputation. You know how to lower your upkeep, but not conduct business. Your starting slaves will have free trust and devotion.//
+<br>[[Gang Leader|PC Rumor Intro][$PC.career to "gang"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;//As a gang leader, you know how to haggle slaves, but you will find reputation quite hard to maintain. Your starting slaves will be fitter and posses a free level of combat skill.//
+
+<</if>>
diff --git a/src/events/intro/pcRumorIntro.tw b/src/events/intro/pcRumorIntro.tw
index fce0bc0199180ab92ec00dccf49024e6759f99c2..133121a7fc6bc7c7d9c91acd896dec1add4a2b87 100644
--- a/src/events/intro/pcRumorIntro.tw
+++ b/src/events/intro/pcRumorIntro.tw
@@ -1,14 +1,14 @@
 :: PC Rumor Intro
 
-Who you are is something that you will have to define for yourself through your actions. No one is in a position to apply moral scorekeeping to you. In the brave new world of the Free Cities, you are largely free to define yourself as the sum of your actions, rather than as the product of your past. Nevertheless, stories will circulate about how exactly you ousted the previous owner of the arcology. @@color:orange;What rumored method best describes your accession?@@
+Who you are is something that you will have to define for yourself through your actions. Once you own an arcology, no one will be in a position to apply moral scorekeeping to you. In the brave new world of the Free Cities, you will be free to define yourself as the sum of your actions, rather than as the product of your past. The first decision that will define who you are as an arcology owner is your choice of method in acquiring one. @@color:orange;What approach will you take?@@
 
-[[A judicious application of funds|PC Body Intro][$PC.rumor to "wealth"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//Start with extra money.//
-[[Hard work and diligence|PC Body Intro][$PC.rumor to "diligence"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//New slaves will hate you less.//
-[[The remorseless use of force|PC Body Intro][$PC.rumor to "force"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//New slaves will fear you more.//
-[[Clever social engineering|PC Body Intro][$PC.rumor to "social engineering"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//Start with the first societal option unlocked.//
-[[Blind luck|PC Body Intro][$PC.rumor to "luck"]]
-&nbsp;&nbsp;&nbsp;&nbsp;//You will start with a good reputation.//
+[[A judicious application of funds|Takeover Target][$PC.rumor to "wealth"]]
+&nbsp;&nbsp;&nbsp;&nbsp;//Start with extra money, since you were wealthy enough to buy an arcology.//
+[[Hard work and diligence|Takeover Target][$PC.rumor to "diligence"]]
+&nbsp;&nbsp;&nbsp;&nbsp;//New slaves will hate you less, since it will be known that you worked hard to earn your position.//
+[[The remorseless use of force|Takeover Target][$PC.rumor to "force"]]
+&nbsp;&nbsp;&nbsp;&nbsp;//New slaves will fear you more, since rumors about your violent takeover will inevitably circulate.//
+[[Clever social engineering|Takeover Target][$PC.rumor to "social engineering"]]
+&nbsp;&nbsp;&nbsp;&nbsp;//Start with the first societal option unlocked, since you manipulated the arcology's citizens.//
+[[Blind luck|Takeover Target][$PC.rumor to "luck"]]
+&nbsp;&nbsp;&nbsp;&nbsp;//Start with a good reputation, since the story of your unlikely accession will be famous.//
diff --git a/src/events/intro/terrainIntro.tw b/src/events/intro/terrainIntro.tw
index 718782cc0d027ad745c386d65df84e5a1f482bca..aa06d548a1228ee6cf8b6f02e55f2cb787a05ccc 100644
--- a/src/events/intro/terrainIntro.tw
+++ b/src/events/intro/terrainIntro.tw
@@ -1,38 +1,63 @@
-:: Terrain Intro
+:: Terrain Intro [nobr]
 
-The Free Cities were and are founded wherever the rule of law is weak enough or permissive enough to allow a small area to secede, and where founders can afford to buy an area on which to build.
+<<unset $targetArcologies>>
+<<if $targetArcology.type != "New">>
+	<<set $terrain = $targetArcology.terrain, $continent = $targetArcology.continent>>
+	<<switch $targetArcology.type>>
+	<<case "RomanRevivalist">><<set $language = "Latin">>
+	<<case "EgyptianRevivalist">><<set $language = "Ancient Egyptian">>
+	<<case "EdoRevivalist">><<set $language = "Japanese">>
+	<<case "ArabianRevivalist">><<set $language = "Arabic">>
+	<<case "ChineseRevivalist">><<set $language = "Chinese">>
+	<<default>>
+		<<switch $terrain>>
+		<<case "oceanic" "North America" "Australia">><<set $language = "English">>
+		<<case "South America">><<set $language = "Spanish">>
+		<<case "the Middle East" "Africa">><<set $language = "Arabic">>
+		<<case "Asia">><<set $language = "Chinese">>
+		<<case "Europe">><<set $language = "German">>
+		<<case "Japan">><<set $language = "Japanese">>
+		<</switch>>
+	<</switch>>
+	<<goto "Intro Summary">>
+<<else>>
 
+The Free Cities are located wherever the rule of law is weak enough or permissive enough to allow a small area to secede, and where founders can afford to buy an area on which to build.
+<br><br>
 Many Free Cities are therefore located in marginal, rural terrain. Founding a Free City in such an area is easy, and can usually be accomplished with the indifference or even connivance of the old country from which it secedes. After all, the potential commercial benefits are great, and the loss of underused land is only significant in the moral sense.
-
+<br><br>
 Some Free Cities are located on water. Though some areas of shallow sea over the continental shelves hide valuable resources, others are neglected. Arcologies are such massive structures that it is very possible to design them to float anchored to the seabed.
-
+<br><br>
 Finally, a few Free Cities have been carved out from old world cities. Urban decay has left the hearts of many cities ripe for this. Many old world countries resist this kind of secession, but this rarest, smallest, and densest kind of Free City can offer its surrounding nation a great deal of economic advantage.
-
+<br><br>
 @@color:orange;Which kind of Free City hosts your arcology?@@
+<br>
+
+<br>[[Urban|Location Intro][$terrain to "urban"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:yellow;Low@@ minimum slave value and initial @@color:yellow;bear market@@ for slaves.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:green;High@@ ease of commerce with the old world.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:green;High@@ access to refugees and other desperate people.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:red;Low@@ cultural independence.
+<br>[[Rural|Location Intro][$terrain to "rural"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:yellow;High@@ minimum slave value and initial @@color:yellow;bull market@@ for slaves.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;Moderate ease of commerce with the old world.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;Moderate access to refugees and other desperate people.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;Moderate cultural independence.
+<br>[[Ravine|Location Intro][$terrain to "ravine"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:yellow;High@@ minimum slave value and initial @@color:yellow;bull market@@ for slaves.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:red;Low@@ ease of commerce with the old world.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:red;Very low@@ access to refugees and other desperate people.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:green;High@@ cultural independence.
+<br>[[Marine|Location Intro][$terrain to "marine"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;Moderate minimum slave value and initially balanced market for slaves.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;Moderate ease of commerce with the old world.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:red;Low@@ access to refugees and other desperate people.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:green;High@@ cultural independence.
+<br>[[Oceanic|Intro Summary][$terrain to "oceanic"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:yellow;High@@ minimum slave value and initial @@color:yellow;bull market@@ for slaves.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;Moderate ease of commerce with the old world.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:red;Very low@@ access to refugees and other desperate people.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;@@color:green;Very high@@ cultural independence.
+<br>&nbsp;&nbsp;&nbsp;&nbsp;Ensures access to slaves from all over the world and will not associate the arcology with a continent.
 
-[[Urban|Location Intro][$terrain to "urban"]]
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:yellow;Low@@ minimum slave value and initial @@color:yellow;bear market@@ for slaves.
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:green;High@@ ease of commerce with the old world.
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:green;High@@ access to refugees and other desperate people.
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:red;Low@@ cultural independence.
-[[Rural|Location Intro][$terrain to "rural"]]
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:yellow;High@@ minimum slave value and initial @@color:yellow;bull market@@ for slaves.
-&nbsp;&nbsp;&nbsp;&nbsp;Moderate ease of commerce with the old world.
-&nbsp;&nbsp;&nbsp;&nbsp;Moderate access to refugees and other desperate people.
-&nbsp;&nbsp;&nbsp;&nbsp;Moderate cultural independence.
-[[Ravine|Location Intro][$terrain to "ravine"]]
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:yellow;High@@ minimum slave value and initial @@color:yellow;bull market@@ for slaves.
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:red;Low@@ ease of commerce with the old world.
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:red;Very low@@ access to refugees and other desperate people.
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:green;High@@ cultural independence.
-[[Marine|Location Intro][$terrain to "marine"]]
-&nbsp;&nbsp;&nbsp;&nbsp;Moderate minimum slave value and initially balanced market for slaves.
-&nbsp;&nbsp;&nbsp;&nbsp;Moderate ease of commerce with the old world.
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:red;Low@@ access to refugees and other desperate people.
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:green;High@@ cultural independence.
-[[Oceanic|Extreme Intro][$terrain to "oceanic"]]
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:yellow;High@@ minimum slave value and initial @@color:yellow;bull market@@ for slaves.
-&nbsp;&nbsp;&nbsp;&nbsp;Moderate ease of commerce with the old world.
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:red;Very low@@ access to refugees and other desperate people.
-&nbsp;&nbsp;&nbsp;&nbsp;@@color:green;Very high@@ cultural independence.
-&nbsp;&nbsp;&nbsp;&nbsp;Ensures access to slaves from all over the world and will not associate the arcology with a continent.
+<</if>>
diff --git a/src/gui/Encyclopedia/encyclopedia.tw b/src/gui/Encyclopedia/encyclopedia.tw
index b1cdc3cfb29e790631efa15610fb3c921614f7f4..56147e3a2c58676c4e96cb1d10f09460409a671f 100644
--- a/src/gui/Encyclopedia/encyclopedia.tw
+++ b/src/gui/Encyclopedia/encyclopedia.tw
@@ -114,7 +114,7 @@ Arcologies are the urban buildings of the future: almost completely self-contain
 
 Your arcology is a flared structure, needle thin at the top where you live in your penthouse, and broad at the base. The base below ground contains storage and machinery. The lowest aboveground levels are commercial; above them are the residential areas. The entire structure is jacketed in dense gardens and solar arrays, cleverly structured to create naturally lit corridors and beautiful parklike balconies.
 
--- Owner's report, Arcology X-4
+-- Owner's Report
 
 //You may wish to improve your arcology, but should be able to ignore its development, if you wish.//
 
@@ -933,7 +933,7 @@ __I do not give credit without explicit permission to do so.__ If you have contr
 ''Bane70'' optimized huge swaths of code with notable professionalism.
 ''Circle Tritagonist'' provided several new collars and outfits.
 ''Qotsafan'' submitted bugfixes.
-''FireDrops'' provided standardized body mod scoring, gave Recruiters their idle functions, and fixed bugs.
+''FireDrops'' provided standardized body mod scoring, gave Recruiters their idle functions, revised personal assistant future society associations, and fixed bugs.
 ''Princess April'' wrote and coded several random events and the Slimness Enthusiast Dairy upgrade.
 ''Hicks'' provided minor logic and balance improvements in coded, release-ready form.
 ''Dej'' coded better diet logic for the RA.
diff --git a/src/gui/mainMenu/AlphaDisclaimer.tw b/src/gui/mainMenu/AlphaDisclaimer.tw
index e2cf50901fd47c40262c5d62d616d076738554b3..c01d35b0c49a0b19743844d99b6a46fd2e7383a3 100644
--- a/src/gui/mainMenu/AlphaDisclaimer.tw
+++ b/src/gui/mainMenu/AlphaDisclaimer.tw
@@ -1,6 +1,5 @@
 :: Alpha disclaimer
 
-
 <<set $ui to "start">>\
 //v. $ver//
 @@color:green;//Mod: expanded age ranges and other tweaks 2016-08-30//@@ @@color:darkred;+SV@@
diff --git a/src/init/storyInit.tw b/src/init/storyInit.tw
index 80c01c89d522618520d276c1452ee73fe1c81edf..5a09fbe22726f974ef60b311fec07200aecf7a76 100644
--- a/src/init/storyInit.tw
+++ b/src/init/storyInit.tw
@@ -80,29 +80,23 @@
 		<</if>>
 	<</if>>
 	<</for>>
-	<<set $recruiters = []>>
 	<<for $i to 0; $i < $slaves.length; $i++>>
 	<<if $familyTesting == 1>>
 		<<if $slaves[$i].canRecruit == 1>>
-			<<set $recruiters.push($slaves[$i])>>
+			/*<<set $recruiters.push($slaves[$i])>>*/
 		<</if>>
 	<<else>>
 	<<if $slaves[$i].relation == 0>>
 		<<if random(1,100) <= 5>>
 		<<set $slaves[$i].recruiter to "twin">>
-		<<set $recruiters.push($slaves[$i])>>
 		<<elseif ($slaves[$i].actualAge > 32) and (random(1,100) <= 41)>>
 		<<set $slaves[$i].recruiter to "mother">>
-		<<set $recruiters.push($slaves[$i])>>
 		<<elseif ($slaves[$i].actualAge < 24) and (random(1,100) <= 40)>>
 		<<set $slaves[$i].recruiter to "daughter">>
-		<<set $recruiters.push($slaves[$i])>>
 		<<elseif ($slaves[$i].actualAge < 43) and (random(1,100) <= 20)>>
 		<<set $slaves[$i].recruiter to "older sister">>
-		<<set $recruiters.push($slaves[$i])>>
 		<<elseif ($slaves[$i].actualAge < 25) and ($slaves[$i].actualAge > 18) and (random(1,100) <= 20)>>
 		<<set $slaves[$i].recruiter to "young sister">>
-		<<set $recruiters.push($slaves[$i])>>
 		<</if>>
 	<<else>>
 		<<set $slaves[$i].recruiter to 0>>
@@ -127,7 +121,7 @@
 		<</if>>
 		<</if>>
 	<</if>>
-	<<if ($ver != "0.9.5") && ($ver != "0.9.6") && ($ver != "0.9.7") && ($ver != "0.9.8")>>
+	<<if ($ver != "0.9.5") && ($ver != "0.9.6") && ($ver != "0.9.7") && ($ver != "0.9.8") && ($ver != "0.9.9")>>
 		<<if $slaves[$i].oralSkill > 0>>
 		<<if $slaves[$i].oralSkill == 3>>
 			<<set $slaves[$i].oralSkill = 100>>
@@ -220,13 +214,12 @@
 	<<if ndef $slaves[$i].customImage>>
 		<<set $slaves[$i].customImage to 0>>
 	<</if>>
-	<<set $activeSlave to $slaves[$i]>>
-	<<display "Checkin Checks">>
 	<</for>>
+	<<set $slavesOriginal = $slaves>>
 	<<set $organs = []>>
 <<else>>
 	<<set $slaves = []>>
-	<<set $recruiters = []>>
+	<<set $slavesOriginal = []>>
 	<<set $organs = []>>
 	<<set $genePool = []>>
 <</if>>
@@ -249,6 +242,12 @@
 <<if ndef $seeSummaryImages>>
 	<<set $seeSummaryImages to 1>>
 <</if>>
+<<if ndef $universalRulesBirthing>>
+	<<set $universalRulesBirthing to 0>>
+<</if>>
+<<if def $recruiters>>
+	<<unset $recruiters>>
+<</if>>
 <<if $ver == "0.9">>
 	<<if $seeDicks == 2>>
 		<<set $seeDicks = 100>>
@@ -256,7 +255,7 @@
 		<<set $seeDicks = 25>>
 	<</if>>
 <</if>>
-<<if ($ver != "0.9.4") && ($ver != "0.9.5") && ($ver != "0.9.6") && ($ver != "0.9.7") && ($ver != "0.9.8")>>
+<<if ($ver != "0.9.4") && ($ver != "0.9.5") && ($ver != "0.9.6") && ($ver != "0.9.7") && ($ver != "0.9.8") && ($ver != "0.9.9")>>
 	<<for _r to 0; _r < $defaultRules.length; _r++>>
 		<<if ndef $defaultRules[_r].aphrodisiacs>>
 			<<set $defaultRules[_r].aphrodisiacs = 0>>
@@ -307,7 +306,7 @@
 
 <<set $cheater to 0>>
 <<set $PCName to "Anonymous">>
-<<set $PC to {title: 1, ID: -1, dick: 1, vagina: 0, preg: 0, pregSource: 0, pregMood: 0, labor: 0, births: 0, boobsBonus: 0, degeneracy: 0, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, career: "capitalist", rumor: "wealth", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 2, sexualEnergy: 4, refreshment: "cigar", refreshmentType: 0, race: "white", skin: "white", eyeColor: "blue", hColor: "blonde", nationality: "Stateless", father: 0, mother: 0, sisters: 0, daughters: 0}>>
+<<set $PC to {title: 1, ID: -1, dick: 1, vagina: 0, preg: 0, pregSource: 0, pregMood: 0, labor: 0, births: 0, boobsBonus: 0, degeneracy: 0, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, career: "capitalist", rumor: "wealth", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 2, sexualEnergy: 4, refreshment: "cigar", refreshmentType: 0, race: "white", skin: "white", eyeColor: "blue", hColor: "blonde", nationality: "Stateless", father: 0, mother: 0, sisters: 0, daughters: 0, birthElite: 0, birthMaster: 0, birthDegenerate: 0, birthClient: 0, birthOther: 0, birthArcOwner: 0}>>
 <<set $cash = 10000>>
 <<set $normalizedEvents to 0>>
 <<set $autosave to 1>>
@@ -393,15 +392,21 @@
 <<set $autoSurgery to {lactation: 0, cosmetic: 1, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, hips: 0, hipsImplant: 0, butt: 0, faceShape: "normal", lips: 10, holes: 0}>>
 
 <<else>>
-
-<<set $cash to 5000>>
-<<if ndef $universalRulesBirthing>>
-	<<set $universalRulesBirthing to 0>>
+	<<if $freshPC == 0>>
+		<<set $cash to Math.clamp(1000*Math.trunc($cash/100000), 5000, 1000000)>>
+		<<if $retainCareer == 0>>
+			<<set $PC.career = "arcology owner">>
+		<</if>>
+	<<else>>
+		<<set $cheater to 0>>
+		<<set $PCName to "Anonymous">>
+		<<set $PC to {title: 1, ID: -1, dick: 1, vagina: 0, preg: 0, pregSource: 0, pregMood: 0, labor: 0, births: 0, boobsBonus: 0, degeneracy: 0, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, career: "capitalist", rumor: "wealth", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 2, sexualEnergy: 4, refreshment: "cigar", refreshmentType: 0, race: "white", skin: "white", eyeColor: "blue", hColor: "blonde", nationality: "Stateless", father: 0, mother: 0, sisters: 0, daughters: 0, birthElite: 0, birthMaster: 0, birthDegenerate: 0, birthClient: 0, birthOther: 0, birthArcOwner: 0}>>
+	<</if>>
 <</if>>
 
-<</if>>
+<<set $ver = "0.9.9">>
 
-<<set $ver = "0.9.8">>
+<<set $targetArcology = {type: "New"}>>
 
 <<set $REFeminizationCheckinIDs to []>>
 <<set $REMILFCheckinIDs to []>>
@@ -593,8 +598,8 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 
 <<set $FSAnnounced to 0>>
 <<set $FSCredits to 0>>
-<<set $FSCreditCount to 4>>
-<<set $FSCreditCountString to "four">>
+<<set $FSCreditCount to 5>>
+<<set $FSCreditCountString to "five">>
 <<set $FSGotRepCreditOne to 0>>
 <<set $FSGotRepCreditTwo to 0>>
 <<set $FSGotRepCreditThree to 0>>
@@ -696,12 +701,6 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 <<set $clinicInflateBelly = 0>>
 <<set $playerBred = 0>>
 <<set $propOutcome = 0>>
-<<set $birthElite to 0>>
-<<set $birthMaster to 0>>
-<<set $birthDegenerate to 0>>
-<<set $birthClient to 0>>
-<<set $birthOther to 0>>
-<<set $birthArcOwner to 0>>
 <<set $EliteSires = []>>
 <<set $EliteSires = ["moves", "quick", "crazy", "virgin", "futa", "preggo"]>>
 <<set $startingPoint = -1>>
@@ -716,6 +715,8 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 <<set $mom = 0>>
 <<set $animalParts = 0>>
 <<set $showBestiality = 0>>
+<<set $retainCareer = 1>>
+<<set $freshPC = 0>>
 
 <<set $fakeBellies to ["a small empathy belly", "a medium empathy belly", "a large empathy belly", "a huge empathy belly"]>> /* lets fake bellies be separated from other .bellyAccessory */
 
@@ -781,7 +782,8 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 
 <<set $justiceEvents to ["slave deal", "slave training", "majority deal", "indenture deal", "virginity deal"]>>
 
-<<set $startingGirlsNationality to 0>>
+<<set $fixedNationality to 0>>
+<<set $fixedRace to 0>>
 <<set $ui to "start">>
 
 <<set $brandTarget to "buttocks">>
@@ -967,7 +969,7 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 
 <<set $whoreCareers to ["a prostitute", "a child prostitute", "a stripper", "a saleswoman", "a criminal", "a porn star", "a trophy wife", "a Futanari Sister", "a model", "a juvenile delinquent", "a mistress", "a serial divorcee", "a pageant star"]>>
 
-<<set $HGCareers to ["a lawyer", "a military officer", "a politician", "a model-UN star", "a student council president"]>>
+<<set $HGCareers to ["a lawyer", "a military officer", "a politician", "a model-UN star", "a student council president", "a leading arcology citizen"]>>
 
 <<set $recruiterCareers = ["a military recruiter", "a club recruiter", "a college scout", "a girl scout"]>>
 
@@ -989,6 +991,28 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 
 <<set $schoolteacherCareers to ["a principal", "a teaching assistant", "a teacher", "a scientist", "a professor", "a private instructor", "a librarian", "a scholar"]>>
 
+<<set $whiteNationalities = ["American", "Canadian", "Brazilian", "Argentinian", "Chilean", "Israeli", "South African", "Russian", "Ukrainian", "Irish", "Icelandic", "Finnish", "Swiss", "Danish", "Norwegian", "Austrian", "Slovak", "Dutch", "Belgian", "Czech", "Serbian", "Portuguese", "Hungarian", "Estonian", "Polish", "Lithuanian", "Romanian", "German", "French", "Italian", "British", "Australian", "a New Zealander", "Belarusian", "Scottish"]>>
+
+<<set $asianNationalities = ["American", "Saudi", "Chinese", "Korean", "Japanese", "Thai", "Vietnamese", "Indonesian", "Filipina", "Burmese", "Nepalese", "Uzbek", "Malaysian", "Kazakh", "Australian"]>>
+
+<<set $latinaNationalities = ["American", "Puerto Rican"Cuban", "Mexican", "Peruvian", "Venezuelan", "Bolivian", "Guatemalan", "Brazilian", "Argentinian", "Chilean", "Colombian"]>>
+
+<<set $middleEasternNationalities = ["American", "Egyptian", "Turkish", "Israeli", "Saudi", "Moroccan", "Ethiopian", "Afghan", "Algerian", "Libyan", "Tunisian", "Lebanese", "Jordanian", "Emirati", "Omani", "Malian", "Sudanese", "Yemeni", "Iraqi", "German", "Swedish", "French", "Italian"]>>
+
+<<set $blackNationalities = ["American"Cuban", "Haitian", "Jamaican", "Brazilian", "Egyptian", "Saudi", "Moroccan", "Nigerian", "Kenyan", "Zimbabwean", "Ugandan", "Tanzanian", "Ghanan", "Congolese", "Ethiopian", "South African", "Malian", "Sudanese", "Yemeni", "German", "Swedish", "French", "Australian", "Dominican"]>>
+
+<<set $indoAryanNationalities = ["Iranian", "Armenian", "Burmese", "Nepalese", "Afghan", "Emirati", "Omani", "Indian", "Kazakh", "Pakistani", "Bangladeshi", "Slovak", "Hungarian", "Romanian", "British"]>>
+
+<<set $pacificIslanderNationalities = ["Indonesian", "Filipina", "a New Zealander"]>>
+
+<<set $malayNationalities = ["Thai", "Indonesian", "Filipina", "Malaysian"]>>
+
+<<set $amerindianNationalities = ["American", "Canadian", "Mexican", "Peruvian", "Bolivian", "Guatemalan", "Brazilian"]>>
+
+<<set $southernEuropeanNationalities = ["French", "Italian", "Greek", "Spanish"]>>
+
+<<set $semiticNationalities = ["Egyptian", "Turkish", "Iranian", "Armenian", "Israeli", "Tanzanian", "Ghanan", "Ethiopian", "Lebanese", "Jordanian", "Yemeni", "Iraqi", "Kazakh", "Pakistani", "Romanian", "Spanish"]>>
+
 <<set $whiteAmericanSlaveNames to ["Sophia", "Emma", "Olivia", "Ava", "Isabella", "Mia", "Zoe", "Lily", "Emily", "Madelyn", "Madison", "Chloe", "Charlotte", "Aubrey", "Avery", "Abigail", "Kaylee", "Layla", "Harper", "Ella", "Amelia", "Arianna", "Riley", "Aria", "Hailey", "Hannah", "Evelyn", "Addison", "Mackenzie", "Adalyn", "Ellie", "Brooklyn", "Nora", "Scarlett", "Grace", "Anna", "Isabelle", "Natalie", "Kaitlyn", "Lillian", "Sarah", "Audrey", "Elizabeth", "Leah", "Annabelle", "Kylie", "Mila", "Claire", "Victoria", "Maya", "Lila", "Elena", "Lucy", "Savannah", "Gabriella", "Callie", "Alaina", "Sophie", "Makayla", "Kennedy", "Sadie", "Skyler", "Allison", "Caroline", "Penelope", "Alyssa", "Peyton", "Samantha", "Liliana", "Bailey", "Maria", "Reagan", "Violet", "Eliana", "Adeline", "Eva", "Stella", "Keira", "Katherine", "Jessica", "Jennifer", "Amanda", "Ashley", "Sarah", "Stephanie", "Melissa", "Nicole", "Elizabeth", "Heather", "Tiffany", "Michelle", "Amber", "Megan", "Amy", "Rachel", "Kimberly", "Christina", "Lauren", "Crystal", "Brittany", "Rebecca", "Laura", "Danielle", "Emily", "Samantha", "Angela", "Erin", "Kelly", "Sara", "Lisa", "Katherine", "Andrea", "Jamie", "Mary", "Erica", "Courtney", "Kristen", "Shannon", "April", "Katie", "Lindsey", "Kristin", "Lindsay", "Christine", "Alicia", "Vanessa", "Maria", "Kathryn", "Allison", "Julie", "Anna", "Tara", "Kayla", "Natalie", "Victoria", "Monica", "Jacqueline", "Holly", "Kristina", "Patricia", "Cassandra", "Brandy", "Whitney", "Chelsea", "Brandi", "Catherine", "Cynthia", "Kathleen", "Veronica", "Leslie", "Natasha", "Krystal", "Stacy", "Diana", "Erika", "Dana", "Jenna", "Meghan", "Carrie", "Leah", "Melanie", "Brooke", "Karen", "Alexandra", "Valerie", "Caitlin", "Julia", "Alyssa", "Jasmine", "Hannah", "Stacey", "Brittney", "Susan", "Margaret", "Sandra", "Candice", "Latoya", "Bethany", "Misty"]>>
 
 <<set $africanAmericanSlaveNames to ["Madison", "Kayla", "Makayla", "Nevaeh", "Jada", "Brianna", "Chloe", "Destiny", "Alyssa", "Gabrielle", "Imani", "Kimora", "Aaliyah", "Jayla", "Abigail", "Arianna", "Ava", "Fatoumata", "Jade", "London", "Savannah", "Victoria", "Aniyah", "Nyla", "Olivia", "Taylor", "Ashley", "Sarah", "Jasmine", "Laila", "Chelsea", "Heaven"]>>
@@ -1180,7 +1204,7 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 
 <<set $cowSlaveNames to ["Big Mac", "Moscow", "MooMoo", "Madonna", "Cowlick", "Bertha", "Waffles", "Brown Cow", "Hamburger", "Heifer", "Honeybun", "Cookie", "Pinky", "Sweetie", "Sunny", "Blue", "Sunshine", "Sugar", "Cupcake", "Cocoa", "Baby", "Muffin", "Princess", "Bessie", "Clarabelle", "Betty Sue", "Emma", "Henrietta", "Ella", "Penelope", "Nettie", "Anna", "Bella", "Annabelle", "Dorothy", "Molly", "Gertie", "Annie", "Rose", "Darla", "Meg", "Dahlia", "Margie", "Lois", "Flower", "Maggie", "Jasmine", "Minnie", "Esmeralda", "Bella", "Daisy", "Shelly", "Candie", "Cinnamon ", "Penny ", "Jasmayne ", "Bella ", "Clover", "Precious ", "Diamond ", "Arabella ", "Sasha ", "Sweetpea", "Swiss Miss"]>>
 
-<<set $chattelReligionistSlaveNames to ["Faith", "Patience", "Purity", "Chastity", "Constance", "Grace", "Penance", "Trinity", "Mercy", "Charity", "Verity", "Amity", "Peace", "Prudence", "Temperance", "Grace", "Love", "Hope", "Destiny", "Abundance", "Allegiance", "Amnesty", "Ardour", "Beauty", "Belief", "Blessing", "Bliss", "Charisma", "Cheer", "Charm", "Chastity", "Clarity", "Clemency", "Comfort", "Compassion", "Concord", "Condolence", "Constancy", "Courage", "Credence", "Desire", "Discretion", "Empathy", "Endurance", "Esteem", "Eternity", "Evanescence", "Favour", "Felicity", "Fidelity", "Fortune", "Gaity", "Glory", "Gracious", "Gravitas", "Harmony", "Happiness", "Honesty", "Hope", "Humility", "Innocent", "Integrity", "Joy", "Justice", "Kindness", "Laughter", "Loyalty", "Luck", "Merit", "Modesty", "Perserverance", "Piety", "Pleasant", "Prosperity", "Prudence", "Purity", "Radiance", "Remembrance", "Respect", "Reverence", "Salvation", "Sanctity", "Serendipity", "Serenity", "Silence", "Sincerity", "Solace", "Solemnity", "Success", "Sympathy", "Temperance", "Thankfulness", "Tolerance", "Tranquility", "Truth", "Unity", "Virtue", "Wisdom", "Wonder", "Heaven"]>>
+<<set $chattelReligionistSlaveNames to ["Faith", "Patience", "Purity", "Chastity", "Constance", "Grace", "Penance", "Trinity", "Mercy", "Charity", "Verity", "Amity", "Peace", "Prudence", "Temperance", "Grace", "Love", "Hope", "Destiny", "Abundance", "Allegiance", "Amnesty", "Ardour", "Beauty", "Belief", "Blessing", "Bliss", "Charisma", "Cheer", "Charm", "Chastity", "Clarity", "Clemency", "Comfort", "Compassion", "Concord", "Condolence", "Constancy", "Courage", "Credence", "Desire", "Discretion", "Empathy", "Endurance", "Esteem", "Eternity", "Evanescence", "Favour", "Felicity", "Fidelity", "Fortune", "Gaiety", "Glory", "Gracious", "Gravitas", "Harmony", "Happiness", "Honesty", "Hope", "Humility", "Innocent", "Integrity", "Joy", "Justice", "Kindness", "Laughter", "Loyalty", "Luck", "Merit", "Modesty", "Perserverance", "Piety", "Pleasant", "Prosperity", "Prudence", "Purity", "Radiance", "Remembrance", "Respect", "Reverence", "Salvation", "Sanctity", "Serendipity", "Serenity", "Silence", "Sincerity", "Solace", "Solemnity", "Success", "Sympathy", "Temperance", "Thankfulness", "Tolerance", "Tranquility", "Truth", "Unity", "Virtue", "Wisdom", "Wonder", "Heaven"]>>
 
 <<set $romanSlaveNames to ["Aconia", "Aelia", "Agrippina", "Antistia", "Antonia", "Arria", "Atia", "Aurela", "Baebiana", "Caecilia", "Caesonia", "Calpurnia", "Claudia", "Cornelia", "Crispina", "Domitia", "Domitilla", "Drusilla", "Diana", "Euphemia", "Eutropia", "Fabia", "Faustina", "Flavia", "Galeria", "Galla", "Gnaea", "Gratidia", "Helena", "Helvia", "Herennia", "Honoria", "Hostia", "Julia", "Junia", "Justina", "Leontia", "Lepida", "Licinia", "Livia", "Livilla", "Lollia", "Lucilla", "Maecia", "Magia", "Manlia", "Marcella", "Marcia", "Messalina", "Minervina", "Mellisa", "Metella", "Munatia", "Octavia", "Ocellina", "Orbiana", "Otacilia", "Paccia", "Papianilla", "Paulina", "Placiaida", "Plautia", "Plautilla", "Plotina", "Pompeia", "Popilla", "Poppaea", "Porcia", "Risca", "Pulcheria", "Sabina", "Salonina", "Sempronia", "Servilia", "Severa", "Statilia", "Sulpicia", "Terentia", "Theodora", "Titania", "Tranquillina", "Tullia", "Ulpia", "Urgulania", "Valeria", "Verina", "Vesta", "Vibia", "Violentilla", "Vipsania", "Vistilla", "Gaia", "Lucia", "Marca", "Publia", "Quinta", "Tita", "Tiberia", "Sexta", "Aula", "Decima", "Gnaea", "Spuria", "Mania", "Servia", "Appia", "Numeria", "Vibia", "Agricola", "Agrippa", "Ahala", "Ahenobarba", "Albina", "Alba", "Ambusta", "Annalis", "Aquila", "Aquilina", "Arvina", "Asina", "Atella", "Avita", "Balba", "Barba", "Barbata", "Bassa", "Bestia", "Bibacula", "Bibula", "Blaesa", "Broccha", "Bruta", "Bubulca", "Bulba", "Caeca", "Calida", "Calvina", "Calva", "Camilla", "Canina", "Cana", "Catilina", "Catula", "Celeris", "Celsa", "Cethega", "Cicurina", "Cincinnata", "Cinna", "Corda", "Cornicen", "Cornuta", "Corvina", "Corva", "Cossa", "Costa", "Cotta", "Crassipes", "Crassa", "Crispina", "Crispa", "Curva", "Dentata", "Dentra", "Dives", "Dolabella", "Drusa", "Figula", "Fimbria", "Flacca", "Flava", "Flora", "Fusa", "Gemella", "Graccha", "Gurges", "Habita", "Helva", "Imperiosa", "Iulla", "Lactuca", "Laenas", "Lanata", "Laevina", "Laterensis", "Lentula", "Lepida", "Licina", "Longa", "Luculla", "Lupa", "Macra", "Macula", "Malleola", "Mamerca", "Marcella", "Merenda", "Merga", "Merula", "Messalla", "Metella", "Murena", "Mus", "Musca", "Nasica", "Natta", "Nepos", "Nerva", "Nigra", "Novella", "Ocella", "Pacila", "Paeta", "Pansa", "Papa", "Patercula", "Paulla", "Pera", "Pictrix", "Planca", "Plauta", "Poplicola", "Postuma", "Potita", "Praeconina", "Praetextata", "Prisca", "Procula", "Publicola", "Pulchra", "Pulla", "Pulvilla", "Quadrata", "Ralla", "Regilla", "Regula", "Rufa", "Ruga", "Rulla", "Rutila", "Salinatrix", "Saturnina", "Scaeva", "Scaevola", "Scapula", "Scaura", "Scrofa", "Seneca", "Severa", "Silana", "Sila", "Structa", "Sulla", "Sura", "Taura", "Triaria", "Trigemina", "Tuberta", "Tubula", "Tuditana", "Tulla", "Turda", "Vara", "Vatia", "Verres", "Vetus", "Vitula", "Volusa"]>>
 
@@ -1188,6 +1212,47 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 
 <<set $edoSlaveNames to ["Adakichi", "Aihachi", "Aika", "Aikichi", "Aiko", "Aimatsu", "Akiko", "Ariko", "Asa", "Asakichi", "Asao", "Ayako", "Ayano", "Azuma", "Baicho", "Baisho", "Botan", "Charyoei", "Chieko", "Chikafuku", "Chikafumi", "Chikano", "Chikashizu", "Chikayoshi", "Chikayu", "Chikayuki", "Chisako", "Chiyo", "Chiyoe", "Chiyoha", "Chiyokichi", "Chiyoko", "Chiyoryo", "Chiyoteru", "Chiyotsuru", "Chiyowaka", "Chiyoyakko", "Chizu", "Chizuha", "Chizuru", "Cho", "Chocho", "Dan’ei", "Danji", "Danko", "Dango", "Edagiku", "Emi", "Emicho", "Emigiku", "Emiyo", "Enko", "Eriko", "Fuji", "Fujie", "Fujigiku", "Fujiha", "Fukichiyo", "Fukiha", "Fukimi", "Fukiyo", "Fukizo", "Fuku", "Fukuai", "Fukuaya", "Fukuchiyo", "Fukucho", "Fukudama", "Fukuha", "Fukuhana", "Fukuharu", "Fukuhina", "Fukuhiro", "Fukumi", "Fukumusume", "Fukunae", "Fukusato", "Fukusuke", "Fukusuzu", "Fukuteru", "Fukuya", "Fukuyo", "Fukuyoshi", "Fukuyu", "Fumi", "Fumichiyo", "Fumicho", "Fumihana", "Fumiko", "Fumino", "Fumukazu", "Fusakichi", "Fusako", "Fusao", "Hamako", "Hamayu", "Hanachiyo", "Hanaji", "Hanakichi", "Hanako", "Hanamatsu", "Hanaryo", "Hanayakko", "Harukichi", "Haruko", "Hatsu", "Hatsuko", "Hatsuyo", "Hidechiyo", "Hidecho", "Hideji", "Hidemi", "Hideryu", "Hideyakko", "Hidezuru", "Hinacho", "Hinagiku", "Hinako", "Hinazuru", "Hisa", "Hisacho", "Hisae", "Hisaei", "Hisamomo", "Hisasuzu", "Hisayo", "Hisazuru", "Ichiei", "Ichiemi", "Ichiharu", "Ichiho", "Ichika", "Ichimame", "Ichimomo", "Ichiraku", "Ichiryu", "Ichisayo", "Ichiteru", "Ichitomi", "Ichiume", "Ichiya", "Ichiyakko", "Iku", "Ikumatsu", "Imayoshi", "Ine", "Iroha", "Ishino", "Ishiyakko", "Iso", "Isoei", "Itozuru", "Kameji", "Kameko", "Kaneha", "Kanemi", "Kanoaki", "Kanoemi", "Kanoka", "Kasen", "Katsuchiyo", "Katsue", "Katsuha", "Katsuji", "Katsuna", "Katsune", "Katsuru", "Kayo", "Kichihana", "Kichiyakko", "Kichiyo", "Kichiyu", "Kiku", "Kikuka", "Kikumaru", "Kikumatsu", "Kikuno", "Kikuryo", "Kikutsuru", "Kikuya", "Kikuyakko", "Kikuyu", "Kimiei", "Kimikiku", "Kimina", "Kimitomo", "Kimiyakko", "Kin'ei", "Kin'ichi", "Kinhei", "Kinko", "Kinmatsu", "Kinroku", "Kinryo", "Kinryu", "Kinshi", "Kinsuke", "Kinu", "Kinyo", "Kitanomatsu", "Kiyo", "Kozuru", "Koen", "Kofuku", "Kofusa", "Kogiku", "Koi", "Koiku", "Kojako", "Komagiku", "Komaji", "Komako", "Komame", "Komari", "Komaru", "Komasu", "Komomo", "Komume", "Koriki", "Korin", "Koroku", "Kosaki", "Kosaku", "Kosen", "Koshizu", "Kosome", "Kosue", "Kotaka", "Kotama", "Kotatsu", "Koteru", "Kotetsu", "Koto", "Kotobuki", "Kotoei", "Kotogiku", "Kotoha", "Kotoji", "Kotomi", "Kotono", "Kotoyo", "Kotsuma", "Koume", "Koyachiyo", "Koyakko", "Koyana", "Koyei", "Koyo", "Koyone", "Koyoshi", "Koyuka", "Koyuki", "Koyumi", "Kozakura", "Kuma", "Kumakichi", "Kumano", "Kumayoshi", "Kunigiku", "Kyoka", "Kyoko", "Machi", "Mamefusa", "Mamegiku", "Mamehana", "Mameharu", "Mamehide", "Mamehiro", "Mameka", "Mamekichi", "Mameko", "Mameraku", "Mameriki", "Mameroku", "Mameryo", "Mameyakko", "Mameyo", "Mameyoshi", "Mameyu", "Maru", "Masuwaka",  "Matsuko", "Matsuriki", "Matsuyakko", "Miharu", "Mineko", "Mitsu", "Mitsugiku", "Mitsuko", "Mitsuha", "Mitsuyo", "Miyagiku", "Miyo", "Miyoha", "Miyoharu", "Miyoka", "Miyozuru", "Momifuku", "Momiji", "Momochiyo", "Momoko", "Momomaru", "Momoyakko", "Momozuru", "Naka", "Naochiyo", "Naosome", "Naosono", "Narako", "Narayone", "Oimatsu", "Omine", "Omocha", "Onao", "Otomaru", "Otoyu", "Ran", "Ren", "Riki", "Rikigo", "Rikiha", "Rikiharu", "Rikihei", "Rikiji", "Rikiko", "Rikiya", "Royo", "Ryuko", "Sakae", "Sakiko", "Sana", "Sakyo", "Sanae", "Sankatsu", "Sanko", "Sanya", "Sasa", "Sato", "Satochiyo", "Satogiku", "Satoji", "Satoka", "Satokichi", "Satomi", "Satono", "Satotsuya", "Satoyuki", "Satoyu", "Satsuki", "Sayaka", "Sayoko", "Sekka", "Sen", "Shimekichi", "Shimematsu", "Shinneji", "Shizu", "Shizue", "Shizuko", "Sodeko", "Shun", "Somagiku", "Soyo", "Sumiko", "Suzu", "Suzuhachi", "Suzuka", "Sue", "Suzuko", "Takeko", "Takewaka", "Takeyakko", "Tama", "Tamagiku", "Tamakiku", "Tamako", "Tamaryo", "Tamasuke", "Tamaye", "Tamayu", "Tamazuru", "Tamiko", "Tane", "Taneji", "Taneju", "Taneko", "Tatsu", "Tatsuko", "Teruhina", "Teruji", "Teruko", "Teruyo", "Tetsu", "Toba", "Toki", "Tokiko", "Tokimatsu", "Toku", "Tome", "Tomeko", "Tomewaka", "Tomigiku", "Tomiko", "Tomimatsu", "Tomino", "Tomiryo", "Tomitae", "Tomitsuru", "Tomiwaka", "Tomiyakko", "Tomizuru", "Tomogiku", "Tomoko", "Tomoryo", "Tomowaka", "Tomoyuki", "Tonko", "Tora", "Toshifumi", "Toshihana", "Toshiko", "Toye", "Toyochiyo", "Toyohina", "Toyoji", "Toyofu", "Toyoka", "Tsunechiyo", "Tsuneko", "Tsunemomo", "Tsuneyo", "Tsuneyu", "Tsuru", "Tsurue", "Tsuruha", "Tsuruji", "Tsuruka", "Tsurumatsu", "Tsuruyo", "Tsuruyu", "Tsuta", "Tsutaji", "Tsuyachiyo", "Tsuyu", "Ume", "Umechie", "Umechiho", "Umechika", "Umechiyo", "Umegiku", "Umeha", "Umehisa", "Umeji", "Umeko", "Umeko", "Umematsu", "Umeo", "Umeraku", "Umeryo", "Umeryu", "Umesaya", "Umesuke", "Umesuzu", "Umewaka", "Umeyae", "Umeyakko", "Umeyu", "Uno", "Unofuku", "Unoha", "Unohide", "Unoji", "Unoka", "Unokayo", "Unokazu", "Unokiyo", "Unoko", "Unoshizu", "Unowaka", "Uta", "Utachiyo", "Utaji", "Utaka", "Utamatsu", "Utayu", "Wakaba", "Wakacho", "Wakagusa", "Wakai", "Wakaji", "Wakakimi", "Wakako", "Wakakoma", "Wakamurasaki", "Wakaroku", "Wakatsune", "Wakaume", "Wakayakko", "Wakayo", "Wakayone", "Wakazuru", "Wako", "Yachiyoko", "Yae", "Yaemi", "Yaewaka", "Yaezuru", "Yaichi", "Yasuku", "Yasohachi", "Yasu", "Yoi", "Yone", "Yonehachi", "Yoneyakko", "Yuiko", "Yukako", "Yukari", "Yukiryo", "Yukizono"]>>
 
+<<set $ArcologyNamesSupremacistWhite = ["The Old Dominion", "Thule"]>>
+<<set $ArcologyNamesSupremacistAsian = ["The Celestial Temple", "Shambhala", "Shangri-La"]>>
+<<set $ArcologyNamesSupremacistLatina = ["Tenochtitlan", "Aztlan"]>>
+<<set $ArcologyNamesSupremacistMiddleEastern = ["The Caliphate", "New Cairo"]>>
+<<set $ArcologyNamesSupremacistBlack = ["United Africa", "Benin"]>>
+<<set $ArcologyNamesSupremacistIndoAryan = ["Swarga Loka", "New New Delhi"]>>
+<<set $ArcologyNamesSupremacistPacificIslander = ["Maui", "Rapa Nui"]>>
+<<set $ArcologyNamesSupremacistAmerindian = ["Cahokia", "The Confederated Tribes"]>>
+<<set $ArcologyNamesSupremacistSouthernEuropean = ["New Athens", "Olympus"]>>
+<<set $ArcologyNamesSupremacistSemitic = ["The Fifth Temple", "The Promised Land"]>>
+<<set $ArcologyNamesSubjugationistWhite = ["The World Turned Upside Down", "Anticolonialism One"]>>
+<<set $ArcologyNamesSubjugationistAsian = ["The East India Company", "Pearl of the Orient"]>>
+<<set $ArcologyNamesSubjugationistLatina = ["Fort Veracruz", "The Halls of Montezuma"]>>
+<<set $ArcologyNamesSubjugationistMiddleEastern = ["Constantinople", "Vlad's Castle"]>>
+<<set $ArcologyNamesSubjugationistBlack = ["Dixie", "The Plantation"]>>
+<<set $ArcologyNamesSubjugationistIndoAryan = ["The East India Company", "Trade Fort"]>>
+<<set $ArcologyNamesSubjugationistPacificIslander = ["Cargo Cult", "Moro Castle"]>>
+<<set $ArcologyNamesSubjugationistAmerindian = ["Fort Laramie", "The Rez"]>>
+<<set $ArcologyNamesSubjugationistSouthernEuropean = ["Istanbul", "Al-Andalus"]>>
+<<set $ArcologyNamesSubjugationistSemitic = ["Solomon's Lament", "New Canaan"]>>
+<<set $ArcologyNamesGenderRadicalist = ["Saturnalia", "Bacchanalia", "Gomorrah", "Sodom", "The Rosebud"]>>
+<<set $ArcologyNamesGenderFundamentalist = ["The Arbor", "The Rose", "The Source"]>>
+<<set $ArcologyNamesPaternalist = ["Sanctum", "Asylum", "Sanctuary", "Haven", "New Springfield", "The Sanctuary", "Glory"]>>
+<<set $ArcologyNamesDegradationist = ["Hell", "Golgotha", "The Tower"]>>
+<<set $ArcologyNamesBodyPurist = ["Walden", "New Eden", "Elysium", "Purity", "The Ark", "The Repository"]>>
+<<set $ArcologyNamesTransformationFetishist = ["The Dollhouse", "Silicone Valley", "The Hospital", "Bimboland"]>>
+<<set $ArcologyNamesYouthPreferentialist = ["Sunnyside", "Fuck High", "Dick U.", "Sex College"]>>
+<<set $ArcologyNamesMaturityPreferentialist = ["Shady Acres", "MILFtown", "MILF Heights", "Park Avenue Tower"]>>
+<<set $ArcologyNamesSlimnessEnthusiast = ["The Island", "Upskirt", "Virginland"]>>
+<<set $ArcologyNamesAssetExpansionist = ["The Bouncy Castle", "The Mounds", "Twin Peaks", "Boobs Tower"]>>
+<<set $ArcologyNamesPastoralist = ["Cornucopia", "Abundance", "Plenty", "Bounty", "Greener Pastures", "God's Country", "The Ranch", "Pasturelands"]>>
+<<set $ArcologyNamesPhysicalIdealist = ["Themyscira", "Midgard", "Muscle Beach", "Skid Row"]>>
+<<set $ArcologyNamesChattelReligionist = ["Heaven", "The Light", "Heaven on Earth"]>>
+<<set $ArcologyNamesRomanRevivalist = ["Elysian Fields", "Carthago Nova", "Nova Roma", "Neapolis", "Capua", "Ostia", "Salernum", "The City of the Seven Hills"]>>
+<<set $ArcologyNamesEgyptianRevivalist = ["Thebes", "Memphis", "Alexandria"]>>
+<<set $ArcologyNamesEdoRevivalist = ["Onogoro", "Kokyo", "Tengoku", "Takama-ga-hara", "New Kyoto", "The Imperial Palace", "New Tokyo"]>>
+<<set $ArcologyNamesArabianRevivalist = ["Jannah", "Madinat al-Salam", "Madinat al-Hareer", "Madinat al-Zahra", "Madinat al-Yasmin", "Bayt al-Hikma", "Baghdad", "Alhambra", "Samarra"]>>
+<<set $ArcologyNamesChineseRevivalist = ["Yinfu", "Huangquan", "Jiuquan", "Youming", "Huokang", "Mingfu", "Jin Shan", "Qi Lin", "Xin Hua", "Feng Huang", "The Middle Kingdom", "The Forbidden Palace"]>>
+<<set $ArcologyNamesEugenics = ["Perfection", "Ancension", "Second Chance"]>>
+<<set $ArcologyNamesRepopulationist = ["Hope", "The Womb", "Holders of the Future", "Future", "Haven of the Pregnant", "Sacred Womb", "Glorious Mother"]>>
+
 <<set $badWords to ["fuck", "shit", "ass", "cock", "piss", "dick", "slut", "cum", "whore", "butt", "boob", "cunt", "cunny", "pussy", "junk", "trash", "slave"]>>
 
 <<set $niceWeather = []>>
diff --git a/src/npc/acquisition.tw b/src/npc/acquisition.tw
index 6ca1c2b1637a128f03b39e63d82a29ef4946933a..bfdbce264289868558107c8b0d2623606d8af6f0 100644
--- a/src/npc/acquisition.tw
+++ b/src/npc/acquisition.tw
@@ -1,121 +1,440 @@
 :: Acquisition [nobr]
 
-<<set $ui to "start">>
+<<if $saveImported == 1>><<set $startingValue to 5000>><<else>><<set $startingValue to 25000>><</if>>
+<<if $freshPC == 1>>
+	<<if $PC.vagina == 1>>
+	<<set $PC.births = 0>>
+	<<if $PC.career == "servant">>
+		<<if $PC.age == 1>>
+			<<set $PC.births = 3>>
+			<<set $PC.birthMaster = 3>>
+		<<elseif $PC.age == 2>>
+			<<set $PC.births = 6>>
+			<<set $PC.birthMaster = 6>>
+		<<else>>
+			<<set $PC.births = 9>>
+			<<set $PC.birthMaster = 9>>
+		<</if>>
+		<<for $i to 0; $i < $slaves.length; $i++>>
+			<<if $slaves[$i].origin == "She was another of your late master's servants. She spent nine months in your womb, courtesy of your master." ||$slaves[$i].origin == "Your late master took pleasure in using his servants in creative ways. He inseminated you with your own sperm, and nine months later, your daughter was born.">>
+			<<set $PC.births += 1>>
+			<<set $PC.birthMaster += 1>>
+			<</if>>
+		<</for>>
+	<<elseif $PC.career == "escort">>
+		<<for $i to 0; $i < $slaves.length; $i++>>
+			<<if $slaves[$i].origin == "She was the result of unprotected sex with a client. He paid you quite well to enjoy your body as you grew heavy with his child." || $slaves[$i].origin == "A client payed you a large sum of credits to prove you could literally fuck yourself. She is the result of that lucrative night.">>
+			<<set $PC.births += 1>>
+			<<set $PC.birthClient += 1>>
+			<</if>>
+		<</for>>
+	<<else>>
+		<<for $i to 0; $i < $slaves.length; $i++>>
+			<<if $slaves[$i].mother == -1>>
+			<<set $PC.births += 1>>
+			<<set $PC.birthOther += 1>>
+			<</if>>
+		<</for>>
+	<</if>>
+	<<if $PC.preg > 0>>
+		<<if $PC.career == "servant">>
+			<<set $PC.pregSource = -3>>
+		<<elseif $PC.career == "escort">>
+			<<set $PC.pregSource = -2>>
+		<</if>>
+	<</if>>
+<<else>> /*testtest*/
+	<<set $PC.pregSource = 0>>
+	<<set $PC.mother = 0>>
+	<<set $PC.mother = 0>>
+	<<set $PC.sisters = 0>>
+	<<set $PC.daughters = 0>>
+	/*Reserved for player-family setting, unsetting, etc. */
+<</if>>
 
-<<if $saveImported == 1>>
-	<<set $startingValue to 5000>>
+<</if>> /*closes ng*/
+
+You've done it.
+<br><br>
+You arrive at your new arcology, $arcologies[0].name, and head straight to the penthouse to enter the access codes that will tell the $arcologies[0].name systems to recognize you as their owner. The penthouse office is ready to receive the codes, and they authenticate. A voice activates in your earpiece.
+<br><br>
+//Congratulations. I am a personal assistant program, and it is my pleasure to assist you, $PCName, the new owner of  $arcologies[0].name. I will offer useful information whenever possible in italics. Your new arcology has some unusual equipment. The previous owner kept a small stable of sex slaves. The penthouse therefore has a body modification studio for tattooing, bleaching and piercing, and an auto salon for more prosaic things like hair care. It also has a remote surgery, a small surgical theater that can be operated remotely by a qualified surgeon if you can pay the fee. Finally, it has a slave nutrition system connected to the arcology's hydroponics bays. This system produces a tasty protein-rich drink that provides the physically active female body all its necessary nutrients while leaving the lower digestive tract extremely clean. It even causes a mild increase in sex drive.
+<br><br>
+The previous owner seems to have left in something of a hurry.
+<<if $cheatMode == 1>>
+	Since you've elected to take over an arcology with special advantages, you've acquired a very special group of slaves.
+<<elseif $saveImported == 1>>
+	Since it took some time for you to ensure that your existing stable of slaves were safely moved to $arcologies[0].name, the previous owner had the time to get most of their things away.
+<<elseif ($targetArcology.type != "New") && ($targetArcology.type != "Multiculturalist")>>
+	<<switch $targetArcology.type>>
+	<<case "Supremacist">>
+		They kept a personal stable of fearful $arcologies[0].FSSupremacistRace sex slaves, but their sexual training is incomplete. Several of them are still here.
+	<<case "Subjugationist">>
+		They made it a special goal to enslave and whore out as many $arcologies[0].FSSubjugationistRace people as possible. Several of them are still here.
+	<<case "GenderRadicalist">>
+		They were in the process of building a stable of pretty young shemale whores. Several of them are still here. They're are all very attracted to men, and skilled at pleasing them.
+	<<case "GenderFundamentalist">>
+		They kept a personal stable of slaves for breeding purposes. Several of them are still here. They've been kept pregnant, and work as servants when they aren't being bred.
+	<<case "Paternalist">>
+		Their slaves were all very well treated. Several of them are still here. They were allowed to work as maids, and weren't even forced to have sex.
+	<<case "Degradationist">>
+		Their personal slaves were all Fuckdolls, slaves who have been permanently encased in advanced latex suits and converted into living sex toys. Several of them are still here.
+	<<case "AssetExpansionist">>
+		They kept a collection of bejeweled boobs for company, but they focused on breast expansion to the exclusion the slaves' emotional training. Several of them are still here.
+	<<case "SlimnessEnthusiast">>
+		They kept a harem of slim, pretty girls, and treated them very well. Several of them are still here. They should be very trusting of a new owner.
+	<<case "TransformationFetishist">>
+		They were just putting the finishing touches on a planned brothel's worth of surgically enhanced whores. Several of them are still here. They are already used to prostitution.
+	<<case "BodyPurist">>
+		Their slaves were trained for sexual use, but their health, fitness, and natural appearance were the main priorities. Several of them are still here.
+	<<case "MaturityPreferentialist">>
+		They preferred to keep their MILFs as scantily clad servants. Several of them are still here. They aren't all happy to be sex objects, but they're used to it.
+	<<case "YouthPreferentialist">>
+		They treated their young slaves very well. Several of them are still here. Virgins have been carefully preserved, but have learned to use their mouths through experience.
+	<<case "Pastoralist">>
+		Their herd of cow girls was progressing nicely, though more progress had been made on milk production than on training. Several of them are still here.
+	<<case "PhysicalIdealist">>
+		Their slaves worked as prostitutes, but mostly to fund a program of muscle building for all of them, which was nearing completion. Several of them are still here.
+	<<case "ChattelReligionist">>
+		They were recruiting a stable of slave whores by targeting people with religious complexes that made them particularly vulnerable to recruitment. Several of them are still here.
+	<<case "RomanRevivalist">>
+		The only one of their slaves left is the bodyguard. She should be very willing to transfer her loyalty to you, as her new owner.
+	<<case "EgyptianRevivalist">>
+		They kept a harem of beautiful slave girls, who have been well-treated and well-trained. They should be very willing to serve you in turn.
+	<<case "EdoRevivalist">>
+		They put considerable effort into creating modern slave geisha, elegant Japanese slaves who were assigned to serve the public. Several of them are still here.
+	<<case "ArabianRevivalist">>
+		They trained slaves personally, and never kept slaves for very long. The slaves they left are all partway through being trained.
+	<<case "ChineseRevivalist">>
+		The only one of their slaves left is the Head Girl. She should be willing to transfer her loyalty to you, as her proper superior.
+	<<case "Eugenics">>
+		The only one of their slaves left is an absolute beauty of a girl. She is too smart for her own good and will likely not trust you.
+	<<case "Repopulationist">>
+		They kept a personal stable of slaves for breeding purposes. Several of them are still here. They've been kept heavily pregnant, and are used to being used whilst so.
+	<<default>>
+		ERROR: bad arcology type
+	<</switch>>
 <<else>>
-	<<set $startingValue to 25000>>
+	They could not get all of their personal effects away. Since they <<if $targetArcology.type == "Multiculturalist">>tried to sample different kinds of sexual slavery<<else>>did not have the time in control of the arcology to develop a specific stable of sex slaves<</if>>, their slaves were quite varied.
 <</if>>
-<<set $showBodyMods to 1>>
-<<set $heroSlaves to $heroSlaves.shuffle()>>
 
-<<if $PC.vagina == 1>>
-<<set $PC.births = 0>>
-<<if $PC.career == "servant">>
-	<<if $PC.age == 1>>
-		<<set $PC.births = 3>>
-		<<set $birthMaster = 3>>
-	<<elseif $PC.age == 2>>
-		<<set $PC.births = 6>>
-		<<set $birthMaster = 6>>
-	<<else>>
-		<<set $PC.births = 9>>
-		<<set $birthMaster = 9>>
+<<set $heroSlaves to $heroSlaves.shuffle()>>
+<<set $seed to 0>>
+<<if $ageMode == 1>>
+	<<display [[Aging Test]]>>
+<<elseif $cheatMode == 1>>
+	<<display [[Cheatmode Database]]>>
+<<elseif $saveImported == 1>>
+<<elseif ($targetArcology.type != "New") && ($targetArcology.type != "Multiculturalist")>>
+	<<for $j to 0; $j < $heroSlaves.length; $j++>>
+	<<if $startingValue - $seed <= 5000>>
+		<<break>>
 	<</if>>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.origin == "She was another of your late master's servants. She spent nine months in your womb, courtesy of your master.">>
-		<<set $PC.births += 1>>
-		<<set $birthMaster += 1>>
+	<<switch $targetArcology.type>>
+	<<case "Supremacist">>
+		<<set $arcologies[0].FSSupremacistLawME = 1>><<display "Generate New Slave">><<set $arcologies[0].FSSupremacistLawME = 0>>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-25,-45), $activeSlave.health = random(0,15)>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = random(15,35)>>
+		<<if $activeSlave.vagina > -1>>
+			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+			<<set $activeSlave.vaginalSkill = random(15,35)>>
 		<</if>>
-	<</for>>
-<<elseif $PC.career == "escort">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.origin == "She was the result of unprotected sex with a client. He paid you quite well to enjoy your body as you grew heavy with his child.">>
-		<<set $PC.births += 1>>
-		<<set $birthClient += 1>>
+		<<set $activeSlave.entertainSkill = random(15,35)>>
+		<<set $activeSlave.clothes = "uncomfortable straps", $activeSlave.collar = "uncomfortable leather", $activeSlave.shoes = "flats">>
+		<<set $activeSlave.assignment = "please you">>
+	<<case "Subjugationist">>
+		<<set $fixedRace = $activeArcology.FSSubjugationistRace>><<display "Generate New Slave">><<set $fixedRace = 0>>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-25,-45), $activeSlave.health = random(0,15)>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = random(15,35)>>
+		<<if $activeSlave.vagina > -1>>
+			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+			<<set $activeSlave.vaginalSkill = random(15,35)>>
 		<</if>>
-	<</for>>
-<<elseif $PC.career == "capitalist">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.origin == "Sometimes it pays off to use your body in business deals, and other times you end up burdened with child. She is the result of the latter.">>
-		<<set $PC.births += 1>>
-		<<set $birthOther += 1>>
+		<<set $activeSlave.whoreSkill = random(15,35)>>
+		<<set $activeSlave.clothes = "uncomfortable straps", $activeSlave.collar = "uncomfortable leather", $activeSlave.shoes = "flats">>
+		<<set $activeSlave.assignment = "whore">>
+	<<case "GenderRadicalist">>
+		<<set $activeSlaveOneTimeMaxAge to 25>>
+		<<display "Generate XY Slave">>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(15,-15), $activeSlave.health = 100>>
+		<<set $activeSlave.beauty = random(0,2)>>
+		<<set $activeSlave.boobs += 100*random(2,4)>>
+		<<set $activeSlave.butt += random(1,2)>>
+		<<set $activeSlave.attrXY = random(70,90), $activeSlave.attrXX = 0>>
+		<<set $activeSlave.oralSkill = random(35,65), $activeSlave.analSkill = random(35,65), $activeSlave.whoreSkill = random(35,65)>>
+		<<SoftenSexualFlaw $activeSlave>>
+		<<set $activeSlave.clothes = "uncomfortable straps", $activeSlave.collar = "stylish leather", $activeSlave.shoes = "heels">>
+		<<set $activeSlave.assignment = "whore">>
+	<<case "GenderFundamentalist">>
+		<<set $activeSlaveOneTimeMinAge to $fertilityAge>>
+		<<set $activeSlaveOneTimeMaxAge to 25>>
+		<<display "Generate XX Slave">>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-25,-45), $activeSlave.health = random(55,65)>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.preg = random(1,35), $activeSlave.lactation = 1>>
+		<<if $activeSlave.vagina > -1>>
+			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+			<<set $activeSlave.vaginalSkill = random(15,35)>>
 		<</if>>
-	<</for>>
-<<elseif $PC.career == "mercenary">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.origin == "Drugs and alcohol can be a potent mix; the night that followed it can sometimes be hard to remember. Needless to say, once your belly began swelling with her, you had to temporarily switch to a desk job for your mercanary group.">>
-		<<set $PC.births += 1>>
-		<<set $birthOther += 1>>
+		<<set $activeSlave.clothes = "a nice maid outfit", $activeSlave.collar = "tight steel", $activeSlave.shoes = "flats">>
+		<<set $activeSlave.assignment = "work as a servant">>
+	<<case "Paternalist">>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(55,65), $activeSlave.health = random(55,65)>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.intelligence = random(1,3), $activeSlave.intelligenceImplant = 1>>
+		<<set $activeSlave.entertainSkill = random(15,35)>>
+		<<set $activeSlave.clothes = "conservative clothing", $activeSlave.collar = "none", $activeSlave.shoes = "flats">>
+		<<set $activeSlave.assignment = "work as a servant">>
+	<<case "Degradationist">>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = 25, $activeSlave.trust = -25, $activeSlave.health = random(0,15)>>
+		<<set $activeSlave.fuckdoll = 100>>
+		<<set $activeSlave.career = "a Fuckdoll">>
+		<<set $activeSlave.fetish = "mindbroken">>
+		<<set $activeSlave.boobs += 100*random(10,20)>>
+		<<set $activeSlave.butt += random(2,3)>>
+		<<set $activeSlave.lips = random(2,4)>>
+		<<set $activeSlave.weight = random(-15,15)>>
+		<<set $activeSlave.oralSkill = 0, $activeSlave.analSkill = 0, $activeSlave.vaginalSkill = 0, $activeSlave.entertainSkill = 0, $activeSlave.whoreSkill = 0>>
+		<<set $activeSlave.behavioralFlaw = "none", $activeSlave.sexualFlaw = "none">>
+		<<set $activeSlave.clothes == "a Fuckdoll suit">>
+		<<set $activeSlave.assignment = "please you">>
+	<<case "AssetExpansionist">>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-15,15), $activeSlave.health = random(25,45)>>
+		<<set $activeSlave.chem = 50>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.boobs += 100*random(10,20)>>
+		<<set $activeSlave.butt += random(2,3)>>
+		<<set $activeSlave.lips += random(0,1)>>
+		<<if $activeSlave.balls > 0>><<set $activeSlave.balls++>><</if>>
+		<<if $activeSlave.dick > 0>><<set $activeSlave.dick++>><</if>>
+		<<set $activeSlave.weight = random(15,90)>>
+		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = 0, $activeSlave.anus = 0>>
+		<<if $activeSlave.vagina > -1>>
+			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+			<<set $activeSlave.vaginalSkill = random(15,35)>>
 		<</if>>
-	<</for>>
-<<elseif $PC.career == "slaver">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.origin == "A fresh capture once overpowered you and had his way with you. You kept her as a painful reminder to never lower your guard again.">>
-		<<set $PC.births += 1>>
-		<<set $birthOther += 1>>
+		<<set $activeSlave.entertainSkill = random(15,35)>>
+		<<set $activeSlave.clothes = "slutty jewelry", $activeSlave.collar = "pretty jewelry", $activeSlave.shoes = "heels">>
+		<<set $activeSlave.assignment = "please you">>
+	<<case "SlimnessEnthusiast">>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(55,65), $activeSlave.health = random(55,65)>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.boobs = 100*random(1,4)>>
+		<<set $activeSlave.butt = random(1,2)>>
+		<<set $activeSlave.weight = random(-25,-15)>>
+		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = 0, $activeSlave.anus = 0>>
+		<<if $activeSlave.vagina > -1>>
+			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+			<<set $activeSlave.vaginalSkill = random(15,35)>>
 		<</if>>
-	<</for>>
-<<elseif $PC.career == "engineer">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.origin == "You concieved her after a male arcology owner, impressed by your work, rewarded you with a nigt you'll never forget.">>
-		<<set $PC.births += 1>>
-		<<set $birthOther += 1>>
+		<<set $activeSlave.entertainSkill = random(15,35)>>
+		<<set $activeSlave.clothes = "a leotard", $activeSlave.collar = "pretty jewelry", $activeSlave.shoes = "flats">>
+		<<set $activeSlave.assignment = "please you">>
+	<<case "TransformationFetishist">>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-15,15), $activeSlave.health = random(-15,0)>>
+		<<set $activeSlave.faceImplant = random(1,2)>>
+		<<set $activeSlave.beauty = Math.trunc($activeSlave.beauty+$activeSlave.faceImplant,-3,3)>>
+		<<set $activeSlave.boobsImplant = 200*random(4,8)>>
+		<<set $activeSlave.boobs += $activeSlave.boobsImplant>>
+		<<set $activeSlave.buttImplant = random(2,4)>>
+		<<set $activeSlave.butt += $activeSlave.buttImplant>>
+		<<set $activeSlave.lipsImplant = random(1,2)>>
+		<<set $activeSlave.lips = Math.trunc($activeSlave.lipsImplant+2,-3,3)>>
+		<<set $activeSlave.weight = random(-25,-15)>>
+		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = random(15,35)>>
+		<<if $activeSlave.vagina > -1>>
+			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+			<<set $activeSlave.vaginalSkill = random(15,35)>>
 		<</if>>
-	<</for>>
-<<elseif $PC.career == "gang">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.origin == "She was the result of a night of hard drugs and unprotected sex after a big score.">>
-		<<set $PC.births += 1>>
-		<<set $birthOther += 1>>
+		<<set $activeSlave.clothes = "a string bikini", $activeSlave.collar = "shock punishment", $activeSlave.shoes = "extreme heels">>
+		<<set $activeSlave.assignment = "whore">>
+	<<case "BodyPurist">>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = random(55,65), $activeSlave.trust = random(25,45), $activeSlave.health = 100>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.weight = random(-5,5)>>
+		<<set $activeSlave.muscle = random(10,25)>>
+		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = random(15,35)>>
+		<<if $activeSlave.vagina > -1>>
+			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+			<<set $activeSlave.vaginalSkill = random(15,35)>>
 		<</if>>
-	<</for>>
-<<elseif $PC.career == "medicine">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.origin == "She was concieved after a botched birth control expirement early in your career.">>
-		<<set $PC.births += 1>>
-		<<set $birthOther += 1>>
+		<<set $activeSlave.clothes = "a nice maid outfit", $activeSlave.collar = "pretty jewelry", $activeSlave.shoes = "heels">>
+		<<set $activeSlave.assignment = "work as a servant">>
+	<<case "MaturityPreferentialist">>
+		<<set $activeSlaveOneTimeMinAge to 36>>
+		<<set $activeSlaveOneTimeMaxAge to 39>>
+		<<set $one_time_age_overrides_pedo_mode to 1>>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = random(55,65), $activeSlave.trust = random(-15,15), $activeSlave.health = random(25,45)>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.boobs += 100*random(1,4)>>
+		<<set $activeSlave.butt += random(1,2)>>
+		<<set $activeSlave.weight = random(-5,90)>>
+		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = random(15,35)>>
+		<<if $activeSlave.vagina > -1>>
+			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+			<<set $activeSlave.vaginalSkill = random(15,35)>>
 		<</if>>
-	<</for>>
-<<elseif $PC.career == "celebrity">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.origin == "She was concieved after a night of partying and a torn condom. She nearly killed your career.">>
-		<<set $PC.births += 1>>
-		<<set $birthOther += 1>>
+		<<SoftenBehavioralFlaw $activeSlave>>
+		<<set $activeSlave.clothes = "a slutty maid outfit", $activeSlave.collar = "pretty jewelry", $activeSlave.shoes = "heels">>
+		<<set $activeSlave.assignment = "work as a servant">>
+	<<case "YouthPreferentialist">>
+		<<set $activeSlaveOneTimeMaxAge to 19>>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(55,65), $activeSlave.health = random(25,45)>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.boobs = 100*random(1,4)>>
+		<<set $activeSlave.butt = random(1,3)>>
+		<<set $activeSlave.weight = random(-25,25)>>
+		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = 0, $activeSlave.anus = 0>>
+		<<if $activeSlave.vagina > -1>><<set $activeSlave.vaginalSkill = 0, $activeSlave.vagina = 0>><</if>>
+		<<set $activeSlave.entertainSkill = random(15,35)>>
+		<<set $activeSlave.clothes = "a schoolgirl outfit", $activeSlave.collar = "pretty jewelry", $activeSlave.shoes = "heels">>
+		<<set $activeSlave.assignment = "work as a servant">>
+	<<case "Pastoralist">>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-25,-45), $activeSlave.health = random(25,45)>>
+		<<set $activeSlave.boobs += 100*random(10,20)>>
+		<<if $activeSlave.balls > 0>><<set $activeSlave.balls++>><</if>>
+		<<set $activeSlave.lactation = 2>>
+		<<set $activeSlave.clothes = "Western clothing", $activeSlave.collar = "leather with cowbell", $activeSlave.shoes = "flats">>
+		<<set $activeSlave.assignment = "get milked">>
+	<<case "PhysicalIdealist">>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(25,45), $activeSlave.health = 100>>
+		<<set $activeSlave.muscles = random(50,100)>>
+		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = random(15,35)>>
+		<<if $activeSlave.vagina > -1>>
+			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+			<<set $activeSlave.vaginalSkill = random(15,35)>>
 		<</if>>
-	<</for>>
-<<elseif $PC.career == "wealth">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.origin == "You bet your body on a sure hand, only to lose. Nine months later, your daughter was born.">>
-		<<set $PC.births += 1>>
-		<<set $birthOther += 1>>
+		<<set $activeSlave.whoreSkill = random(15,35)>>
+		<<set $activeSlave.clothes = "body oil", $activeSlave.collar = "none", $activeSlave.shoes = "none">>
+		<<set $activeSlave.assignment = "whore">>
+	<<case "ChattelReligionist">>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = random(55,65), $activeSlave.trust = random(55,65), $activeSlave.health = random(0,15)>>
+		<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+		<<set $activeSlave.whoreSkill = random(10,20)>>
+		<<set $activeSlave.behavioralFlaw = "none", $activeSlave.behavioralQuirk = "sinful">>
+		<<set $activeSlave.clothes = "a chattel habit", $activeSlave.collar = "heavy gold", $activeSlave.shoes = "flats">>
+		<<set $activeSlave.assignment = "whore">>
+	<<case "RomanRevivalist">>
+		<<set $activeSlaveOneTimeMaxAge to 19>>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = 100, $activeSlave.trust = random(55,65), $activeSlave.health = 100>>
+		<<set $activeSlave.beauty = random(0,2)>>
+		<<set $activeSlave.muscles = random(25,50)>>
+		<<set $activeSlave.combatSkill = 1>>
+		<<set $activeSlave.behavioralFlaw = "none", $activeSlave.behavioralQuirk = "fitness">>
+		<<set $activeSlave.behavioralFlaw = "none">>
+		<<set $activeSlave.clothes = "a toga", $activeSlave.collar = "pretty jewelry", $activeSlave.shoes = "flats">>
+		<<set $activeSlave.assignment = "guard you", $Bodyguard = $activeSlave>>
+	<<case "EgyptianRevivalist">>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(25,45), $activeSlave.health = random(25,45)>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = random(15,35)>>
+		<<if $activeSlave.vagina > -1>>
+			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+			<<set $activeSlave.vaginalSkill = random(15,35)>>
+		<</if>>
+		<<set $activeSlave.entertainSkill = random(15,35)>>
+		<<SoftenSexualFlaw $activeSlave>>
+		<<set $activeSlave.clothes = "slutty jewelry", $activeSlave.collar = "ancient Egyptian", $activeSlave.shoes = "flats">>
+		<<set $activeSlave.assignment = "please you">>
+	<<case "EdoRevivalist">>
+		<<set $fixedRace = "asian">><<display "Generate New Slave">><<set $fixedRace = 0>>
+		<<set $activeSlave.nationality = "Japanese">>
+		<<NationalityToName>>
+		<<set $activeSlave.accent = 0>>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(25,45), $activeSlave.health = random(25,45)>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.intelligence = random(1,3), $activeSlave.intelligenceImplant = 1>>
+		<<set $activeSlave.entertainSkill = 100>>
+		<<set $activeSlave.clothes = "a kimono", $activeSlave.collar = "satin choker", $activeSlave.shoes = "heels">>
+		<<set $activeSlave.assignment = "serve the public">>
+	<<case "ArabianRevivalist">>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-15,15), $activeSlave.health = random(25,45)>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.intelligence = random(0,2), $activeSlave.intelligenceImplant = 0>>
+		<<set $activeSlave.clothes = "harem gauze", $activeSlave.collar = "uncomfortable leather", $activeSlave.shoes = "flats">>
+		<<set $activeSlave.assignment = "take classes">>
+	<<case "ChineseRevivalist">>
+		<<set $activeSlaveOneTimeMinAge to 36>>
+		<<set $activeSlaveOneTimeMaxAge to 38>>
+		<<set $one_time_age_overrides_pedo_mode to 1>>
+		<<set $fixedRace = "asian">><<display "Generate New Slave">><<set $fixedRace = 0>>
+		<<set $activeSlave.nationality = "Chinese">>
+		<<NationalityToName>>
+		<<NationalityToAccent>>
+		<<set $activeSlave.devotion = random(55,65), $activeSlave.trust = random(25,45), $activeSlave.health = random(25,45)>>
+		<<set $activeSlave.beauty = random(0,2)>>
+		<<set $activeSlave.accent = 0>>
+		<<set $activeSlave.intelligence = 3, $activeSlave.intelligenceImplant = 1>>
+		<<set $activeSlave.oralSkill = 100, $activeSlave.analSkill = 100>>
+		<<if $activeSlave.vagina > -1>>
+			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+			<<set $activeSlave.vaginalSkill = 100>>
 		<</if>>
+		<<set $activeSlave.entertainSkill = 100, $activeSlave.whoreSkill = 100>>
+		<<SoftenBehavioralFlaw $activeSlave>>
+		<<SoftenSexualFlaw $activeSlave>>
+		<<set $activeSlave.clothes = "a slutty quipao", $activeSlave.collar = "pretty jewelry", $activeSlave.shoes = "heels">>
+		<<set $activeSlave.assignment = "be your Head Girl", $HeadGirl = $activeSlave>>
+	<<case "Eugenics">>
+		<<display "Generate New Slave">>
+		<<set $activeSlave.devotion = -100, $activeSlave.trust = -100, $activeSlave.health = random(80,90)>>
+		<<set $activeSlave.beauty = 6>>
+		<<set $activeSlave.intelligence = 3>>
+		<<set $activeSlave.intelligenceImplant = 1>>
+		<<set $activeSlave.face = 3>>
+		<<set $activeSlave.faceShape = "sensual">>
+		<<set $activeSlave.oralSkill = random(35,75), $activeSlave.analSkill = random(35,75)>>
+		<<if $activeSlave.vagina > -1>>
+			<<if $activeSlave.vagina = 0>><<set $activeSlave.vagina++>><</if>>
+			<<set $activeSlave.vaginalSkill = random(35,75)>>
+		<</if>>
+		<<set $activeSlave.entertainSkill = random(15,35)>>
+		<<set $activeSlave.whoreSkill = 0>>
+		<<SoftenSexualFlaw $activeSlave>>
+		<<set $activeSlave.clothes = "a ball gown", $activeSlave.shoes = "flats">>
+		<<set $activeSlave.assignment = "rest">>
+	<<case "Repopulationist">>
+		<<set $activeSlaveOneTimeMinAge to $fertilityAge+3>>
+		<<set $activeSlaveOneTimeMaxAge to 25>>
+		<<set $one_time_age_overrides_pedo_mode to 1>>
+		<<display "Generate XX Slave">>
+		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-25,-45), $activeSlave.health = random(55,65)>>
+		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.preg = random(10,35),$activeSlave.pregType = random(3,5) , $activeSlave.lactation = 1>>
+		<<set $activeSlave.birthsTotal = 5>>
+		<<set $activeSlave.bellySag = 20>>
+		<<if $activeSlave.vagina > -1>>
+			<<set $activeSlave.vagina = 4>>
+			<<set $activeSlave.vaginalSkill = random(15,35)>>
+		<</if>>
+		<<set $activeSlave.clothes = "a nice maid outfit", $activeSlave.shoes = "flats">>
+		<<set $activeSlave.assignment = "please you">>
+	<<default>>
+		ERROR: bad arcology type
+	<</switch>>
+	<<set $activeSlave.origin = "You acquired her along with the arcology.">>
+	<<set $activeSlave.career = "a slave">>
+	<<slaveCost $activeSlave>>
+	<<set $seed = Math.trunc($seed+$slaveCost, 0, $startingValue)>>
+	<<AddSlave $activeSlave>>
 	<</for>>
-<</if>>
-<<if $PC.preg > 0>>
-	<<if $PC.career == "servant">>
-		<<set $PC.pregSource = -3>>
-	<<elseif $PC.career == "escort">>
-		<<set $PC.pregSource = -2>>
-	<</if>>
-<</if>>
-<</if>>
-
-You arrive at your new arcology, $arcologies[0].name, and head straight to the penthouse to enter the access codes that will tell the $arcologies[0].name systems to recognize you as their owner. The penthouse office is ready to receive the codes, and they authenticate. A voice activates in your earpiece.
-<br><br>
-//Congratulations. I am a personal assistant program, and it is my pleasure to assist you, $PCName, the new owner of  $arcologies[0].name. I will offer useful information whenever possible in italics.
-<br><br>
-Your new arcology has some unusual equipment. The previous owner kept a small stable of sex slaves. The penthouse therefore has a body modification studio for tattooing, bleaching and piercing, and an auto salon for more prosaic things like hair care. It also has a remote surgery, a small surgical theater that can be operated remotely by a qualified surgeon if you can pay the fee. Finally, it has a slave nutrition system connected to the arcology's hydroponics bays. This system produces a tasty protein-rich drink that provides the physically active female body all its necessary nutrients while leaving the lower digestive tract extremely clean. It even causes a mild increase in sex drive.
-<br><br>
-The previous owner seems to have left in something of a hurry. <<if $saveImported == 1>>Since it took some time for you to move your personal entourage into $arcologies[0].name, he had the time to get most of his things away.<<else>>He could not get all of his personal effects away.<</if>>//
-
-<<if $ageMode == 1>>
-	<<display [[Aging Test]]>>
-<<elseif $cheatMode == 1>>
-	<<display [[Cheatmode Database]]>>
 <<else>>
-	<<set $seed to 0>>
 	<<for $j to 0; $j < $heroSlaves.length; $j++>>
 	<<if $startingValue - $seed <= 5000>>
 		<<break>>
@@ -124,59 +443,60 @@ The previous owner seems to have left in something of a hurry. <<if $saveImporte
 	<<set $dump to $heroSlaves.pluck($j,$j)>>
 	<<slaveCost $activeSlave>>
 	<<if $seed + $slaveCost < $startingValue*2>>
-		<<display "Nationality to Accent">>
+		<<NationalityToAccent>>
 		<<set $activeSlave.pubicHColor to $activeSlave.hColor>>
-		<<set $activeSlave.pubicHStyle to "waxed">>
-		<<set $activeSlave.underArmHColor to $activeSlave.hColor>>
-		<<set $activeSlave.underArmHStyle to "waxed">>
+		<<set $activeSlave.pubicHStyle = "waxed">>
+		<<set $activeSlave.underArmHColor = $activeSlave.hColor>>
+		<<set $activeSlave.underArmHStyle = "waxed">>
 		<<set $activeSlave.oldDevotion to $activeSlave.devotion>>
 		<<set $activeSlave.oldTrust to $activeSlave.trust>>
 		<<set $seed += $slaveCost>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<if $activeSlave.fetish is "mindbroken">>
-			//$activeSlave.slaveName is, sadly, not mentally competent, and is wandering through the penthouse at the moment.//
+			$activeSlave.slaveName is, sadly, not mentally competent, and is wandering through the penthouse at the moment.
 		<<elseif $activeSlave.amp == 1>>
-			//$activeSlave.slaveName is a quadruple amputee and is quite helpless, so you can attend to her at your leisure.//
+			$activeSlave.slaveName is a quadruple amputee and is quite helpless, so you can attend to her at your leisure.
 		<<elseif $activeSlave.devotion < -50>>
-			//$activeSlave.slaveName is quite rebellious and was attempting to escape, so I have locked her in the slave quarters.//
+			$activeSlave.slaveName is quite rebellious and was attempting to escape, so I have locked her in the slave quarters.
 		<<elseif $activeSlave.devotion < -20>>
-			//$activeSlave.slaveName resists my orders and was considering escape, so I have locked her in the slave quarters.//
+			$activeSlave.slaveName resists my orders and was considering escape, so I have locked her in the slave quarters.
 		<<elseif $activeSlave.devotion <= 20>>
-			//$activeSlave.slaveName is reasonably obedient, and is waiting for you in the dormitory, I believe in the hope of making a good impression.//
+			$activeSlave.slaveName is reasonably obedient, and is waiting for you in the dormitory, I believe in the hope of making a good impression.
 		<<elseif $activeSlave.energy > 95>>
-			//$activeSlave.slaveName is a remarkable sexual addict, and I believe she will be very happy to meet you.//
+			$activeSlave.slaveName is a remarkable sexual addict, and I believe she will be very happy to meet you.
 		<<elseif $activeSlave.fetish is "pregnancy" && $activeSlave.preg > 10>>
-			//$activeSlave.slaveName is currently in the dormitory masturbating over her growing pregnancy.//
+			$activeSlave.slaveName is currently in the dormitory masturbating over her growing pregnancy.
 		<<elseif $activeSlave.preg > 20>>
-			//$activeSlave.slaveName is currently in the dormitory massaging her pregnant belly.//
+			$activeSlave.slaveName is currently in the dormitory massaging her pregnant belly.
 		<<elseif $activeSlave.fetish is "buttslut">>
-			//$activeSlave.slaveName is currently in the dormitory masturbating anally, and I believe she will be happy to meet you.//
+			$activeSlave.slaveName is currently in the dormitory masturbating anally, and I believe she will be happy to meet you.
 		<<elseif $activeSlave.fetish is "cumslut">>
-			//$activeSlave.slaveName is currently in the dormitory exhibiting oral fixation, and I believe she will be happy to meet you.//
+			$activeSlave.slaveName is currently in the dormitory exhibiting oral fixation, and I believe she will be happy to meet you.
 		<<elseif $activeSlave.fetish is "boobs">>
-			//$activeSlave.slaveName is currently in the dormitory playing with her nipples, and I believe she will be happy to meet you.//
+			$activeSlave.slaveName is currently in the dormitory playing with her nipples, and I believe she will be happy to meet you.
 		<<elseif $activeSlave.fetish is "pregnancy">>
-			//$activeSlave.slaveName is currently in the dormitory examining herself to try to discern her fertility, and I believe she will be happy to meet you.//
+			$activeSlave.slaveName is currently in the dormitory examining herself to try to discern her fertility, and I believe she will be happy to meet you.
 		<<elseif $activeSlave.fetish is "humiliation">>
-			//$activeSlave.slaveName is currently in the entryway flashing passersby, and I believe she will be happy to meet you.//
+			$activeSlave.slaveName is currently in the entryway flashing passersby, and I believe she will be happy to meet you.
 		<<elseif $activeSlave.fetish is "submissive">>
-			//$activeSlave.slaveName is currently in the dormitory, experimenting with self-bondage using the sheets; I believe she will be happy to meet you.//
+			$activeSlave.slaveName is currently in the dormitory, experimenting with self-bondage using the sheets; I believe she will be happy to meet you.
 		<<elseif $activeSlave.fetish is "dom">>
-			//$activeSlave.slaveName is currently in the exercise area keeping fit; she likes to take an active role sexually and is using this down time to work out.//
+			$activeSlave.slaveName is currently in the exercise area keeping fit; she likes to take an active role sexually and is using this down time to work out.
 		<<elseif $activeSlave.fetish is "sadist">>
-			//$activeSlave.slaveName is currently outside your office; she enjoys being superior to other slaves and I believe she means to ingratiate herself to you.//
+			$activeSlave.slaveName is currently outside your office; she enjoys being superior to other slaves and I believe she means to ingratiate herself to you.
 		<<elseif $activeSlave.fetish is "masochist">>
-			//$activeSlave.slaveName is a sexual masochist; she is currently in the bathroom, experimenting with auto-flagellation with a wet towel.//
-		<<elseif $activeSlave.fetish is "none">>
-			//$activeSlave.slaveName is currently outside your office, and I believe she is attempting to maintain sexual arousal to make a good first impression on you.//
+			$activeSlave.slaveName is a sexual masochist; she is currently in the bathroom, experimenting with auto-flagellation with a wet towel.
+		<<else>>
+			$activeSlave.slaveName is currently outside your office, and I believe she is attempting to maintain sexual arousal to make a good first impression on you.
 		<</if>>
 	<</if>>
 	<</for>>
-	<<if $startingValue - $seed > 0>>
-	//There are some valuables present, worth ¤<<print $startingValue - $seed>>.//
+<</if>>
+<<if $startingValue - $seed > 0>>
+	There are some valuables present, worth ¤<<print $startingValue - $seed>>.
 	<<set $cash += $startingValue - $seed>>
-	<</if>>
 <</if>>
+//
 
 /* RELATIONSHIP MUTUALITY CHECK, OLDMENTAL */
 
@@ -235,18 +555,18 @@ The previous owner seems to have left in something of a hurry. <<if $saveImporte
 <br><br>
 
 <<click "Continue">>
-	<<set $ui to "main">>
-	<<set $startingGirlsNationality to 0>>
+	<<set $ui = "main">>
+	<<set $fixedNationality to 0>>
 	<<if $terrain is "urban">>
-	<<set $minimumSlaveCost to 2000>>
-	<<set $slaveCostFactor to 0.7>>
+		<<set $minimumSlaveCost to 2000>>
+		<<set $slaveCostFactor to 0.7>>
 	<<elseif $terrain is "marine">>
-	<<set $minimumSlaveCost to 2500>>
-	<<set $slaveCostFactor to 1>>
+		<<set $minimumSlaveCost to 2500>>
+		<<set $slaveCostFactor to 1>>
 	<<else>>
-	<<set $minimumSlaveCost to 3000>>
-	<<set $slaveCostFactor to 1.3>>
+		<<set $minimumSlaveCost to 3000>>
+		<<set $slaveCostFactor to 1.3>>
 	<</if>>
 	<<script>>Save.autosave.save("Week Start Autosave")<</script>>
 	<<goto "Main">>
-<</click>>
\ No newline at end of file
+<</click>>
diff --git a/src/npc/asDump.tw b/src/npc/asDump.tw
index 704ea13b2263cf2b8b4f495537d4817ba90a6de5..c3dc0c56831e164b78896b6d5c80b06968460819 100644
--- a/src/npc/asDump.tw
+++ b/src/npc/asDump.tw
@@ -5,7 +5,6 @@
 <<for $i to 0; $i < $slaves.length; $i++>>
 	<<if $activeSlave.ID == $slaves[$i].ID>>
 	<<set $slaves[$i] to $activeSlave>>
-	<<set $activeSlave to {}>>
 	<<set $dumped to 1>>
 	<<break>>
 	<</if>>
@@ -13,9 +12,7 @@
 
 <<if $dumped == 0>>
 	<<if def $activeSlave.slaveName>>
-	<<display "Checkin Checks">>
-	<<set $slaves.push($activeSlave)>>
-	<<set $activeSlave to {}>>
+	<<AddSlave $activeSlave>>
 	<<set $dumped to 1>>
 	<</if>>
 <</if>>
diff --git a/src/npc/databases/cheatmodeDatabase.tw b/src/npc/databases/cheatmodeDatabase.tw
index 5b948b705596e29304115f8e134fd0f4ba06a977..b9c3973559c262f1715ef48b408fd47c1323855b 100644
--- a/src/npc/databases/cheatmodeDatabase.tw
+++ b/src/npc/databases/cheatmodeDatabase.tw
@@ -4,38 +4,38 @@
 
 <<set _HS = clone($activeSlave)>>
 <<set _HS.slaveName = "Miss Anne", _HS.birthName = "Lindy Anne", _HS.ID = 990000, _HS.relation = "mother", _HS.relationTarget = 990004, _HS.relationship = 4, _HS.relationshipTarget = 990001, _HS.rivalry = 1, _HS.rivalryTarget = 990002, _HS.assignment = "be your Head Girl", _HS.birthWeek = random(0,51), _HS.actualAge = 42, _HS.physicalAge = 42, _HS.visualAge = 42, _HS.ageImplant = 1, _HS.health = 50, _HS.devotion = 100, _HS.height = 175, _HS.eyeColor = "green", _HS.hColor = "honey blonde", _HS.skin = "pale", _HS.hStyle = "long", _HS.waist = 1, _HS.boobs = 1000, _HS.boobsImplant = 600, _HS.areolae = 1, _HS.butt = 4, _HS.buttImplant = 2, _HS.face = 2, _HS.lips = 35, _HS.vagina = 2, _HS.anus = 1, _HS.ovaries = 1, _HS.makeup = 1, _HS.nails = 1, _HS.earPiercing = 1, _HS.vaginalSkill = 100, _HS.oralSkill = 100, _HS.analSkill = 100, _HS.whoreSkill = 100, _HS.entertainSkill = 100, _HS.clothes = "a slave gown", _HS.intelligence = 3, _HS.energy = 65, _HS.attrXY = 40, _HS.fetishKnown = 1, _HS.customTat = "'Miss Anne' is tattooed in lovely flowing script over her collarbone.", _HS.customDesc = "She speaks with the rich accent of the Old South.">>
-<<set $slaves.push(clone(_HS))>>
+<<AddSlave _HS>>
 <<set $HeadGirl = clone(_HS)>>
 <<set _dump = $heroSlaves.pluck(0)>>
 //There are quite a few left; their names are _HS.slaveName,//
 
 <<set _HS = clone($activeSlave)>>
 <<set _HS.slaveName = "Cornelia", _HS.birthName = "Cora", _HS.ID = 990001, _HS.relation = "mother", _HS.relationTarget = 990002, _HS.relationship = 4, _HS.relationshipTarget = 990000, _HS.assignment = "whore", _HS.birthWeek = random(0,51), _HS.actualAge = 36, _HS.physicalAge = 36, _HS.visualAge = 36, _HS.ageImplant = 1, _HS.health = 10, _HS.devotion = 100, _HS.muscles = 20, _HS.height = 190, _HS.race = "black", _HS.hColor = "black", _HS.pubicHColor = "black", _HS.skin = "dark", _HS.hStyle = "long", _HS.pubicHStyle = "waxed", _HS.waist = 1, _HS.boobs = 1200, _HS.boobsImplant = 1000, _HS.areolae = 2, _HS.butt = 5, _HS.buttImplant = 3, _HS.face = 1, _HS.faceImplant = 2, _HS.lips = 35, _HS.lipsImplant = 10, _HS.vagina = -1, _HS.preg = -2, _HS.dick = 3, _HS.anus = 2, _HS.balls = 1, _HS.ovaries = 1, _HS.makeup = 1, _HS.nails = 1, _HS.earPiercing = 1, _HS.oralSkill = 100, _HS.analSkill = 100, _HS.whoreSkill = 100, _HS.entertainSkill = 100, _HS.clothes = "a slave gown", _HS.energy = 65, _HS.attrXX = 80, _HS.attrXY = 40, _HS.fetishKnown = 1, _HS.customTat = "A large letter S is branded into the back of her left hand.", _HS.customDesc = "She speaks with the demeaning accent of slaves from the Old South.">>
-<<set $slaves.push(clone(_HS))>>
+<<AddSlave _HS>>
 <<set _dump = $heroSlaves.pluck(0)>>
 //_HS.slaveName,//
 
 <<set _HS = clone($activeSlave)>>
 <<set _HS.slaveName = "Sheba", _HS.birthName = "Shaneequa", _HS.ID = 990002, _HS.relation = "daughter", _HS.relationTarget = 990001, _HS.rivalry = 1, _HS.rivalryTarget = 990000, _HS.assignment = "whore", _HS.birthWeek = random(0,51), _HS.actualAge = 19, _HS.physicalAge = 19, _HS.visualAge = 19, _HS.health = 10, _HS.devotion = 12, _HS.height = 175, _HS.race = "black", _HS.pubicHColor = "black", _HS.skin = "light brown", _HS.hStyle = "long", _HS.pubicHStyle = "waxed", _HS.waist = 2, _HS.boobs = 1600, _HS.boobsImplant = 600, _HS.nipplesPiercing = 1, _HS.areolae = 1, _HS.butt = 6, _HS.buttImplant = 2, _HS.face = 2, _HS.faceImplant = 1, _HS.lips = 55, _HS.lipsImplant = 10, _HS.vagina = 1, _HS.anus = 1, _HS.ovaries = 1, _HS.makeup = 1, _HS.nails = 1, _HS.earPiercing = 1, _HS.vaginalSkill = 35, _HS.oralSkill = 35, _HS.analSkill = 35, _HS.whoreSkill = 35, _HS.entertainSkill = 35, _HS.clothes = "a slave gown", _HS.energy = 100, _HS.attrXY = 40, _HS.fetishKnown = 1, _HS.customTat = "A large letter S is branded into the back of her left hand.", _HS.customDesc = "She speaks with the demeaning accent of slaves from the Old South.", _HS.mother = 990001>>
-<<set $slaves.push(clone(_HS))>>
+<<AddSlave _HS>>
 <<set _dump = $heroSlaves.pluck(0)>>
 //_HS.slaveName,//
 
 <<set _HS = clone($activeSlave)>>
 <<set _HS.slaveName = "Cornflower", _HS.birthName = "Alysa", _HS.ID = 990003, _HS.relation = "daughter", _HS.relationTarget = 990005, _HS.relationship = 3, _HS.relationshipTarget = 990005, _HS.assignment = "get milked", _HS.birthWeek = random(0,51), _HS.health = 20, _HS.devotion = 12, _HS.muscles = 50, _HS.height = 190, _HS.race = "black", _HS.hColor = "black", _HS.pubicHColor = "black", _HS.skin = "light brown", _HS.hLength = 0, _HS.hStyle = "shaved bald", _HS.pubicHStyle = "waxed", _HS.waist = 1, _HS.heels = 1, _HS.voice = 0, _HS.boobs = 6000, _HS.nipples = "huge", _HS.areolae = 2, _HS.boobsTat = "bovine patterns", _HS.lactation = 2, _HS.butt = 3, _HS.buttTat = "bovine patterns", _HS.face = 1, _HS.lips = 35, _HS.lipsTat = "bovine patterns", _HS.vagina = 1, _HS.vaginaTat = "bovine patterns", _HS.anus = 3, _HS.dickTat = "bovine patterns", _HS.ovaries = 1, _HS.anusTat = "bovine patterns", _HS.makeup = 1, _HS.nails = 1, _HS.earPiercing = 1, _HS.nosePiercing = 2, _HS.shouldersTat = "bovine patterns", _HS.armsTat = "bovine patterns", _HS.legsTat = "bovine patterns", _HS.stampTat = "bovine patterns", _HS.vaginalSkill = 15, _HS.oralSkill = 15, _HS.analSkill = 35, _HS.energy = 65, _HS.attrXY = 40, _HS.fetish = "boobs", _HS.fetishKnown = 1, _HS.customTat = "A pretty blue cornflower is tattooed on each of her cheeks.", _HS.customDesc = "She once spoke with the demeaning accent of slaves from the Old South.", _HS.mother = 990005>>
-<<set $slaves.push(clone(_HS))>>
+<<AddSlave _HS>>
 <<set _dump = $heroSlaves.pluck(0)>>
 //_HS.slaveName,//
 
 <<set _HS = clone($activeSlave)>>
 <<set _HS.slaveName = "Miss Lily", _HS.birthName = "Lillian", _HS.ID = 990004, _HS.relation = "daughter", _HS.relationTarget = 990000, _HS.assignment = "guard you", _HS.birthWeek = random(0,51), _HS.health = 20, _HS.devotion = 30, _HS.muscles = 50, _HS.height = 175, _HS.eyeColor = "green", _HS.hColor = "straw blonde", _HS.skin = "pale", _HS.hLength = 40, _HS.hStyle = "in a short ponytail", _HS.waist = 1, _HS.boobs = 600, _HS.butt = 3, _HS.face = 1, _HS.lips = 35, _HS.preg = -2, _HS.anus = 2, _HS.ovaries = 1, _HS.makeup = 1, _HS.nails = 1, _HS.earPiercing = 1, _HS.analSkill = 35, _HS.combatSkill = 1, _HS.energy = 65, _HS.attrXY = 40, _HS.fetish = "buttslut", _HS.fetishKnown = 1, _HS.customTat = "'Miss Lily' is tattooed in lovely flowing script over her collarbone.", _HS.customDesc = "She once spoke with the rich accent of the Old South.", _HS.mother = 990000>>
-<<set $slaves.push(clone(_HS))>>
+<<AddSlave _HS>>
 <<set $Bodyguard to clone(_HS)>>
 <<set _dump = $heroSlaves.pluck(0)>>
 //_HS.slaveName,//
 
 <<set _HS = clone($activeSlave)>>
 <<set _HS.slaveName = "Lilac", _HS.birthName = "Lillian", _HS.ID = 990005, _HS.relation = "mother", _HS.relationTarget = 990003, _HS.relationship = 3, _HS.relationshipTarget = 990003, _HS.assignment = "get milked", _HS.birthWeek = random(0,51), _HS.actualAge = 36, _HS.physicalAge = 36, _HS.visualAge = 36, _HS.health = 20, _HS.devotion = 12, _HS.muscles = 50, _HS.height = 190, _HS.race = "black", _HS.hColor = "black", _HS.pubicHColor = "black", _HS.skin = "light brown", _HS.hLength = 0, _HS.hStyle = "shaved bald", _HS.pubicHStyle = "waxed", _HS.waist = 1, _HS.heels = 1, _HS.boobs = 8000, _HS.nipples = "huge", _HS.areolae = 2, _HS.boobsTat = "bovine patterns", _HS.lactation = 2, _HS.butt = 4, _HS.buttTat = "bovine patterns", _HS.face = 1, _HS.lips = 35, _HS.lipsTat = "bovine patterns", _HS.vagina = 1, _HS.vaginaTat = "bovine patterns", _HS.anus = 3, _HS.dickTat = "bovine patterns", _HS.ovaries = 1, _HS.anusTat = "bovine patterns", _HS.makeup = 1, _HS.nails = 1, _HS.earPiercing = 1, _HS.nosePiercing = 2, _HS.shouldersTat = "bovine patterns", _HS.armsTat = "bovine patterns", _HS.legsTat = "bovine patterns", _HS.stampTat = "bovine patterns", _HS.vaginalSkill = 15, _HS.oralSkill = 15, _HS.analSkill = 35, _HS.energy = 65, _HS.attrXY = 40, _HS.fetish = "boobs", _HS.fetishKnown = 1, _HS.customTat = "A pretty purple lilac is tattooed on each of her cheeks.", _HS.customDesc = "She once spoke with the demeaning accent of slaves from the Old South.">>
-<<set $slaves.push(clone(_HS))>>
+<<AddSlave _HS>>
 <<set _dump = $heroSlaves.pluck(0)>>
-//and _HS.slaveName.//
\ No newline at end of file
+//and _HS.slaveName.//
diff --git a/src/npc/fFeelings.tw b/src/npc/fFeelings.tw
index 563ff0dbccf332e39757a28d8d36f3557d8b857b..f40add380693aa38a0b732248afb9f870e30f748 100644
--- a/src/npc/fFeelings.tw
+++ b/src/npc/fFeelings.tw
@@ -1,5 +1,6 @@
 :: FFeelings [nobr]
 
+<<Enunciate $activeSlave>>
 <<set _lisping = 0>>
 <<if ($activeSlave.amp != 1) && canTalk($activeSlave) && SlaveStatsChecker.checkForLisp($activeSlave)>>
 	<<set _lisping = 1>>
@@ -109,10 +110,8 @@
 <<if ($activeSlave.devotion <= 50)>>
 	<<if canTalk($activeSlave) == false>>
 		She gestures that you're her <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>master<<else>>mistress<</if>>, and she will do her best to obey you. She continues to sign<<if $activeSlave.accent == 3>>, using gestures to supplant her poor $language<</if>>:
-	<<elseif (_lisping == 1)>>
-		"You're my _PCTitle, and I'll do my betht to obey you," she lisps
 	<<else>>
-		"You're my _PCTitle, and I'll do my best to obey you," she says
+		"You're my _PCTitle, and I'll do my be<<s>>t to obey you," she says
 	<</if>>
 <<elseif ($activeSlave.devotion <= 95)>>
 	<<if canTalk($activeSlave) == false>>
@@ -272,21 +271,21 @@
 	<</if>>
 <</if>>
 <<if ($activeSlave.attrKnown == 1)>>
-	<<if ($activeSlave.attrXX > 1)>>
+	<<if ($activeSlave.attrXX > 80)>>
 	I love fucking the other
 	<<if _lisping == 1>>
 		girlth.
 	<<else>>
 		girls.
 	<</if>>
-	<<elseif ($activeSlave.attrXX > 0)>>
+	<<elseif ($activeSlave.attrXX > 60)>>
 	<<if _lisping == 1>>
 		It's nithe, fucking the other girlth.
 	<<else>>
 		It's nice, fucking the other girls.
 	<</if>>
 	<</if>>
-	<<if ($activeSlave.attrXY > 1)>>
+	<<if ($activeSlave.attrXY > 80)>>
 	I love, you know,
 	<<if _lisping == 1>>
 		thpending time with thlaveth with dickth,
@@ -294,7 +293,7 @@
 		spending time with slaves with dicks,
 	<</if>>
 	_PCTitle.
-	<<elseif ($activeSlave.attrXY > 0)>>
+	<<elseif ($activeSlave.attrXY > 60)>>
 	<<if _lisping == 1>>
 		It'th nithe, you know, thpending time with thlaveth with dickth,
 	<<else>>
@@ -554,7 +553,7 @@ My favorite part of my body is
 			my boobs, of course.
 			<</if>>
 		<</if>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 80)>>
 		<<if ($activeSlave.lips > 70)>>
 			my huge lipth, I like how the other girlth will do anything for oral from me.
 		<<elseif ($activeSlave.dick > 1) && ($activeSlave.balls > 0)>>
@@ -578,7 +577,7 @@ My favorite part of my body is
 			my lips, I guess. They're the best way I have of getting girls to like me.
 			<</if>>
 		<</if>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 80)>>
 		<<if ($activeSlave.lips > 70)>>
 			my huge lipth, I like how anyone with a dick wants oral from me.
 		<<elseif ($activeSlave.dick > 1) && ($activeSlave.balls > 0)>>
@@ -668,7 +667,7 @@ My favorite part of my body is
 				<<else>>
 				pamper my own nipples, _PCTitle.
 				<</if>>
-			<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+			<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 80)>>
 				_Amp _PCTitle. With all
 				<<if _lisping == 1>>
 				thethe hot girlth around, it'th
@@ -676,7 +675,7 @@ My favorite part of my body is
 				these hot girls around, it's
 				<</if>>
 				a good thing I can't actually go blind from it.
-			<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 1)>>
+			<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 80)>>
 				_Amp _PCTitle. With all
 				<<if _lisping == 1>>
 				thethe hot cockth around, it'th
@@ -720,7 +719,7 @@ My favorite part of my body is
 				<<else>>
 				the other slaves play with my boobs,
 				<</if>>
-			<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+			<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 80)>>
 				<<if _lisping == 1>>
 				me bone the ladieth,
 				<<else>>
@@ -807,7 +806,7 @@ My favorite part of my body is
 				<</if>>
 				<<if ($activeSlave.preg < 4)>>pregnancy<<else>>birth<</if>> out of my head.
 			<</switch>>
-			<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+			<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 80)>>
 				<<if _lisping == 1>>
 				I'm tho horny, _PCTitle. I can't thtop thinking about the other thlaveth' beautiful puthieth and boobth and, and I want to fuck them tho bad.
 				<<else>>
@@ -907,11 +906,11 @@ My favorite part of my body is
 			<</if>>
 			forthrightly. "I love them.
 		<</if>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 80)>>
 		<<if $PC.boobs == 1>>
 		You're, uh." She looks down, hesitating. "You're really hot, _PCTitle.
 		<</if>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 80)>>
 		<<if $PC.dick == 1>>
 		Your, uh." She looks down, hesitating. "Your cock is really hot, _PCTitle.
 		<</if>>
@@ -999,7 +998,7 @@ My favorite part of my body is
 			boobs I feel like a nice little slave girl.
 			<</if>>
 		<</switch>>
-		<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+		<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 80)>>
 			<<if _lisping == 1>>
 			I thometimeth mith my ballth. I thtill fantathize about boning the other girlth.
 			<<else>>
@@ -1107,7 +1106,7 @@ My favorite part of my body is
 		I wish the hormones didn't stop me from getting hard. I still fantasize about getting the other girls pregnant.
 		<</if>>
 	<</switch>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 80)>>
 		<<if _lisping == 1>>
 		I with the hormoneth didn't thtop me from getting hard. I thtill fantathize about boning the other girlth.
 		<<else>>
@@ -1235,7 +1234,7 @@ My favorite part of my body is
 			<<else>>
 			just imagine smacking it against some little slut's face.
 			<</if>>
-		<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+		<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 80)>>
 			I can feel my dick growing, _PCTitle. I can
 			<<if _lisping == 1>>
 			jutht imagine puthing it into a warm, wet puthy.
@@ -1584,13 +1583,13 @@ My favorite part of my body is
 		It's nice being a whore, sometimes customers just play with my boobs for hours.
 		<</if>>
 	<</switch>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 60)>>
 		<<if _lisping == 1>>
 		It'th nice being a whore, I get fucked by a lot of hot guyth.
 		<<else>>
 		It's nice being a whore, I get fucked by a lot of hot guys.
 		<</if>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 60)>>
 		<<if _lisping == 1>>
 		It'th nice being a whore, I get women customerth thometimeth.
 		<<else>>
@@ -1658,13 +1657,13 @@ My favorite part of my body is
 		It's nice being a public slut, sometimes people just play with my boobs for hours.
 		<</if>>
 	<</switch>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 60)>>
 		<<if _lisping == 1>>
 		It'th nice being a slut, I get fucked by a lot of hot guyth.
 		<<else>>
 		It's nice being a slut, I get fucked by a lot of hot guys.
 		<</if>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 60)>>
 		<<if _lisping == 1>>
 		It'th nice being a slut, I get women customerth thometimeth.
 		<<else>>
@@ -1693,7 +1692,7 @@ My favorite part of my body is
 		<<else>>
 		It's so, so wonderful being a cow.
 		<</if>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 80)>>
 		<<if _lisping == 1>>
 		It'th okay being a cow, with all the girlth around.
 		<<else>>
@@ -1715,7 +1714,7 @@ My favorite part of my body is
 		<<else>>
 		Getting buttfucked to orgasm whenever I can get hard is a dream come true. Actually, getting buttfucked until I cum even when I'm soft is pretty nice too.
 		<</if>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 80)>>
 		<<if _lisping == 1>>
 		It'th okay getting cockmilked, I like all the dickth around.
 		<<else>>
@@ -2157,7 +2156,7 @@ My favorite part of my body is
 	<<else>>
 		I suppose it was inevitable that a place where anyone can be a slave would start treating anyone who's a slave as a girl.
 	<</if>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 80)>>
 	<<if _lisping == 1>>
 		I really like how you're encouraging thlavery to focuth on cockth." She giggles. "I like cockth!
 	<<else>>
@@ -2184,7 +2183,7 @@ My favorite part of my body is
 	<<else>>
 		I shouldn't be surprised at how easy it is to reinforce traditional values in a new, slavery focused culture.
 	<</if>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 80)>>
 	I really like how you're encouraging
 	<<if _lisping == 1>>
 		thlavery to focuth on girlth." She giggles. "I like girlth!
@@ -2496,14 +2495,14 @@ _PCTitle," she concludes,
 		<<else>>
 		"Please fuck me. Please."
 		<</if>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXX > 80)>>
 		"Can I hang around and get oral from the next
 		<<if _lisping == 1>>
 		thlave in here?"
 		<<else>>
 		slave in here?"
 		<</if>>
-	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 1)>>
+	<<elseif ($activeSlave.attrKnown == 1) && ($activeSlave.attrXY > 80)>>
 		"Can I hang around and suck the next dick in here?"
 	<<else>>
 		<<if _lisping == 1>>
diff --git a/src/npc/importSlave.tw b/src/npc/importSlave.tw
index b48bc20d657b67c43fda73552245cf636708892f..f7a888aaa3317aceac31f1213e434aa926db4edc 100644
--- a/src/npc/importSlave.tw
+++ b/src/npc/importSlave.tw
@@ -1,7 +1,7 @@
 :: Import Slave [nobr]
 
 
- 
+
 <<set $nextButton to "Continue">>
 <<set $nextLink to "Slave Interact">>
 
@@ -18,7 +18,7 @@
 		<<set $tempSlave to eval('({' + $tempSlave + '})')>>
 		<<set $tempSlave.ID to $IDNumber>>
 		<<set $IDNumber += 1>>
-		<<set $slaves.push($tempSlave)>>
+		<<AddSlave $tempSlave>>
 		<<replace #import>>
 			''Slave imported successfully!''
 			<br><br>
diff --git a/src/npc/removeActiveSlave.tw b/src/npc/removeActiveSlave.tw
index edeac112ec69fd9fc6c85ceaf744679981878efd..b46fe3624403e09c8ee62ae3824b207031bb489a 100644
--- a/src/npc/removeActiveSlave.tw
+++ b/src/npc/removeActiveSlave.tw
@@ -165,7 +165,6 @@
 	<<if $activeSlave.ID is $Concubine.ID>>
 		<<set $Concubine to 0>>
 	<</if>>
-
 	<<if $activeSlave.ID is $personalAttention>>
 	<<if $PC.career == "escort">>
 		<<set $personalAttention to "whoring">>
@@ -175,10 +174,15 @@
 		<<set $personalAttention to "business">>
 	<</if>>
 	<</if>>
-
+	<<for _d to 0; _d < $slavesOriginal.length; _d++>>
+		<<if $slavesOriginal[_d].ID is $activeSlave.ID>>
+			<<set $dump to $slavesOriginal.pluck([_d], [_d])>>
+			<<break>>
+		<</if>>
+	<</for>>
 	<<set $dump to $slaves.pluck([$x], [$x])>>
 	<<break>>
 <</if>>
 <</for>>
 
-<</silently>>
\ No newline at end of file
+<</silently>>
diff --git a/src/npc/rgASDump.tw b/src/npc/rgASDump.tw
index 9d8513936be5c7089c9e11bc74817e9127391017..9655885ec9287ec4ae5a5b36a173e4335e7b3c12 100644
--- a/src/npc/rgASDump.tw
+++ b/src/npc/rgASDump.tw
@@ -11,102 +11,97 @@
 	<<set $activeSlave.analArea to $activeSlave.anus>>
 <</if>>
 
-<<display "Checkin Checks">>
-
-<<set $genePool.push($activeSlave)>>
-
 /* RECRUITERS */
 
 <<if $familyTesting == 1>>
 	<<if $activeSlave.canRecruit == 1>>
-		<<set $recruiters.push($activeSlave)>>
+		/*<<set $recruiters.push($activeSlave)>>*/
 	<</if>>
 <<else>>
 
 <<if ($activeSlave.relation == 0)>>
 <<if random(1,100) <= 5>>
 	<<set $activeSlave.recruiter to "twin">>
-	<<set $recruiters.push($activeSlave)>>
 <<elseif ($activeSlave.actualAge > 32) && (random(1,100) <= 41)>>
 	<<set $activeSlave.recruiter to "mother">>
-	<<set $recruiters.push($activeSlave)>>
 <<elseif ($activeSlave.actualAge < 24) && (random(1,100) <= 40)>>
 	<<set $activeSlave.recruiter to "daughter">>
-	<<set $recruiters.push($activeSlave)>>
 <<elseif ($activeSlave.actualAge < 43) && (random(1,100) <= 20)>>
 	<<set $activeSlave.recruiter to "older sister">>
-	<<set $recruiters.push($activeSlave)>>
 <<elseif ($activeSlave.actualAge < 25) && ($activeSlave.actualAge > 18) && (random(1,100) <= 20)>>
 	<<set $activeSlave.recruiter to "young sister">>
-	<<set $recruiters.push($activeSlave)>>
 <</if>>
 <</if>>
 
 <</if>>
 
-<<slaveCost $activeSlave>>
-
 <<if $applyCareerBonus == 1>>
 	<<if $PC.career is "capitalist">>
-	<<if $activeSlave.whoreSkill < 60>>
-		<<set $activeSlave.whoreSkill += 20>>
-	<</if>>
+		<<if $activeSlave.whoreSkill < 60>><<set $activeSlave.whoreSkill += 20>><</if>>
 	<<elseif $PC.career is "mercenary">>
-	<<set $activeSlave.trust += 10>>
+		<<set $activeSlave.trust += 10>>
 	<<elseif $PC.career is "slaver">>
-	<<set $activeSlave.devotion += 10>>
+		<<set $activeSlave.devotion += 10>>
 	<<elseif $PC.career is "medicine">>
-	<<set $activeSlave.boobs += 600>>
-	<<set $activeSlave.boobsImplant += 600>>
-	<<set $activeSlave.butt += 2>>
-	<<set $activeSlave.buttImplant += 2>>
-	<<set $activeSlave.lips += 10>>
-	<<set $activeSlave.lipsImplant += 10>>
-	<<set $activeSlave.waist to 1>>
+		<<set $activeSlave.boobs += 600, $activeSlave.boobsImplant += 600, $activeSlave.butt += 2, $activeSlave.buttImplant += 2, $activeSlave.lips += 10, $activeSlave.lipsImplant += 10, $activeSlave.waist to 1>>
 	<<elseif $PC.career is "celebrity">>
-	<<if $activeSlave.entertainSkill < 60>>
-		<<set $activeSlave.entertainSkill += 20>>
-	<</if>>
+		<<if $activeSlave.entertainSkill < 60>><<set $activeSlave.entertainSkill += 20>><</if>>
 	<<elseif $PC.career is "servant">>
-	<<set $activeSlave.trust += 10>>
-	<<set $activeSlave.devotion += 10>>
+		<<set $activeSlave.trust += 10>>
+		<<set $activeSlave.devotion += 10>>
 	<<elseif $PC.career is "gang">>
 		<<set $activeSlave.health += 5>>
 		<<if $activeSlave.combatSkill < 1>>
 			<<set activeSlave.combatSkill += 1>>
 		<</if>>
 	<<elseif $PC.career is "escort">>
-	<<if $activeSlave.entertainSkill < 60>>
-		<<set $activeSlave.entertainSkill += 20>>
-	<</if>>
-	<<if $activeSlave.whoreSkill < 60>>
-		<<set $activeSlave.whoreSkill += 20>>
-	<</if>>
-	<<set $seed to 1>>
-	<<if ($activeSlave.oralSkill < 60)>>
-		<<set $activeSlave.oralSkill += 20>>
-		<<set $seed -= 1>>
-	<</if>>
-	<<if ($activeSlave.analSkill < 60) && (($activeSlave.anus > 0) || ($activeSlave.analSkill <= 10))>>
-		<<set $activeSlave.analSkill += 20>>
-		<<set $seed -= 1>>
-	<</if>>
-	<<if ($seed > 0) && ($activeSlave.vaginalSkill < 60) && ($activeSlave.vagina > -1) && (($activeSlave.vagina > 0) || ($activeSlave.vaginalSkill <= 10))>>
-		<<set $activeSlave.vaginalSkill += 20>>
-	<</if>>
+		<<if $activeSlave.entertainSkill < 60>>
+			<<set $activeSlave.entertainSkill += 20>>
+		<</if>>
+		<<if $activeSlave.whoreSkill < 60>>
+			<<set $activeSlave.whoreSkill += 20>>
+		<</if>>
+		<<set $seed to 1>>
+		<<if ($activeSlave.oralSkill < 60)>>
+			<<set $activeSlave.oralSkill += 20>>
+			<<set $seed -= 1>>
+		<</if>>
+		<<if ($activeSlave.analSkill < 60) && (($activeSlave.anus > 0) || ($activeSlave.analSkill <= 10))>>
+			<<set $activeSlave.analSkill += 20>>
+			<<set $seed -= 1>>
+		<</if>>
+		<<if ($seed > 0) && ($activeSlave.vaginalSkill < 60) && ($activeSlave.vagina > -1) && (($activeSlave.vagina > 0) || ($activeSlave.vaginalSkill <= 10))>>
+			<<set $activeSlave.vaginalSkill += 20>>
+		<</if>>
+	<<elseif $PC.career is "wealth">>
+		<<set $seed to 2>>
+		<<if ($activeSlave.oralSkill < 60)>>
+			<<set $activeSlave.oralSkill += 20>>
+			<<set $seed -= 1>>
+		<</if>>
+		<<if ($activeSlave.analSkill < 60) && (($activeSlave.anus > 0) || ($activeSlave.analSkill <= 10))>>
+			<<set $activeSlave.analSkill += 20>>
+			<<set $seed -= 1>>
+		<</if>>
+		<<if ($seed > 0) && ($activeSlave.vaginalSkill < 60) && ($activeSlave.vagina > -1) && (($activeSlave.vagina > 0) || ($activeSlave.vaginalSkill <= 10))>>
+			<<set $activeSlave.vaginalSkill += 20>>
+		<</if>>
 	<<else>>
-	<<set $seed to 2>>
-	<<if ($activeSlave.oralSkill < 60)>>
-		<<set $activeSlave.oralSkill += 20>>
-		<<set $seed -= 1>>
-	<</if>>
-	<<if ($activeSlave.analSkill < 60) && (($activeSlave.anus > 0) || ($activeSlave.analSkill <= 10))>>
-		<<set $activeSlave.analSkill += 20>>
-		<<set $seed -= 1>>
-	<</if>>
-	<<if ($seed > 0) && ($activeSlave.vaginalSkill < 60) && ($activeSlave.vagina > -1) && (($activeSlave.vagina > 0) || ($activeSlave.vaginalSkill <= 10))>>
-		<<set $activeSlave.vaginalSkill += 20>>
-	<</if>>
+		<<set $activeSlave.devotion += 10>>
+		<<if $activeSlave.whoreSkill < 60>><<set $activeSlave.whoreSkill += 20>><</if>>
+		<<if $activeSlave.entertainSkill < 60>><<set $activeSlave.entertainSkill += 20>><</if>>
+		<<set $seed to 2>>
+		<<if ($activeSlave.oralSkill < 60)>>
+			<<set $activeSlave.oralSkill += 20>>
+			<<set $seed -= 1>>
+		<</if>>
+		<<if ($activeSlave.analSkill < 60) && (($activeSlave.anus > 0) || ($activeSlave.analSkill <= 10))>>
+			<<set $activeSlave.analSkill += 20>>
+			<<set $seed -= 1>>
+		<</if>>
+		<<if ($seed > 0) && ($activeSlave.vaginalSkill < 60) && ($activeSlave.vagina > -1) && (($activeSlave.vagina > 0) || ($activeSlave.vaginalSkill <= 10))>>
+			<<set $activeSlave.vaginalSkill += 20>>
+		<</if>>
 	<</if>>
 	<<set $careerBonusApplied to 1>>
 <</if>>
@@ -121,7 +116,7 @@
 
 <<if $dumped == 0>>
 	<<if def $activeSlave.slaveName>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $dumped to 1>>
 	<</if>>
 <</if>>
diff --git a/src/npc/startingGirls/commitStartingGirl.tw b/src/npc/startingGirls/commitStartingGirl.tw
index 633d63829a82b7453d05ec747d08a69f4060853e..70f3d5b18fdb29afe725ddbabb498bee06812f98 100644
--- a/src/npc/startingGirls/commitStartingGirl.tw
+++ b/src/npc/startingGirls/commitStartingGirl.tw
@@ -1,6 +1,4 @@
-:: Commit Starting Girl 
- 
-<<nobr>>
+:: Commit Starting Girl [nobr]
 
 <<set $activeSlave.actualAge to Number($activeSlave.actualAge)>>
 <<set $activeSlave.devotion = Number($activeSlave.devotion)>>
@@ -13,35 +11,23 @@
 <<set $activeSlave.boobs = Number($activeSlave.boobs)>>
 <<set $activeSlave.boobs = Math.trunc($activeSlave.boobs/50)*50>>
 
-<<if $careerBonusApplied == 1>>
-	<<set $activeSlave to $slaveWithoutBonuses>>
-	<<set $careerBonusApplied to 0>>
-<</if>>
+<<set $careerBonusApplied = 0>>
 
-<<if $cash < $minimumSlaveCost>>
-	<<goto "Acquisition">>
-<</if>>
+<<if $cash < $minimumSlaveCost>><<goto "Acquisition">><</if>>
 
 <<set $showStartingGirlsExplanation to 0>>
 
 <<if $createRelatedSlave == 0>>
-
-<<set $cash -= $slaveCost>>
-<<set $startingGirlCopied to 1>>
-
-<<if ($hostage == 0) || ($slaveCost > $hostageCost)>>
-	<<set $hostage to $activeSlave>>
-	<<set $hostageCost to $slaveCost>>
-	<<set $hostageAnnounced to -1>>
-<</if>>
-
+	<<set $startingGirlCopied to 1>>
+	<<if ($hostage == 0) || ($slaveCost > $hostageCost)>>
+		<<set $hostage to $slaveWithoutBonuses>>
+		<<set $hostageCost to $slaveCost>>
+		<<set $hostageAnnounced to -1>>
+	<</if>>
 <</if>>
 
 $activeSlave.slaveName has been added to your starting stable of slaves. You now have ¤$cash remaining.
-
-<</nobr>>
-\
-<<nobr>>
+<br><br>
 
 <<if $cash >= $minimumSlaveCost>>
 	<br>
@@ -50,7 +36,7 @@ $activeSlave.slaveName has been added to your starting stable of slaves. You now
 		<<goto "Starting Girls">>
 	<</click>>
 	<br>
-	[[Add another slave, based on the previous slave|Starting Girls][$activeSlave.relation to 0, $activeSlave.relationTarget to 0, $activeSlave.mother = 0, $activeSlave.father = 0]]
+	[[Add another slave, based on the previous slave|Starting Girls][$activeSlave = $slaveWithoutBonuses, $activeSlave.relation to 0, $activeSlave.relationTarget to 0, $activeSlave.mother = 0, $activeSlave.father = 0]]
 	<<if $createRelatedSlave == 1>>
 	<br>
 	//Add another slave, related to the previous slave://
@@ -91,7 +77,4 @@ $activeSlave.slaveName has been added to your starting stable of slaves. You now
 	<</if>>
 <</if>>
 <br>
-[[Stop adding slaves and take control of the arcology|Acquisition]]
-
-<</nobr>>
-
+[[Stop adding slaves and take control of the arcology|Acquisition]]
\ No newline at end of file
diff --git a/src/npc/startingGirls/startingGirls.tw b/src/npc/startingGirls/startingGirls.tw
index 9b77f2bbab678f19da61d513714a829fc6a5a4c9..62c2ba60244d62beff571d1ab110e5585a01a710 100644
--- a/src/npc/startingGirls/startingGirls.tw
+++ b/src/npc/startingGirls/startingGirls.tw
@@ -1,5 +1,5 @@
 :: Starting Girls [nobr]
- 
+
 <<if $showStartingGirlsExplanation == 1>>
 
 	You're no stranger to the Free Cities, which means you're no stranger to slavery. If you wish, you can bring slaves from your past life with you to your arcology. You have ¤$cash; you can spend it on slaves here, or bring it with you to start the game. Slaves created here will be much cheaper than if they were purchased on the market.
@@ -60,7 +60,7 @@
 	<</if>>
 	<<set $activeSlave.visualAge = $activeSlave.actualAge>>
 	<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
-	<<display "Nationality to Name">>
+	<<NationalityToName>>
 	<<set $activeSlave.slaveName = $activeSlave.birthName>>
 	<<set $activeSlave.ID = $IDNumber>>
 	<<set $IDNumber += 1>>
@@ -76,13 +76,13 @@
 	<</if>>
 	<<set $startingGirlCopied = 0>>
 <<elseif $archetyped == 1>>
-	<<display "Nationality to Name">>
+	<<NationalityToName>>
 	<<set $activeSlave.slaveName = $activeSlave.birthName>>
 	<<set $archetyped = 0>>
 <</if>>
 
 __You are customizing this slave:__
-<br style="clear:both" />
+<br>
 <<if $activeSlave == 0>>
 	<<StartingGirlsWorkaround>>
 <</if>>
@@ -120,6 +120,9 @@ __You are customizing this slave:__
 	<<elseif $PC.age == 3 && $activeSlave.actualAge > 30>>
 		<<set $activeSlave.father = 0>>
 	<</if>>
+	<<if $saveImported == 1>>
+		<<set $activeSlave.father = 0>>
+	<</if>>
 <</if>>
 <<if $activeSlave.mother == -1>>
 	<<if $PC.vagina == 0>>
@@ -131,6 +134,9 @@ __You are customizing this slave:__
 	<<elseif $PC.age == 3 && $activeSlave.actualAge > 30>>
 		<<set $activeSlave.mother = 0>>
 	<</if>>
+	<<if $saveImported == 1>>
+		<<set $activeSlave.mother = 0>>
+	<</if>>
 <</if>>
 /* this block makes starting girls actually apply the slave origins, mostly since it just hates you and everything you do */
 	<<if $PC.career is "capitalist">>
@@ -262,7 +268,7 @@ __You are customizing this slave:__
 			<<set $activeSlave.origin to "She was one of your groupies during your celebrity career.">>
 			<<set $activeSlave.customTat to "She has your signature, surrounded by hearts, tattooed on the back of her neck. She got the tattoo when she was still free.">>
 		<</if>>
-	<<else>>
+	<<elseif $PC.career is "wealth">>
 		<<if $activeSlave.mother == -1 && $activeSlave.father == -1>>
 			<<set $activeSlave.origin to "You bet your body on a sure hand, only to lose. It turns out you could fuck yourself, and not only that, get yourself pregnant.">>
 			<<set $activeSlave.customTat to "She has a small tattoo of a losing hand of cards on the nape of her neck.">>
@@ -276,6 +282,9 @@ __You are customizing this slave:__
 			<<set $activeSlave.origin to "You won her at cards, a memento from your life as one of the idle rich before you became an arcology owner.">>
 			<<set $activeSlave.customTat to "She has a small tattoo of a winning hand of cards on the nape of her neck.">>
 		<</if>>
+	<<else>>
+		<<set $activeSlave.origin to "You won her at cards, a memento from your life as one of the idle rich before you became an arcology owner.">>
+		<<set $activeSlave.customTat to "She has the silhouette of an arcology tattooed on the nape of her neck.">>
 	<</if>>
 	<<if $activeSlave.vagina < 1>>
 	<<set $activeSlave.vaginalSkill = 0>>
@@ -353,7 +362,7 @@ __You are customizing this slave:__
 <</click>>
 
 | <<click "Randomize name">>
-<<display "Nationality to Name">>
+<<NationalityToName>>
 <<set $activeSlave.slaveName = $activeSlave.birthName>>
 <<SaleDescription>>
 <<StartingGirlsCost>>
@@ -362,7 +371,7 @@ __You are customizing this slave:__
 | [[More customization options]]
 
 | <<click "Start over with a random slave">>
-<<set $startingGirlsNationality = $nationalities.random()>>
+<<set $fixedNationality = $nationalities.random()>>
 <<StartingGirlsWorkaround>>
 <<StartingGirlsRefresh>>
 <<SaleDescription>>
@@ -383,11 +392,11 @@ __You are customizing this slave:__
 <</if>>
 </span>
 <<click "Utterly hateful">><<set $activeSlave.devotion = -100>><<replace "#devotion">>@@color:darkviolet;Utterly hateful.@@<</replace>><<StartingGirlsCost>><</click>> |
-<<click "Hateful">><<set $activeSlave.devotion = -70>><<replace "#devotion">>@@color:darkviolet;Hateful.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Resistant">><<set $activeSlave.devotion = -35>><<replace "#devotion">>@@color:mediumorchid;Resistant.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Ambivalent">><<set $activeSlave.devotion = 0>><<replace "#devotion">>@@color:yellow;Ambivalent.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Accepting">><<set $activeSlave.devotion = 35>><<replace "#devotion">>@@color:hotpink;Accepting.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Devoted">><<set $activeSlave.devotion = 70>><<replace "#devotion">>@@color:deeppink;Devoted.@@<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Hateful">><<set $activeSlave.devotion = -70>><<replace "#devotion">>@@color:darkviolet;Hateful.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Resistant">><<set $activeSlave.devotion = -35>><<replace "#devotion">>@@color:mediumorchid;Resistant.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Ambivalent">><<set $activeSlave.devotion = 0>><<replace "#devotion">>@@color:yellow;Ambivalent.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Accepting">><<set $activeSlave.devotion = 35>><<replace "#devotion">>@@color:hotpink;Accepting.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Devoted">><<set $activeSlave.devotion = 70>><<replace "#devotion">>@@color:deeppink;Devoted.@@<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Worshipful">><<set $activeSlave.devotion = 100>><<replace "#devotion">>@@color:magenta;Worshipful.@@<</replace>><<StartingGirlsCost>><</click>>
 <<textbox "$activeSlave.devotion" $activeSlave.devotion "Starting Girls">>
 
@@ -404,12 +413,12 @@ __You are customizing this slave:__
 <<else>>@@color:seagreen;Absolute trust.@@
 <</if>>
 </span>
-<<click "Abjectly terrified">><<set $activeSlave.trust = -100>><<replace "#trust">>@@color:goldenrod;Abjectly terrified.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Terrified">><<set $activeSlave.trust = -70>><<replace "#trust">>@@color:goldenrod;Terrified.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Frightened">><<set $activeSlave.trust = -35>><<replace "#trust">>@@color:gold;Frightened.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Fearful">><<set $activeSlave.trust = 0>><<replace "#trust">>@@color:yellow;Fearful.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Careful">><<set $activeSlave.trust = 35>><<replace "#trust">>@@color:mediumaquamarine;Careful.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Trusting">><<set $activeSlave.trust = 70>><<replace "#trust">>@@color:mediumseagreen;Trusting.@@<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Abjectly terrified">><<set $activeSlave.trust = -100>><<replace "#trust">>@@color:goldenrod;Abjectly terrified.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Terrified">><<set $activeSlave.trust = -70>><<replace "#trust">>@@color:goldenrod;Terrified.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Frightened">><<set $activeSlave.trust = -35>><<replace "#trust">>@@color:gold;Frightened.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Fearful">><<set $activeSlave.trust = 0>><<replace "#trust">>@@color:yellow;Fearful.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Careful">><<set $activeSlave.trust = 35>><<replace "#trust">>@@color:mediumaquamarine;Careful.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Trusting">><<set $activeSlave.trust = 70>><<replace "#trust">>@@color:mediumseagreen;Trusting.@@<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Absolute trust">><<set $activeSlave.trust = 100>><<replace "#trust">>@@color:seagreen;Absolute trust.@@<</replace>><<StartingGirlsCost>><</click>>
 <<textbox "$activeSlave.trust" $activeSlave.trust "Starting Girls">>
 
@@ -447,9 +456,9 @@ __You are customizing this slave:__
 <<elseif $activeSlave.voice is 3>>High.
 <</if>>
 </span>
-<<click "Mute">><<set $activeSlave.voice = 0>><<replace "#voice">>Mute.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Deep">><<set $activeSlave.voice = 1>><<replace "#voice">>Deep.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Normal">><<set $activeSlave.voice = 2>><<replace "#voice">>Normal.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Mute">><<set $activeSlave.voice = 0>><<replace "#voice">>Mute.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Deep">><<set $activeSlave.voice = 1>><<replace "#voice">>Deep.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Normal">><<set $activeSlave.voice = 2>><<replace "#voice">>Normal.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "High.">><<set $activeSlave.voice = 3>><<replace "#voice">>High.<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -463,20 +472,20 @@ __You are customizing this slave:__
 <<else>>Not fluent.
 <</if>>
 </span>
-<<click "Unaccented">><<set $activeSlave.accent = 0>><<replace "#language">>Unaccented.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Accent">><<set $activeSlave.accent = 1>><<replace "#language">>Pretty $activeSlave.nationality accent.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Heavy accent">><<set $activeSlave.accent = 2>><<replace "#language">>Thick $activeSlave.nationality accent.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Unaccented">><<set $activeSlave.accent = 0>><<replace "#language">>Unaccented.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Accent">><<set $activeSlave.accent = 1>><<replace "#language">>Pretty $activeSlave.nationality accent.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Heavy accent">><<set $activeSlave.accent = 2>><<replace "#language">>Thick $activeSlave.nationality accent.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Poor">><<set $activeSlave.accent = 3>><<replace "#language">>Not fluent.<</replace>><<StartingGirlsCost>><</click>>
 <</if>>
 
 <br>
 
-''Age:'' 
+''Age:''
 <span id="age">
 <<textbox "$activeSlave.actualAge" $activeSlave.actualAge "Starting Girls">>
 </span>
 
-''Birth week:'' 
+''Birth week:''
 <span id="birthWeek">
 <<textbox "$activeSlave.birthWeek" $activeSlave.birthWeek "Starting Girls">>
 </span>
@@ -485,6 +494,7 @@ __You are customizing this slave:__
 <br>
 
 ''Slave ID'' //be reasonable. Make sure to refresh to resync IDs.//
+<<if $saveImported == 1>>//Player children are not available in NG+ due to code limitations (Since the player's background changes with ng+, consistancy issues arise.)//<</if>>
 <br><<print $activeSlave.ID>>
 
 <br>
@@ -510,9 +520,9 @@ __You are customizing this slave:__
 <<else>>@@color:green;Extremely healthy.@@
 <</if>>
 </span>
-<<click "Unhealthy">><<set $activeSlave.health = -40>><<replace "#health">>@@color:red;Unhealthy.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Healthy">><<set $activeSlave.health = 0>><<replace "#health">>@@color:yellow;Healthy.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Very healthy">><<set $activeSlave.health = 40>><<replace "#health">>@@color:green;Very healthy.@@<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Unhealthy">><<set $activeSlave.health = -40>><<replace "#health">>@@color:red;Unhealthy.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Healthy">><<set $activeSlave.health = 0>><<replace "#health">>@@color:yellow;Healthy.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Very healthy">><<set $activeSlave.health = 40>><<replace "#health">>@@color:green;Very healthy.@@<</replace>><<StartingGirlsCost>><</click>> |
  <<click "Extremely healthy">><<set $activeSlave.health = 80>><<replace "#health">>@@color:green;Extremely healthy.@@<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -524,8 +534,8 @@ __You are customizing this slave:__
 <<else>>Ripped.
 <</if>>
 </span>
-<<click "Normal">><<set $activeSlave.muscles = 0>><<replace "#muscles">>Normal.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Toned">><<set $activeSlave.muscles = 20>><<replace "#muscles">>Toned.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Normal">><<set $activeSlave.muscles = 0>><<replace "#muscles">>Normal.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Toned">><<set $activeSlave.muscles = 20>><<replace "#muscles">>Toned.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Ripped">><<set $activeSlave.muscles = 50>><<replace "#muscles">>Ripped.<</replace>><<StartingGirlsCost>><</click>>
 &nbsp;&nbsp;&nbsp;&nbsp;
 ''Waist:''
@@ -581,7 +591,7 @@ __You are customizing this slave:__
 <<click "Emaciated">><<set $activeSlave.weight = -100>><<replace "#weight">>@@color:red;Emaciated.@@<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Skinny">><<set $activeSlave.weight = -50>><<replace "#weight">>@@color:red;Skinny.@@<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Thin">><<set $activeSlave.weight = -20>><<replace "#weight">>Thin.<</replace>><<StartingGirlsCost>><</click>> |
-<<click "Average">><<set $activeSlave.weight = 0>><<replace "#weight">>Average.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Average">><<set $activeSlave.weight = 0>><<replace "#weight">>Average.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Plush">><<set $activeSlave.weight = 20>><<replace "#weight">>Plush.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Chubby">><<set $activeSlave.weight = 50>><<replace "#weight">>@@color:red;Chubby.@@<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Fat">><<set $activeSlave.weight = 100>><<replace "#weight">>@@color:red;Fat.@@<</replace>><<StartingGirlsCost>><</click>>
@@ -592,7 +602,7 @@ Her nationality is $activeSlave.nationality.
 <<click "Set custom nationality">>
 <<replace "#nationality">><<textbox "$activeSlave.nationality" $activeSlave.nationality>>
 <</replace>>
-<</click>> 
+<</click>>
 </span>
 <<if $seeRace == 1>>
 <br>
@@ -600,18 +610,18 @@ Her nationality is $activeSlave.nationality.
 
 <br>
 
-<<click "White">><<set $activeSlave.race = "white">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Black">><<set $activeSlave.race = "black">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Latina">><<set $activeSlave.race = "latina">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Asian">><<set $activeSlave.race = "asian">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Middle Eastern">><<set $activeSlave.race = "middle eastern">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Amerindian">><<set $activeSlave.race = "amerindian">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Southern European">><<set $activeSlave.race = "southern European">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Semitic">><<set $activeSlave.race = "semitic">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Malay">><<set $activeSlave.race = "malay">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Indo-aryan">><<set $activeSlave.race = "indo-aryan">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Pacific Islander">><<set $activeSlave.race = "pacific islander">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Mixed Race">><<set $activeSlave.race = "mixed race">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> 
+<<click "White">><<set $activeSlave.race = "white">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> |
+<<click "Black">><<set $activeSlave.race = "black">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> |
+<<click "Latina">><<set $activeSlave.race = "latina">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> |
+<<click "Asian">><<set $activeSlave.race = "asian">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> |
+<<click "Middle Eastern">><<set $activeSlave.race = "middle eastern">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> |
+<<click "Amerindian">><<set $activeSlave.race = "amerindian">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> |
+<<click "Southern European">><<set $activeSlave.race = "southern European">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> |
+<<click "Semitic">><<set $activeSlave.race = "semitic">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> |
+<<click "Malay">><<set $activeSlave.race = "malay">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> |
+<<click "Indo-aryan">><<set $activeSlave.race = "indo-aryan">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> |
+<<click "Pacific Islander">><<set $activeSlave.race = "pacific islander">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> |
+<<click "Mixed Race">><<set $activeSlave.race = "mixed race">><<replace "#ethnicity">><<textbox "$activeSlave.race" $activeSlave.race "Starting Girls">><</replace>><<StartingGirlsCost>><</click>>
 <</if>>
 
 <br>
@@ -630,7 +640,7 @@ Her nationality is $activeSlave.nationality.
 <<click "Pale">><<set $activeSlave.skin = "pale">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</click>>  |
 <<click "Dark">><<set $activeSlave.skin = "dark">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</click>>  |
 <<click "Light">><<set $activeSlave.skin = "light">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</click>>  |
-<<click "Extremely pale">><<set $activeSlave.skin = "extremely pale">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</click>> 
+<<click "Extremely pale">><<set $activeSlave.skin = "extremely pale">><<replace "#skin">><<textbox "$activeSlave.skin" $activeSlave.skin "Starting Girls">><</replace>><<StartingGirlsCost>><</click>>
 
 <br>
 
@@ -675,13 +685,13 @@ Her nationality is $activeSlave.nationality.
 <<else>>Facepussy.
 <</if>>
 </span>
-<<click "Thin">><<set $activeSlave.lips = 5>><<replace "#lips">>Thin.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Normal">><<set $activeSlave.lips = 15>><<replace "#lips">>Normal.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Plush">><<set $activeSlave.lips = 25>><<replace "#lips">>Plush.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Big">><<set $activeSlave.lips = 55>><<replace "#lips">>Big.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Thin">><<set $activeSlave.lips = 5>><<replace "#lips">>Thin.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Normal">><<set $activeSlave.lips = 15>><<replace "#lips">>Normal.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Plush">><<set $activeSlave.lips = 25>><<replace "#lips">>Plush.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Big">><<set $activeSlave.lips = 55>><<replace "#lips">>Big.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Huge">><<set $activeSlave.lips = 85>><<replace "#lips">>Huge.<</replace>><<StartingGirlsCost>><</click>>
 <<if $seeExtreme == 1>>
- | 
+ |
 <<click "Facepussy">><<set $activeSlave.lips = 100>><<replace "#lips">>Facepussy.<</replace>><<StartingGirlsCost>><</click>>
 <</if>>
 &nbsp;&nbsp;&nbsp;&nbsp;
@@ -741,17 +751,17 @@ Her nationality is $activeSlave.nationality.
 <<else>>None.
 <</if>>
 </span>
-<<click "Artificial">><<set $activeSlave.lactation = 2>><<replace "#lactation">>Artificial.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Natural">><<set $activeSlave.lactation = 1>><<replace "#lactation">>Natural.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Artificial">><<set $activeSlave.lactation = 2>><<replace "#lactation">>Artificial.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Natural">><<set $activeSlave.lactation = 1>><<replace "#lactation">>Natural.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "None">><<set $activeSlave.lactation = 0>><<replace "#lactation">>None.<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
 
 ''Nipples:'' <span id="nipples">$activeSlave.nipples</span>.
-<<click "Tiny">><<set $activeSlave.nipples = "tiny">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Cute">><<set $activeSlave.nipples = "cute">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Puffy">><<set $activeSlave.nipples = "puffy">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Inverted">><<set $activeSlave.nipples = "inverted">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Tiny">><<set $activeSlave.nipples = "tiny">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Cute">><<set $activeSlave.nipples = "cute">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Puffy">><<set $activeSlave.nipples = "puffy">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Inverted">><<set $activeSlave.nipples = "inverted">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Huge">><<set $activeSlave.nipples = "huge">><<replace "#nipples">>$activeSlave.nipples<</replace>><<StartingGirlsCost>><</click>>
 &nbsp;&nbsp;&nbsp;&nbsp;
 ''Areolae:''
@@ -766,9 +776,9 @@ Her nationality is $activeSlave.nationality.
 	Normal.
 <</if>>
 </span>
-<<click "Normal">><<set $activeSlave.areolae = 0>><<replace "#areolae">>Normal.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Large">><<set $activeSlave.areolae = 1>><<replace "#areolae">>Large.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Wide">><<set $activeSlave.areolae = 2>><<replace "#areolae">>Wide.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Normal">><<set $activeSlave.areolae = 0>><<replace "#areolae">>Normal.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Large">><<set $activeSlave.areolae = 1>><<replace "#areolae">>Large.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Wide">><<set $activeSlave.areolae = 2>><<replace "#areolae">>Wide.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Huge">><<set $activeSlave.areolae = 3>><<replace "#areolae">>Huge.<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -782,10 +792,10 @@ Her nationality is $activeSlave.nationality.
 <<else>>Feminine.
 <</if>>
 </span>
-<<click "Very narrow">><<set $activeSlave.shoulders = -2>><<replace "#shoulders">>Very narrow.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Narrow">><<set $activeSlave.shoulders = -1>><<replace "#shoulders">>Narrow.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Normal">><<set $activeSlave.shoulders = 0>><<replace "#shoulders">>Feminine.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Broad">><<set $activeSlave.shoulders = 1>><<replace "#shoulders">>Broad.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Very narrow">><<set $activeSlave.shoulders = -2>><<replace "#shoulders">>Very narrow.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Narrow">><<set $activeSlave.shoulders = -1>><<replace "#shoulders">>Narrow.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Normal">><<set $activeSlave.shoulders = 0>><<replace "#shoulders">>Feminine.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Broad">><<set $activeSlave.shoulders = 1>><<replace "#shoulders">>Broad.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Very broad">><<set $activeSlave.shoulders = 2>><<replace "#shoulders">>Very broad.<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -799,10 +809,10 @@ Her nationality is $activeSlave.nationality.
 <<else>>Normal.
 <</if>>
 </span>
-<<click "Very narrow">><<set $activeSlave.hips = -2>><<replace "#hips">>Very narrow.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Narrow">><<set $activeSlave.hips = -1>><<replace "#hips">>Narrow.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Normal">><<set $activeSlave.hips = 0>><<replace "#hips">>Normal.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Broad">><<set $activeSlave.hips = 1>><<replace "#hips">>Broad.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Very narrow">><<set $activeSlave.hips = -2>><<replace "#hips">>Very narrow.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Narrow">><<set $activeSlave.hips = -1>><<replace "#hips">>Narrow.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Normal">><<set $activeSlave.hips = 0>><<replace "#hips">>Normal.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Broad">><<set $activeSlave.hips = 1>><<replace "#hips">>Broad.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Very broad">><<set $activeSlave.hips = 2>><<replace "#hips">>Very broad.<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -821,11 +831,11 @@ Her nationality is $activeSlave.nationality.
 </span>
 <<click "Flat">><<set $activeSlave.butt = 0>><<replace "#butt">>Flat.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Small">><<set $activeSlave.butt = 1>><<replace "#butt">>Small.<</replace>><<StartingGirlsCost>><</click>> |
-<<click "Plump">><<set $activeSlave.butt = 2>><<replace "#butt">>Plump.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Plump">><<set $activeSlave.butt = 2>><<replace "#butt">>Plump.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Healthy">><<set $activeSlave.butt = 3>><<replace "#butt">>Big.<</replace>><<StartingGirlsCost>><</click>> |
-<<click "Huge">><<set $activeSlave.butt = 4>><<replace "#butt">>Huge.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Huge">><<set $activeSlave.butt = 4>><<replace "#butt">>Huge.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Enormous">><<set $activeSlave.butt = 5>><<replace "#butt">>Enormous.<</replace>><<StartingGirlsCost>><</click>> |
-<<click "Gigantic">><<set $activeSlave.butt = 6>><<replace "#butt">>Gigantic.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Gigantic">><<set $activeSlave.butt = 6>><<replace "#butt">>Gigantic.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Massive">><<set $activeSlave.butt = 7>><<replace "#butt">>Massive.<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -855,9 +865,9 @@ Her nationality is $activeSlave.nationality.
 <</if>>
 </span>
 <<if $activeSlave.dick > 0>><<click "No vagina">><<set $activeSlave.vagina = -1,$activeSlave.preg = 0,$activeSlave.pregSource = 0,$activeSlave.pubertyXX = 0,$activeSlave.pubertyAgeXX = $fertilityAge, $activeSlave.ovaries = 0>><<replace "#vagina">>//No vagina.//<</replace>><<StartingGirlsCost>><</click>><<else>>//No vagina//<</if>> | 
-<<click "Virgin">><<set $activeSlave.vagina = 0, $activeSlave.preg = -1, $activeSlave.ovaries = 1>><<replace "#vagina">>@@color:lime;Virgin.@@<</replace>><<StartingGirlsVaginalSkill>><<StartingGirlsCost>><</click>> | 
-<<click "Normal">><<set $activeSlave.vagina = 1, $activeSlave.preg = -1, $activeSlave.ovaries = 1>><<replace "#vagina">>Normal.<</replace>><<StartingGirlsVaginalSkill>><<StartingGirlsCost>><</click>> | 
-<<click "Veteran">><<set $activeSlave.vagina = 2, $activeSlave.preg = -1, $activeSlave.ovaries = 1>><<replace "#vagina">>Veteran.<</replace>><<StartingGirlsVaginalSkill>><<StartingGirlsCost>><</click>> | 
+<<click "Virgin">><<set $activeSlave.vagina = 0, $activeSlave.preg = -1, $activeSlave.ovaries = 1>><<replace "#vagina">>@@color:lime;Virgin.@@<</replace>><<StartingGirlsVaginalSkill>><<StartingGirlsCost>><</click>> |
+<<click "Normal">><<set $activeSlave.vagina = 1, $activeSlave.preg = -1, $activeSlave.ovaries = 1>><<replace "#vagina">>Normal.<</replace>><<StartingGirlsVaginalSkill>><<StartingGirlsCost>><</click>> |
+<<click "Veteran">><<set $activeSlave.vagina = 2, $activeSlave.preg = -1, $activeSlave.ovaries = 1>><<replace "#vagina">>Veteran.<</replace>><<StartingGirlsVaginalSkill>><<StartingGirlsCost>><</click>> |
 <<click "Gaping">><<set $activeSlave.vagina = 3, $activeSlave.preg = -1, $activeSlave.ovaries = 1>><<replace "#vagina">>Gaping.<</replace>><<StartingGirlsVaginalSkill>><<StartingGirlsCost>><</click>>
 
 <span id="vaginablock">
@@ -872,8 +882,8 @@ Her nationality is $activeSlave.nationality.
 <<else>>Huge.
 <</if>>
 </span>
-<<click "Normal">><<set $activeSlave.clit = 0>><<replace "#clit">>Normal.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Large">><<set $activeSlave.clit = 1>><<replace "#clit">>Large.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Normal">><<set $activeSlave.clit = 0>><<replace "#clit">>Normal.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Large">><<set $activeSlave.clit = 1>><<replace "#clit">>Large.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Huge">><<set $activeSlave.clit = 2>><<replace "#clit">>Huge.<</replace>><<StartingGirlsCost>><</click>>
 &nbsp;&nbsp;&nbsp;&nbsp;
 ''Labia:''
@@ -883,8 +893,8 @@ Her nationality is $activeSlave.nationality.
 <<else>>Normal.
 <</if>>
 </span>
-<<click "Normal">><<set $activeSlave.labia = 0>><<replace "#labia">>Normal.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Large">><<set $activeSlave.labia = 1>><<replace "#labia">>Large.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Normal">><<set $activeSlave.labia = 0>><<replace "#labia">>Normal.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Large">><<set $activeSlave.labia = 1>><<replace "#labia">>Large.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Huge">><<set $activeSlave.labia = 2>><<replace "#labia">>Huge.<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -895,8 +905,8 @@ Her nationality is $activeSlave.nationality.
 <<else>>Excessive.
 <</if>>
 </span>
-<<click "Dry">><<set $activeSlave.vaginaLube = 0>><<replace "#wetness">>Dry.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Normal">><<set $activeSlave.vaginaLube = 1>><<replace "#wetness">>Normal.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Dry">><<set $activeSlave.vaginaLube = 0>><<replace "#wetness">>Dry.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Normal">><<set $activeSlave.vaginaLube = 1>><<replace "#wetness">>Normal.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Excessive">><<set $activeSlave.vaginaLube = 2>><<replace "#wetness">>Excessive.<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -1033,9 +1043,9 @@ Her nationality is $activeSlave.nationality.
 <<else>>@@color:cyan;Expert.@@
 <</if>>
 </span>
-<<click "Unskilled">><<set $activeSlave.oralSkill = 0>><<replace "#oralSkill">>Unskilled.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Basic">><<set $activeSlave.oralSkill = 15>><<replace "#oralSkill">>@@color:cyan;Basic.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Skilled">><<set $activeSlave.oralSkill = 35>><<replace "#oralSkill">>@@color:cyan;Skilled.@@<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Unskilled">><<set $activeSlave.oralSkill = 0>><<replace "#oralSkill">>Unskilled.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Basic">><<set $activeSlave.oralSkill = 15>><<replace "#oralSkill">>@@color:cyan;Basic.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Skilled">><<set $activeSlave.oralSkill = 35>><<replace "#oralSkill">>@@color:cyan;Skilled.@@<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Expert">><<set $activeSlave.oralSkill = 65>><<replace "#oralSkill">>@@color:cyan;Expert.@@<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -1056,9 +1066,9 @@ Her nationality is $activeSlave.nationality.
 <<else>>@@color:cyan;Expert.@@
 <</if>>
 </span>
-<<click "Unskilled">><<set $activeSlave.whoreSkill = 0>><<replace "#whoreSkill">>Unskilled.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Basic">><<set $activeSlave.whoreSkill = 15>><<replace "#whoreSkill">>@@color:cyan;Basic.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Skilled">><<set $activeSlave.whoreSkill = 35>><<replace "#whoreSkill">>@@color:cyan;Skilled.@@<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Unskilled">><<set $activeSlave.whoreSkill = 0>><<replace "#whoreSkill">>Unskilled.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Basic">><<set $activeSlave.whoreSkill = 15>><<replace "#whoreSkill">>@@color:cyan;Basic.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Skilled">><<set $activeSlave.whoreSkill = 35>><<replace "#whoreSkill">>@@color:cyan;Skilled.@@<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Expert">><<set $activeSlave.whoreSkill = 65>><<replace "#whoreSkill">>@@color:cyan;Expert.@@<</replace>><<StartingGirlsCost>><</click>>
 &nbsp;&nbsp;&nbsp;&nbsp;
 ''Entertainment:''
@@ -1069,9 +1079,9 @@ Her nationality is $activeSlave.nationality.
 <<else>>@@color:cyan;Expert.@@
 <</if>>
 </span>
-<<click "Unskilled">><<set $activeSlave.entertainSkill = 0>><<replace "#entertainSkill">>Unskilled.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Basic">><<set $activeSlave.entertainSkill = 15>><<replace "#entertainSkill">>@@color:cyan;Basic.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Skilled">><<set $activeSlave.entertainSkill = 35>><<replace "#entertainSkill">>@@color:cyan;Skilled.@@<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Unskilled">><<set $activeSlave.entertainSkill = 0>><<replace "#entertainSkill">>Unskilled.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Basic">><<set $activeSlave.entertainSkill = 15>><<replace "#entertainSkill">>@@color:cyan;Basic.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Skilled">><<set $activeSlave.entertainSkill = 35>><<replace "#entertainSkill">>@@color:cyan;Skilled.@@<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Expert">><<set $activeSlave.entertainSkill = 65>><<replace "#entertainSkill">>@@color:cyan;Expert.@@<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -1082,7 +1092,7 @@ Her nationality is $activeSlave.nationality.
 <<else>>@@color:cyan;Skilled.@@
 <</if>>
 </span>
-<<click "Unskilled">><<set $activeSlave.combatSkill = 0>><<replace "#combatSkill">>Unskilled.<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Unskilled">><<set $activeSlave.combatSkill = 0>><<replace "#combatSkill">>Unskilled.<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Skilled">><<set $activeSlave.combatSkill = 1>><<replace "#combatSkill">>@@color:cyan;Skilled.@@<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -1098,12 +1108,12 @@ Her nationality is $activeSlave.nationality.
 <<else>>@@color:orangered;Moronic.@@
 <</if>>
 </span>
-<<click "Brilliant">><<set $activeSlave.intelligence = 3>><<replace "#intelligence">>@@color:deepskyblue;Brilliant.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Very smart">><<set $activeSlave.intelligence = 2>><<replace "#intelligence">>@@color:deepskyblue;Very smart.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Smart">><<set $activeSlave.intelligence = 1>><<replace "#intelligence">>@@color:deepskyblue;Smart.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Average intelligence">><<set $activeSlave.intelligence = 0>><<replace "#intelligence">>Average.<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Stupid">><<set $activeSlave.intelligence = -1>><<replace "#intelligence">>@@color:orangered;Stupid.@@<</replace>><<StartingGirlsCost>><</click>> | 
-<<click "Very stupid">><<set $activeSlave.intelligence = -2>><<replace "#intelligence">>@@color:orangered;Very stupid.@@<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Brilliant">><<set $activeSlave.intelligence = 3>><<replace "#intelligence">>@@color:deepskyblue;Brilliant.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Very smart">><<set $activeSlave.intelligence = 2>><<replace "#intelligence">>@@color:deepskyblue;Very smart.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Smart">><<set $activeSlave.intelligence = 1>><<replace "#intelligence">>@@color:deepskyblue;Smart.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Average intelligence">><<set $activeSlave.intelligence = 0>><<replace "#intelligence">>Average.<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Stupid">><<set $activeSlave.intelligence = -1>><<replace "#intelligence">>@@color:orangered;Stupid.@@<</replace>><<StartingGirlsCost>><</click>> |
+<<click "Very stupid">><<set $activeSlave.intelligence = -2>><<replace "#intelligence">>@@color:orangered;Very stupid.@@<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Moronic">><<set $activeSlave.intelligence = -3>><<replace "#intelligence">>@@color:orangered;Moronic.@@<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -1114,7 +1124,7 @@ Her nationality is $activeSlave.nationality.
 <<else>>Uneducated.
 <</if>>
 </span>
-<<click "Educated">><<set $activeSlave.intelligenceImplant = 1>><<replace "#intelligenceImplant">>@@color:deepskyblue;Educated.@@<</replace>><<StartingGirlsCost>><</click>> | 
+<<click "Educated">><<set $activeSlave.intelligenceImplant = 1>><<replace "#intelligenceImplant">>@@color:deepskyblue;Educated.@@<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Uneducated">><<set $activeSlave.intelligenceImplant = 0>><<replace "#intelligenceImplant">>Uneducated.<</replace>><<StartingGirlsCost>><</click>>
 
 <br>
@@ -1258,7 +1268,7 @@ Her nationality is $activeSlave.nationality.
 	<<ToggleSexuality 0>>
 <</click>>
 
-<br> 
+<br>
 
 XY attraction:
 <span id="decreaseXY">
@@ -1352,8 +1362,8 @@ XY attraction:
 <<click "Sexually idealistic">><<set $activeSlave.sexualFlaw = "idealistic">><<replace "#sexualFlaw">>@@color:red;$activeSlave.sexualFlaw.@@<</replace>><<StartingGirlsCost>><</click>>
 
 <br><br>
-<<slaveCost $activeSlave>>
 <span id="finalize">
+<<slaveCost $activeSlave>>
 <<if $cash >= $slaveCost>>
 	<<if $PC.career != "engineer">>
 		<br>&nbsp;&nbsp;&nbsp;&nbsp;
@@ -1370,15 +1380,17 @@ XY attraction:
 			<<set $activeSlave.boobs = Number($activeSlave.boobs)>>
 			<<set $activeSlave.boobs = Math.trunc($activeSlave.boobs/50)*50>>
 			<<set $slaveWithoutBonuses = $activeSlave>>
+			<<slaveCost $activeSlave>>
+			<<set $cash -= $slaveCost>>
 			<<goto "RG AS Dump">>
 		<</click>>
 		//This will apply your @@color:springgreen;career bonus@@ to her:
 		<<if $PC.career is "capitalist">>
 			one free level of @@color:cyan;prostitution skill.@@
 		<<elseif $PC.career is "mercenary">>
-			@@color:mediumaquamarine;+2 trust.@@
+			@@color:mediumaquamarine;+10 trust.@@
 		<<elseif $PC.career is "slaver">>
-			@@color:hotpink;+2 devotion.@@
+			@@color:hotpink;+10 devotion.@@
 		<<elseif $PC.career is "medicine">>
 			free @@color:lime;basic implants.@@
 		<<elseif $PC.career is "celebrity">>
@@ -1389,8 +1401,10 @@ XY attraction:
 			@@color:mediumaquamarine;+1 trust@@ and @@color:hotpink;+1 devotion.@@
 		<<elseif $PC.career is "gang">>
 			@@color:green;+5 health@@ and one free level of @@color:cyan;combat skill.@@
-		<<else>>
+		<<elseif $PC.career is "wealth">>
 			two free levels of @@color:cyan;sex skills.@@
+		<<else>>
+			@@color:hotpink;+10 devotion,@@ one free level of @@color:cyan;prostitution skill@@ and @@color:cyan;entertainment skill,@@ and two free levels of @@color:cyan;sex skills.@@
 		<</if>>//
 		<br>&nbsp;&nbsp;&nbsp;&nbsp;
 		<<click "Add slave without career bonus">>
@@ -1406,6 +1420,8 @@ XY attraction:
 			<<set $activeSlave.boobs = Number($activeSlave.boobs)>>
 			<<set $activeSlave.boobs = Math.trunc($activeSlave.boobs/50)*50>>
 			<<set $slaveWithoutBonuses = $activeSlave>>
+			<<slaveCost $activeSlave>>
+			<<set $cash -= $slaveCost>>
 			<<goto "RG AS Dump">>
 		<</click>>
 	<<else>>
@@ -1423,6 +1439,8 @@ XY attraction:
 			<<set $activeSlave.boobs = Number($activeSlave.boobs)>>
 			<<set $activeSlave.boobs = Math.trunc($activeSlave.boobs/50)*50>>
 			<<set $slaveWithoutBonuses = $activeSlave>>
+			<<slaveCost $activeSlave>>
+			<<set $cash -= $slaveCost>>
 			<<goto "RG AS Dump">>
 		<</click>>
 		<br>
@@ -1431,7 +1449,7 @@ XY attraction:
 	//You lack the necessary funds to add this slave.//
 <</if>>
 <br>&nbsp;&nbsp;&nbsp;&nbsp;
-[[Discard this slave and continue to the arcology|Acquisition]]
+[[Discard this slave and continue|Acquisition]]
 </span>
 
 <br><br>
@@ -1439,7 +1457,7 @@ __Archetypes:__&nbsp;&nbsp;&nbsp;&nbsp;//Convenient combinations of slave attrib
 <br>&nbsp;&nbsp;&nbsp;&nbsp;
 <<click "Irish Rose">>
 	<<set $archetyped = 1>>
-	<<set $activeSlave.nationality = "Irish", $startingGirlsNationality = "Irish">>
+	<<set $activeSlave.nationality = "Irish", $fixedNationality = "Irish">>
 	<<StartingGirlsWorkaround>>
 	<<StartingGirlsRefresh>>
 	<<set $activeSlave.race = "white", $activeSlave.eyeColor = "green", $activeSlave.skin = "fair", $activeSlave.hColor = "red", $activeSlave.pubicHColor = "red", $activeSlave.markings = "heavily freckled">>
@@ -1451,7 +1469,7 @@ __Archetypes:__&nbsp;&nbsp;&nbsp;&nbsp;//Convenient combinations of slave attrib
 <<click "Cali Girl">>
 	<<set $archetyped = 1>>
 	<<set $activeSlave.nationality = "American">>
-	<<set $startingGirlsNationality = "American">>
+	<<set $fixedNationality = "American">>
 	<<StartingGirlsWorkaround>>
 	<<StartingGirlsRefresh>>
 	<<set $activeSlave.eyeColor = "blue", $activeSlave.skin = "tanned", $activeSlave.hColor = "blonde", $activeSlave.pubicHColor = "blonde", $activeSlave.markings = "none", $activeSlave.height = 190, $activeSlave.face = 3, $activeSlave.muscles = 20, $activeSlave.weight = -20>>
@@ -1506,7 +1524,7 @@ __Start over by selecting a nationality:__
 
 <<print "
 <<click _nation>>
-	<<set $startingGirlsNationality to $basenationalities[" + _i + "]>>
+	<<set $fixedNationality to $basenationalities[" + _i + "]>>
 	<<StartingGirlsWorkaround>>
 	<<StartingGirlsRefresh>>
 	<<SaleDescription>>
diff --git a/src/npc/takeoverTarget.tw b/src/npc/takeoverTarget.tw
new file mode 100644
index 0000000000000000000000000000000000000000..d074d831110496810f22628ca9105d8931badcc2
--- /dev/null
+++ b/src/npc/takeoverTarget.tw
@@ -0,0 +1,184 @@
+:: Takeover Target [nobr]
+
+<<set $ui to "start">>
+<<set $showBodyMods to 1>>
+
+Before you deploy the <<if $PC.rumor is "wealth">>financial reserves that<<elseif $PC.rumor is "diligence">>carefully constructed plan that<<elseif $PC.rumor is "force">>mercenaries and <<if $continent == "Europe">>//maskirovka//<<else>>cover plan<</if>> that<<elseif $PC.rumor is "social engineering">>clever social manipulation that<<else>>optimistic plan you hope<</if>> will allow you to take over an arcology, you need to select a target. There are a number of vulnerable arcologies that you could <<if $PC.rumor is "wealth">>attempt a hostile takeover of<<elseif $PC.rumor is "diligence">>work to take over<<elseif $PC.rumor is "force">>attack<<elseif $PC.rumor is "social engineering">>infiltrate<<else>>aspire to take over<</if>> with a reasonable chance of success. Free Cities are volatile places, even compared to the troubled state of the rest of the world. There are always arcologies whose owners are on the brink of failure, and you could target one of them.
+<<if $PC.career == "arcology owner">>(Since you've @@color:springgreen;owned an arcology before,@@ you identify more potential target arcologies than an novice might.)<</if>>
+Alternatively, arcologies are being built every day, and their owners' control is often uncertain. @@color:orange;Which arcology will you target?@@
+<br><br>
+
+[[A newly constructed arcology|Terrain Intro][$targetArcology.type = "New"]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;
+//With many new arcologies being constructed, you will be able to select which area of the world and type of Free City you'd like your target arcology to be located in.//
+<br>&nbsp;&nbsp;&nbsp;&nbsp;
+//Recommended for new players.//
+<hr style="margin:0">
+<<set _arcologyTypes = ["Supremacist", "Subjugationist", "Paternalist", "AssetExpansionist", "SlimnessEnthusiast", "TransformationFetishist", "BodyPurist", "MaturityPreferentialist", "YouthPreferentialist", "Pastoralist", "PhysicalIdealist", "ChattelReligionist", "RomanRevivalist", "EgyptianRevivalist", "EdoRevivalist", "ArabianRevivalist", "ChineseRevivalist", "Multiculturalist", "Repopulationist", "Eugenics"]>>
+<<if $seeDicks != 0>><<set _arcologyTypes.push("GenderRadicalist")>><</if>>
+<<if $seeDicks != 100>><<set _arcologyTypes.push("GenderFundamentalist")>><</if>>
+<<if $seeExtreme != 0>><<set _arcologyTypes.push("Degradationist")>><</if>>
+<<set _terrainTypes = ["urban", "urban", "rural", "rural", "rural", "marine", "marine", "oceanic", "ravine"]>>
+<<set _continents = ["North America", "North America", "South America", "Europe", "Europe", "the Middle East", "Africa", "Asia", "Asia", "Australia", "Japan"]>>
+<<set _races = ["white", "asian", "latina", "middle eastern", "indo-aryan", "pacific islander", "amerindian", "southern european", "semitic"]>>
+<<set _targetArcologies = []>>
+<<set _targets = 4>>
+<<if $PC.career == "arcology owner">><<set _targets += 2>><</if>>
+<<for $i to 0; $i < _targets; $i++>>
+	<<set $targetArcology = {}>>
+	<<set $targetArcology.type = _arcologyTypes.pluck()>>
+	<<switch $targetArcology.type>>
+	<<case "Supremacist">>
+		<<set $targetArcology.race = _races.random()>>
+		<<switch $targetArcology.race>>
+		<<case "white">>
+			<<set $targetArcology.name to $ArcologyNamesSupremacistWhite.random()>>
+		<<case "asian">>
+			<<set $targetArcology.name to $ArcologyNamesSupremacistAsian.random()>>
+		<<case "latina">>
+			<<set $targetArcology.name to $ArcologyNamesSupremacistLatina.random()>>
+		<<case "middle eastern">>
+			<<set $targetArcology.name to $ArcologyNamesSupremacistMiddleEastern.random()>>
+		<<case "black">>
+			<<set $targetArcology.name to $ArcologyNamesSupremacistBlack.random()>>
+		<<case "indo-aryan">>
+			<<set $targetArcology.name to $ArcologyNamesSupremacistIndoAryan.random()>>
+		<<case "pacific islander">>
+			<<set $targetArcology.name to $ArcologyNamesSupremacistPacificIslander.random()>>
+		<<case "amerindian">>
+			<<set $targetArcology.name to $ArcologyNamesSupremacistAmerindian.random()>>
+		<<case "southern european">>
+			<<set $targetArcology.name to $ArcologyNamesSupremacistSouthernEuropean.random()>>
+		<<case "semitic">>
+			<<set $targetArcology.name to $ArcologyNamesSupremacistSemitic.random()>>
+		<<default>>
+			<<set $targetArcology.name to "Arcology X-4">>
+		<</switch>>
+	<<case "Subjugationist">>
+		<<set $targetArcology.race = _races.random()>>
+		<<switch $targetArcology.race>>
+		<<case "white">>
+			<<set $targetArcology.name to $ArcologyNamesSubjugationistWhite.random()>>
+		<<case "asian">>
+			<<set $targetArcology.name to $ArcologyNamesSubjugationistAsian.random()>>
+		<<case "latina">>
+			<<set $targetArcology.name to $ArcologyNamesSubjugationistLatina.random()>>
+		<<case "middle eastern">>
+			<<set $targetArcology.name to $ArcologyNamesSubjugationistMiddleEastern.random()>>
+		<<case "black">>
+			<<set $targetArcology.name to $ArcologyNamesSubjugationistBlack.random()>>
+		<<case "indo-aryan">>
+			<<set $targetArcology.name to $ArcologyNamesSubjugationistIndoAryan.random()>>
+		<<case "pacific islander">>
+			<<set $targetArcology.name to $ArcologyNamesSubjugationistPacificIslander.random()>>
+		<<case "amerindian">>
+			<<set $targetArcology.name to $ArcologyNamesSubjugationistAmerindian.random()>>
+		<<case "southern european">>
+			<<set $targetArcology.name to $ArcologyNamesSubjugationistSouthernEuropean.random()>>
+		<<case "semitic">>
+			<<set $targetArcology.name to $ArcologyNamesSubjugationistSemitic.random()>>
+		<<default>>
+			<<set $targetArcology.name to "Arcology X-4">>
+		<</switch>>
+	<<case "GenderRadicalist">><<set $targetArcology.name to $ArcologyNamesGenderRadicalist.random()>>
+	<<case "GenderFundamentalist">><<set $targetArcology.name to $ArcologyNamesGenderFundamentalist.random()>>
+	<<case "Paternalist">><<set $targetArcology.name to $ArcologyNamesPaternalist.random()>>
+	<<case "Degradationist">><<set $targetArcology.name to $ArcologyNamesDegradationist.random()>>
+	<<case "AssetExpansionist">><<set $targetArcology.name to $ArcologyNamesAssetExpansionist.random()>>
+	<<case "SlimnessEnthusiast">><<set $targetArcology.name to $ArcologyNamesSlimnessEnthusiast.random()>>
+	<<case "TransformationFetishist">><<set $targetArcology.name to $ArcologyNamesTransformationFetishist.random()>>
+	<<case "BodyPurist">><<set $targetArcology.name to $ArcologyNamesBodyPurist.random()>>
+	<<case "MaturityPreferentialist">><<set $targetArcology.name to $ArcologyNamesMaturityPreferentialist.random()>>
+	<<case "YouthPreferentialist">><<set $targetArcology.name to $ArcologyNamesYouthPreferentialist.random()>>
+	<<case "Pastoralist">><<set $targetArcology.name to $ArcologyNamesPastoralist.random()>>
+	<<case "PhysicalIdealist">><<set $targetArcology.name to $ArcologyNamesPhysicalIdealist.random()>>
+	<<case "ChattelReligionist">><<set $targetArcology.name to $ArcologyNamesChattelReligionist.random()>>
+	<<case "RomanRevivalist">><<set $targetArcology.name to $ArcologyNamesRomanRevivalist.random()>>
+	<<case "EgyptianRevivalist">><<set $targetArcology.name to $ArcologyNamesEgyptianRevivalist.random()>>
+	<<case "EdoRevivalist">><<set $targetArcology.name to $ArcologyNamesEdoRevivalist.random()>>
+	<<case "ArabianRevivalist">><<set $targetArcology.name to $ArcologyNamesArabianRevivalist.random()>>
+	<<case "ChineseRevivalist">><<set $targetArcology.name to $ArcologyNamesChineseRevivalist.random()>>
+	<<case "Repopulationist">><<set $targetArcology.name to $ArcologyNamesRepopulationist.random()>>
+	<<case "Eugenics">><<set $targetArcology.name to $ArcologyNamesEugenics.random()>>
+	<<default>><<set $targetArcology.name to "Arcology X-4">>
+	<</switch>>
+	<<set $targetArcology.FSProgress = either(10,30,50)>>
+	<<set $targetArcology.prosperity = either(40,50,60)>>
+	<<set $targetArcology.citizens = random(-1,1)>>
+	<<set $targetArcology.terrain = _terrainTypes.random()>>
+	<<set $targetArcology.continent = _continents.random()>>
+	<<set _targetArcologies.push($targetArcology)>>
+<</for>>
+<<for $i to 0; $i < _targetArcologies.length; $i++>>
+	<<print "[[_targetArcologies[$i].name|Terrain Intro][$targetArcology to _targetArcologies[" + $i + "]]]">> is an established arcology located in a Free City
+	<<if _targetArcologies[$i].terrain == "urban">>
+		carved out of an urban area of _targetArcologies[$i].continent.
+	<<elseif _targetArcologies[$i].terrain == "rural">>
+		built in a rural area of _targetArcologies[$i].continent.
+	<<elseif _targetArcologies[$i].terrain == "marine">>
+		constructed just offshore of _targetArcologies[$i].continent.
+	<<elseif _targetArcologies[$i].terrain == "ravine">>
+		constructed in a large canyon of _targetArcologies[$i].continent.
+	<<else>>
+		in the middle of the ocean.
+	<</if>>
+	<<if _targetArcologies[$i].prosperity >= 60>>
+		<br>&nbsp;&nbsp;&nbsp;&nbsp;
+		It is unusually prosperous for a vulnerable arcology.
+	<<elseif _targetArcologies[$i].prosperity <= 40>>
+		<br>&nbsp;&nbsp;&nbsp;&nbsp;
+		It has little economic prosperity and is vulnerable.
+	<</if>>
+	<<if _targetArcologies[$i].citizens > 0>>
+		<br>&nbsp;&nbsp;&nbsp;&nbsp;
+		It has an unusually high ratio of citizens to sex slaves, increasing demand for sexual services.
+	<<elseif _targetArcologies[$i].citizens < 0>>
+		<br>&nbsp;&nbsp;&nbsp;&nbsp;
+		It has an unusually low ratio of citizens to sex slaves, reducing demand for sexual services.
+	<</if>>
+	<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	Its society
+	<<if _targetArcologies[$i].FSProgress >= 50>>
+		has advanced towards
+	<<elseif _targetArcologies[$i].FSProgress >= 30>>
+		has devoted resources to
+	<<else>>
+		has just begun to adopt
+	<</if>>
+	<<switch _targetArcologies[$i].type>>
+	<<case "Supremacist">>@@color:orange;Supremacy of the _targetArcologies[$i].race race.@@
+	<<case "Subjugationist">>@@color:orange;Subjugation of the _targetArcologies[$i].race race.@@
+	<<case "GenderRadicalist">>@@color:orange;Gender Radicalism,@@ a movement that supports feminization of slavegirls with dicks.
+	<<case "GenderFundamentalist">>@@color:orange;Gender Fundamentalism,@@ a reaction to modern libertinism that seeks to reinforce gender roles.
+	<<case "Paternalist">>@@color:orange;Paternalism,@@ an optimistic strain of slavery that protects and improves slaves.
+	<<case "Degradationist">>@@color:orange;Degradationism,@@ an extreme branch of modern slavery that treats slaves as subhuman.
+	<<case "AssetExpansionist">>@@color:orange;Asset Expansionism,@@ a societal preoccupation with expansion of body parts, especially breasts.
+	<<case "SlimnessEnthusiast">>@@color:orange;Slimness Enthusiasm,@@ an aesthetic movement that fetishizes the lithe female form.
+	<<case "TransformationFetishist">>@@color:orange;Transformation Fetishism,@@ a focus on implants and other kinds of surgical alteration.
+	<<case "BodyPurist">>@@color:orange;Body Purism,@@ a reaction to extreme surgical fetishism that prefers bodies grown biologically.
+	<<case "MaturityPreferentialist">>@@color:orange;Maturity Preferentialism,@@ an appetite for mature slaves based on MILF fetishism.
+	<<case "YouthPreferentialist">>@@color:orange;Youth Preferentialism,@@ which focuses on youth and virginity in slaves.
+	<<case "Pastoralist">>@@color:orange;Pastoralism,@@ an appetite for products of the human body, especially milk.
+	<<case "PhysicalIdealist">>@@color:orange;Physical Idealism,@@ an aspirational movement which fetishizes muscle and physical fitness.
+	<<case "ChattelReligionist">>@@color:orange;Chattel Religionism,@@ a religious revival in the context of modern slavery.
+	<<case "RomanRevivalist">>@@color:orange;Roman Revivalism,@@ which seeks to recreate the glory that was ancient Rome.
+		<br>&nbsp;&nbsp;&nbsp;&nbsp;
+		It has an established lingua franca: Latin.
+	<<case "EgyptianRevivalist">>@@color:orange;Egyptian Revivalism,@@ a movement to rebuild the monuments and greatness of ancient Egypt.
+		<br>&nbsp;&nbsp;&nbsp;&nbsp;
+		It has an established lingua franca: Ancient Egyptian.
+	<<case "EdoRevivalist">>@@color:orange;Edo Revivalism,@@ an insular movement with a focus on the cultural superiority of old Japan.
+		<br>&nbsp;&nbsp;&nbsp;&nbsp;
+		It has an established lingua franca: Japanese.
+	<<case "ArabianRevivalist">>@@color:orange;Arabian Revivalism,@@ a melding of Arabian history and recent mythology of the Near East.
+		<br>&nbsp;&nbsp;&nbsp;&nbsp;
+		It has an established lingua franca: Arabic.
+	<<case "ChineseRevivalist">>@@color:orange;Chinese Revivalism,@@ which modernizes the assumed superiority of the Middle Kingdom.
+		<br>&nbsp;&nbsp;&nbsp;&nbsp;
+		It has an established lingua franca: Chinese.
+	<<case "Repopulationist">>@@color:orange;Repopulationism,@@ the belief that the key to humanity's survival is a child in every fertile womb.
+	<<case "Eugenics">>@@color:orange;Eugenics,@@ the belief that the world's failings were caused by rampant breeding of the inferior, and as such, only society's best should reproduce.
+	<<default>>@@color:orange;Multiculturalism,@@ a celebration of the total liberty that was the original purpose of the Free Cities.
+	<</switch>>
+	<hr style="margin:0">
+<</for>>
\ No newline at end of file
diff --git a/src/pregmod/generateChild.tw b/src/pregmod/generateChild.tw
index d9a990f1b7cefb76416bbc4171191eaef789e802..3e77cdbbce9903db1e08c27cd067b5b0c798eb24 100644
--- a/src/pregmod/generateChild.tw
+++ b/src/pregmod/generateChild.tw
@@ -356,6 +356,7 @@
 	<<if $mom.breedingMark == 1>>
 		<<set $activeSlave.face = either(2,2,2,3)>>
 		<<set $activeSlave.intelligence = either(2,2,2,2,3,3)>>
+		<<set $activeSlave.breedingMark = 1>>
 	<<else>>
 		<<if $activeSlave.face < 2>>
 			<<set $activeSlave.face++>>
diff --git a/src/pregmod/incubator.tw b/src/pregmod/incubator.tw
index 227c256a3ca226b7e55f3c3c5f270c281d16a07c..af91a78cdcb2b71b387a58891978383ac9928e94 100644
--- a/src/pregmod/incubator.tw
+++ b/src/pregmod/incubator.tw
@@ -111,52 +111,6 @@ Target age for release: <<textbox "$targetAge" $targetAge "Incubator">> [[Minimu
 				Reproduction management systems are offline; she will undergo normal puberty.
 			<</if>>
 		<</if>>
-		<br>
-		Choose a name for her. <<textbox "$tanks[$i].slaveName" $tanks[$i].slaveName "Incubator">>
-		<<if $tanks[$i].mother > 0>>
-			<<for _j to 0; _j < $slaves.length; _j++>>
-				<<if $tanks[$i].mother == $slaves[_j].ID>>
-					<<if $slaves[_j].ID == $Concubine.ID>>
-						| [[Permit your Concubine to name her daughter|Incubator][$tanks[$i].slaveName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
-						<<break>>
-					<<elseif $slaves[_j].relationship == -4>>
-						| [[Permit your wife to name her daughter|Incubator][$tanks[$i].slaveName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
-						<<break>>
-					<<elseif $slaves[_j].ID == $Bodyguard.ID>>
-						| [[Permit your bodyguard to name her daughter|Incubator][$tanks[$i].slaveName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
-						<<break>>
-					<<elseif $slaves[_j].ID == $HeadGirl.ID>>
-						| [[Permit your headgirl to name her daughter|Incubator][$tanks[$i].slaveName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
-						<<break>>
-					<<elseif $slaves[_j].devotion > 50 && slaves[_j].trust > 50>>
-						| [[Permit her devoted mother to name her daughter|Incubator][$tanks[$i].slaveName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
-						<<break>>
-					<</if>>
-				<</if>>
-			<</for>>
-		<</if>>
-		<<if $tanks[$i].father > 0>>
-			<<for _j to 0; _j < $slaves.length; _j++>>
-				<<if $tanks[$i].father == $slaves[_j].ID>>
-					<<if $slaves[_j].ID == $Concubine.ID>>
-						| [[Permit your Concubine to name her daughter|Incubator][$tanks[$i].slaveName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
-						<<break>>
-					<<elseif $slaves[_j].relationship == -4>>
-						| [[Permit your wife to name her daughter|Incubator][$tanks[$i].slaveName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
-						<<break>>
-					<<elseif $slaves[_j].ID == $Bodyguard.ID>>
-						| [[Permit your bodyguard to name her daughter|Incubator][$tanks[$i].slaveName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
-						<<break>>
-					<<elseif $slaves[_j].ID == $HeadGirl.ID>>
-						| [[Permit your headgirl to name her daughter|Incubator][$tanks[$i].slaveName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
-						<<break>>
-					<<elseif $slaves[_j].devotion > 50 && slaves[_j].trust > 50 && slaves[_j].fuckdoll == 0>>
-						| [[Permit her devoted father to name her daughter|Incubator][$tanks[$i].slaveName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
-						<<break>>
-					<</if>>
-				<</if>>
-			<</for>>
-		<</if>>
 <</for>>
 <</if>>
 
diff --git a/src/pregmod/incubatorRetrievalWorkaround.tw b/src/pregmod/incubatorRetrievalWorkaround.tw
index 1336af8c42f5d657de1742927cffb200edb74769..bc552f7ce63fcf9cd3d82dcd542f75c7ae633dc1 100644
--- a/src/pregmod/incubatorRetrievalWorkaround.tw
+++ b/src/pregmod/incubatorRetrievalWorkaround.tw
@@ -5,7 +5,7 @@ $readySlave.slaveName has been discharged from $incubatorName and is ready for h
 <<set $activeSlave = $readySlave>>
 <<set $saleDescription to 0>>
 <<display "Long Slave Description">>
-<<set $slaves.push($activeSlave)>>
+<<AddSlave $activeSlave>>
 <<set $nextLink to "AS Dump">>
 <<set $returnTo to "Incubator">>
 <<display "New Slave Intro">>
\ No newline at end of file
diff --git a/src/pregmod/managePersonalAffairs.tw b/src/pregmod/managePersonalAffairs.tw
index 747a58d584e3bafd167e8daa4c253f46b215e306..9deb675768d48f53923433c2ea4ae3dea5de89a4 100644
--- a/src/pregmod/managePersonalAffairs.tw
+++ b/src/pregmod/managePersonalAffairs.tw
@@ -126,23 +126,23 @@ __Contraceptives and Fertility__
 
 
 In total, you have given birth to:
-<<if $birthElite > 0>>
-<br><<print $birthElite>> bab<<if $birthElite > 1>>ies<<else>>y<</if>> for the Societal Elite.
+<<if $PC.birthElite > 0>>
+<br><<print $PC.birthElite>> bab<<if $PC.birthElite > 1>>ies<<else>>y<</if>> for the Societal Elite.
 <</if>>
-<<if $birthMaster > 0>>
-<br><<print $birthMaster>> bab<<if $birthMaster > 1>>ies<<else>>y<</if>> for your former master.
+<<if $PC.birthMaster > 0>>
+<br><<print $PC.birthMaster>> bab<<if $PC.birthMaster > 1>>ies<<else>>y<</if>> for your former master.
 <</if>>
-<<if $birthClient > 0>>
-<br><<print $birthOther>> bab<<if $birthOther > 1>>ies<<else>>y<</if>> from clients you've slept with.
+<<if $PC.birthClient > 0>>
+<br><<print $PC.birthOther>> bab<<if $PC.birthOther > 1>>ies<<else>>y<</if>> from clients you've slept with.
 <</if>>
-<<if $birthDegenerate > 0>>
-<br><<print $birthDegenerate>> bastard<<if $birthDegenerate > 1>>s<</if>> from getting fucked by slaves.
+<<if $PC.birthDegenerate > 0>>
+<br><<print $PC.birthDegenerate>> bastard<<if $PC.birthDegenerate > 1>>s<</if>> from getting fucked by slaves.
 <</if>>
-<<if $birthArcOwner > 0>>
-<br><<print $birthArcOwner>> bab<<if $birthArcOwner > 1>>ies<<else>>y<</if>> from your time with that male arcology owner.
+<<if $PC.birthArcOwner > 0>>
+<br><<print $PC.birthArcOwner>> bab<<if $PC.birthArcOwner > 1>>ies<<else>>y<</if>> from your time with that male arcology owner.
 <</if>>
-<<if $birthOther > 0>>
-<br><<print $birthOther>> bab<<if $birthOther > 1>>ies<<else>>y<</if>> from sources you can't quite recall.
+<<if $PC.birthOther > 0>>
+<br><<print $PC.birthOther>> bab<<if $PC.birthOther > 1>>ies<<else>>y<</if>> from sources you can't quite recall.
 <</if>>
 <</if>>
 <br>
diff --git a/src/pregmod/newChildIntro.tw b/src/pregmod/newChildIntro.tw
index 0bc0ec32f54a57ea943f80feb82a392dbb5cf8ff..ca751b7b89ccf7c3f471fe1a288b8edb42105b70 100644
--- a/src/pregmod/newChildIntro.tw
+++ b/src/pregmod/newChildIntro.tw
@@ -4,8 +4,6 @@
 
 <<SlaveTitle $activeSlave>>
 
-<<set $genePool.push($activeSlave)>>
-
 <<if $activeSlave.mother > 0>>
 <<for $j to 0; $j < $slaves.length; $j++>>
 	<<if $activeSlave.mother == $slaves[$j].ID>>
@@ -38,7 +36,119 @@
 	<</if>>
 <</for>>
 
-You completed the legalities before heading to $incubatorName, knowing the tank will release her on your approach, and instruct $personalAssistantName to notify the new girl's parents to meet you in your office. As the tank exumes the disoriented girl, you help her to her feet<<if $incubatorReproductionSetting > 1>>, making sure to feel-up her overdeveloped body,<</if>> and walk her to your penthouse. ''__@@color:pink;$activeSlave.slaveName@@__'' now stands before your desk
+<<set $activeSlave.origin = "Shortly after birth, she was sealed in an aging tank until she was of age. She knows nothing of the world outside of what the tank imprinted her with.">>
+<<set $activeSlave.career = "slave since birth">>
+
+
+You completed the legalities before heading to $incubatorName, knowing the tank will release her on your approach, and instruct $personalAssistantName to notify the new girl's parents to meet you in your office. As the tank exumes the disoriented girl, you help her to her feet<<if $incubatorReproductionSetting > 1>>, making sure to feel-up her overdeveloped body,<</if>> and walk her to your penthouse. Though first you must decide upon a name for the new girl; it won't take long to reach your office, so you have only @@color:orange;one chance to name her@@ before you arrive.
+<span id="naming"> 
+<br>Choose a name for her. <<textbox "$activeSlave.slaveName" $activeSlave.slaveName "New Child Intro Intimate">>
+<br><<click "Have you PA assign her a random name">>
+	<<replace "#naming">>
+		<<NationalityToName>>
+		<<set $activeSlave.birthName = $activeSlave.slaveName>>
+		$personalAssistantName registers the new girl as "<<print $activeSlave.slaveName>>" in your registry.
+	<</replace>>
+<</click>>
+<<if $activeSlave.mother > 0>>
+	<<for _j to 0; _j < $slaves.length; _j++>>
+		<<if $activeSlave.mother == $slaves[_j].ID>>
+			<<if $slaves[_j].ID == $Concubine.ID>>
+				<br><<click "Permit your Concubine to name her daughter">>
+					<<replace "#naming">>
+						<<ParentNames $slaves[_j], $activeSlave>>
+						After some careful consideration, $slaves[_j].slaveName picks a name she thinks you might find attractive; from now on her daughter will be known as "<<print $activeSlave.slaveName>>".
+					<</replace>>
+				<</click>>
+				<<break>>
+			<<elseif $slaves[_j].relationship == -4>>
+				<br><<click "Permit your wife to name her daughter">>
+					<<replace "#naming">>
+						<<ParentNames $slaves[_j], $activeSlave>>
+						After some careful consideration, $slaves[_j].slaveName picks a name suitable for your daughter; from now on she will be known as "<<print $activeSlave.slaveName>>".
+					<</replace>>
+				<</click>>
+				<<break>>
+			<<elseif $slaves[_j].ID == $Bodyguard.ID>>
+				<br><<click "Permit your bodyguard to name her daughter">>
+					<<replace "#naming">>
+						<<ParentNames $slaves[_j], $activeSlave>>
+						After some careful consideration, $slaves[_j].slaveName decides on "<<print $activeSlave.slaveName>>" for her daughter. She hopes you'll find it fitting her station.
+					<</replace>>
+				<</click>>
+				<<break>>
+			<<elseif $slaves[_j].ID == $HeadGirl.ID>>
+				<br><<click "Permit your headgirl to name her daughter">>
+					<<replace "#naming">>
+						<<ParentNames $slaves[_j], $activeSlave>>
+						After some careful consideration, $slaves[_j].slaveName decides on "<<print $activeSlave.slaveName>>" for her daughter. and hopes it will be a name your other slaves will learn to respect.
+					<</replace>>
+				<</click>>
+				<<break>>
+			<<elseif $slaves[_j].devotion > 50 && slaves[_j].trust > 50>>
+				<br><<click "Permit her devoted mother to name her daughter">>
+					<<replace "#naming">>
+						<<ParentNames $slaves[_j], $activeSlave>>
+						After some careful consideration, $slaves[_j].slaveName picks a name she hopes you'll like; from now on her daughter will be known as "<<print $activeSlave.slaveName>>".
+					<</replace>>
+				<</click>>
+				<<break>>
+			<</if>>
+		<</if>>
+	<</for>>
+<</if>>
+<<if $activeSlave.father > 0>>
+	<<for _j to 0; _j < $slaves.length; _j++>>
+		<<if $activeSlave.father == $slaves[_j].ID>>
+			<<if $slaves[_j].ID == $Concubine.ID>>
+				<br><<click "Permit your Concubine to name her daughter">>
+					<<replace "#naming">>
+						<<ParentNames $slaves[_j], $activeSlave>>
+						After some careful consideration, $slaves[_j].slaveName picks a name she thinks you might find attractive; from now on her daughter will be known as "<<print $activeSlave.slaveName>>".
+					<</replace>>
+				<</click>>
+				<<break>>
+			<<elseif $slaves[_j].relationship == -4>>
+				<br><<click "Permit your wife to name her daughter">>
+					<<replace "#naming">>
+						<<ParentNames $slaves[_j], $activeSlave>>
+						After some careful consideration, $slaves[_j].slaveName picks a name suitable for your daughter; from now on she will be known as "<<print $activeSlave.slaveName>>".
+					<</replace>>
+				<</click>>
+				<<break>>
+			<<elseif $slaves[_j].ID == $Bodyguard.ID>>
+				<br><<click "Permit your bodyguard to name her daughter">>
+					<<replace "#naming">>
+						<<ParentNames $slaves[_j], $activeSlave>>
+						After some careful consideration, $slaves[_j].slaveName decides on "<<print $activeSlave.slaveName>>" for her daughter. She hopes you'll find it fitting her station.
+					<</replace>>
+				<</click>>
+				<<break>>
+			<<elseif $slaves[_j].ID == $HeadGirl.ID>>
+				<br><<click "Permit your headgirl to name her daughter">>
+					<<replace "#naming">>
+						<<ParentNames $slaves[_j], $activeSlave>>
+						After some careful consideration, $slaves[_j].slaveName decides on "<<print $activeSlave.slaveName>>" for her daughter. and hopes it will be a name your other slaves will learn to respect.
+					<</replace>>
+				<</click>>
+				<<break>>
+			<<elseif $slaves[_j].devotion > 50 && slaves[_j].trust > 50>>
+				<br><<click "Permit her devoted mother to name her daughter">>
+					<<replace "#naming">>
+						<<ParentNames $slaves[_j], $activeSlave>>
+						After some careful consideration, $slaves[_j].slaveName picks a name she hopes you'll like; from now on her daughter will be known as "<<print $activeSlave.slaveName>>".
+					<</replace>>
+				<</click>>
+				<<break>>
+			<</if>>
+		<</if>>
+	<</for>>
+<</if>>
+</span>
+
+<br><br>
+
+''__@@color:pink;$activeSlave.slaveName@@__'' now stands before your desk
 <<if $activeSlave.mother > 0 && $activeSlave.father > 0>>
 	alongside her mother _tempMom.slaveName and father _tempDad.slaveName.
 <<elseif $activeSlave.mother > 0>>
@@ -48,6 +158,11 @@ You completed the legalities before heading to $incubatorName, knowing the tank
 <<else>>
 	alone, having no family<<if $activeSlave.mother == -1 || $activeSlave.father == -1>>, other than you,<</if>> in your stock.
 <</if>>
+<<if $arcologies[0].FSRestart >= 50>>
+	<<if _tempMom.breedingMark == 1>>
+		The Societal Elite are waiting to inspect the child of their eugenics programs. Approving of your attractive offspring, they take this opportunity to @@color:lime;brand the protesting girl with the breeding mark@@ signifying her as worthy of reproducing, before taking their leave.
+	<</if>>
+<</if>>
 
 <<if $activeSlave.mother > 0>>
 	She glances at her mother
@@ -88,6 +203,27 @@ You completed the legalities before heading to $incubatorName, knowing the tank
 		<<set $activeSlave.trust += 20>>
 		<<set $activeSlave.devotion += 20>>
 	<</if>>
+	<<if _tempMom.boobs > 10000>>
+		Her eyes focus on _tempMom.slaveName's <<print _tempMom.boobs>>cc tits, taking in every centimeter of their enormity, but lingering on her <<if _tempMom.lactation == 2>>milk gushing <<elseif _tempMom.lactation == 1>>milk leaking <</if>>_tempMom.nipples nipples.
+	<<elseif _tempMom.pregType >= 10 && bigBelly(_tempMom)>>
+		Her eyes focus on _tempMom.slaveName's massively distended, child-filled belly, taking in every obvious motion beneath her taut skin.<<if $activeSlave.pregType >= 20>> A hand runs across her own bloated middle and another down to her moist pussy.<</if>>
+	<<elseif bigBelly(_tempMom)>>
+		Her eyes focus on _tempMom.slaveName's rounded middle, staring in fascination at the unfamiliar bulge.<<if $activeSlave.pregType >= 20>> A hand runs across her own middle and another down to her moist pussy.<</if>>
+	<<elseif _tempMom.dick > 15>>
+		Her eyes focus on _tempMom.slaveName's <<print (6*_tempMom.dick)>>cm long dick, trying to understand how it can fit in a girl.
+	<<elseif _tempMom.balls > 60>>
+		Her eyes focus on _tempMom.slaveName's <<print (_tempMom.balls*2)>>cm long testicles, taking in every centimeter of their enormity, before shifting to the cum steadily drooling from the tip of her dick.
+	<<elseif _tempMom.hips > 2>>
+		Her eyes focus on _tempMom.slaveName's abnormally wide hips. She runs her hands down her own sides, pondering how such a wonder occurs.
+	<<elseif _tempMom.butt > 12>>
+		Her eyes focus on _tempMom.slaveName's massive ass, staring in fascination at every jiggle that runs through it.
+	<<elseif _tempMom.dick > 0 && _tempMom.vagina > -1>>
+		Her eyes focus on _tempMom.slaveName's crotch, staring in wonder and confusion at the presence of both a penis and a vagina.
+	<<elseif _tempMom.amp == 1>>
+		Her eyes dart from limb to missing limb on _tempMom.slaveName's body, trying desperatly to understand what happened to them.
+	<<elseif _tempMom.amp < 0>>
+		Her eyes dart from limb to prosthetic limb on _tempMom.slaveName's body, trying desperatly to understand these wonderful things are and how she could get her own.
+	<</if>>
 <</if>>
 
 <<if $activeSlave.father > 0>>
@@ -129,6 +265,27 @@ You completed the legalities before heading to $incubatorName, knowing the tank
 		<<set $activeSlave.trust += 20>>
 		<<set $activeSlave.devotion += 20>>
 	<</if>>
+	<<if _tempDad.boobs > 10000>>
+		Her eyes focus on _tempDad.slaveName's <<print _tempDad.boobs>>cc tits, taking in every centimeter of their enormity, but lingering on her <<if _tempDad.lactation == 2>>milk gushing <<elseif _tempDad.lactation == 1>>milk leaking <</if>>_tempDad.nipples nipples.
+	<<elseif _tempDad.pregType >= 10 && bigBelly(_tempDad)>>
+		Her eyes focus on _tempDad.slaveName's massively distended, child-filled belly, taking in every obvious motion beneath her taut skin.<<if $activeSlave.pregType >= 20>> A hand runs across her own bloated middle and another down to her moist pussy.<</if>>
+	<<elseif bigBelly(_tempDad)>>
+		Her eyes focus on _tempDad.slaveName's rounded middle, staring in fascination at the unfamiliar bulge.<<if $activeSlave.pregType >= 20>> A hand runs across her own middle and another down to her moist pussy.<</if>>
+	<<elseif _tempDad.dick > 15>>
+		Her eyes focus on _tempDad.slaveName's <<print (6*_tempDad.dick)>>cm long dick, trying to understand how it can fit in a girl.
+	<<elseif _tempDad.balls > 60>>
+		Her eyes focus on _tempDad.slaveName's <<print (_tempDad.balls*2)>>cm long testicles, taking in every centimeter of their enormity, before shifting to the cum steadily drooling from the tip of her dick.
+	<<elseif _tempDad.hips > 2>>
+		Her eyes focus on _tempDad.slaveName's abnormally wide hips. She runs her hands down her own sides, pondering how such a wonder occurs.
+	<<elseif _tempDad.butt > 12>>
+		Her eyes focus on _tempDad.slaveName's massive ass, staring in fascination at every jiggle that runs through it.
+	<<elseif _tempDad.dick > 0 && _tempDad.vagina > -1>>
+		Her eyes focus on _tempDad.slaveName's crotch, staring in wonder and confusion at the presence of both a penis and a vagina.
+	<<elseif _tempDad.amp == 1>>
+		Her eyes dart from limb to missing limb on _tempDad.slaveName's body, trying desperatly to understand what happened to them.
+	<<elseif _tempDad.amp < 0>>
+		Her eyes dart from limb to prosthetic limb on _tempDad.slaveName's body, trying desperatly to understand these wonderful things are and how she could get her own.
+	<</if>>
 <</if>>
 
 <br><br>
@@ -190,276 +347,111 @@ You slowly strip down, gauging her reactions to your show, until you are fully n
 <<if $PC.preg > 0>>
 	<<if $PC.career == "escort">>
 		<<if $PC.preg >= 16>>
-			Your pregnancy is obvious to her, which means two things: you won't be as capable of disciplining her, leading her to be @@color:mediumorchid;more willing to disobey,@@ and you going to be demanding and needy, possibly even @@color:gold;using force to get her to do what you want.@@
-			<<set $activeSlave.trust -= 10>>
-			<<set $activeSlave.devotion -= 10>>
+			She is fascinated by your pregnancy, to the point that she attempts a gesture to let you know she wants to feel it. Just this once, you permit her to touch your belly<<if $activeSlave.pubertyXX == 1>>, since it is likely she herself will be swollen with child before long<</if>>. She eagerly rubs it all over before pushing her ear to it, provoking a kick and a gasp in response. She instinctually @@color:hotpink;connects to you@@ and @@color:aquamarine;trusts you@@ like a mother.
+			<<set $activeSlave.trust += 2>>
+			<<set $activeSlave.devotion += 2>>
 		<</if>>
 	<<else>>
 		<<if $PC.preg >= 20>>
-			Your pregnancy is obvious to her, which means two things: you won't be as capable of disciplining her, leading her to be @@color:mediumorchid;more willing to disobey,@@ and you going to be demanding and needy, possibly even @@color:gold;using force to get her to do what you want.@@
-			<<set $activeSlave.trust -= 10>>
-			<<set $activeSlave.devotion -= 10>>
+			She is fascinated by your pregnancy, to the point that she attempts a gesture to let you know she wants to feel it. Just this once, you permit her to touch your belly<<if $activeSlave.pubertyXX == 1>>, since it is likely she herself will be swollen with child before long<</if>>. She eagerly rubs it all over before pushing her ear to it, provoking a kick and a gasp in response. She instinctually @@color:hotpink;connects to you@@ and @@color:aquamarine;trusts you@@ like a mother.
+			<<set $activeSlave.trust += 2>>
+			<<set $activeSlave.devotion += 2>>
 		<</if>>
 	<</if>>
 <</if>>
 
 <<if $PC.boobsBonus == 3>>
-	<<if $activeSlave.fetish == "boobs">>
-		<<if $activeSlave.fetishKnown == 0>>
-			She keeps stealing glances at your huge rack.<<if canAchieveErection($activeSlave)>> Her dick rapidly hardening.<</if>> You stretch, giving her a fantastic view of your breasts, before circling around behind her and cupping her chest. Between your tits against her back, and how teasingly big you are pretending her breasts will be, she can't contain herself; she cums from overstimulation, completely pinning her @@color:green;as a breast fetishist!@@
-			<<set $activeSlave.fetishKnown = 1>>
-		<<else>>
-			She keeps stealing glances at your huge rack.<<if canAchieveErection($activeSlave)>> Her dick rapidly hardening.<</if>> As you inspect her, you take care to keep "accidentally" bumping her with your tits, before "tripping" and landing with her face buried in your chest. She is practically bursting with lust by the end and @color:hotpink;eager to please you@@ so she can be close to those boobs.
-			<<set $activeSlave.devotion += 5>>
-		<</if>>
-	<</if>>
+	Now that you are alone with her, she seems incapable of pulling her eyes off your huge tits. Every motion and jiggle in them is reflected in her expression. She licks her lips as she gazes at your erect nipples, but it will be you who decides who may suck on them. Though it doesn't stop her from @@color:hotpink;longing@@ to nurse from you.
+	<<set $activeSlave.devotion += 5>>
 <</if>>
 
 <<if $enduringTrust > 20>>
 	<<if $activeSlave.trust >= -20>>
-		She notices that most of the slaves she sees around your penthouse seem to trust you, and hopes that she can @@color:mediumaquamarine;trust you,@@ too.
-		<<set $activeSlave.trust += 1>>
+		She notices that most of the slaves she sees around your penthouse seem to trust you; in turn @@color:mediumaquamarine;she trusts you more too.@@
+		<<set $activeSlave.trust += 2>>
 	<</if>>
 <<else>>
 	<<if $activeSlave.trust < 50>>
-		She notices that most of the slaves she sees around your penthouse seem to fear you, and starts to @@color:gold;fear you,@@ too.
+		She notices that most of the slaves she sees around your penthouse seem to fear you; in turn @@color:gold;she fears you more too.@@
 		<<set $activeSlave.trust -= 2>>
 	<</if>>
 <</if>>
 <<if $enduringDevotion > 20>>
 	<<if $activeSlave.devotion >= -20>>
-		She sees that most of the slaves she sees around your penthouse like you, and hopes that she can @@color:hotpink;like you@@  a little more herself.
+		She sees that most of the slaves she sees around your penthouse like you; in turn @@color:hotpink;she likes you more too.@@
 		<<set $activeSlave.devotion += 1>>
 	<</if>>
 <<else>>
 	<<if $activeSlave.devotion < 50>>
-		She sees that most of the slaves she sees around your penthouse dislike you, and starts to @@color:mediumorchid;dislike you@@ a little more herself.
+		She sees that most of the slaves she sees around your penthouse dislike you; in turn @@color:mediumorchid;she dislikes you more too.@@
 		<<set $activeSlave.devotion -= 2>>
 	<</if>>
 <</if>>
 
-<<if ($PC.career is "escort")>>
-	She recognizes you as a whore, leading her to @@color:mediumaquamarine;fear you less@@; however, her views of you also leave her less willing to @@color:mediumorchid;listen to you.@@
-	<<set $activeSlave.devotion -= 10>>
+<<if $PC.career is "escort">>
+	She seems to @@color:mediumaquamarine;like your clothes@@ and @@color:hotpink;wants a set of her own.@@
+	<<set $activeSlave.devotion += 1>>
 	<<set $activeSlave.trust += 1>>
-<<elseif ($PC.career is "servant")>>
-	Seeing you in your <<if $PC.title == 0>>maid's dress<<else>>maid's outfit<</if>> @@color:mediumaquamarine;calms her fears@@; however, she is unwilling to @@color:mediumorchid;listen to a servant.@@
-	<<set $activeSlave.devotion -= 3>>
-	<<set $activeSlave.trust += 10>>
-<<elseif ($PC.career is "gang")>>
-	She recognizes you from various crime reports  @@color:gold;filling her with fear@@ over what life under you will be like.
-	<<set $activeSlave.trust -= 10>>
+<<elseif $PC.career is "servant">>
+	She seems to @@color:mediumaquamarine;think your clothes are cute@@ and @@color:hotpink;wants a set of her own.@@
+	<<set $activeSlave.devotion += 1>>
+	<<set $activeSlave.trust += 1>>
+<<elseif $PC.career is "gang">>
+	She seems to @@color:gold;find your appearance frightening.@@
+	<<set $activeSlave.trust -= 5>>
 <</if>>
-<<if ($PC.rumor is "force")>>
-	<<if ($activeSlave.devotion <= 20)>>
-	<<if ($activeSlave.trust > 0)>>
-	She seems to have picked up rumors about your ruthlessness, and is @@color:gold;horrified into obedience.@@
-<<set $activeSlave.trust -= 25>>
-	<<elseif ($activeSlave.trust > -10)>>
-	She seems to have picked up rumors about your ruthlessness, and is @@color:gold;terrified into obedience.@@
-<<set $activeSlave.trust -= 20>>
-	<<elseif ($activeSlave.trust > -20)>>
-	She seems to have picked up rumors about your ruthlessness, and is @@color:gold;frightened into obedience.@@
-<<set $activeSlave.trust -= 15>>
-	<</if>>
-	<</if>>
+<<if $PC.rumor is "force">>
+	She seems to @@color:gold;be terrified of your forceful stance.@@
+	<<set $activeSlave.trust -= 10>>
 <<elseif $PC.rumor is "diligence">>
-	She seems to have picked up rumors about your probity, and is @@color:mediumaquamarine;less afraid of you@@ and more @@color:hotpink;willing to like you.@@
-<<set $activeSlave.devotion += 5>>
-<<set $activeSlave.trust += 5>>
+	She seems to @@color:mediumaquamarine;find your diligence enjoyable.@@
+	<<set $activeSlave.trust += 5>>
 <</if>>
 
-<<if ($activeSlave.accent >= 3)>>
-	<<if ($activeSlave.trust > 20)>>
-	During the enslavement process so far, it became obvious to her that she can barely understand enough $language to understand orders. She's @@color:gold;frightened@@ by the sudden danger that she won't be able to do what she's told, even if she wants to.
-<<set $activeSlave.trust -= 5>>
-	<<elseif ($activeSlave.devotion <= 20)>>
-	<<if $activeSlave.intelligence > 1>>
-		She can barely understand the $language language, but she's smart enough to understand everything that's happening to her. Even so, @@color:mediumaquamarine;some fear is deferred,@@ since the harsh realities of being a sex slave may not be clear to her yet.
-	<<set $activeSlave.trust += 10>>
-	<<elseif $activeSlave.intelligence > -1>>
-		She can barely understand enough $language to understand what's happening to her. This incapacity @@color:mediumaquamarine;defers a great deal of fear,@@ since her exact future hasn't become clear to her yet.
-	<<set $activeSlave.trust += 10>>
-	<<else>>
-		She can barely understand $language at all, and scarcely understands what's happening to her. This leaves her @@color:mediumaquamarine;unaware of how afraid she should be,@@ since she's too stupid to figure it out without being told.
+<<if $activeSlave.accent >= 3>>
+	She barely understands $language at all, and scarcely understands what's happening to her. This leaves her @@color:mediumaquamarine;blissfully unaware of what awaits her,@@ since she's too naive to know better.
 	<<set $activeSlave.trust += 25>>
-	<</if>>
-	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSSupremacist >= 50>>
 	<<if $activeSlave.race is $arcologies[0].FSSupremacistRace>>
-	She realizes that she's a member of the favored race in your arcology, and @@color:mediumaquamarine;hopes@@ this will earn her good treatment.
-<<set $activeSlave.trust += 2>>
-	<<else>>
-	She realizes that she's not a member of the favored race in your arcology, and @@color:gold;fears@@ this will earn her extra abuse.
-<<set $activeSlave.trust -= 4>>
+	She noticed everybody else is the same race as her, and @@color:mediumaquamarine;feels right at home among them.@@
+	<<set $activeSlave.trust += 2>>
 	<</if>>
 <</if>>
 <<if $arcologies[0].FSSubjugationist >= 50>>
-	<<if $activeSlave.race != $arcologies[0].FSSubjugationistRace>>
-	She realizes that she's not one of the people considered subhuman here, and @@color:mediumaquamarine;hopes@@ this will allow her to avoid some abuse.
-<<set $activeSlave.trust += 2>>
-	<<else>>
-	She realizes that she's one of the people considered subhuman here, and @@color:gold;fears@@ she will be unable to avoid degradation.
-	<<set $activeSlave.trust -= 4>>
+	<<if $activeSlave.race == $arcologies[0].FSSubjugationistRace>>
+	She noticed a lot of your other slaves are the same race as her, and @@color:mediumaquamarine;feels right at home among them,@@ despite what it means.
+	<<set $activeSlave.trust += 2>>
 	<</if>>
 <</if>>
 <<if $arcologies[0].FSRepopulationFocus >= 50>>
-	<<if $activeSlave.preg > 0>>
-		She realizes that your arcology values bearing children and @@color:mediumaquamarine;hopes@@ she'll be treated gently for being pregnant.
+	<<if $activeSlave.pregType > 0>>
+		She notices all the rounded bellies in your arcolgy and @@color:mediumaquamarine;instinctually feels at home with her egg filled womb.@@
 		<<set $activeSlave.trust += 2>>
 	<</if>>
 <</if>>
-<<if $arcologies[0].FSRestart >= 50>>
-	<<if $activeSlave.preg < 1>>
-		She recognizes her place in society and @@color:mediumaquamarine;is glad@@ she isn't pregnant.
-		<<set $activeSlave.trust += 1>>
-	<</if>>
+<<if $arcologies[0].FSGenderFundamentalist >= 50>>
+	She there are lots of girls in your penthouse, making her @@color:mediumaquamarine;more comfortable.@@
+	<<set $activeSlave.trust += 2>>
 <</if>>
 <<if $arcologies[0].FSGenderRadicalist >= 50>>
-	<<if $activeSlave.dick > 0>>
-	<<if $activeSlave.anus > 0>>
-	She realizes that your arcology accepts girls with dicks who take it up the ass, and since she qualifies, she @@color:mediumaquamarine;hopes@@ to be well treated here.
-<<set $activeSlave.trust += 2>>
-	<<else>>
-	She realizes that girls with dicks take it up the butt here, and @@color:gold;fears@@ for her virgin anus.
-<<set $activeSlave.trust -= 4>>
-	<</if>>
-	<</if>>
-<</if>>
-<<if $arcologies[0].FSGenderFundamentalist >= 50>>
-	<<if $activeSlave.dick == 0>>
-	She realizes that she has a chance of conforming to gender roles in your arcology, and @@color:mediumaquamarine;hopes@@ to avoid abuse this way.
-<<set $activeSlave.trust += 2>>
-	<<else>>
-	She realizes that your arcology's culture looks down on girls like her, and @@color:gold;fears@@ she'll be abused as a result.
-<<set $activeSlave.trust -= 4>>
-	<</if>>
+	She there are lots of girly boys in your penthouse, making her @@color:mediumaquamarine;more comfortable.@@
+	<<set $activeSlave.trust += 2>>
 <</if>>
 <<if $arcologies[0].FSPaternalist >= 50>>
-	She realizes that your arcology's citizens look after their slaves, you more than anyone, and @@color:mediumaquamarine;hopes@@ she'll do well here.
-<<set $activeSlave.trust += 2>>
+	She sees how happy your other slaves are, and can't help but @@color:mediumaquamarine;feel happy@@ herself.
+	<<set $activeSlave.trust += 2>>
 <</if>>
 <<if $arcologies[0].FSDegradationist >= 50>>
-	She realizes that for her, your arcology is likely to be a hell unending, and is @@color:gold;terrified.@@
-<<set $activeSlave.trust -= 5>>
-<</if>>
-<<if $arcologies[0].FSBodyPurist >= 50>>
-<</if>>
-<<if $arcologies[0].FSTransformationFetishist >= 50>>
-<</if>>
-<<if $arcologies[0].FSMaturityPreferentialist >= 50>>
-	<<if ($activeSlave.acutalAge > 30)>>
-	She realizes that your arcology appreciates older girls, and @@color:mediumaquamarine;hopes@@ it'll be nicer here.
-<<set $activeSlave.trust += 2>>
-	<</if>>
-<</if>>
-<<if $arcologies[0].FSYouthPreferentialist >= 50>>
-	<<if ($activeSlave.acutalAge > 30)>>
-	She realizes that your arcology has little use for older girls, and @@color:gold;fears@@ she'll be abused here.
-	<<set $activeSlave.trust -= 4>>
-	<<elseif ($activeSlave.acutalAge < 18)>>
-  	/% begin is a child block %/
-	/% Set $i to 0 or 1 to reflect whether she understands. %/
-  	<<set $i to 0>>
-	<<if ($activeSlave.origin is "She was raised in a radical slave school that treated her from a very young age, up to the point that she never experienced male puberty.") or ($activeSlave.origin is "She was raised in a radical slave school that treated her with drugs and surgery from a very young age.") or ($activeSlave.origin is "She was brought up in a radical slave school to match her twin.")>>
-		<<set $i to 1>>
-  	<<elseif isSexuallyPure($activeSlave)>>
-	  <<if $activeSlave.intelligence < either(0, 1, 2, 3)>>
-		<<set $i to 1>>
-	  <</if>>
-	<<else>>
-	  <<if $activeSlave.intelligence < either(0, 1)>>
-		<<set $i to 1>>
-	  <</if>>
-	<</if>>
-	<<if $i < 1>>
-		She has heard that you like little girls and is @@color:mediumaquamarine;reassured@@ because she misunderstands what this means.
-		<<set $activeSlave.trust += 2>>
-	<<elseif ($activeSlave.sexualQuirk is "perverted")>>
-		She has heard that you like little girls and @@color:mediumaquamarine;hopes@@ that matching your taste means she will be treated well.
-		<<set $activeSlave.trust += 2>>
-	<<elseif ($activeSlave.sexualQuirk is "size queen") && $PC.dick == 1>>
-		She has heard that you like little girls and @@color:hotpink;bites her lip@@ at the thought of how big your dick will be inside her.
-		<<set  $activeSlave.devotion += 2>>
-	<<elseif ($activeSlave.sexualFlaw is "repressed") or ($activeSlave.sexualFlaw is "shamefast") or ($activeSlave.behavioralFlaw is "devout")>>
-		She has heard that you like little girls and is @@color:gold;terrified@@ because she understands exactly what that means.
-		<<set $activeSlave.trust -= 5>>
-	<<elseif ($activeSlave.sexualFlaw is "hates oral") or ($activeSlave.sexualFlaw is "hates anal") or ($activeSlave.sexualFlaw is "hates penetration") or (isSexuallyPure($activeSlave) and (50 >= random(1, 100)))>>
-		She has heard that you like little girls and @@color:gold;fears@@ what you might do to her.
-		<<set $activeSlave.trust -= 4>>
-	<<else>>
-		She has heard that you like little girls and @@color:mediumaquamarine;hopes@@ that matching your taste means she will be treated well.
-		<<set $activeSlave.trust += 2>>
-	<</if>>
-	/% end is a child block %/
-	<</if>>
-<</if>>
-<<if $arcologies[0].FSSlimnessEnthusiast >= 50>>
-	<<if ($activeSlave.boobs < 500) && ($activeSlave.butt < 3) && ($activeSlave.weight <= 10) && ($activeSlave.muscles <= 30)>>
-	She realizes that she has a fashionable body for your arcology, and @@color:mediumaquamarine;hopes@@ it'll earn her some kindness.
-<<set $activeSlave.trust += 2>>
-	<</if>>
-<</if>>
-<<if $arcologies[0].FSAssetExpansionist >= 50>>
-	<<if ($activeSlave.butt > 4) && ($activeSlave.boobs > 800)>>
-	She realizes that she has a fashionable body for your arcology, and @@color:mediumaquamarine;hopes@@ it'll earn her some kindness.
-<<set $activeSlave.trust += 2>>
-	<</if>>
-<</if>>
-<<if $arcologies[0].FSPastoralist >= 50>>
-	<<if ($activeSlave.preg > 0) || ($activeSlave.lactation > 0)>>
-	She realizes that your arcology values slaves with motherly bodies, and @@color:mediumaquamarine;hopes@@ she won't be a low value slave for having one.
-<<set $activeSlave.trust += 2>>
-	<</if>>
-<</if>>
-<<if $arcologies[0].FSPhysicalIdealist >= 50>>
-	<<if ($activeSlave.muscles > 5)>>
-	She realizes that muscles are respected around here, and though she isn't truly swole, she's partway there; she @@color:mediumaquamarine;hopes@@ she'll be kept healthy and strong.
-<<set $activeSlave.trust += 2>>
-	<</if>>
-<</if>>
-<<if $arcologies[0].FSChattelReligionist >= 50>>
-	<<if $activeSlave.intelligence < -1>>
-	Her dimwitted mind naturally takes to being told her role as a slave is righteous, and she naively @@color:mediumaquamarine;hopes@@ your arcology's religion will protect her from harm.
-<<set $activeSlave.trust += 2>>
-	<<elseif $activeSlave.intelligence > 1>>
-	Her intelligent mind @@color:gold;fears@@ the consequences of living in an arcology in which slavery has taken on religious significance.
-<<set $activeSlave.trust -= 4>>
-	<</if>>
-<</if>>
-<<if $arcologies[0].FSRomanRevivalist >= 50>>
-	<<if $activeSlave.intelligence > 1>>
-	Though she knows it's not a truly authentic Roman restoration, her intelligent mind grasps the potential benefits of Roman mores for slaves, and she @@color:mediumaquamarine;hopes@@ life in your arcology will be managed with virtue.
-<<set $activeSlave.trust += 2>>
-	<</if>>
-<<elseif $arcologies[0].FSEgyptianRevivalist >= 50>>
-	<<if $activeSlave.intelligenceImplant == 1>>
-	Though she knows it's not a truly authentic ancient Egyptian restoration, her educated mind grasps the potential benefits of ancient Egyptian mores for slaves, and she @@color:mediumaquamarine;hopes@@ your arcology will make good and respectful use of her learning.
-<<set $activeSlave.trust += 2>>
-	<</if>>
-<<elseif $arcologies[0].FSEdoRevivalist >= 50>>
-	<<if $activeSlave.intelligenceImplant == 1>>
-	Though she knows it's not a truly authentic feudal Japanese restoration, her educated mind grasps the potential benefits of traditional Japanese mores for slaves, and she @@color:mediumaquamarine;hopes@@ your arcology will treat those who behave well with a modicum of honor.
-<<set $activeSlave.trust += 2>>
-	<</if>>
-<<elseif $arcologies[0].FSArabianRevivalist >= 50>>
-	<<if $activeSlave.intelligenceImplant == 1>>
-	Though she knows it's not a truly authentic restoration of the old Caliphate, her educated mind grasps the potential benefits of old Arabian law and culture for slaves, and she @@color:mediumaquamarine;hopes@@ your arcology has absorbed enough of the old wisdom to respect slaves.
-<<set $activeSlave.trust += 2>>
-	<</if>>
-<<elseif $arcologies[0].FSChineseRevivalist >= 50>>
-	<<if $activeSlave.intelligenceImplant == 1>>
-	Though she knows it's not a truly authentic ancient Chinese restoration, her educated mind grasps the potential benefits of ancient Confucian philosophy for slaves, and she @@color:mediumaquamarine;hopes@@ your arcology at least maintains some pretence of order and conservatism.
-<<set $activeSlave.trust += 2>>
-	<</if>>
+	She sees how your other slaves cower as you pass, and can't help but @@color:mediumaquamarine;feel uneasy around you.@@
+	<<set $activeSlave.trust -= 5>>
 <</if>>
 
 <<if $arcologies[0].FSPaternalistLaw == 1>>
-	She saw a good deal of your arcology and its society on her way to your penthouse, and was amazed by all the happy, healthy slaves. She @@color:mediumaquamarine;begins to trust@@ that she'll be one of them, and @@color:hotpink;anticipates meeting@@ the person who built this place.
-<<set $activeSlave.trust += 4>>
-<<set $activeSlave.devotion += 4>>
+	She saw a good deal of your arcology and its society on her way to your penthouse, and was amazed by all the happy, healthy slaves. She @@color:mediumaquamarine;begins to trust@@ that she'll be one of them, and @@color:hotpink;anticipates playing@@ with all her happy friends.
+	<<set $activeSlave.trust += 4>>
+	<<set $activeSlave.devotion += 4>>
 <</if>>
 
 <<if $autoRulesAssistant == 0>>
@@ -483,313 +475,17 @@ You slowly strip down, gauging her reactions to your show, until you are fully n
 <br><br>
 
 <span id="result">
-//Now might be a good time to introduce her to life in your stable of sex slaves.//
+//Now would be a good time to introduce her to life in your stable of sex slaves.//
 <br>
 
-<<if $activeSlave.origin is "She submitted to enslavement to escape the hard life of an Old World whore.">>
-	<<click "Brand her to introduce her to life as a slave whore">>
-	<<set $activeSlave.brand to $brandDesign>>
-	<<set $activeSlave.brandLocation to $brandTarget>>
-	<<set $activeSlave.devotion -= 5>>
-	<<set $activeSlave.trust -= 10>>
-	<<set $activeSlave.health -= 10>>
-	<<if canDoAnal($activeSlave)>>
-	<<set $activeSlave.analCount += 1>>
-		<<set $analTotal += 1>>
-	<</if>>
-	<<replace "#result">>
-		You tell her you'll be marking her as one of your working girls. She looks resigned as she follows you to the body modification studio, and lets you strap her down with her $brandTarget bare. She understands what's coming. You've got her positioned just right<<if canDoAnal($activeSlave)>>, so your cock slides up her experienced asshole easily<</if>>. You bring the brand in close so she can feel the radiated heat, which breaks through even her jaded exterior and makes her tighten with fear. When you're close, you apply the brand<<if canDoAnal($activeSlave)>>, making the poor whore cinch her sphincter down hard in agony, bringing you to climax<</if>>. She knows you know how to @@color:gold;apply pain,@@ now, and she @@color:mediumorchid;learns to dislike you@@ even as her @@color:red;wound@@ heals.
-	<</replace>>
-	<</click>>
- <br>
-<<elseif $activeSlave.origin is "She submitted to enslavement to get access to modern prenatal care.">>
-	<<click "Manipulate her fear for her pregnancy">>
-	<<set $activeSlave.devotion += 4>>
-	<<set $activeSlave.trust -= 10>>
-	<<set $activeSlave.oralCount += 1>>
-		<<set $oralTotal += 1>>
-	<<replace "#result">>
-		You place a curative injector on your desk, and describe its remarkable medical powers in detail, before mentioning its extreme cost. Her face rises at the first part and falls at the second. You tell her that if she's a perfect sex slave, she'll get as much as she needs, and that she can start by sucking you off. She grunts a little as she hurries to get her pregnant body down to her knees, but works your cock with almost desperate enthusiasm. You stroke her hair comfortingly as she does, and inject the healing dose into her shoulder. She murmurs her @@color:hotpink;gratitude@@ into your dick, but @@color:gold;fears@@ for her pregnancy.
-	<</replace>>
-	<</click>>
- <br>
-<<elseif $activeSlave.origin is "She offered herself as a slave to escape the horrors a blind girls faces on the streets.">>
-	<<click "Abort her child">>
-	<<set $activeSlave.devotion += 4>>
-	<<set $activeSlave.trust += 3>>
-	<<set $activeSlave.preg = 0>>
-	<<set $activeSlave.pregType = 0>>
-	<<set $activeSlave.pregSource = 0>>
-	<<replace "#result">>
-	You loudly place an innocuous-looking drug injector on your desk, and let her think about it for a long moment. Then, you declare exactly what made that sound, Abortifacients. After an instant of comprehension, her mood instantly improves. She pledges to @@color:hotpink;submit to you,@@ <<if $PC.dick == 1>>suck your cock, take it in her pussy, take it up her ass<<else>>eat you out, worship you with her pussy, serve you with her ass<</if>>, anything, as long as @@color:mediumaquamarine;remove her rape baby.@@ You observe that she'll do all of those things, regardless of what you decide to do about her pregnancy, but for now, you'll let her end her pregnancy. She needs all the nutrients for herself right now. She thanks you through her tears.
-	<</replace>>
-	<</click>>
- <br>
-<<elseif $activeSlave.origin is "She submitted to enslavement for a better chance at survival than she had as a migrant.">>
-	<<if canDoAnal($activeSlave)>>
-	<<click "Introduce her to anal service">>
-	<<set $activeSlave.devotion += 4>>
-	<<set $activeSlave.trust += 4>>
-	<<set $activeSlave.anus += 1>>
-	<<set $activeSlave.analSkill += 10>>
-	<<set $activeSlave.analCount += 1>>
-		<<set $analTotal += 1>>
-	<<replace "#result">>
-		You carefully and patiently explain to the fearful anal virgin how skilled Free Cities slaves take dick up the butt. She is allowed to go at her own pace, hesitantly progressing from enemata to a single well-lubricated finger to a little plug. After a long while she's beginning to get aroused, and you bring her over to the couch to spoon. She stiffens with fear but you take your time and just cuddle for a while before gently sodomizing her. She @@color:hotpink;thanks@@ you for being a @@color:mediumaquamarine;kind master,@@ and has @@color:green;learned@@ the basics of taking it up the ass.
-	<</replace>>
-	<</click>>
-	<br><<click "Initiate her with anal pain">>
-	<<set $activeSlave.devotion -= 5>>
-	<<set $activeSlave.trust -= 10>>
-	<<set $activeSlave.anus += 1>>
-	<<set $activeSlave.analCount += 1>>
-		<<set $analTotal += 1>>
-	<<replace "#result">>
-		You haul her wordlessly into the bathroom. In a few minutes she finds herself standing obediently behind you, waiting for your next command with a clean colon and an uncomfortably large buttplug stretching her virgin ass. Once it's been in long enough to prevent any damage, you push her fearful form over the desk and pull it free. She squeals with more embarrassment than pain at the feeling of her first sodomy, but before long you're pounding her hard enough that all she can do is moan and desperately wonder when you'll be done with her poor little butt. You keep her around all day; by night, her asshole is well broken in and @@color:mediumorchid;so is her spirit.@@ She @@color:gold;fears@@ you now, knowing this is only the beginning.
-	<</replace>>
-	<</click>>
-	<</if>>
- <br>
-<<elseif $activeSlave.origin is "She submitted to enslavement as her only way to obtain surgery to transform her into a woman.">>
-	<<click "Give her her surgery">>
-	<<set $activeSlave.devotion += 15>>
-	<<set $activeSlave.health -= 10>>
-	<<set $activeSlave.trust += 10>>
-	<<set $activeSlave.vagina to 0>>
-	<<set $activeSlave.dick to 0>>
-	<<set $activeSlave.balls to 0>>
-	<<replace "#result">>
-		When she hears she'll be heading to surgery immediately, she bursts into @@color:hotpink;tears of gratitude@@ and makes to run around your desk to hug you before checking herself. She clearly doesn't want to put a foot wrong and isn't sure it would be appropriate. You solve her dilemma by meeting her with an embrace. She @@color:mediumaquamarine;cries into your chest@@ and promises to be your best slave. The surgery does affect her @@color:red;health@@ a little.
-	<</replace>>
-	<</click>>
-	<br><<click "Use her as she is">>
-	<<set $activeSlave.devotion += 4>>
-	<<set $activeSlave.anus += 1>>
-	<<set $activeSlave.analCount += 1>>
-		<<set $analTotal += 1>>
-	<<replace "#result">>
-		You announce that she'll have to earn her surgery - if she ever gets it at all. She only has time for a moment of shock and betrayal before she finds her face jammed into the cushions of your office couch. She struggles, outraged, but only manages to avoid sodomy for a moment. Her resistance only makes it harder on herself as you take her anus without mercy. By the third time you buttfuck her she's learned to @@color:hotpink;relax and let it happen.@@
-	<</replace>>
-	<</click>>
- <br>
-<<elseif $activeSlave.origin is "She submitted to enslavement out of a misguided desire to join a sexually libertine society.">>
-	<<if canDoAnal($activeSlave)>>
-	<<click "Disabuse her of her silly ideas">>
-	<<set $activeSlave.devotion -= 5>>
-	<<set $activeSlave.trust -= 10>>
-	<<set $activeSlave.analCount += 1>>
-		<<set $analTotal += 1>>
-	<<replace "#result">>
-		You rise from your desk and move in close. She turns to face you but you roughly spin her around. You haul her up on tiptoe so you can use her standing. As you get your <<if $PC.dick == 1>>cock<<else>>strap-on<</if>> lined up with her sissy ass she starts to struggle and protest, asking you to fuck in a more comfortable position. You tell her to keep her whore mouth shut, and administer an awful slap when she tries to keep talking. Her stupid illusions about life as a sex slave @@color:mediumorchid;melt away@@ with the burning sensation of a dick forcing its way up her ass at an harsh angle. She wilts a little as you abuse her butt, and afterward, she's in tears as she stumbles to the bathroom to wash her fuckhole. She's regained her composure by the time she gets out but @@color:gold;breaks down@@ when you tell her to present her asshole again.
-	<</replace>>
-	<</click>>
-	<</if>>
-	<<if $seeExtreme == 1>>
-	<<if $activeSlave.indentureRestrictions <= 0>>
-	<br><<click "Cruelly castrate her">>
-	<<set $activeSlave.devotion -= 10>>
-	<<set $activeSlave.trust -= -10>>
-	<<set $activeSlave.health -= 10>>
-	<<set $activeSlave.balls to 0>>
-	<<set $activeSlave.analCount += 1>>
-		<<set $analTotal += 1>>
-	<<replace "#result">>
-		You rise from your desk and move in close, wordlessly dominating her without touch, tempting and overawing her until she's desperate with desire, her prick stiff as iron. She follows you willingly into the autosurgery and even allows you to strap her in, face down, without comment. Her fuckhole welcomes your <<if $PC.dick == 1>>cock<<else>>strap-on<</if>> and she gasps with pleasure. She climaxes with indecent speed, dripping her cum onto the surgery floor. You keep fucking her, but lean forward to whisper to her that that was her last hardon. She's completely confused and says nothing, but gradually realizes what the numb feeling around her ballsack means. She @@color:gold;screams with horror@@ and @@color:mediumorchid;sobs disconsolately@@ as the autosurgery disengages from her clipped genitals and you disengage from her <<if $PC.dick == 1>>cum-filled<<else>>wilting<</if>> butthole. She gingerly stumbles back to your office with you and, without even being ordered to, arranges herself on the couch with her fuckhole ready. The gelding does affect her @@color:red;health@@ somewhat.
-	<</replace>>
-	<</click>>
-	<</if>>
-	<</if>>
- <br>
-<<elseif $activeSlave.origin is "She asked to be enslaved out of naive infatuation with you.">>
-	<<if canDoAnal($activeSlave) || canDoVaginal($activeSlave)>>
-	<<click "Let her show you what she can do">>
-	<<set $activeSlave.devotion += 4>>
-	<<set $activeSlave.trust += 4>>
-	<<set $activeSlave.analCount += 1>>
-	<<if $activeSlave.vagina == 1>>
-		<<set _temp to random(1,100)>>
-	<<else>>
-		<<set _temp to 0>>
-	<</if>>
-	<<if _temp > 50>>
-		<<set $vaginalTotal += 1>>
-		<<set $activeSlave.vaginalCount += 1>>
-	<<else>>
-		<<set $analTotal += 1>>
-		<<set $activeSlave.analCount += 1>>
-	<</if>>
-	<<replace "#result">>
-		You tell her that slaves working in your penthouse are all expected to please you, and she'll have to impress you. She smiles and even giggles a little, standing to strip off her clothes, taking her time and showing off her fresh body. She gets lewder and lewder, displaying youthful libido basking in the gaze of her crush. She slowly becomes more and more desperate to entice you, so you let her keep going out of curiosity, to see how far she'll go. She goes to the point of reclining on the couch with her legs back, spreading herself and masturbating, and when that fails to get you out of your chair, she begins to wink her <<if _temp > 50>>pussy<<else>>anus<</if>> meaningfully. She's clearly got a good idea of what many men like, and you head over and take her tight <<if _temp > 50>>pussy<<else>>asshole<</if>>. You do it gently, making sure she enjoys herself, and she becomes @@color:mediumaquamarine;very hopeful@@ that she was wrong to doubt you, and that she really can @@color:hotpink;be close to@@ the object of her infatuation. She bounces up off the couch afterward to wiggle her butt at you, and even blows you a kiss as you get back to work.
-	<</replace>>
-	<</click>>
-	<</if>>
-	<<if canDoAnal($activeSlave)>>
-	<br><<click "Make sure she knows she made a mistake">>
-	<<set $activeSlave.devotion -= 5>>
-	<<set $activeSlave.trust -= 10>>
-	<<set $activeSlave.analCount += 1>>
-		<<set $analTotal += 1>>
-	<<replace "#result">>
-		You tell her that slaves working in your penthouse are all expected to please you, and she nods eagerly. She strips, only starting to look doubtful again when you brusquely order her to hurry up. You order her get down on the ground with her face up, her shoulders against the floor; she does, and then you order her to put her legs over her head. She looks puzzled but does, flipping herself flexibly up until she's doing a shoulder stand, bent double with her crotch over her face. You stand over her and shove <<if $PC.dick == 1>>your cock<<else>>a strap-on<</if>> down and into her asshole. This is an advanced anal position and although she's clearly no anal virgin it's well beyond her. She does her best but tears begin to streak her cheeks. After a while you tire of the position and flip her over onto her face to assrape her doggy style. This allows you to whisper into her ear that her holes are your property now, to use, to abuse, or to sell. She @@color:mediumorchid;sobs in despair@@ at the latter, knowing she's @@color:gold;thrown her life away.@@
-	<</replace>>
-	<</click>>
-	<</if>>
- <br>
-<<elseif $activeSlave.origin is "She asked to be enslaved in the hope you'd treat a fellow woman well.">>
-	<<click "Build a connection with her">>
-	<<set $activeSlave.trust += 4>>
-	<<set $activeSlave.oralCount += 1>>
-		<<set $oralTotal += 1>>
-	<<replace "#result">>
-		You ask conversationally what experience she has with women. She takes a while to understand your point, but once she does, she blushes and says, "Uh, I messed around in school once or twice, but since then, I've never -" and is then quiet, because you're making out with her. She's surprised and stiffens for a moment but perceptibly thinks things through and realizes she's yours now, and then she relaxes to let you have your way. You push her boundaries pretty far, and before long you've got her down on her knees eating you out. She's badly discomfited but does her best; she's @@color:mediumaquamarine;hopeful@@ that she can do this, and slave life won't be so bad.
-	<</replace>>
-	<</click>>
-	<<if canDoAnal($activeSlave)>>
-	<br><<click "Put her in her place">>
-		You stand up and tell her to strip. She hesitates, staring at you in dawning apprehension, until she sees that you're stepping into a strap-on. She unconsciously takes a step backward, but that's as far as she gets before you cover the ground between you, grab her by the throat, and push her back until she falls onto the couch. You drag the head of the fake phallus down over her pussylips, and she shivers, but you keep going, telling her that you'll only be fucking her there when she's good. When she's bad, you'll assfuck her. Her eyes fly open and she tries to struggle, but you give her a warning slap and then push yourself home. She starts to cry, more from hopelessness than anal pain, knowing that @@color:mediumorchid;you're a slaveowner like any other,@@ more likely to @@color:gold;abuse her@@ than be sympathetic.
-	<<set $activeSlave.devotion -= 5>>
-	<<set $activeSlave.trust -= 5>>
-	<<set $activeSlave.analCount += 1>>
-		<<set $analTotal += 1>>
-	<<replace "#result">>
-	<</replace>>
-	<</click>>
-	<</if>>
- <br>
-<<elseif $activeSlave.origin is "She asked to be enslaved since she felt you were her only hope of becoming a prettier woman.">>
-	<<click "Start by fixing that voice of hers">>
-	<<replace "#result">>
-	You schedule her for some vocal surgery. You have her brought in to be inspected the next day, and though she's healing well, she's not to speak yet. She's sore enough to obey the stricture, but when she stands naked before your desk she clearly wants to communicate something. You approach her and place a finger on her fake lips, shushing her, and you tell her you understand. You kiss her and push her backward until she falls onto the couch; she smiles @@color:mediumaquamarine;trustingly@@ and pulls her legs apart and back, offering you her asshole. She has a stiff hardon, a clear indication that she's honestly @@color:hotpink;attracted to you,@@ and though she still doesn't speak, she makes a sore little whinny of pleasure when you enter her welcoming butt.
-	<</replace>>
-	<<set $activeSlave.devotion += 4>>
-	<<set $activeSlave.trust += 4>>
-	<<set $activeSlave.voice += 1>>
-	<<set $activeSlave.health -= 10>>
-	<<set $activeSlave.analCount += 1>>
-		<<set $analTotal += 1>>
-	<</click>>
-	<<if canDoAnal($activeSlave)>>
-	<br><<click "Let her know she'll have to earn her rewards">>
-	<<replace "#result">>
-	You complete the induction and then perform a thorough inspection, noting down each area in which surgery or drugs could improve her body. She understands what you're doing and can barely contain her excitement, but you tell her that she'll have to earn such improvements. Her face falls. You reassure her that it won't take the years she would have had to work to afford such things herself, but that she needs to be a good slave, and soon, for you to spend resources on her. You let her start by taking a rough buttfuck, bent over the desk. Her ass is tight and you are not merciful. She gasps and moans but takes it all the same, @@color:mediumaquamarine;trusting@@ that she'll eventually be rewarded with transformation.
-	<</replace>>
-	<<set $activeSlave.trust += 10>>
-	<<set $activeSlave.analCount += 1>>
-		<<set $analTotal += 1>>
-	<</click>>
-	<</if>>
- <br>
-<<elseif $activeSlave.origin is "She was transformed and enslaved after she fell into debt to you.">>
-	<<if canDoAnal($activeSlave)>>
-	<<click "Introduce her to getting fucked">>
-	<<replace "#result">>
-	You stand up, your <<if $PC.dick == 1>>erection<<if $PC.vagina == 1>> and the pussy beneath it<</if>><<else>>strap-on<</if>> suddenly becoming visible to her, and order her in a conversational tone of voice to kneel on the couch and spread her buttocks. The true nature of her new life crashes down on her in a moment, and she cannot decide whether to run, to rage, or to cry. You solve her dilemma for her by seizing her and flinging her toward the couch, administering practiced cracks of your palm to her ass until she complies. She sobs as she feels the burning sensation of her @@color:lime;anal virginity being taken,@@ knowing that she can now be @@color:gold;used at will@@ and is now subject to the whims of someone who has shown themselves @@color:mediumorchid;willing to rape her anus.@@
-<<set $activeSlave.devotion -= 5>>
-<<set $activeSlave.trust -= 5>>
-<<set $activeSlave.anus to 1>>
-<<set $activeSlave.analCount += 1>>
-	<<set $analTotal += 1>>
-	<</replace>>
-	<</click>>
-	<</if>>
- <br>
-<<elseif $activeSlave.origin is "She offered herself to you as a slave to escape a life of boredom.">>
-	<<if canDoAnal($activeSlave)>>
-	<<click "Make sure she enjoys her first butt stuff">>
-	<<replace "#result">>
-	You make no direct answer to her nervous question about her virgin butt, though you do wonder how she was so selfish as to be a Free Cities party girl without giving up her asshole nightly. Instead, you ask her about herself, ensuring that she learns the proper way to answer questions from her <<if $PC.title == 1>>master<<else>>mistress<</if>>. She answers readily, even when you turn the subject to her sexual experiences, and she starts to get visibly aroused. Before long, she finds herself sitting on your lap on the couch, making out with you while she gives you a handjob. She stiffens a little when you begin to play with her butthole, but you take your time. Soon she's taking a finger, and then two, and before long, she's riding <<if $PC.dick == 1>>your cock<<else>>a strap-on<</if>>. She doesn't climax to her @@color:lime;first buttsex,@@ but she is learning to @@color:mediumaquamarine;trust@@ that you won't hurt her.
-<<set $activeSlave.trust += 10>>
-<<set $activeSlave.anus to 1>>
-<<set $activeSlave.analCount += 1>>
-	<<set $analTotal += 1>>
-	<</replace>>
-	<</click>>
-	<</if>>
- <br>
-<<elseif $activeSlave.origin is "She sold herself into slavery out of fear that life on the streets was endangering her pregnancy.">>
-	<<if canDoAnal($activeSlave)>>
-	<<click "Make sure she enjoys her first anal sex">>
-	<<replace "#result">>
-	You introduce her to obedience and proper manners regarding her <<if $PC.title == 1>>master<<else>>mistress<</if>> before sending her off for a physical. That night, she's returned to your room, and finds you doing business on a tablet in bed. She looks doubtful, but obeys when you direct her to get into bed<<if $PC.dick == 0>>, even after she realizes you're wearing a strap-on<</if>>. You turn out the light and spoon her from behind, kissing her neck and ears, cupping her swollen breasts, and running your hands across her pregnant belly with its taut $activeSlave.skin skin. She's awkward at first but her body responds to the tenderness. Before long she's humping her pussy back and forth against <<if $PC.dick == 1>>your cock<<else>>the strap-on<</if>>. You tell her no, not there, and begin to gently work <<if $PC.dick == 1>>your dickhead<<else>>its tip<</if>> up her tight but relaxed ass. She's unsure of herself, but you keep her nice and relaxed. She doesn't climax to her @@color:lime;first buttsex,@@ but she is learning to @@color:mediumaquamarine;trust@@ that you won't hurt her.
-<<set $activeSlave.trust += 10>>
-<<set $activeSlave.anus to 1>>
-<<set $activeSlave.analCount += 1>>
-	<<set $analTotal += 1>>
-	<</replace>>
-	<</click>>
-	<</if>>
- <br>
-<<elseif $activeSlave.origin is "She offered herself to you as a slave to escape the hard life of a free whore.">>
-	<<click "Clean up her whorish appearance">>
-	<<replace "#result">>
-	She's totally unsurprised when you send her to the salon for a makeover. It takes several days of work before she's brought back in for another inspection; when she arrives, you wordlessly point her to a full length mirror. She sees herself without tattoos, hooker's haircut, and piercings, a conventionally pretty girl with subtle implants and a clean appearance. She gasps and covers her mouth with a hand, and then suddenly bursts into tears. "Thank you, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>," she sobs. "I never would have thought." She reaches out to touch her reflection. "I look like a nice girl." She is @@color:hotpink;grateful to you@@ for showing her this side of herself, and has @@color:mediumaquamarine;begun to trust@@ that being your slave will be less degrading than being a free prostitute.
-<<set $activeSlave.trust += 4>>
-<<set $activeSlave.devotion += 4>>
-<<set $activeSlave.boobs -= $activeSlave.boobsImplant>>
-<<set $activeSlave.boobsImplant to 0>>
-<<set $activeSlave.lips -= $activeSlave.lipsImplant>>
-<<set $activeSlave.lipsImplant to 0>>
-<<set $activeSlave.butt -= $activeSlave.buttImplant>>
-<<set $activeSlave.buttImplant to 0>>
-<<set $activeSlave.lipsPiercing to 0>>
-<<set $activeSlave.tonguePiercing to 0>>
-<<set $activeSlave.nosePiercing to 0>>
-<<set $activeSlave.eyebrowPiercing to 0>>
-<<set $activeSlave.navelPiercing to 0>>
-<<set $activeSlave.nipplesPiercing to 0>>
-<<set $activeSlave.clitPiercing to 0>>
-<<set $activeSlave.hStyle to "neat">>
-<<set $activeSlave.customTat to " ">>
-	<</replace>>
-	<</click>>
- <br>
-<<elseif $activeSlave.origin is "She sold herself into slavery to escape life on the streets.">>
-	<<click "Show off her tits">>
-	<<replace "#result">>
-	You send her out to be cleaned up and inducted, but have her brought back afterward. You point out a clothes box on the couch and tell her to get dressed, since you're about to make a tour of the club, and she'll be accompanying you. She obeys without comment, but gasps with shock to find that she's been given a string sling bikini. She climbs into it hesitantly, and finds that not only does its string bottom ride up between her pussylips, it does not cover her nipples at all: the strings part to either side of the nipples to let them stick through, bare. This can only generously be called clothing. She accepts this with an obvious internal sigh, however, and walks dutifully behind you, her bare feet slapping along as her big butt bounces and her tits constantly fall out of her strings.
-	<<if $activeSlave.behavioralFlaw != "shamefast">>
-		After a while, though, she notices that she's getting a lot of very positive attention, and even starts to strut it a little. When you get back to the penthouse, you ask her how she felt. She blushes. "Kinda hot, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>," she says, embarrassed. "I didn't think an older girl like me would get so many stares." You reach out to grope her tits, and tell her that with breasts like hers, it's not surprising. She @@color:hotpink;likes you@@ for liking her body, and has @@color:mediumaquamarine;begun to trust@@ that even though she's old, she can find a place under you.
-	<<set $activeSlave.trust += 4>>
-	<<set $activeSlave.devotion += 4>>
-	<<else>>
-		After a while, though, she notices that she's getting a lot of very positive attention, but she remains embarrassed. Her gait is clumsy and hesitant, and she almost trips over herself with mortification. When you get back to the penthouse, you ask her how she felt. She blushes furiously. "T-terrible, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>," she says with feeling. "P-please, I'll @@color:hotpink;d-do anything you want@@ @@color:gold;as long as you don't m-make me do that again.@@ Anything." She thinks frantically, obviously trying to come up with the most abject idea she can. "I'll b-be a whore! J-just as long as I can do it, you know, in a room."
-	<<set $activeSlave.trust -= 4>>
-	<<set $activeSlave.devotion += 4>>
-	<</if>>
-	<</replace>>
-	<</click>>
- <br>
-
-/*Written by DrPill, coded by Boney M*/
-<<elseif $activeSlave.origin is "She was recruited into your service by her sister.">>
-	<<click "Use her sister as an example">>
-<<set $activeSlave.devotion += 4>>
-<<set $activeSlave.trust += 4>>
-	<<replace "#result">>
-		Your new slave appears <<if $activeSlave.devotion < -10>>reluctant to assume her new duties.<<else>>unsure what her new duties are.<</if>> You gesture towards $recruiterSister.slaveName. She is <<if $recruiterSister.intelligence > 0>>bright enough<<elseif (($recruiterSister.vaginalSkill + $recruiterSister.analSkill + $recruiterSister.oralSkill) > 100)>>skilled enough<<else>>obedient enough<</if>> to understand you mean a demonstration is in order. $recruiterSister.slaveName starts things off with a <<if $recruiterSister.entertainSkill >= 100>>masterful<<elseif $recruiterSister.entertainSkill > 10>>skillful<<else>>passable<</if>> striptease, culminating in <<if ($recruiterSister.anus > 0) && ($recruiterSister.fetish != "cumslut")>>bending over<<else>>kneeling<</if>> in front of you. She eagerly moans as you enter her, begging for your seed<<if $recruiterSister.energy > 95>> like the slut she is.<<elseif $recruiterSister.whoreSkill > 30>> like the whore she is<<elseif ($recruiterSister.assignment is "serve in the master suite") || ($recruiterSister.assignment is "please you")>> like the fucktoy she is<</if>>. As you finish, she <<if $recruiterSister.fetish is "cumslut">>opens her mouth and savors your gift, thanking you once she's swallowed enough to be able to talk again.<<elseif ($recruiterSister.fetish is "buttslut") || ($recruiterSister.fetish is "submissive")>>collapses on the floor with her ass high in the air, thanking you for painting her hole white.<<else>>thanks you.<</if>> witnessing this display of servitude from her big sister @@color:hotpink;eases $activeSlave.slaveName into her new life,@@ and @@color:mediumaquamarine;gives her hope@@ she can find a place here.
-	<</replace>>
-	<</click>>
- <br>
-<<elseif $activeSlave.origin is $activeSlave.origin is "She was recruited into your service by her mother.">>
-	<<click "Use her mother as an example">>
-<<set $activeSlave.devotion += 4>>
-<<set $activeSlave.trust += 4>>
-	<<replace "#result">>
-		You gesture towards $recruiterMother.slaveName. She is <<if $recruiterMother.intelligence > 0>>bright enough<<elseif (($recruiterMother.vaginalSkill + $recruiterMother.analSkill + $recruiterMother.oralSkill) > 100)>>skilled enough<<else>>obedient enough<</if>> to understand you mean a demonstration is in order. $recruiterMother.slaveName starts things off with a <<if $recruiterMother.entertainSkill >= 100>>masterful<<elseif $recruiterMother.entertainSkill > 10>>skillful<<else>>passable<</if>> striptease, culminating in <<if ($recruiterMother.anus > 0) && ($recruiterMother.fetish != "cumslut")>>bending over<<else>>kneeling<</if>> in front of you. She eagerly moans as you enter her, begging for your seed<<if $recruiterMother.energy > 95>> like the slut she is.<<elseif $recruiterMother.whoreSkill > 30>> like the whore she is<<elseif ($recruiterMother.assignment is "serve in the master suite") || ($recruiterMother.assignment is "please you")>> like the fucktoy she is<</if>>. As you finish, she <<if $recruiterMother.fetish is "cumslut">>opens her mouth and savors your gift, thanking you once she's swallowed enough to be able to talk again.<<elseif ($recruiterMother.fetish is "buttslut") || ($recruiterMother.fetish is "submissive")>>collapses on the floor with her ass high in the air, thanking you for painting her hole white.<<else>>thanks you.<</if>> witnessing this display of servitude from her mother @@color:hotpink;eases $activeSlave.slaveName into her new life,@@ and @@color:mediumaquamarine;gives her hope@@ she can find a place here.
-	<</replace>>
-	<</click>>
- <br>
-
-<</if>>
-
 <<click "Brand her">>
 <<set $activeSlave.brand to $brandDesign>>
 <<set $activeSlave.brandLocation to $brandTarget>>
-<<set $activeSlave.devotion -= 5>>
-<<set $activeSlave.trust -= 10>>
-<<set $activeSlave.health -= 10>>
+<<set $activeSlave.devotion -= 25>>
+<<set $activeSlave.trust -= 30>>
+<<set $activeSlave.health -= 20>>
 <<replace "#result">>
-	You drag her to the body modification studio and strap her down with her $brandTarget clear and defenseless. She doesn't understand what's coming for a while, even as disinfectant is applied to her $brandTarget. She can't see the approaching brand, but eventually she feels the radiated heat on her skin and manages to get one inarticulate, wordless noise of terror out before the dreadful sizzling noise and the sweet smell of burning flesh. If she didn't know she was a slave before, @@color:mediumorchid;she does now,@@ and she's got the @@color:gold;agonizing@@ @@color:red;injury@@ to prove it.
+	You drag her to the body modification studio and strap her down with her $brandTarget clear and defenseless. She doesn't understand what's on, becoming even more confused as disinfectant is applied to her $brandTarget. She can't see the approaching brand, but eventually she feels the radiated heat on her skin and manages to get one inarticulate, wordless noise of terror out before the dreadful sizzling noise and the sweet smell of burning flesh. If she trusted you at all before, @@color:mediumorchid;she doesn't now,@@ and she's got the @@color:gold;agonizing@@ @@color:red;injury@@ to remind her should she start to forget.
 	<<if ($arcologies[0].FSSubjugationistRace is $activeSlave.race) && ($arcologies[0].FSSubjugationist > 0)>>
 		Society @@color:green;approves@@ of your purchase and branding of a inferior $activeSlave.race person; this advances the idea that $activeSlave.race people ought to be enslaved.
 		<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSSubjugationist/$FSLockinLevel)>>
@@ -802,35 +498,22 @@ You slowly strip down, gauging her reactions to your show, until you are fully n
 <</replace>>
 <</click>>
 
-<<if $seeExtreme == 1>>
-<<if $activeSlave.balls > 0>>
-<<if $activeSlave.indentureRestrictions <= 0>>
-<br><<click "Geld her">>
-<<set $activeSlave.balls to 0>>
-<<set $activeSlave.health -= 10>>
-<<set $activeSlave.trust -= 50>>
-<<replace "#result">>
-	You drag her to the remote surgery and strap her face down with her legs spread. She doesn't understand what's happening, since the anaesthetics totally deprive her of any sensation. She's so drugged and drowsy with @@color:red;surgical recovery@@ that it takes a while for her to figure out what's happened. When she does, her poor mind scarcely processes the @@color:gold;horror@@ of what's happened. She numbly carries on, terrified.
-	<<if $arcologies[0].FSGenderRadicalist != "unset">>
-		Society @@color:green;approves@@ of your promptly gelding her; this advances the idea that all societal inferiors can be made female.
-		<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSGenderRadicalist/$FSLockinLevel)>>
-		<<set $arcologies[0].FSGenderRadicalist += 0.05*$FSSingleSlaveRep>>
-	<</if>>
-<</replace>>
-<</click>>
-<</if>>
-<</if>>
-<</if>>
 <<if isFertile($activeSlave)>>
 <br><<click "Impregnate her">>
 <<set $activeSlave.preg to 1>>
 <<set $activeSlave.pregSource to -1>>
 <<replace "#result">>
-	You perform a careful medical examination to verify fertility, and then restrain her in your office with her ass in the air. Whenever you feel able, you drain your balls into her cunt, only releasing her for other duties when scans verify a fertilized ovum. She didn't properly understand the scans, so she just thought it was bound, forced sex; she won't realize what happened for some weeks at least.
+	<<if $activeSlave.pregType > 0>>
+	You don't need to perfom an exam to tell she is fertile; her nethers are swollen with need and her pussy dripping with desire<<if $activeSlave.pregType > 20>>, and her stomach is already slightly bloated with the number of fertile eggs within her womb<</if>>. She moans with pent up lust as her deeply penetrate her and begin steadily thrusting. Her tight pussy hungrily massages you dick as you near your climax, promting you to hilt yourself in her before seeding the deepest reaches of her pussy. She passed out in ecstasy, so you carry her bred body to the couch to recover and her eggs to take root. She should make the connection once her belly starts to rapidly swell with child.
+	<<else>>
+	You perform a careful medical examination to verify fertility, and then forcefully take the girl's virginity. Whenever you feel able, you drain your balls into her cunt, only allowing her to wander off when scans verify a fertilized ovum. She didn't properly understand the scans, so she just thought it was sex; she won't realize what happened for some months at least, and in the mean time, will think she is just getting fat. Though once her child starts kicking, she might make the connection between sex and pregnancy.
+	<</if>>
 	<<VaginalVCheck>>
-	<<if $arcologies[0].FSRestart != "unset">>
-		The Societal Elite @@color:green;disaprove@@ of this breach of eugenics.
+	<<if $arcologies[0].FSRestart != "unset" && $activeSlave.breedingMark == 0>>
+		The Societal Elite @@color:red;disaprove@@ of this breach of eugenics.
 		<<set $failedElite += 5>>
+	<<elseif $activeSlave.breedingMark == 1>>
+		The Societal Elite @@color:green;are pleased@@ that you are promtly putting a child in her.
 	<<elseif $arcologies[0].FSGenderFundamentalist != "unset">>
 		Society @@color:green;approves@@ of your promptly putting a new slave in her; this advances the idea that all slaves should bear their masters' babies.
 		<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSGenderFundamentalist/$FSLockinLevel)>>
@@ -840,93 +523,31 @@ You slowly strip down, gauging her reactions to your show, until you are fully n
 <</click>>
 <</if>>
 
-<<if $activeSlave.fetish != "mindbroken">>
-
 <br><<click "Break her in publicly">>
 <<replace "#result">>
-	You <<if ($activeSlave.devotion > 20) || ($activeSlave.trust < -20)>>order the obedient slave to follow you<<else>>bring the resistant slave<</if>> out into the public areas below your penthouse, shove the nude $desc over a convenient handrail, and stick <<if $PC.dick == 1>>your dick<<else>>a strap-on<</if>>
+	You escort the curious slave out into the public areas below your penthouse, shove the nude $desc over a convenient handrail, and stick <<if $PC.dick == 1>>your dick<<else>>a strap-on<</if>>
 	<<if $activeSlave.vagina >= 0>>
-		<<if $activeSlave.vagina >= 3>>
-			inside her gaping cunt, which is loose enough that the rough treatment doesn't bother her physically.
-		<<elseif $activeSlave.vagina >= 2>>
-			inside her accommodating pussy, which is welcoming enough that the rough insertion doesn't hurt her physically.
-		<<else>>
-			inside her tight little pussy, making the poor girl writhe with discomfort.
-		<</if>>
+		inside her tight little pussy, making the poor girl writhe with discomfort.
 	<<else>>
-		<<if $activeSlave.anus >= 3>>
-			inside her lewd anal slit, which is so used to being fucked that the rough treatment doesn't bother her physically.
-		<<elseif $activeSlave.anus >= 2>>
-			up her welcoming butt, which is loose enough that the rough insertion doesn't hurt her physically.
-		<<else>>
-			up her poor little butthole, making the poor girl struggle desperately with anal pain.
-		<</if>>
+		up her poor little butthole, making the poor girl struggle desperately with anal pain.
 	<</if>>
-	You take her, hard, while passersby stare at her as she gets pounded over a rail.
-	<<if $activeSlave.devotion > 20>>
-		<<if $activeSlave.fetish == "humiliation">>
-			<<if $activeSlave.fetishKnown == 0>>
-				She struggles under the stares, blushing furiously as she takes a fuck in the open. She orgasms despite herself; @@color:green;she's a humiliation fetishist!@@
-			<<set $activeSlave.fetishKnown = 1>>
-			<<else>>
-				As a humiliation fetishist, she gets off on the stares, blushing cutely as she takes a fuck in public.
-			<</if>>
-			She follows you back inside your penthouse, leaking <<if $PC.dick == 1>>your cum<<else>>lube<</if>>, @@color:hotpink;feeling like a slut.@@
-		<<set $activeSlave.devotion += 5>>
-		<<else>>
-			She takes the fuck obediently, and does her very best to ignore the stares. <<if $activeSlave.fetishKnown == 0>>It seems she<<else>>She<</if>> isn't a humiliation fetishist, but she is @@color:hotpink;willing to submit@@ to being used as a sex slave in public.
+	You take her, hard, while passersby stare at her as she gets pounded over a rail. She takes the fuck obediently, all the while observing the passing spectators. She might not be a humiliation fetishist, but she is @@color:hotpink;willing to submit@@ to being used as a sex slave in public and may even grow to enjoy it.
 		<<set $activeSlave.devotion += 4>>
+		<<if random(1,100) > 60 && $activeSlave.fetish == "none">>
+			<<set $activeSlave.fetish = "humiliation">>
+			<<set $activeSlave.fetishStrength = 20>>
 		<</if>>
-	<<else>>
-		<<if $activeSlave.fetish == "humiliation">>
-			<<if $activeSlave.fetishKnown == 0>>
-				Her struggles slowly diminish as the stares have a horribly embarrassing effect on her. She orgasms and then starts to cry, realizing what just happened; @@color:green;she's a humiliation fetishist!@@
-			<<set $activeSlave.fetishKnown = 1>>
-			<<else>>
-				As a humiliation fetishist, she can't stop herself from getting off on being fucked in public.
-			<</if>>
-			As you pull her back towards your penthouse, she leaks <<if $PC.dick == 1>>your cum<<else>>lube<</if>> and @@color:hotpink;feels like a slut.@@
-		<<set $activeSlave.devotion += 4>>
-		<<else>>
-			She takes the fuck unwillingly, crying and doing her best to ignore the stares. <<if $activeSlave.fetishKnown == 0>>It seems she<<else>>She<</if>> isn't a humiliation fetishist, and is @@color:gold;rapidly learning what it means@@ to be your sex slave.
-		<<set $activeSlave.trust -= 4>>
-		<</if>>
-	<</if>>
 	<<SimpleVCheck>>
 <</replace>>
 <</click>>
 
 <br><<click "Inseminate her">>
 <<replace "#result">>
-	You <<if ($activeSlave.devotion > 20) || ($activeSlave.trust < -20)>>lay the obedient $desc across your desk<<else>>force the resistant $desc to lie atop your desk<</if>> and gently <<if $PC.dick == 1>>slide your hard cock<<else>>push a special strap-on<</if>>	<<if $activeSlave.vagina >= 0>>inside her womanhood<<else>>up her butt<</if>>. You take her with care, enjoying her body <<if ($activeSlave.devotion > 20) || ($activeSlave.trust < -20)>>and doing your best to give her pleasure, too<<else>>without hurting her<</if>>. <<if $PC.dick == 1>>You empty your balls inside her, thrusting in as far as you can go<<else>>The strap-on contains a reservoir of faux ejaculate, and you give it to her<</if>> as you climax. When she feels the hot liquid jet into her,
-	<<if $activeSlave.devotion > 20>>
-		<<if $activeSlave.fetish == "pregnancy">>
-			<<if $activeSlave.fetishKnown == 0>>
-				she gasps with unaccustomed pleasure, and climaxes so strongly that she cries a little from the pain in her flexing abs. @@color:green;She's an impregnation fetishist!@@
-			<<set $activeSlave.fetishKnown = 1>>
-			<<else>>
-				she climaxes, her impregnation fetish displayed cutely on her face.
-			<</if>>
-			As you let her go, she feels <<if $PC.dick == 1>>your<<else>>the fake<</if>> cum dripping out of her, and she @@color:hotpink;feels like your property.@@
-		<<set $activeSlave.devotion += 5>>
-		<<else>>
-			she gasps and does her best to relax, accepting the flow. <<if $activeSlave.fetishKnown == 0>>It seems she<<else>>She<</if>> isn't an impregnation fetishist, but she is @@color:hotpink;willing to submit@@ to have her body used as your receptacle.
-		<<set $activeSlave.devotion += 4>>
-		<</if>>
-	<<else>>
-		<<if $activeSlave.fetish == "pregnancy">>
-			<<if $activeSlave.fetishKnown == 0>>
-				she shudders with a sensation of perverted pleasure, and climaxes despite all her feelings about the situation. @@color:green;She's an impregnation fetishist!@@
-			<<set $activeSlave.fetishKnown = 1>>
-			<<else>>
-				she climaxes, her impregnation fetish forcing her to feel pleasure her mind would prefer to reject.
-			<</if>>
-			As you let her go, she cries openly, <<if $PC.dick == 1>>your<<else>>the fake<</if>> cum dripping out of her, and she @@color:hotpink;feels like your property.@@
-		<<set $activeSlave.devotion += 4>>
-		<<else>>
-			she groans and struggles a little, disgusted to be filled by your fluids so immediately. <<if $activeSlave.fetishKnown == 0>>It seems she<<else>>She<</if>> isn't an impregnation fetishist, and is @@color:gold;afraid@@ that she'll be treated as nothing more than your receptacle.
-		<<set $activeSlave.trust -= 4>>
-		<</if>>
+	You lay the curious $desc across your desk and gently <<if $PC.dick == 1>>slide your hard cock<<else>>push a special strap-on<</if>> <<if $activeSlave.vagina >= 0>>inside her womanhood<<else>>up her butt<</if>>. You take her with care, enjoying her body and doing your best to give her pleasure without hurting her virgin hole. <<if $PC.dick == 1>>You empty your balls inside her, thrusting in as far as you can go<<else>>The strap-on contains a reservoir of faux ejaculate, and you give it to her<</if>> as you climax. When she feels the hot liquid jet into her,	she moans lewdly and relaxes, giving in to the tank's teachings. She might not be an impregnation fetishist, but she is @@color:hotpink;willing to submit@@ to have her body used as your receptacle and may even grow to enjoy it.
+	<<set $activeSlave.devotion += 4>>
+	<<if random(1,100) > 60 && $activeSlave.fetish == "none">>
+		<<set $activeSlave.fetish = "pregnancy">>
+		<<set $activeSlave.fetishStrength = 20>>
 	<</if>>
 	<<SimpleVCheck>>
 <</replace>>
@@ -934,95 +555,31 @@ You slowly strip down, gauging her reactions to your show, until you are fully n
 
 <br><<click "Spank her">>
 <<replace "#result">>
-	You <<if ($activeSlave.devotion > 20) || ($activeSlave.trust < -20)>>lay the obedient $desc across your knees<<else>>force the resistant $desc to lie across your knees<</if>> and run a voluptuary hand across her <<if $activeSlave.butt > 6>>jiggling<<elseif $activeSlave.butt > 3>>delightfully big<<elseif $activeSlave.butt > 1>>cute<<else>>skinny<</if>> buttocks, enjoying the way she tenses up reflexively at the extreme vulnerability of her position. She feels the change in your posture as you bring your hand back, and <<if ($activeSlave.devotion > 20) || ($activeSlave.trust < -20)>>can't stop herself from wriggling<<else>>struggles desperately<</if>> for just a moment before your palm smacks against her ass.
-	<<if $activeSlave.devotion > 20>>
-		<<if $activeSlave.fetish == "masochist">>
-			<<if $activeSlave.fetishKnown == 0>>
-				She gasps with profound shock, and you feel her whole body stiffen atop your thighs as she tries to work out what just happened. With each spank, she grows more and more aroused until she finally reaches orgasm. @@color:green;She's a pain fetishist!@@
-			<<set $activeSlave.fetishKnown = 1>>
-			<<else>>
-				She groans with guilty pleasure, feeling the pain radiate out from her buttocks with each swat, feeling it seem to circle around her hips to pool between her legs. Before long, she reaches a quivering orgasm.
-			<</if>>
-			She gets up very gingerly, but bites her lip cutely, @@color:hotpink;feeling a strange satisfaction.@@
-		<<set $activeSlave.devotion += 5>>
-		<<else>>
-			She gasps with pain, but does not object or try to escape. She accepts the spanking dutifully. You're not particularly harsh, and she gets up after you tire of swatting her bottom @@color:hotpink;without resentment@@ of this treatment.
-		<<set $activeSlave.devotion += 4>>
-		<</if>>
-	<<else>>
-		<<if $activeSlave.fetish == "masochist">>
-			<<if $activeSlave.fetishKnown == 0>>
-				She gasps with profound shock, and you feel her whole body stiffen atop your thighs as she tries to work out what just happened. She begins to cry as she realizes that having her bottom beaten is getting her horny. @@color:green;She's a pain fetishist!@@
-			<<set $activeSlave.fetishKnown = 1>>
-			<<else>>
-				She groans with unwilling pleasure, feeling the pain radiate out from her buttocks with each swat, feeling it seem to circle around her hips to pool between her legs. She does not orgasm, but feels much more pleasure than she's willing to admit.
-			<</if>>
-			When you let her up, she's sobbing, more from humiliation than pain. However, she @@color:hotpink;submits@@ to an uncomfortable groping of her buttocks, which are pleasingly warm from the spanking.
-		<<set $activeSlave.devotion += 4>>
-		<<else>>
-			She gasps with pain, and starts to wriggle off you until you pin her with your other hand. She accepts the rest of the spanking unhappily. You're not particularly harsh, and she gets up after you tire of swatting her bottom, @@color:gold;fearful@@ due to the humiliation rather than the pain.
-		<<set $activeSlave.trust -= 4>>
-		<</if>>
+	You lay the curious $desc across your knees and run a voluptuary hand across her <<if $activeSlave.butt > 6>>jiggling<<elseif $activeSlave.butt > 3>>delightfully big<<elseif $activeSlave.butt > 1>>cute<<else>>skinny<</if>> buttocks, enjoying the way she tenses up reflexively at the unfamiliar position. She feels the change in your posture as you bring your hand back, and can't stop herself from wriggling for just a moment before your palm smacks against her ass. She gasps with surprise, but does not object or try to escape. She accepts the spanking, viewing it as a game, and taunts your hand with her rear; by the end, she may even be starting to enjoy it. You're not particularly harsh, and she gets up after you tire of swatting her bottom @@color:hotpink;with a smile@@ on her face.
+	<<set $activeSlave.devotion += 4>>
+	<<if random(1,100) > 60 && $activeSlave.fetish == "none">>
+		<<set $activeSlave.fetish = "masochist">>
+		<<set $activeSlave.fetishStrength = 20>>
 	<</if>>
 <</replace>>
 <</click>>
 
 <br><<click "Tease her nipples">>
 <<replace "#result">>
-	You <<if ($activeSlave.devotion > 20) || ($activeSlave.trust < -20)>>instruct the obedient $desc<<else>>force the reluctant $desc<</if>> to lie atop your desk in front of you and go back to business. After a few minutes, you extend an idle hand and begin to fondle her <<if $activeSlave.boobs > 2000>>massive tits<<elseif $activeSlave.boobs > 400>>healthy breasts<<else>>cute little boobs<</if>>, continuing your work with your other hand. You quickly focus your fiddling on her $activeSlave.nipples nipples, the stimulation bringing them <<if ($activeSlave.devotion > 20)>>quickly erect<<else>>slowly erect despite her feelings<</if>>.
-	<<if $activeSlave.devotion > 20>>
-		<<if $activeSlave.fetish == "boobs">>
-			<<if $activeSlave.fetishKnown == 0>>
-				The slave quickly becomes aroused. Before long, an orgasm convulses her entire body, jiggling the feminine flesh under your hand delightfully. @@color:green;She's a breast fetishist!@@
-			<<set $activeSlave.fetishKnown = 1>>
-			<<else>>
-				Her breast fixation makes this teasing quite pleasurable for her, almost as good as a handjob. Before long, an orgasm convulses her entire body, jiggling the feminine flesh under your hand delightfully.
-			<</if>>
-			When you tell her to go, she carefully rolls off your desk in such a way that, @@color:hotpink;her nipples graze your cheek.@@
-		<<set $activeSlave.devotion += 5>>
-		<<else>>
-			She accepts being treated as a desktop stress relief toy. She's no breast fetishist, but she's @@color:hotpink;willing to be used@@ as a sex object.
-		<<set $activeSlave.devotion += 4>>
-		<</if>>
-	<<else>>
-		<<if $activeSlave.fetish == "boobs">>
-			<<if $activeSlave.fetishKnown == 0>>
-				The slave slowly becomes aroused despite her reluctance. Soon, she can no longer hide her horniness and begins to pant, openly enjoying the sensations. @@color:green;She's a breast fetishist!@@
-			<<set $activeSlave.fetishKnown = 1>>
-			<<else>>
-				The slave slowly becomes aroused despite her reluctance. As a breast fetishist, playing with her nipples is an excellent way to overcome her petty resistance to being a sex object.
-			<</if>>
-			When you tell her to go, she gets off your desk gingerly, since she's almost painfully aroused. @@color:hotpink;She feels like quite a slut@@ for wanting a fuck this badly after a little nipple play.
-		<<set $activeSlave.devotion += 4>>
-		<<else>>
-			She expects something worse to happen immediately, and slowly relaxes when she realizes that she's nothing more than your desktop stress relief toy, at least for now. She experiences the usual effects of nipple play, but seems @@color:gold;somewhat frightened@@ to be dehumanized so thoroughly.
-		<<set $activeSlave.devotion -= 4>>
-		<</if>>
-	<</if>>
-<</replace>>
-<</click>>
-
-<<if $activeSlave.preg > 20>>
-<br><<click "Make sure she knows pregnant women can still enjoy sex.">>
-	<<set $activeSlave.trust += 5>>
-	<<set $activeSlave.vaginalCount += 1>>
-	<<set $vaginalTotal += 1>>
-	<<if $activeSlave.fetish is "none">>
-		<<set $activeSlave.fetish to "pregnancy">>
+	You pull the curious $desc atop your desk in front of you and go back to business. After a few minutes, you extend an idle hand and begin to fondle her <<if $activeSlave.boobs > 2000>>massive tits<<elseif $activeSlave.boobs > 400>>healthy breasts<<else>>cute little boobs<</if>>, continuing your work with your other hand. You quickly focus your fiddling on her $activeSlave.nipples nipples, the stimulation bringing them quickly erect. She accepts your groping, even becoming aroused by it, but might not be a breast fetishist, though she @@color:hotpink;certainly enjoys the attention.@@ By the feel of her nipples between your fingers, she may certainly develop into one.<<if $incubatorReproductionSetting == 2 && $activeSlave.boobs > 400>> A loud moan and a distinct wetness in your hand quickly draw your attention to her. It seems @@color:green;she is lactating!@@<</if>>
+	<<set $activeSlave.devotion += 4>>
+	<<if random(1,100) > 60 && $activeSlave.fetish == "none">>
+		<<set $activeSlave.fetish = "boobs">>
+		<<set $activeSlave.fetishStrength = 20>>
 	<</if>>
-<<replace "#result">>
-	You introduce her to obedience and proper manners regarding her <<if $PC.title == 1>>master<<else>>mistress<</if>> before sending her off for a physical. That night, she's returned to your room, and finds you doing business on a tablet in bed. She looks doubtful, but obeys when you direct her to get into bed<<if $PC.dick == 0>>, even after she realizes you're wearing a strap-on<</if>>. You turn out the light and spoon her from behind, kissing her neck and ears, cupping her swollen breasts, and running your hands across her pregnant belly with its taut $activeSlave.skin skin. She's awkward at first but her body responds to the tenderness. Before long she's humping her pussy back and forth against <<if $PC.dick == 1>>your cock<<else>>the strap-on<</if>>. You begin to gently work <<if $PC.dick == 1>>your dickhead<<else>>its tip<</if>> up her used pussy. She's unsure of herself, but you keep her nice and relaxed. After several minutes of gentle loving, she's nothing but a satisfied puddle in your arms. She believes that she can @@color:mediumaquamarine;trust@@ you won't harm her or her child.
 <</replace>>
 <</click>>
-<</if>>
 
 <<if $PC.vagina == 1>>
 <<if $activeSlave.dick > 0 && canAchieveErection($activeSlave)>>
-<br><<click "Dominate her penis and demonstrate her place">>
-	<<set $activeSlave.devotion += 5>>
-	<<set $activeSlave.trust -= 3>>
+<br><<click "Dominate her penis">>
 <<replace "#result">>
-	As you inspect her, you take note of her fully functional <<if $activeSlave.dick == 1>>tiny dick<<elseif $activeSlave.dick == 2>>cute dick<<elseif $activeSlave.dick is 3>>dick<<elseif $activeSlave.dick is 4>>big dick<<elseif $activeSlave.dick is 5>>impressive dick<<elseif $activeSlave.dick is 6>>huge dick<</if>>. You roughly push her up against a wall and begin fondling her penis, grinning at the look of panic growing on her face.
+	As you inspect her, you take note of her fully functional <<if $activeSlave.dick == 1>>tiny dick<<elseif $activeSlave.dick == 2>>cute dick<<elseif $activeSlave.dick is 3>>dick<<elseif $activeSlave.dick is 4>>big dick<<elseif $activeSlave.dick is 5>>impressive dick<<elseif $activeSlave.dick is 6>>huge dick<</if>>. You gently begin fondling her penis, grinning at the look of confusion and lust growing on her face.
 <<if $activeSlave.dick == 1>>
 You scoff at her as her micropenis barely fills your palm.
 <<elseif $activeSlave.dick == 2>>
@@ -1036,28 +593,30 @@ You smile widely at her, a dangerous look in your eyes, as you bring another han
 <<elseif $activeSlave.dick is 6>>
 You grin sadistically at her as her massive dick fills both of your hands.
 <</if>>
-As she begins to moan with lust, you grip down tightly and force her to the floor. You straddle her and lower your dripping pussy onto her face<<if $PC.dick == 1>>, your erect cock coming to rest on her forehead<</if>>. You continue stroking your toy's rod as she eagerly begins eating you out. As her cock begins to throb, anticipating her upcoming orgasm, you quickly bind the base of her penis, denying her release. You grind your cunt into her face, telling her that YOU are the one who'll be orgasming here, not her. Only once you have initiated the new slave by soaking her face in your cum do you release her dick and lean back to avoid the coming blast. A few strokes later and your hand is coated in her cum. You turn around and order the exhausted girl to clean her cum off your hand<<if $PC.dick == 1>> and to finish off her twitching dick<</if>>; she @@color:hotpink;complies meekly@@, knowing you are the @@color:gold;dominant force@@ in her life now.
-<</replace>>
-<</click>>
-<</if>>
-<</if>>
-
-<<if $activeSlave.amp != 1>>
-<<if $PC.preg >= 24>>
-	<br><<click "Make her worship your pregnancy">>
-<<replace "#result">>
-	You aggressively approach $activeSlave.slaveName, forcing your pregnancy into directly into her <<if $activeSlave.height > 175>>stomach<<elseif $activeSlave.height < 155>>face<<else>>chest<</if>> until she has no choice but be pushed to the ground. Standing over her, staring her down as she peeks around your taut globe of a middle; you order her to worship your pregnancy.
-	<<if $activeSlave.fetish == "pregnancy">>
-		She eagerly complies. She begins with sucking your popped navel before running her tongue across the tuat, smooth surface of your pregnancy. Once she has finished with your belly, she lowers herself under it to begin work on your needy pussy. Before long, her overzealous efforts have you quaking in pleasure and awoken your child. Once she finishes you off, she returns to rubbing your belly, soothing your rowdy child and @@color:hotpink;solidifying her place@@ beneath you. 
-		<<set $activeSlave.devotion += 15>>
-	<<else>>
-		She shifts her gaze between your middle and your face, not sure what to do. Losing patience, you toss a tube of cream at her. She shakily massages it into your stretched skin, missing spots, much to your pleasure. With reason, you force her onto her back, turn around, and plant your needy cunt directly onto her face. Struggling to breath under your weight, she begins eating you out in desperation. After coaxing her to massage your belly as she does, you quickly climax across her face and gently lift yourself off the coughing girl. She now @@color:hotpink;understands her place in life@@ and is @@color:gold;terrified@@ about what she will have to do if she wants to survive.
-		<<set $activeSlave.devotion += 5>>
-		<<set $activeSlave.trust -= 5>>
+As she begins to moan with lust, you grip down tightly and force her to the floor. You straddle her and lower your dripping pussy onto her face<<if $PC.dick == 1>>, your erect cock coming to rest on her forehead<</if>>. You continue stroking your toy's rod as she eagerly begins eating you out. As her cock begins to throb, anticipating her upcoming orgasm, 
+<<if $incubatorMusclesSetting == 2 && $incubatorReproductionSetting > 0>>
+	she shoves you onto your back and deeply penetrates you. Before you can kick her off, she thrusts twice and unloads her pent up orgasm deep into your pussy. She pulls out with a huge smile on her face and a @@color:hotpink;deep love@@ for her mate. You glower at her as cum pools from your stretched cunt; she might not be a dom now, but she may certainly become one.
+	<<set $activeSlave.devotion += 5>>
+	<<if random(1,100) > 60 && $activeSlave.fetish == "none">>
+		<<set $activeSlave.fetish = "dom">>
+		<<set $activeSlave.fetishStrength = 20>>
 	<</if>>
+	<<if $PC.preg == 0>>
+		<<set $PC.preg = 1, $PC.pregSource = $activeSlave.ID>>
+		You groan as you rub your belly. You were fertile and are now likely @@color:lime;quite pregnant.@@
+	<</if>>
+<<else>>
+	you quickly bind the base of her penis, denying her release. You grind your cunt into her face, letting her that YOU are the one who'll be orgasming here, not her. Only once you have initiated the new slave by soaking her face in your cum do you release her dick and lean back to avoid the coming blast. A few strokes later and your hand is coated in her cum. You turn around and order the exhausted girl to clean her cum off your hand<<if $PC.dick == 1>> and to finish off her twitching dick<</if>>; she might not be a submissive, but she is @@color:hotpink;willing to let you have your way@@ with her body used and may even grow to enjoy it.
+	<<set $activeSlave.devotion += 5>>
+	<<if random(1,100) > 60 && $activeSlave.fetish == "none">>
+		<<set $activeSlave.fetish = "submissive">>
+		<<set $activeSlave.fetishStrength = 20>>
+	<</if>>
+<</if>>
 <</replace>>
 <</click>>
 <</if>>
+<</if>>
 
 <<if $PC.boobs == 1>>
 <<if $activeSlave.boobs <= (800+(200*$PC.boobsBonus)) && $activeSlave.boobs >= 300>>
@@ -1077,14 +636,28 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 <</if>>
 <</if>>
 
-<</if>> /* CLOSES MINDBROKEN CHECK FOR FETISH DISCOVERY INTROS*/
+<<if $PC.preg >= 24>>
+	<br><<click "Make her worship your pregnancy">>
+<<replace "#result">>
+	You aggressively approach $activeSlave.slaveName, forcing your pregnancy into directly into her <<if $activeSlave.height > 175>>stomach<<elseif $activeSlave.height < 155>>face<<else>>chest<</if>> until she has no choice but be pushed to the ground. Standing over her, staring her down as she peeks around your taut globe of a middle; you order her to worship your pregnancy.
+	<<if $activeSlave.fetish == "pregnancy">>
+		She eagerly complies. She begins with sucking your popped navel before running her tongue across the tuat, smooth surface of your pregnancy. Once she has finished with your belly, she lowers herself under it to begin work on your needy pussy. Before long, her overzealous efforts have you quaking in pleasure and awoken your child. Once she finishes you off, she returns to rubbing your belly, soothing your rowdy child and @@color:hotpink;solidifying her place@@ beneath you. 
+		<<set $activeSlave.devotion += 15>>
+	<<else>>
+		She shifts her gaze between your middle and your face, not sure what to do. Losing patience, you toss a tube of cream at her. She shakily massages it into your stretched skin, missing spots, much to your pleasure. With reason, you force her onto her back, turn around, and plant your needy cunt directly onto her face. Struggling to breath under your weight, she begins eating you out in desperation. After coaxing her to massage your belly as she does, you quickly climax across her face and gently lift yourself off the coughing girl. She now @@color:hotpink;understands her place in life@@ and is @@color:gold;terrified@@ about what she will have to do if she wants to survive.
+		<<set $activeSlave.devotion += 5>>
+		<<set $activeSlave.trust -= 5>>
+	<</if>>
+<</replace>>
+<</click>>
+<</if>>
 
 <<if $activeSlave.health < -20>>
 <br><<click "Address her medical issues">>
 <<set $activeSlave.health += 10>>
 <<set $activeSlave.trust += 4>>
 <<replace "#result">>
-	Since she's in rough shape, you give her a comprehensive medical exam with the help of the remote surgery. You apply care to @@color:green;address@@ some of the most outstanding concerns. Whatever gratitude she might have felt for prompt medical attention is balanced by fear of the remote surgery and the nagging (and accurate) feeling that she's being treated like livestock, but she does @@color:mediumaquamarine;begin to hope@@ she'll be well treated.
+	Since she came out of the tank rather unhealthy, so you give her a comprehensive medical exam with the help of the remote surgery. You apply care to @@color:green;address@@ some of the most outstanding concerns. After the checkup, she happily @@color:mediumaquamarine;expresses her thanks@@ for making her feel better.
 	<<if $arcologies[0].FSPaternalist != "unset">>
 		Society @@color:green;approves@@ of your promptly seeing to your stock's health; this advances the idea that all slave owners should look after their slaves.
 		<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSPaternalist/$FSLockinLevel)>>
@@ -1094,19 +667,24 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 <</click>>
 <</if>>
 
-<<if ($activeSlave.devotion > 20)>>
-<br><<click "Give her a chance to impress">>
-<<set $activeSlave.devotion += 4>>
-<<set $activeSlave.trust += 4>>
-<<set _num to random(1,100)>>
+<<if $seeExtreme == 1>>
+
+<<if $activeSlave.balls > 0>>
+<br><<click "Geld her">>
+<<set $activeSlave.balls to 0>>
+<<set $activeSlave.health -= 10>>
+<<set $activeSlave.trust -= 100>>
 <<replace "#result">>
-	She seems reasonably obedient, so you give her a chance to impress. You remain seated and offer her your <<if $PC.dick == 1>>half-erect cock<<if $PC.vagina == 1>> and ready pussy<</if>><<else>>pussy, wet with arousal at the prospect of breaking in a new slut<</if>>. She comes over obediently and gets on her knees. She works hard and is clearly doing her absolute best to please, so you let her finish you with her mouth. <<if $PC.dick == 1>><<if _num gt 20>>She looks up at you as she swallows<<elseif _num gt 40>>She even swallows your cum without being told<<elseif _num gt 60>>She smiles sloppily as your seed slowly dribbles from her mouth and down her chin<<elseif _num gt 80>>She struggles to contain your seed and makes a mess all over her face as a result<<else>>She struggles to contain your seed with her mouth and it splatters over the floor as a result<</if>><<else>>She worked her tongue hard and did her best<</if>>. You spend the rest of the day with her kneeling on a cushion next to your chair. She learns obedience, but also learns that you are @@color:mediumaquamarine;fair@@ and @@color:hotpink;reasonable.@@
+	You drag her to the remote surgery and strap her face down with her legs spread. She doesn't understand what's happening, since the anaesthetics totally deprive her of any sensation. She's so drugged and drowsy with @@color:red;surgical recovery@@ that it takes a while for her to figure out what's happened. When she does, her poor mind scarcely processes the @@color:gold;horror@@ of what's happened. She numbly carries on, terrified.
+	<<if $arcologies[0].FSGenderRadicalist != "unset">>
+		Society @@color:green;approves@@ of your promptly gelding her; this advances the idea that all societal inferiors can be made female.
+		<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSGenderRadicalist/$FSLockinLevel)>>
+		<<set $arcologies[0].FSGenderRadicalist += 0.05*$FSSingleSlaveRep>>
+	<</if>>
 <</replace>>
 <</click>>
 <</if>>
 
-<<if $seeExtreme == 1>>
-
 <<if $activeSlave.amp != 1>>
 <<if $activeSlave.indentureRestrictions <= 0>>
 <br><<click "Clip her Achilles tendons">>
@@ -1138,16 +716,6 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 <</if>>
 <</if>>
 
-<<if $activeSlave.preg > 5>>
-<br><<click "Threaten her pregnancy">>
-<<set $activeSlave.devotion += 10>>
-<<set $activeSlave.trust -= 10>>
-<<replace "#result">>
-	You place an innocuous-looking drug injector on your desk, and let her stare at it for a long moment. Then, you roll the cylinder slowly across the smooth surface, rotating it until its label comes into her view. It depicts the silhouette of a pregnant woman, with a red X over it. Abortifacients. After an instant of horrified comprehension, she flings herself at your feet, crying, begging, promising. She pledges to @@color:hotpink;submit to you,@@ <<if $PC.dick == 1>><<if $PC.vagina == 1>>eat you out, <</if>>suck your cock, take it in her pussy, take it up her ass<<else>>eat you out, worship you with her pussy, serve you with her ass<</if>>, anything, as long as @@color:gold;you don't hurt her baby.@@ You observe that she'll do all of those things, regardless of what you decide to do about her pregnancy, but for now, you'll keep her as a pregnant slut. She thanks you through her tears.
-<</replace>>
-<</click>>
-<</if>>
-
 <<if $activeSlave.balls > 0>>
 <<if $activeSlave.attrXY < 65>>
 <br><<click "Threaten her balls">>
@@ -1351,26 +919,6 @@ You <<if $activeSlave.devotion > 20>>bring her down to the studio, lay the compl
 <</click>>
 <</if>>
 
-<<if ($activeSlave.accent >= 3)>>
-<<if ($activeSlave.anus < 2)>>
-<<if ($activeSlave.intelligence < 2)>>
-<<if ($activeSlave.devotion < 10)>>
-<br><<click "Force understanding of her situation past the language barrier">>
-<<set $activeSlave.trust -= 10>>
-<<replace "#result">>
-	With a rudimentary understanding of $language, at best, it's doubtful that she understands exactly what her immediate future is likely to entail. You resolve to let her in on the secret, and stand up, drawing her attention to your hands with gestures. You point first at her, and then at your left hand, which you form into a hole shape. Then you point at yourself with your left hand, and then at your right hand, whose index and middle fingers you extend, straight and together. Then, you take your left hand hole and your right hand phallus, and fuck the former with the latter, hard enough that the sex act depicted is obviously fun for your right hand only. She watches raptly, and when comprehension dawns across her face, @@color:gold;she starts to sob.@@
-	<<if $activeSlave.vagina > -1>>
-		She indicates her vagina tentatively, almost hopefully, but you shake your head, and emphasize the circular, anus-like shape of your left hand. She cries harder.
-	<<else>>
-		She wilts, pressing her thighs together in an unconscious attempt to shield her anus from its future as a target for her <<if $PC.title == 1>>Master's<<else>>Mistress's<</if>> attentions.
-	<</if>>
-<</replace>>
-<</click>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-
 <<if ($activeSlave.anus != 0)>>
 <<if ($activeSlave.vagina > 0)>>
 	<br><<click "Use a machine on her holes">>
@@ -1424,6 +972,4 @@ You <<if $activeSlave.devotion > 20>>bring her down to the studio, lay the compl
 <</click>>
 <</if>>
 
-<</if>>
-
 </span>
\ No newline at end of file
diff --git a/src/pregmod/pRaped.tw b/src/pregmod/pRaped.tw
index 74046543858f54bfaacc989677a18582c4528580..ba0f993c787dd047165bae5f33022e0ed1c58e3a 100644
--- a/src/pregmod/pRaped.tw
+++ b/src/pregmod/pRaped.tw
@@ -134,7 +134,7 @@ Now the only question is what to do with the would be rapist. You could toss the
 <span id="result">
 <<if $cash >= $contractCost>>\
 	<br><<click "Enslave her">>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 			You complete the legalities and biometric scanning quickly and without fuss. The idiot will regret crossing you when she wakes in the penthouse for basic slave induction.
@@ -154,7 +154,7 @@ Now the only question is what to do with the would be rapist. You could toss the
 		<</if>>
 		<</if>>
 		<<if $activeSlave.publicCount>><<set $activeSlave.publicCount += 47>><<else>><<set $activeSlave.publicCount to 47>><</if>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 			You declare her holes fair game for the entire arcology. She spends a torturous day in the stocks before being hauled in for enslavement, somewhat @@color:red;the worse for wear@@ and @@color:red;acting oddly@@ due to her ordeal, bruises all over her body, cum leaking from her @@color:lime;loosened@@ anus<<if $activeSlave.vagina > -1>> and @@color:lime;fucked-out@@ pussy<</if>>. The public @@color:green;enjoys the fun.@@
@@ -169,7 +169,7 @@ Now the only question is what to do with the would be rapist. You could toss the
 		<<set $activeSlave.assignment to "be confined in the arcade">><<set $activeSlave.assignmentVisible to 0>>
 		<<set $activeSlave.choosesOwnAssignment to 0>>
 		<<set $activeSlave.sentence to 4>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 			You complete the legalities and biometric scanning quickly and cautiously. The idiot will be in for a surprise when they awake to find they can't move and a dick is in their ass.
@@ -184,11 +184,7 @@ Now the only question is what to do with the would be rapist. You could toss the
 		<<set $activeSlave.assignment to "work in the dairy">>
 		<<set $activeSlave.assignmentVisible to 0>>
 		<<set $activeSlave.choosesOwnAssignment to 0>>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $slaves.push($activeSlave)>>
-		<<set $genePool.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 			You complete the legalities and biometric scanning quickly and cautiously. The idiot will wake up <<if $dairyStimulatorsSetting > 1>>in agony as her anus takes the rectal hydration dildo<<else>>to find her chest has begun swelling with milk<</if>>.
@@ -204,7 +200,7 @@ Now the only question is what to do with the would be rapist. You could toss the
 		<<set $activeSlave.amp to 1>>
 		<<set $activeSlave.heels to 0>>
 		<<set $activeSlave.behavioralFlaw to "odd">>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 			You want her to suffer for what she tried to pull on you. You make sure she is fully awake as she is strapped into the autosurgery. You take great pleasure in watching her struggle as her limbs are taken, one by one. Of course, @@color:red;her health is affected@@ and the horrible experience has left her @@color:red;acting oddly.@@ After she has stabilized, it's off to the penthouse for basic slave induction. You'd like to see her try and touch you again without arms and legs.
@@ -217,11 +213,7 @@ Now the only question is what to do with the would be rapist. You could toss the
 		<<set $activeSlave.balls to 0>>
 		<<set $activeSlave.devotion -= 25>>
 		<<set $activeSlave.trust -= 25>>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 		You want her to suffer for what she tried to pull on you. You make sure she is fully awake as she is strapped into the autosurgery, taking the time to roughly fondle her balls. You take great pleasure in watching her struggle as her testicles are removed. Once she can stand agian, it's off to the penthouse for basic slave induction.
diff --git a/src/pregmod/pcAppearanceIntro.tw b/src/pregmod/pcAppearanceIntro.tw
index 5f77ff2e987f1da917efd250567b315520af5d6a..096e87c2516de6da8ef3a35eeb1b93bd0a970697 100644
--- a/src/pregmod/pcAppearanceIntro.tw
+++ b/src/pregmod/pcAppearanceIntro.tw
@@ -151,5 +151,5 @@ I have $PC.hColor hair.
 <br><<textbox "$PC.hColor" $PC.hColor "PC Appearance Intro">>
 
 <br><br>
-[[Finish player character customization|Intro Summary]]
+[[Finish player character customization|PC Experience Intro]]
 
diff --git a/src/pregmod/pcPregIntro.tw b/src/pregmod/pcPregIntro.tw
index dcee1c94839079eca11a028d18f17e0076de4494..4b96c3f97fa28e50a6fbb665a721847f51c0a195 100644
--- a/src/pregmod/pcPregIntro.tw
+++ b/src/pregmod/pcPregIntro.tw
@@ -36,5 +36,5 @@ I'm
 <br>
 //Hormone induced moods may alter some sex scenes, as well as change slaves' reactions to you.//
 <br><br>
-[[Confirm player character customization|PC Appearance Intro]]
+[[Confirm player character customization|PC Experience Intro]]
 
diff --git a/src/pregmod/seHuskSlaveDelivery.tw b/src/pregmod/seHuskSlaveDelivery.tw
index 4d71ebf6c4b6b18697b18473a44fad3b9e989697..34c607c858c1335e5afe33b202a24629185c407a 100644
--- a/src/pregmod/seHuskSlaveDelivery.tw
+++ b/src/pregmod/seHuskSlaveDelivery.tw
@@ -101,7 +101,7 @@ A slave come in matching fitting the description you provided.
 <span id="result">
 <<if $cash >= $slaveCost>>\
 	<<click "Accept the offered slave">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $slaveCost>>
 	<<replace "#result">>
 	She has been reasonably broken by the dealer that offered her to you. She has also picked up on the fact that she was specially selected, and is a little hopeful that this means she may be treated well. She is now awaiting your instructions.
diff --git a/src/pregmod/sePlayerBirth.tw b/src/pregmod/sePlayerBirth.tw
index 886ab02219bc3595fa8dd48a24614d6bc483ab30..aec6711515b663d7cd5796a4c55e292b951973fa 100644
--- a/src/pregmod/sePlayerBirth.tw
+++ b/src/pregmod/sePlayerBirth.tw
@@ -26,17 +26,17 @@ PC.pregSource documentation
 <<set $PC.labor = 0>>
 <<set $PC.births += 1>>
 <<if $PC.pregSource == 0>>
-	<<set $birthOther += 1>>
+	<<set $PC.birthOther += 1>>
 <<elseif $PC.pregSource == -1>>
-	<<set $birthElite += 1>>
+	<<set $PC.birthElite += 1>>
 <<elseif $PC.pregSource == -2>>
-	<<set $birthClient += 1>>
+	<<set $PC.birthClient += 1>>
 <<elseif $PC.pregSource == -3>>
-	<<set $birthMaster += 1>>
+	<<set $PC.birthMaster += 1>>
 <<elseif $PC.pregSource == -4>>
-	<<set $birthArcOwner += 1>>
+	<<set $PC.birthArcOwner += 1>>
 <<else>>
-	<<set $birthDegenerate += 1>>
+	<<set $PC.birthDegenerate += 1>>
 <</if>>
 
 <<set $babyGender to either(1,2)>>
diff --git a/src/pregmod/slaveAgeIntro.tw b/src/pregmod/slaveAgeIntro.tw
index c06e413ea167127ef5e2c14f8b785feef1442431..fffa31209c0cbf78fa92972063c00a4e266c0019 100644
--- a/src/pregmod/slaveAgeIntro.tw
+++ b/src/pregmod/slaveAgeIntro.tw
@@ -2,8 +2,8 @@
  
 Do you want to see content involving girls younger than 18 in this game?
 
-[[No.|Gender Intro][$minimumSlaveAge to 18, $pedo_mode to 0]] //All slaves will be at least 18 years old, and slavery of children will be illegal in the Free Cities.//
-Yes, I wish to see girls as young as <<textbox "$minimumSlaveAge" $minimumSlaveAge "Gender Intro">> [[Continue|Gender Intro][$pedo_mode to 0]]
-[[I just want lots of lolis.|Gender Intro][$minimumSlaveAge to 5, $pedo_mode to 1]] //Nearly all randomly generated slaves will be under the age of 18, although custom slaves and slaves related to specific events may be older.//
-[[I wish to see them grow up and become fertile.|Gender Intro][$minimumSlaveAge to 3, $pedo_mode to 0, $precociousPuberty to 1, $fertilityAge to 10, $potencyAge to 12, $seeAge to 1]] //Preset. Slaves' age will be random from minimal possible age. They can be made fertile yonger than normal puberty age (10) in some cases, and grow up naturally.//
+[[No.|PC Body Intro][$minimumSlaveAge to 18, $pedo_mode to 0]] //All slaves will be at least 18 years old, and slavery of children will be illegal in the Free Cities.//
+Yes, I wish to see girls as young as <<textbox "$minimumSlaveAge" $minimumSlaveAge "PC Body Intro">> [[Continue|PC Body Intro][$pedo_mode to 0]]
+[[I just want lots of lolis.|PC Body Intro][$minimumSlaveAge to 5, $pedo_mode to 1]] //Nearly all randomly generated slaves will be under the age of 18, although custom slaves and slaves related to specific events may be older.//
+[[I wish to see them grow up and become fertile.|PC Body Intro][$minimumSlaveAge to 3, $pedo_mode to 0, $precociousPuberty to 1, $fertilityAge to 10, $potencyAge to 12, $seeAge to 1]] //Preset. Slaves' age will be random from minimal possible age. They can be made fertile yonger than normal puberty age (10) in some cases, and grow up naturally.//
 
diff --git a/src/uncategorized/REFI.tw b/src/uncategorized/REFI.tw
index e334ef849a6bee82b434e86e3214525e95a27b9f..6ade063d4d88dc12bf95d1137b8eabe1566f383f 100644
--- a/src/uncategorized/REFI.tw
+++ b/src/uncategorized/REFI.tw
@@ -306,7 +306,7 @@ $activeSlave.slaveName hesitates before explaining herself, and the $desc is obv
 <<click "Turn her into another anal slut">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-	<<if ($activeSlave.amp == 1) && (canTalk($activeSlave) == false)>>She's mute and has no hands, so it takes a long, frustrating time for her to communicate that she would like you to do to her what you did to $subSlave.slaveName.<<elseif canTalk($activeSlave) == false>>She's mute, so she uses gestures to ask you to do to her what you did to $subSlave.slaveName.<<elseif ($activeSlave.lips > 70)>>She asks through her massive dick-sucking lips, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, can yeh do meh like yeh did $subSlave.slaveName?"<<elseif ($activeSlave.lipsPiercing+$activeSlave.tonguePiercing > 2)>>She asks through her big oral piercings, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, can yeh do meh like yeh did $subSlave.slaveName?"<<else>>She asks, "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, may you please do me like that?"<</if>> You make her state it more explicitly, so she tries again: <<if ($activeSlave.amp == 1)>> she wriggles around until her ass is pointed straight at you, lets out a deep breath, and relaxes her sphincter visibly.<<elseif canTalk($activeSlave) == false>>she tries to depict anal sex with hand gestures, then gives up and turns around and points to her ass.<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>"Please fuck mah butt, <<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>!"<<else>>"Please fuck my butt, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>!"<</if>> She squeaks with surprise as you throw her on the couch, but her eagerness is obvious. She does everything right, relaxing as you <<if ($PC.dick == 0)>>push a strap-on into<<else>>enter<</if>> her ass and enjoying herself all the way through. She climaxes hard to <<if ($PC.dick == 0)>>the phallus<<else>>the cock<</if>> in her asshole. @@color:hotpink;She has become more devoted to you,@@ and @@color:lightcoral;her sexuality now focuses on her anus.@@
+	<<if ($activeSlave.amp == 1) && (canTalk($activeSlave) == false)>>She's mute and has no hands, so it takes a long, frustrating time for her to communicate that she would like you to do to her what you did to $subSlave.slaveName.<<elseif canTalk($activeSlave) == false>>She's mute, so she uses gestures to ask you to do to her what you did to $subSlave.slaveName.<<elseif ($activeSlave.lips > 70)>>She asks through her massive dick-sucking lips, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, can yeh do meh like yeh did $subSlave.slaveName?"<<elseif ($activeSlave.lipsPiercing+$activeSlave.tonguePiercing > 2)>>She asks through her big oral piercings, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, can yeh do meh like yeh did $subSlave.slaveName?"<<else>>She asks, "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, would you please do me like that?"<</if>> You make her state it more explicitly, so she tries again: <<if ($activeSlave.amp == 1)>> she wriggles around until her ass is pointed straight at you, lets out a deep breath, and relaxes her sphincter visibly.<<elseif canTalk($activeSlave) == false>>she tries to depict anal sex with hand gestures, then gives up and turns around and points to her ass.<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>"Please fuck mah butt, <<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>!"<<else>>"Please fuck my butt, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>!"<</if>> She squeaks with surprise as you throw her on the couch, but her eagerness is obvious. She does everything right, relaxing as you <<if ($PC.dick == 0)>>push a strap-on into<<else>>enter<</if>> her ass and enjoying herself all the way through. She climaxes hard to <<if ($PC.dick == 0)>>the phallus<<else>>the cock<</if>> in her asshole. @@color:hotpink;She has become more devoted to you,@@ and @@color:lightcoral;her sexuality now focuses on her anus.@@
 	<<set $activeSlave.devotion += 4>>
 	<<set $activeSlave.analCount += 1>><<set $analTotal += 1>>
 	<<set $activeSlave.fetish to "buttslut">>
diff --git a/src/uncategorized/RESS.tw b/src/uncategorized/RESS.tw
index 9938a58f8e1cdd498a61a1ea935532a14913a768..f0a33495d797a0887c007f7801ed15ac0c7e0fd0 100644
--- a/src/uncategorized/RESS.tw
+++ b/src/uncategorized/RESS.tw
@@ -350,7 +350,7 @@ Going about your day, <<if ($activeSlave.amp != 1)>>you see <span id="name"><<pr
 
 <<case "night visit">>
 
-As you are retiring for the night, <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> <<if ($activeSlave.heels == 1) && ($activeSlave.shoes != "heels") && ($activeSlave.shoes != "boots") && ($activeSlave.shoes != "extreme heels")>>crawls<<elseif ($activeSlave.shoes is "heels") || ($activeSlave.shoes is "boots") || ($activeSlave.shoes is "extreme heels")>>totters<<else>>walks<</if>> into your bedroom and stands before you submissively. Since she's allowed to ask questions, she says <<if canTalk($activeSlave) == false || ($activeSlave.accent >= 3)>>nothing, but begs you with gestures to have sex with her.<<elseif ($activeSlave.lips > 70)>>meekly through her massive dick-sucking lips, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, muh you peese uck me?"<<elseif ($activeSlave.lipsPiercing+$activeSlave.tonguePiercing > 2)>>meekly through her inconvenient oral piercings, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, muh you peese uck me?"<<else>>meekly, "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, may you please fuck me?"<</if>>
+As you are retiring for the night, <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> <<if ($activeSlave.heels == 1) && ($activeSlave.shoes != "heels") && ($activeSlave.shoes != "boots") && ($activeSlave.shoes != "extreme heels")>>crawls<<elseif ($activeSlave.shoes is "heels") || ($activeSlave.shoes is "boots") || ($activeSlave.shoes is "extreme heels")>>totters<<else>>walks<</if>> into your bedroom and stands before you submissively. Since she's allowed to ask questions, she says <<if canTalk($activeSlave) == false || ($activeSlave.accent >= 3)>>nothing, but begs you with gestures to have sex with her.<<elseif ($activeSlave.lips > 70)>>meekly through her massive dick-sucking lips, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, muh you peese uck me?"<<elseif ($activeSlave.lipsPiercing+$activeSlave.tonguePiercing > 2)>>meekly through her inconvenient oral piercings, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, muh you peese uck me?"<<else>>meekly, "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, would you please fuck me?"<</if>>
 
 
 <<case "trusting HG">>
@@ -1167,9 +1167,9 @@ She trusts you, so she approaches you as sensually as she can manage and asks fo
 <<if canTalk($activeSlave) == false>>
 	She uses quick but submissive gestures to beg you to help her cum, pleading the special difficulties caused by her outlandish member, which she can manage most comfortably if she has both hands free for it.
 <<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>
-	"<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, may you pleathe, pleathe help me cum?" she begs submissively. "It'th nithe if I can uthe both handth on it to, um, manage thingth."
+	"<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, would you pleathe, pleathe help me cum?" she begs submissively. "It'th nithe if I can uthe both handth on it to, um, manage thingth."
 <<else>>
-	"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, may you please, please help me cum?" she begs submissively. "It's nice if I can use both hands on it to, um, manage things."
+	"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, would you please, please help me cum?" she begs submissively. "It's nice if I can use both hands on it to, um, manage things."
 <</if>>
 She's referring to the volume issue with her unnaturally massive dick. The thing is so huge and so soft that <<if $activeSlave.balls < 3>>one of her (by comparison) pathetically weak ejaculations<<elseif $activeSlave.balls < 6>>one of her comparatively normal ejaculations<<else>>a single one of even her copious ejaculations<</if>> often fails to make it all the way to the tip of her cock, making it only partway down her urethra without help.
 
@@ -1187,9 +1187,9 @@ Heading back towards your office after seeing to a minor matter, you encounter <
 <<if canTalk($activeSlave) == false>>
 	She gestures a submissive greeting and then hesitates, catching her lower lip cutely behind her upper teeth. Then she politely asks if you would milk her.
 <<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>
-	"Hi <<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>," she lisps in greeting, and then hesitates, catching her lower lip cutely behind her upper teeth. "Um, may you pleathe milk me?"
+	"Hi <<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>," she lisps in greeting, and then hesitates, catching her lower lip cutely behind her upper teeth. "Um, would you pleathe milk me?"
 <<else>>
-	"Hi <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>," she says in greeting, and then hesitates, catching her lower lip cutely behind her upper teeth. "Um, may you please milk me?"
+	"Hi <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>," she says in greeting, and then hesitates, catching her lower lip cutely behind her upper teeth. "Um, would you please milk me?"
 <</if>>
 <<if $activeSlave.fetish is "boobs">>The shamelessly breast obsessed cow rarely misses an opportunity to ask for mammary intercourse, or anything remotely like it. Something as intimate as having you tug the milk from her nipples would definitely qualify.<<else>>She's not exactly a breast fetishist, but milking is nonetheless a deeply important activity for her, emotionally; the neurochemical effects of continual lactation are strong. She's so devoted to you that she probably considers this a reassuringly intimate act.<</if>>
 
@@ -1474,7 +1474,7 @@ As you watch $activeSlave.slaveName unpleasantly retch as she<<if $cockFeeder ==
 
 <<case "subjugation blues">>
 
-It's been <<print $week-$activeSlave.weekAcquired>> week<<if $week-$activeSlave.weekAcquired > 1>>s<</if>> since you acquired <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> as your slave.  Since then she has been nothing but trouble.  She has been ungrateful, rebellious and particularly hateful toward you since you acquired her.  She often needs to be confined or forced to perform her assignments, and has little regard for your power or authority. You bring her in for inspection and she whines and squirms in resistance as you feel up her $activeSlave.nipples nipples<<if $activeSlave.preg >= 10>>, rub her pregnant belly<<elseif $activeSlave.preg > 5>>, feel the curve of her new pregnancy<</if>>, and grope her <<if $activeSlave.butt < 2>>narrow <<elseif $activeSlave.butt < 5>>average <<elseif $activeSlave.butt < 8>>plump <<else>>impressive <</if>>butt, coldly appraising her potential worth as a sexual service provider. <<if $activeSlave.actualAge < 21>>She is very young, only $activeSlave.actualAge years old, and is still very naive.  Her smooth, $activeSlave.skin skin has yet to experience the hard years of relentless sexual abuse that lie ahead of her.<<else>>At $activeSlave.actualAge years old, she should know by now how the world works, but some slaves are just too stubborn for their own good.<</if>>  Eventually, of course, even the most headstrong girls will bend to your will, but the unique social mores of your arcology and the wonders of modern surgical technology offer a prime opportunity to make a potent example of this <<if $activeSlave.age < 21>>young <<else>>obstinate <</if>>slut.  She is $activeSlave.race, and therefore not considered racially inferior or subject to extreme inequities or neglect, but like most slave characteristics, that can change.
+It's been <<print $week-$activeSlave.weekAcquired>> week<<if $week-$activeSlave.weekAcquired > 1>>s<</if>> since you acquired <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> as your slave.  Since then she has been nothing but trouble.  She has been ungrateful, rebellious and particularly hateful toward you since you acquired her.  She often needs to be confined or forced to perform her assignments, and has little regard for your power or authority. You bring her in for inspection and she whines and squirms in resistance as you feel up her $activeSlave.nipples nipples<<if $activeSlave.preg >= 10>>, rub her pregnant belly<<elseif $activeSlave.preg > 5>>, feel the curve of her new pregnancy<</if>>, and grope her <<if $activeSlave.butt < 2>>narrow <<elseif $activeSlave.butt < 5>>average <<elseif $activeSlave.butt < 8>>plump <<else>>impressive <</if>>butt, coldly appraising her potential worth as a sexual service provider. <<if $activeSlave.actualAge < 21>>She is very young, only $activeSlave.actualAge years old, and is still very naive.  Her smooth, $activeSlave.skin skin has yet to experience the hard years of relentless sexual abuse that lie ahead of her.<<else>>At $activeSlave.actualAge years old, she should know by now how the world works, but some slaves are just too stubborn for their own good.<</if>>  Eventually, of course, even the most headstrong girls will bend to your will, but the unique social mores of your arcology and the wonders of modern surgical technology offer a prime opportunity to make a potent example of this <<if $activeSlave.actualAge < 21>>young <<else>>obstinate <</if>>slut.  She is $activeSlave.race, and therefore not considered racially inferior or subject to extreme inequities or neglect, but like most slave characteristics, that can change.
 
 <<case "too thin for cum diet">>
 
@@ -1484,6 +1484,56 @@ When you finally ask her what she wants, she hestitates for a moment and then su
 <br><br>
 It's true, cum <<if $activeSlave.dietCum == 1>>supplemented <<elseif $activeSlave.dietCum == 2>>based <</if>>food can be hard on girls who are not fully habituated to being toys for sexual amusement--particularly when you've ordered them to gain weight on it.  You look at the<<if $activeSlave.preg > 10>> gravid,<</if>> skinny whore and consider your options.
 
+<<case "transition anxiety">>
+
+<span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> stumbles into your office naked for her weekly inspection, so apprehensive that she can hardly walk. She's been like this ever since she became one of your sex slaves, <<if $week-$activeSlave.weekAcquired == 0>>just this week<<elseif $week-$activeSlave.weekAcquired == 1>>just last week<<else>><<print $week-$activeSlave.weekAcquired>> weeks ago<</if>>. It's not surprising; slaves like her usually require some time and training to accept that they're slave girls. She lacks the natural attraction to men that might have made the idea more comfortable for her, and the resulting sexual anxiety combined with understandable fear of sexual use makes her extremely unhappy to be naked in front of someone she knows can fuck her at will.
+<br><br>
+She has her hands balled into fists at her sides, and clearly wants nothing more than to use them to cover her <<if $activeSlave.balls == 0>>pathetic, ballsless bitchclit<<elseif $activeSlave.aphrodisiacs > 0>>aphrodisiac-induced erection<<elseif $activeSlave.dick > 3>>impressively sized but pathetically soft dick<<else>>soft, pathetic little dick<</if>>. She knows that that's not allowed, and keeps her hands where they are, though it's a struggle. She sees you looking at her body like a slaveowner looks at one of <<if $PC.title == 1>>his<<else>>her<</if>> sex slaves, and she shivers.
+
+<<case "moist pussy">>
+
+Just as you're about to give <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> her weekly inspection, a minor business matter comes up and diverts your attention. So, for about ten minutes, she has nothing at all to do other than stand in front of your desk in your office, watching you,<<if $assistant > 0>> $assistantName's avatar,<</if>> the other slaves who come and go, and the general lewdness of the arcology, much of which is visible from right here.
+<<if ($activeSlave.attrXY > 50) && ($PC.boobs == 0)>>
+	She finds your strong body attractive, and her gaze rests most frequently on you.
+<<elseif ($activeSlave.attrXX > 50) && ($PC.boobs == 1)>>
+	She finds your prominent breasts attractive, and her gaze rests most frequently on them.
+<<elseif $activeSlave.aphrodisiacs > 0>>
+	The aphrodisiacs she's on never let her libido rest for long.
+<<elseif $activeSlave.energy > 95>>
+	Her nymphomania keeps her perpetually watchful for any sexual sights, especially any which promise her participation.
+<<elseif $activeSlave.energy > 40>>
+	Her healthy sex drive does its work, and with the constant coming and going she's not starved for things she finds attractive.
+<<else>>
+	Despite her weak libido, she's been a sex slave long enough that her body knows that it may be called upon to render sexual service soon.
+<</if>>
+The consequences of the special qualities of her womanhood soon become apparent.
+<br><br>
+Your slaves are all in the very best of vaginal health, so the scent of her female arousal is not strong. But her cunt produces such copious natural lubricant that with nothing to do but stand there, her <<if $activeSlave.births > 0>>motherly<<elseif $activeSlave.weight > 30>>thick<<elseif $activeSlave.muscles > 30>>strong<<else>>feminine<</if>> inner thighs are soon slick with a sheen of healthy pussyjuice. You notice a droplet of the stuff running down her warm $activeSlave.skin skin.
+<<if canAchieveErection($activeSlave)>>
+	Her <<if $activeSlave.dick > 3>>stiff prick<<else>>hard little dick<</if>> is sticking up from atop her pussy, leaving it nice and visible.	
+<<elseif $activeSlave.dick > 0>>
+	Her pussy is <<if $activeSlave.dick > 3>>entirely<<else>>partially<</if>> concealed by her limp dick, which is getting a good coating, since it's resting against the source.
+<</if>>
+<<if $activeSlave.labia > 0>>Her prominent labia are flushed and moist, and frame her womanhood invitingly.<</if>>
+<<if $activeSlave.clit > 0>>Her clit is rapidly becoming visible as the blood rushes there from every other part of her body.<</if>>
+<<if $activeSlave.preg > 20>>Her huge pregnancy heaves a little as she starts to breathe a bit harder, and the visual connection between her gravid belly and her needy womanhood is inescapable.<</if>>
+She's a good $desc, and remains obediently before your desk, filling your office with her subtle perfume as she waits for you.
+
+<<case "breast expansion blues">>
+
+During her routine weekly inspection, <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> cradles her huge breasts with her arms whenever the maneuvers of being inspected allow her to do so. It's not an unusual gesture for a $desc on breast growth drugs, since slaves whose tits are expanding are, by definition, not used to their weight yet. But $activeSlave.slaveName is more than just uncomfortable. She seems to regard her weighty mammaries with distaste. <<if $activeSlave.intelligence > -1>>She's not stupid, and quickly realizes<<else>>She's an idiot, but she's not dumb enough to completely miss<</if>> that you've noticed her feelings about her boobs. She bites her lower lip, not sure if she should say anything, so you follow your usual policy during slave inspections and ask her about it. <<if $PC.career == "slaver">>If you learned one thing from your long career of slave training, it's that it's<<else>>It's<</if>> typically best to suss these things out.
+<br><br>
+<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
+	"<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>," she lisps, "can I pleathe be taken off boob drugth?" She swallows, nervous that she's crossed a line, but she presses on, hefting her tits a little higher to show she's talking about them. "They're tho heavy and awkward. I'm thore every night, and my back hurts. I feel like a cow with boobth thith big,
+<<else>>
+	"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>," she mumbles, "can I please be taken off the breast expansion drugs?" She swallows, nervous that she's crossed a line, but she presses on, hefting her tits a little higher to show she's talking about them. "They're so heavy and awkward. I'm sore every night, and my back hurts. I feel like a cow with boobs this big,
+<</if>>
+and I can't imagine what it'll be like if they get any bigger."
+In one sense, it's amusing that she feels that way, because<<if ($arcologies[0].FSAssetExpansionist != "unset") || ($arcologies[0].FSTransformationFetishist != "unset") || ($arcologies[0].FSPastoralist != "unset")>> as many slaves in this very arcology know quite well,<</if>> it's possible for the miracles of modern medicine to grow a $desc's tits until they're so heavy they immobilize her completely.
+<<if $activeSlave.muscles > 5>>She has the muscles to carry her boobs around, so some of this may be simple whining.<<else>>It's not surprising that her breasts would be uncomfortable, since she lacks anything in the way of muscle tone to help support them.<</if>>
+<<if $activeSlave.lactation > 0>>She complained of feeling like a cow without detectable irony, despite the fact that her left nipple has a droplet of cream clinging to it right now.<</if>>
+She waits anxiously for your response, wondering if she'll be punished for expressing reservations about your expansion of her breasts and, comically, still cradling her heavy udders as she does so.
+
 <<default>>
 	ERROR: bad event
 <</switch>>
@@ -3959,9 +4009,9 @@ You tell her kindly that you understand, and that she'll be trained to address t
 	<</if>>
 	briefly. Comprehension dawns across her<<if $activeSlave.faceShape != "normal">> $activeSlave.faceShape<</if>> face.
 	<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
-		"Yeth <<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>," she lisps slowly, more to buy time to formulate a response than anything else. "Um. I thtill really, really want to cum, though. M-may you please fuck me? Pleathe, pleathe, <<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, pleathe
+		"Yeth <<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>," she lisps slowly, more to buy time to formulate a response than anything else. "Um. I thtill really, really want to cum, though. W-would you please fuck me? Pleathe, pleathe, <<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, pleathe
 	<<else>>
-		"Yes <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>," she says quietly, more to buy time to formulate a response than anything else. "Um. I still really, really want to cum, though. M-may you please fuck me? Please, please, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, please
+		"Yes <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>," she says quietly, more to buy time to formulate a response than anything else. "Um. I still really, really want to cum, though. W-would you please fuck me? Please, please, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, please
 	<</if>>
 	fuck
 	<<if ($activeSlave.vagina > 0) && ($activeSlave.preg > 10) && ($activeSlave.vaginalAccessory != "chastity belt")>>my pregnant pussy<<elseif ($activeSlave.vagina > 0) && ($activeSlave.vaginalAccessory != "chastity belt")>>me<<else>>my butt<</if>>."
@@ -4682,9 +4732,9 @@ You tell her kindly that you understand, and that she'll be trained to address t
 	You thank her, and tell her you're considering what to give her in return. She looks flirty, and says,
 	<<if ($activeSlave.fetish is "submissive") && (canDoAnal($activeSlave) || canDoVaginal($activeSlave))>>
 		<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
-		  "Pleathe, may you hold me down and fuck me, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
+		  "Pleathe, would you hold me down and fuck me, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
 		<<else>>
-		  "Please, may you hold me down and fuck me, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
+		  "Please, would you hold me down and fuck me, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
 		<</if>>
 		She drapes herself submissively over the couch, lest you misunderstand. You could hold her down and fuck her, and you do.
 		<<if canDoAnal($activeSlave)>>
@@ -4705,9 +4755,9 @@ You tell her kindly that you understand, and that she'll be trained to address t
 		<<set $oralTotal += 1>>
 	<<elseif ($activeSlave.fetish is "humiliation") && (canDoAnal($activeSlave) || canDoVaginal($activeSlave))>>
 		<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
-		  "Pleathe, may you fuck me in public, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
+		  "Pleathe, would you fuck me in public, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
 		<<else>>
-		  "Please, may you fuck me in public, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
+		  "Please, would you fuck me in public, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
 		<</if>>
 		She edges towards the door, lest you misunderstand. You could fuck her in public, and you do.
 		<<if canDoAnal($activeSlave)>>
@@ -4719,27 +4769,27 @@ You tell her kindly that you understand, and that she'll be trained to address t
 		<</if>>
 	<<elseif ($activeSlave.fetish is "buttslut") && canDoAnal($activeSlave)>>
 		<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
-		  "Pleathe, may you fuck my butt, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
+		  "Pleathe, would you fuck my butt, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
 		<<else>>
-		  "Please, may you fuck my butt, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
+		  "Please, would you fuck my butt, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
 		<</if>>
 		She turns halfway and shakes her rear enticingly, lest you misunderstand. You could fuck her butt, and you do.
 		<<set $activeSlave.analCount += 1>>
 		<<set $analTotal += 1>>
 	<<elseif ($activeSlave.fetish is "boobs")>>
 		<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
-		  "Pleathe, may you play with my boobth, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
+		  "Pleathe, would you play with my boobth, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
 		<<else>>
-		  "Please, may you play with my boobs, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
+		  "Please, would you play with my boobs, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
 		<</if>>
 		She sticks out her chest and bounces her breasts for you, lest you misunderstand. You could play with her boobs, and you do, managing mammary intercourse several ways.
 		<<set $activeSlave.mammaryCount += 3>>
 		<<set $mammaryTotal += 3>>
 	<<elseif ($activeSlave.fetish is "pregnancy") && canDoVaginal($activeSlave)>>
 		<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
-		  "Pleathe, may you <<if $PC.dick == 1>>fill me with your theed<<else>>fuck me<</if>>, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
+		  "Pleathe, would you <<if $PC.dick == 1>>fill me with your theed<<else>>fuck me<</if>>, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
 		<<else>>
-		  "Please, may you <<if $PC.dick == 1>>fill me with your seed<<else>>fuck me<</if>>, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
+		  "Please, would you <<if $PC.dick == 1>>fill me with your seed<<else>>fuck me<</if>>, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
 		<</if>>
 		She reclines on the couch and offers herself to you, lest you misunderstand. You could <<if $PC.dick == 1>>fill her with your seed<<else>>fuck her<</if>>, and you do.
 		<<if ($activeSlave.vagina > 0) && canDoVaginal($activeSlave)>>
@@ -4751,9 +4801,9 @@ You tell her kindly that you understand, and that she'll be trained to address t
 		<</if>>
 	<<elseif ($activeSlave.fetish is "dom") && (canDoVaginal($activeSlave) || canDoAnal($activeSlave))>>
 		<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
-		  "Pleathe, may you fuck my brainth out, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
+		  "Pleathe, would you fuck my brainth out, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
 		<<else>>
-		  "Please, may you fuck my brains out, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
+		  "Please, would you fuck my brains out, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
 		<</if>>
 		She bounces on her heels, biting her lip with anticipation. You could fuck her brains out, and you do, enjoying the dominant slave's constant sexual one-upsmanship.
 		<<if ($activeSlave.vagina > 0) && canDoVaginal($activeSlave)>>
@@ -4765,18 +4815,18 @@ You tell her kindly that you understand, and that she'll be trained to address t
 		<</if>>
 	<<elseif ($activeSlave.fetish is "sadist")>>
 		<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
-		  "Pleathe, may you let me rape thomeone, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
+		  "Pleathe, would you let me rape thomeone, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
 		<<else>>
-		  "Please, may you let me rape someone, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
+		  "Please, would you let me rape someone, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
 		<</if>>
 		Her eyes are wild. You could let her rape someone, and you do, bringing in an appropriate slave and letting her have her way with the poor girl.
 		<<set $activeSlave.penetrativeCount += 1>>
 		<<set $penetrativeTotal += 1>>
 	<<elseif ($activeSlave.fetish is "masochist") && (canDoVaginal($activeSlave) || canDoAnal($activeSlave))>>
 		<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
-		  "Pleathe, may you rape me, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
+		  "Pleathe, would you rape me, <<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>?"
 		<<else>>
-		  "Please, may you rape me, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
+		  "Please, would you rape me, <<if $PC.title == 1>>Master<<else>>Mistress<</if>>?"
 		<</if>>
 		Her eyes are hungry. You could rape her, and you do, throwing her across the couch and fucking her so hard she begs for mercy as she orgasms.
 		<<if canDoAnal($activeSlave)>>
@@ -7082,9 +7132,9 @@ She's obviously @@color:mediumaquamarine;becoming more comfortable@@ playing the
 	<<if canTalk($activeSlave) == false>>
 		She uses her one hand to rapidly spell out a polite request. She asks you to attach the rest of her limbs, too.
 	<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>
-		"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, may you pleathe attach the retht of them for me?" she lisps politely.
+		"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, would you pleathe attach the retht of them for me?" she lisps politely.
 	<<else>>
-		"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, may you please attach the rest of them for me?" she asks politely.
+		"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, would you please attach the rest of them for me?" she asks politely.
 	<</if>>
 	A transitory nervousness crosses her $activeSlave.faceShape face as she asks, but clears into @@color:mediumaquamarine;trusting happiness@@ when you nod and pick up her other arm. She tests each limb as it's attached, and then tests them all by getting up into a kneel and giving you a hug.
 	<<set $activeSlave.trust += 4>>
@@ -7167,7 +7217,7 @@ She's obviously @@color:mediumaquamarine;becoming more comfortable@@ playing the
 	<br><br>
 	"We shouldn't have come here," one of them says dully. She's wrong in that they would have had no trouble at all if they hadn't offended you, but right in that here, they put themselves entirely under your power. Tourists would never visit if this were widely known, but fortunately, you've been successful at concealing this. They begin to cry, and then to beg, and then the drones bag them and take them away.
 	<<set $cash -= 25000>>
-	<<set $startingGirlsNationality = "American">>
+	<<set $fixedNationality = "American">>
 	<<for $i to 0; $i < 3; $i++>>
 		<<display "Generate New Slave">>
 		<<set _origin = "You enslaved her for abusing " + $eventSlave.slaveName + " while she was serving the public.">>
@@ -7192,10 +7242,9 @@ She's obviously @@color:mediumaquamarine;becoming more comfortable@@ playing the
 		<<set $activeSlave.attrXY = random(60,90)>>
 		<<set $activeSlave.attrXX = random(10,20)>>
 		<<set $activeSlave.behavioralFlaw = either("bitchy", "arrogant")>>
-		<<display "Checkin Checks">>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 	<</for>>
-	<<set $startingGirlsNationality to 0>>
+	<<set $fixedNationality to 0>>
 	<br><br><span id="result2">
 	<<click "Let your public servant take revenge on them">>
 		<<replace "#result2">>
@@ -7503,6 +7552,226 @@ By the time you've finished with her sensitive ass, it shines red, and she is cr
     <</replace>>
 <</click>>
 
+<<case "transition anxiety">>
+
+<<click "Fuck her">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		You announce that you're going to fuck her <<if $activeSlave.anus == 0>>virgin <</if>>asspussy. To your complete lack of surprise, she can't hide her horror at the prospect of <<if $PC.dick == 1>>having a cock inside her<<else>>being fucked with a strap-on<</if>>, and her wide, $activeSlave.eyeColor eyes track your movements closely as you stand up and <<if $PC.dick == 1>>reveal the formidable member<<else>>don the strap-on<</if>> you're about to breed her with. You order her to kneel on the couch, which she does, @@color:gold;cringing in fear of being buttfucked, but knowing disobedience will be worse;@@ and then you order her to reach down and spread her butt for you, as wide as it'll go. She complies, <<if $activeSlave.butt > 6>>taking a handful of each massive buttock and heaving them apart to reveal her<<elseif $activeSlave.butt > 3>>pulling her plush buttocks apart<<else>>even though her cute ass doesn't have to be spread<</if>> to reveal her <<if $activeSlave.anus > 2>>whorish anal slit<<elseif $activeSlave.butt > 1>>relaxed rear hole<<else>>tight little rosebud<</if>>. You let her soak in her discomfort, <<if $PC.dick == 1>>stroking your cock gently<<else>>rubbing a little lube on the tip of your phallus<</if>> and letting her see how big it is. Her cringing even extends to her asshole, <<if $activeSlave.analArea > 3>>the huge area of crinkled skin<<elseif $activeSlave.analArea > 1>>the crinkled skin around her anus<<else>>her little pucker<</if>> tensing as she anticipates anal sex.
+		<<set $activeSlave.trust -= 3>>
+		<br><br><span id="result2">
+		<<click "Make sure she gets off on it">>
+			<<replace "#result2">>
+				You press <<if $PC.dick == 1>>yourself<<else>>your weapon<</if>> past her sphincter with care, and her posture softens a little as she realizes you aren't going to hurt her. Once you've hilted <<if $PC.dick == 1>>your cock<<else>>the strap-on<</if>> inside her, you caress her <<if $activeSlave.weight > 30>>chubby<<elseif $activeSlave.waist > 0>>wasp<<elseif $activeSlave.muscles > 30>>muscular<<elseif $activeSlave.weight > 10>>soft<<else>>thin<</if>> waist, running your hands across her skin. Then you <<if $activeSlave.clitPiercing == 3>>activate her smart frenulum piercing<<else>>secure a couple of little egg vibes to her dick<</if>>. She gasps as the vibration starts, and then gasps again as her anus tightens involuntarily with the stimulation, squeezing the <<if $PC.dick == 1>>warm penis<<else>>phallus<</if>> that fills it. She <<if $activeSlave.voice > 0>>moans openly<<else>>rasps mutely<</if>> as you pull out and then thrust into her. Much against her will, she <<if $activeSlave.balls > 0>>quickly becomes erect<<else>>starts to drip precum, which is her ballsless body's way of showing arousal<</if>>.
+				<<if $activeSlave.fetish == "buttslut">>
+				<<if $activeSlave.fetishKnown == 1>>
+					<<if $activeSlave.fetishStrength > 95>>
+						Every time she takes it up the butt, she's reminded that she's a natural buttslut, and the reminder @@color:lightsalmon;helps her relax and accept sodomy.@@
+						<<set $activeSlave.fetishStrength += 10>>
+					<<else>>
+						She knows she gets off easily on anal stimulation, but taking it like this still isn't her favorite activity. Still, the prostate stimulation does its work, and she @@color:hotpink;submits to having her favorite hole pleasured.@@
+						<<set $activeSlave.devotion += 3>>
+					<</if>>
+				<<else>>
+					You notice that she stiffens again, looking down at her traitorous member in shock at how much she enjoys the sensation of prostate stimulation. @@color:lightsalmon;She's a buttslut!@@
+					<<set $activeSlave.fetishKnown = 1>>
+				<</if>>
+				<</if>>
+				Not long after you penetrate her, she <<if $activeSlave.balls > 0>>squirts a weak ejaculation onto the couch<<else>>shivers and releases some watery fluid<</if>>. She had almost forgotten that she was being fucked like a girl, and stiffens uncomfortably when she feels you <<if $PC.dick == 1>>fill her rectum with your hot seed<<else>>grip her hips harder and shake with your own climax<</if>>. As she gets up from the couch, she seems @@color:hotpink;subdued and submissive.@@ After all, if she's submitting to you, that absolves her of responsibility for what she's becoming. 
+				<<set $activeSlave.devotion += 5>>
+				<<AnalVCheck>>
+			<</replace>>
+		<</click>>
+		<br><<click "Rape her">>
+			<<replace "#result2">>
+				You grab her hips, getting a good grip, and spear the poor $desc without any hint of mercy. She <<if $activeSlave.voice > 0>>screams in pain and fear<<else>>sucks in a great sobbing gasp<</if>>, and tries to wriggle away despite her intention of submitting to your use, but you hold her in place and rape her ass. She tries to maintain her position, crying openly, but eventually slides off her perch on the couch, pulling her hole off your <<if $PC.dick == 1>>dick<<else>>strap-on<</if>>. You grab her by <<if $activeSlave.hLength > 20>>hair<<else>>neck<</if>> and smash her face into the angle of the couch, leaving her poor butt completely vulnerable. She can't see you line up to ream her again, but she knows it's coming and cries, quivering. After a while, you haul her up to her feet and keep fucking her, the uncomfortable angle of standing anal forcing new <<if $activeSlave.voice > 0>>squeals<<else>>rasps<</if>> out of her. You pour degradation into her ear as you take your pleasure from her unhappy body, telling her that she's your fuckmeat. She believes you, and when you finally orgasm and let her slide off your hateful <<if $PC.dick == 1>>penis<<else>>strap-on<</if>>, shes @@color:gold;already terrified@@ of the next time you feel like fucking her.
+				<<set $activeSlave.trust -= 5>>
+				<<AnalVCheck>>
+			<</replace>>
+		<</click>>
+		</span>
+	<</replace>>
+<</click>><<if $activeSlave.anus == 0>> //This option will take anal virginity//<</if>>
+<br><<click "Humiliate her in public">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		You get up from behind your desk, drawing an apprehensive stare. To her bemusement, you order her to follow you and leave your office. She hurries to obey, her footsteps pattering along behind you, but they become much more hesitant as you make your way out of the penthouse and she realizes that she's about to be in public, naked. You don't bother looking back, knowing that she's sufficiently afraid of you to obey. On the border between your private domain and the public hustle and bustle of the arcology's public life, she stops for a long moment before scurrying to catch up with you, barely even noticing that @@color:hotpink;she just swallowed her sense of shame@@ to obey you and avoid punishment. You stroll along, greeting leading citizens and taking in the hum of your people. $activeSlave.slaveName grows increasingly embarrassed under the hot stares of passersby, cringing closer and closer to your protective side as she notices how many gazes rest with open hunger on her mouth, her crotch, and her ass.
+		<<set $activeSlave.devotion += 3>>
+		<br><br><span id="result2">
+		<<click "Make her perform oral on you, right here">>
+			<<replace "#result2">>
+				You reach around, place a dominanting hand on her shoulder, pull her around in front of you, and push her down to her knees. She quickly realizes what's coming, and her $activeSlave.skin cheeks blush furiously as you reveal your <<if $PC.dick == 1>>meaty dick<<else>>flushed pussy<</if>> and offer it to her. She gets busy, burying her head against you with a speed that seems surprising until it occurs to you that this allows her to hide her face. Deciding to accept this tiny compromise, you run a possessive hand <<if $activeSlave.hLength < 5>>across her smooth scalp<<elseif $activeSlave.hLength < 20>>through her short hair<<else>>through her tresses<</if>> and murmur praise for her enthusiasm. She stiffens at the implication that she wants to be <<if $PC.dick == 1>>polishing your penis<<else>>eating you out<</if>> in broad daylight, but after a slight pause she decides that this isn't bad. As <<if $PC.dick == 1>>her head continues to bob back and forth as she sucks your dick<<else>>she continues nuzzling her nose and mouth against your wet cunt<</if>>, she fails to notice her @@color:hotpink;second major submission today.@@
+				<<if $activeSlave.fetish == "humiliation">>
+				<<if $activeSlave.fetishKnown == 1>>
+					Since she has a humiliation fetish, the embarrassment has been arousing her even as it's been torturing her. Unsatisfied with just this, her need to be shamed obliges her to cock her hips and make sure onlookers can see her asspussy as she services you with her mouth.
+					<<if $activeSlave.fetishStrength > 95>>
+						@@color:lightsalmon;Her need for humiliation has deepened.@@
+						<<set $activeSlave.fetishStrength += 10>>
+					<<else>>
+						Such abject sluttery @@color:hotpink;helps convince her of her status as a slave girl.@@
+						<<set $activeSlave.devotion += 3>>
+					<</if>>
+				<<else>>
+					To your surprise, she even starts to glance around, checking to verify that she's still being watched. @@color:lightsalmon;She's a humiliation slut!@@
+					<<set $activeSlave.fetishKnown = 1>>
+				<</if>>
+				<</if>>
+				<<set $activeSlave.oralCount += 1>>
+				<<set $oralTotal += 1>>
+				<<set $activeSlave.devotion += 5>>
+			<</replace>>
+		<</click>>
+		<br><<click "Make her cum in public">>
+			<<replace "#result2">>
+				You produce three little egg vibrators, which instantly steal her anxious attention away from the passersby who stare at her. You require her to hold her dick out while you use an elastic band to attach one of the vibrators to the underside of its head. She doesn't get to touch herself much anymore, and the half-forgotten sensations of doing so almost make her forget that she's naked in public, and almost certainly about to do something very embarrassing. Then you order her to hold her dick up and place another vibrator <<if $activeSlave.scrotum > 0>>against her sensitive scrotum<<else>>against the sensitive skin where her scrotum used to be<</if>>. Finally, you order her to bend over and offer you her asshole. She obeys, with apprehension, and is actually relieved when you just place the final vibrator against, but not inside, her <<if $activeSlave.anus > 1>>asspussy<<else>>pucker<</if>>. She finds herself ordered to kneel and put her hands on her head; and ordering her to hold this position, you use remote control of the vibrators to force her to cum twice. She can't tear her eyes away from the citizens who stare and laugh as she <<if $activeSlave.balls > 0>>spurts her seed<<else>>dribbles weakly<</if>> onto the floor.
+				<<if $activeSlave.fetish == "humiliation">>
+				<<if $activeSlave.fetishKnown == 1>>
+					<<if $activeSlave.fetishStrength > 95>>
+						Though she's still unhappy about being a slave girl, @@color:lightsalmon;appetite for humiliation has deepened.@@
+						<<set $activeSlave.fetishStrength += 10>>
+					<<else>>
+						The abject humiliation slut climaxes harder each time, and can't stop herself @@color:mediumaquamarine;glancing at you with something like trust.@@
+						<<set $activeSlave.trust += 3>>
+					<</if>>
+				<<else>>
+					With a mix of horror and dawning arousal, she discovers that she enjoys the stares. @@color:lightsalmon;She's a humiliation slut!@@
+					<<set $activeSlave.fetishKnown = 1>>
+				<</if>>
+				<</if>>
+				As she follows you back to your penthouse, she seems almost cheerful, and will definitely be @@color:mediumaquamarine;more trusting of strange orders@@ in the future.
+				<<set $activeSlave.trust += 5>>
+			<</replace>>
+		<</click>>
+		</span>
+	<</replace>>
+<</click>>
+
+<<case "moist pussy">>
+
+<<click "Make love to her ready cunt">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		Her body is so perfectly made to be fucked that it's getting itself ready for you, without your even having to give the order. Deciding not to bother with verbal commands, you approach her and reach for one of her hands; she obediently extends it towards your grasp, and follows <<if ($activeSlave.energy > 40) || ($activeSlave.aphrodisiacs > 0)>>eagerly<<else>>willingly<</if>> as you pull her in for a hug<<if $activeSlave.boobs > 5000>> (cushioned by her enormous udders)<<elseif $activeSlave.dick > 5>> (made rather lewd by her enormous penis)<</if>>, kiss her deeply, and slide your arms down her <<if $activeSlave.muscles > 30>>muscular<<elseif $activeSlave.muscles > 10>>toned<<else>>soft<</if>> back to <<if $activeSlave.butt > 6>>heft her monstrous<<elseif $activeSlave.butt > 3>>squeeze her healthy<<else>>cup her cute little<</if>> buttocks. She <<if $activeSlave.voice > 0>>coos<<else>>hums mutely<</if>> at the feeling of your <<if $PC.title == 1>>strong<<else>>feminine<</if>> hands on her bottom, and presses herself against you as you rotate the two of you until you can set her butt on the edge of your desk and <<if $PC.dick == 1>>slide your big dick into her well-lubricated cunt<<else>>assertively press your own pussy against her wet cunt<</if>>.
+		<br><br>
+		She makes as if to lie back and take it, but you keep an arm around her back and hug her <<if $activeSlave.boobs > 2000>>as closely as her big breasts will permit<<else>>closer than ever<</if>>. You take your other hand and place a firm but loving grip under her chin, lifting her $activeSlave.eyeColor-eyed gaze to meet yours before kissing her again. All the while, you <<if $PC.dick == 1>>fuck her powerfully, withdrawing your dick almost all the way and then hilting yourself in her soaked slit<<else>>trib her with assurance, grinding your hips against hers and making her feel your heat<</if>>. She clings to you, accepting the closeness to her <<if $PC.title == 1>>Master<<else>>Mistress<</if>> and enjoying the loving attention, even as the extreme wetness of her cunt and your <<if $PC.dick == 1>>powerful thrusting<<else>>hungry grinding<</if>> begin to produce lewd noises from between you. Her generous natural lubrication lessens the friction and sensation a little, and you go for a long time before you both climax. You lead her into your office shower, since you're both coated in her pussyjuice<<if $PC.dick == 1>> and she's carrying a big load of your cum<<else>>, and your own<</if>>. Under the hot water, you don't even have to pull her close; @@color:hotpink;she presses herself into your arms on her own.@@
+		<<if $activeSlave.sexualQuirk == "romantic">>
+			For an incorrigible romantic like her, this encounter was perfect, and she @@color:hotpink;loves you all the more for it.@@
+			<<set $activeSlave.devotion += 3>>
+		<</if>>
+		<<set $activeSlave.devotion += 5>>
+		<<VaginalVCheck>>
+	<</replace>>
+<</click>><<if $activeSlave.vagina == 0>> //This option will take virginity//<</if>>
+<br><<click "Pound her wet pussy">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		She's so generously lubricated that she's ready to take a good hard fuck, so you decide to give her one. You point at the ground, and you don't even have to tell her to get down on all fours and get ready to take it. Your gesture says it for you, and she obediently gets down and gets in position to be bred like a bitch. She angles her hips just right to offer her cunt to you, and even reaches down to spread her<<if $activeSlave.labia > 1>> dangling<</if>> labia to invite you into her pink channel.
+		<<if $PC.dick == 1>><<if $activeSlave.vagina > 1>>She can take your big dick without a twinge<<else>>Your big dick will fill her tight cunt to its limits<</if>>, but you grab her hips and<<else>>You select a strap-on that's right at the limits of her <<if $activeSlave.vagina > 3>>cavernous<<elseif $activeSlave.vagina > 2>>big<<elseif $activeSlave.vagina > 1>>open<<else>>tight little<</if>> cunt's capacity, don it, and<</if>> mount her with such force that your first stroke brings her butt against your hips with an audible smack. There's also a deliciously lewd noise as <<if $PC.dick == 1>>your invading penis<<else>>the invading phallus<</if>> forces a little gush of pussyjuice out of her. She <<if $activeSlave.voice > 0>>shrieks, but it's a shriek<<else>>gasps, but it's a gasp<</if>> of pleasure, and your rutting is so well-lubricated that she has no trouble getting off on it. Wanting her climax, you reach around her and grab hold of her pussy, feeling the slippery fluid between your fingers and the lewd thrusting motion as <<if $PC.dick == 1>>your cock<<else>>the phallus<</if>> pistons in and out of her. That bit of stimulation is enough to tip her over, and you feel a gush of femcum against your hand as <<if $PC.dick == 1>>your dickhead<<else>>the head of the strap-on<</if>> forces an orgasm out of her g-spot. She's so discombobulated that she collapses into the puddle of pussyjuice she left on the floor when you stand up and head off for a shower, but she @@color:hotpink;crawls after you@@ as best she can on rubbery legs.
+		<<if $activeSlave.fetish == "submissive">>
+		<<if $activeSlave.fetishKnown == 1>>
+			The $desc sub loves getting fucked like that, and
+			<<if $activeSlave.fetishStrength > 95>>
+				@@color:lightsalmon;seems even more submissive@@
+				<<set $activeSlave.fetishStrength += 10>>
+			<<else>>
+				since she's fully confirmed in her status as a sub, she @@color:hotpink;glows with devotion@@
+				<<set $activeSlave.devotion += 3>>
+			<</if>>
+			 as she washes herself in the shower with you.
+		<<else>>
+			She seems utterly disspated by the fucking she just got, and may have just had the best sex of her life. @@color:lightsalmon;She's a submissive!@@
+			<<set $activeSlave.fetishKnown = 1>>
+		<</if>>
+		<</if>>
+		<<set $activeSlave.devotion += 5>>
+		<<VaginalVCheck>>
+	<</replace>>
+<</click>><<if $activeSlave.vagina == 0>> //This option will take virginity//<</if>>
+<br><<click "Feed her her own pussyjuice">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		You approach her and <<if $activeSlave.dick > 0>>reach under her girldick for her<<else>>cup her<</if>> sopping pussy. She gasps as she feels your cool grasp. Your possessive hand encompasses her vulva, with your index and ring fingers sliding around either side of her pubic mound to grip her entire womanhood.
+		<<if $activeSlave.vagina > 0>>
+			<<if $activeSlave.vagina > 0>>
+				Her relaxed pussy almost draws your middle finger inward and upward, 
+			<<else>>
+				Her pussy welcomes your middle finger,
+			<</if>>
+			and you hook it inside her body, gathering a healthy amouth of pussyjuice and brushing her g-spot.
+		<<else>>
+			You're careful not to penetrate her virgin slit with your middle finger, but you draw it up the exterior of her channel, gathering a healthy amouth of pussyjuice.
+		<</if>>
+		Then you remove your hand, though the horny $desc unconsciously tries to follow the withdrawing digits. She stares at you, waiting to see what you're going to do, and a blush begins to rise on her $activeSlave.skin cheeks as she sees you reaching for her mouth. Her <<if $activeSlave.lips > 95>>facepussy<<elseif $activeSlave.lips > 40>>pillowlike<<elseif $activeSlave.lips > 10>>soft<<else>>thin<</if>> lips part and you insert all three of your fingers into her hot mouth. She quivers at the intimacy of the gesture, and the taste of her own juices. The tremor sends a delicious motion through her <<if ($activeSlave.boobsImplant == 0) && ($activeSlave.boobs > 300)>>natural <<if $activeSlave.boobs > 2000>>udders<<else>>breasts<</if>><<elseif $activeSlave.boobsImplant > 0>>fake tits<<elseif canAchieveErection($activeSlave)>>stiff prick<<elseif $activeSlave.scrotum > 4>>dangling balls<<elseif $activeSlave.dick > 0>>limp bitchclit<<elseif $activeSlave.weight > 30>>chubbiness<<else>>body<</if>>. You keep your fingers where they are until she's licked them really clean; her hot tongue runs repeatedly between each of your digits<<if $activeSlave.tonguePiercing > 0>> and the smooth hardness of her tongue piercing brushes against them<</if>>. She <<if $activeSlave.voice > 0>>moans whorishly<<else>>begins to pant<</if>> when you go back for more, and the third time you harvest her own pussyjuice to feed it to her, she orgasms, adding some femcum to her next little meal licked off your fingers. Her eyes shine with @@color:mediumaquamarine;gratitude and trust.@@
+		<<set $activeSlave.trust += 5>>
+	<</replace>>
+<</click>>
+
+<<case "breast expansion blues">>
+
+<<click "Let her know she'll be growing as fast as possible">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		Rather than punishing her directly, you address yourself to your personal assistant. You order <<if $assistant > 0>>her<<else>>it<</if>> to make a note in $activeSlave.slaveName's drug schedule that she's to remain on a breast expansion regime until further notice. The $desc's face falls as she hears this, and $assistantName doesn't help matters by
+		<<if $assistant == 0>>
+			confirming the order in disturbingly clinical tones.
+		<<elseif $assistantAppearance is "monstergirl">>
+			using her avatar's tentacle hair to caress her own tits as she concurs in disturbingly kind tones.
+		<<elseif $assistantAppearance is "shemale">>
+			shaking her avatar's enormous endowments, making a lewd comment, and then giving herself a titjob.
+		<<elseif $assistantAppearance is "amazon">>
+			observing that a good slave girl should have big tits, since strong warriors like fertile, big-boobed girls back home to breed with.
+		<<elseif $assistantAppearance is "businesswoman">>
+			having her avatar give $activeSlave.slaveName a disturbingly appraising glance, as though she and her breasts are an interesting entry on a balance sheet.
+		<<elseif $assistantAppearance is "schoolgirl">>
+			bending her avatar over to show off its cleavage, and then giving her tits a jiggle, as though the point wasn't clear enough already.
+		<<elseif $assistantAppearance is "goddess">>
+			hefting her own motherly breasts and telling $activeSlave.slaveName that she should be happy, since bigger breasts are a sign of health and fertility.
+		<<else>>
+			purring that she'd love to.
+		<</if>>
+		You talk through the $activeSlave.slaveName's medical condition with her, and give her a <<if $PC.career == "medicine">>personal examination with the speed and accuracy of years of general practice<<else>>thorough exam<</if>>. Once this is done, you give $assistantName technical directions to make minor changes to $activeSlave.slaveName's drug regime, designed to make her @@color:lime;breasts grow just slightly faster.@@ The effect is minimal, but the point is made. She's still not happy to be transformed into a big-breasted sex slave, but she's relieved that was her only punishment for expressing her unhappiness about it.
+		<<set $activeSlave.boobs += 100>>
+	<</replace>>
+<</click>>
+<br><<click "Praise her breasts and reassure her">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		You decide to reassure her, and sit her on your lap. <<if $activeSlave.height > 185>>She's a big girl, and has trouble fitting there, but you put her there anyway, enjoying the absurdity.<<elseif $activeSlave.preg > 10>>Her pregnancy is very apparent to you in this posture, and she's quite aware of it too.<<elseif $activeSlave.butt > 3>>Her big soft butt is nice and comfortable on your thighs.<<else>>She's hesitant, but obeys anyway.<</if>> Pulling her back against your <<if $PC.boobs == 1>>own bosom<<else>>muscular chest<</if>>, you reach around her and take over the breast-cradling responsibilities. You say nothing for a while, just hefting her weighty udders, rolling them from side to side slightly. After letting her get used to the gentle treatment, you tell her that you're her owner, and you find big breasts very attractive. You tell her that you understand that they can be uncomfortable at times, but you expect her to tolerate that without complaint. It isn't easy to be pretty, but it's easier to be a pretty slave than to be a homely one. This last point affects her, and she seems to @@color:mediumaquamarine;take heart in the idea that you're improving her,@@ at least from your perspective. After all, she's sitting atop <<if $PC.dick == 1>>your hard dick, which she can definitely feel<<else>>your hot cunt, which she can probably detect<</if>> through your clothes. She does understand that having her <<if $PC.title == 1>>Master<<else>>Mistress<</if>> enjoy touching her boobs will be advantageous to her.
+		<<set $activeSlave.trust += 5>>
+	<</replace>>
+<</click>>
+<br><<click "Weight her breasts as punishment">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		You announce that you're resolved to continue growing her breasts, and they need to be stretched out to accomodate the growth. The statement is absurd, but she's experienced enough to know not to question it, and to @@color:gold;be afraid.@@ She's right to fear. You secure her with her hands over her head, using the wrist shackles placed high on the office walls for this purpose. Then you
+		<<if $activeSlave.nipples == "inverted">>cruelly pop her inverted nipples out and<</if>>
+		<<if $activeSlave.nipplesPiercing == 0>>
+			attach a clip to each of <<if $activeSlave.nipples == "inverted">>them<<else>>her nipples<</if>>. The clips aren't painful, not yet, but they're very robust, and the reason is immediately apparent to her.
+		<<elseif $activeSlave.nipplesPiercing == 1>>
+			remove her nipple piercings, one by one, and replace them with big rings. Then you give each of them a tug to ensure it's ready to bear some serious pulling.
+		<<else>>
+			give each of her nipple rings a tug to ensure it's ready to bear some serious pulling.
+		<</if>>
+		You hang a weight from each, eliciting a moan of pain. $activeSlave.slaveName struggles against the restraints that hold her hands up high, desperately trying to find a comfortable way to stand, but it's impossible and the motion sets her udders swaying, making the weights pulling at her nipples even more uncomfortable.
+		<<switch $activeSlave.boobShape>>
+		<<case "perky">>
+			Her perky tits do their best to retain their pointy shape despite the tugging.
+		<<case "downward-facing">>
+			The nipples that cap her downward-facing udders are tugged even farther towards the ground.
+		<<case "torpedo-shaped">>
+			Her torpedos are long enough that the weights are a long way from her chest, allowing them to tug her nipples a long way down.
+		<<case "wide-set">>
+			Her wide-set its are dragged together for once as their nipples are tugged downward.
+		<<case "saggy">>
+			Her poor, saggy boobs cause her real trouble, letting the weights tug her nipples quite a ways down.
+		<<default>>
+			Her heavy breasts let the weights tug her nipples down to face at the ground.
+		<</switch>>
+		The first time she tries begging, you add another weight to each breast, which drives her over the edge into open crying. You leave her there for a while, letting anyone who comes into the office experience the sight of $activeSlave.slaveName alternately sobbing, trying not to sob because doing so jiggles her boobs, and then sobbing again because her boobs hurt.
+		<<set $activeSlave.trust -= 5>>
+	<</replace>>
+<</click>>
+
 <<default>>
 	ERROR: bad event
 <</switch>>
diff --git a/src/uncategorized/RESSTR.tw b/src/uncategorized/RESSTR.tw
index a5b31c0f708e27847cdbbe4bdaf7c3d3ee4c8cfe..19dec1bfe4a90cb185c02acb9bfea8322322f736 100644
--- a/src/uncategorized/RESSTR.tw
+++ b/src/uncategorized/RESSTR.tw
@@ -6,58 +6,110 @@
 <<set $activeSlave to $eventSlave>>
 <<if $seeImages == 1>><<SlaveArt $activeSlave 2 0>><</if>>
 <<SlaveTitle $activeSlave>>
+<<Enunciate $activeSlave>>
 
 <<switch $RESSTRevent>>
 
-<<case "transition anxiety">>
+<<case "gaped asshole">>
 
-<span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> stumbles into your office naked for her weekly inspection, so apprehensive that she can hardly walk. She's been like this ever since she became one of your sex slaves, <<if $week-$activeSlave.weekAcquired == 0>>just this week<<elseif $week-$activeSlave.weekAcquired == 1>>just last week<<else>><<print $week-$activeSlave.weekAcquired>> weeks ago<</if>>. It's not surprising; slaves like her usually require some time and training to accept that they're slave girls. She lacks the natural attraction to men that might have made the idea more comfortable for her, and the resulting sexual anxiety combined with understandable fear of sexual use makes her extremely unhappy to be naked in front of someone she knows can fuck her at will.
+You encounter <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> at the beginning of her day, as she finishes her morning ablutions and heads off to <<if $activeSlave.clothes != "no clothing">>get dressed<<else>>her assignment, since she's not allowed clothes and therefore doesn't need to dress<</if>>. She seems happy today, and her $activeSlave.skin body glows with warmth and cleanliness from the hot shower. When she sees you, she greets you properly, yet postively, smiling at you and <<if $activeSlave.boobs > 3000>>presenting her enormous breasts<<elseif $activeSlave.lips > 70>>pursing her huge lips<<elseif $activeSlave.boobs > 800>>bouncing her big breasts<<elseif $activeSlave.lips > 20>>pursing her pretty lips<<else>>sticking out her chest<</if>> in an automatic gesture of easy sexual availability. Suddenly, she remembers something, and looks thoughtful. Since she's so trusting, she asks you the question that just occurred to her.
 <br><br>
-She has her hands balled into fists at her sides, and clearly wants nothing more than to use them to cover her <<if $activeSlave.balls == 0>>pathetic, ballsless bitchclit<<elseif $activeSlave.aphrodisiacs > 0>>aphrodisiac-induced erection<<elseif $activeSlave.dick > 3>>impressively sized but pathetically soft dick<<else>>soft, pathetic little dick<</if>>. She knows that that's not allowed, and keeps her hands where they are, though it's a struggle. She sees you looking at her body like a slaveowner looks at one of <<if $PC.title == 1>>his<<else>>her<</if>> sex slaves, and she shivers.
+"<<Master>>," she <<say>>s, "may I have my a<<ss>>hole tightened?"
+<br><br>
+There's no trace of awareness on her face of the open lewdness of the question; she's <<if $activeSlave.career == "a bioreactor">>spent time in an industrial Dairy with a phallus the size of a horse's pounding her ass day and night<<elseif ($activeSlave.career == "a slave") || ($week-$activeSlave.weekAcquired > 50)>>been a sex slave so long that she's completely internalized the idea of her ass being a sex organ<<elseif $activeSlave.analCount > 2000>>had her ass fucked so many times that she thinks of it as an inherently sexy thing<<else>>so devoted to you that she's made a conscious effort to think of her ass as sexy<</if>>. She continues in her <<if $activeSlave.voice == 1>>deep<<elseif $activeSlave.voice == 2>>soft<<else>>bubblegum bimbo's<</if>> voice, <<say>>ing, "It'<<s>> not //bad.// It'<<s>> ea<<s>>y to take anything up it. And when I walk I can feel my anal <<s>>lit sort of working around back there, which is kind of fun. But I wa<<s>> just thinking, a<<s>> I was washing my a<<ss>>pu<<ss>>y. It'd be ni<<c>>e
+<<switch $activeSlave.fetish>>
+<<case "submissive">>
+	to feel ju<<s>>t a little afraid when I'm on my fa<<c>>e and about to get fucked.
+<<case "cumslut">>
+	to be able to keep loads of cum in my a<<ss>> for later, in<<s>>tead of having them ju<<s>>t drip right out.
+<<case "buttslut">>
+	to be able to feel a little more <<s>>en<<s>>ation back there again. Butt<<s>>ex is <<s>>till fun and ab<<s>>olutely my favorite thing, but I remember it being even better.
+<<case "masochist">>
+	if I could feel anal pain again. That burning feeling u<<s>>ed to be one of my favorite<<s>>.
+<<default>>
+	to be able to be a better anal lover. I do my be<<s>>t, but I can't <<s>>queeze very well any more.
+<</switch>>
+May I?" She spins, bending at the waist<<if $activeSlave.butt > 6>> and prising her monstrous buttocks apart<<elseif $activeSlave.butt > 3>> spreading her healthy buttocks<</if>> to reveal her gaping anus. It could indeed benefit from surgical repair.
+
+<<case "passing declaration">>
+
+As you manage your empire from your office, a constant traffic of slaves passes by its door. The glass walls allow a good view of them, and since you naturally own what you find appealing, the passing girls often draw your eye. For example, this morning you notice <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> almost bounce into view. She's physically fit, at a healthy weight, <<if $activeSlave.physicalAge > 35>>and is getting such excellent modern medical care that despite her age, she has the energy of a teenager<<elseif $activeSlave.physicalAge > 19>>is full of youth and vigor, and is in truly perfect health due to the miracles of modern medicine<<else>>and is a teenager, not to mention the perfect health she owes to the miracles of modern medicine<</if>>. <<if $activeSlave.energy > 95>>Apart from her absurd sex drive<<elseif $activeSlave.energy > 40>>In addition to her very healthy libido<<else>>Despite her mediocre libido<</if>>, she's overflowing with energy. She half-runs, half-skips down the hallway, slowing in the doorway as she feels your gaze. Without stopping, she turns to meet your eyes, winks trustingly, and bursts out, "Hi <<Master>>! Love you!" Then she continues on her merry way.
+<br><br>
+Someone's a happy $desc today.
 
-<<case "moist pussy">>
+<<case "ara ara">>
 
-Just as you're about to give <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> her weekly inspection, a minor business matter comes up and diverts your attention. So, for about ten minutes, she has nothing at all to do other than stand in front of your desk in your office, watching you,<<if $assistant > 0>> $assistantName's avatar,<</if>> the other slaves who come and go, and the general lewdness of the arcology, much of which is visible from right here.
-<<if ($activeSlave.attrXY > 50) && ($PC.boobs == 0)>>
-	She finds your strong body attractive, and her gaze rests most frequently on you.
-<<elseif ($activeSlave.attrXX > 50) && ($PC.boobs == 1)>>
-	She finds your prominent breasts attractive, and her gaze rests most frequently on them.
-<<elseif $activeSlave.aphrodisiacs > 0>>
-	The aphrodisiacs she's on never let her libido rest for long.
-<<elseif $activeSlave.energy > 95>>
-	Her nymphomania keeps her perpetually watchful for any sexual sights, especially any which promise her participation.
-<<elseif $activeSlave.energy > 40>>
-	Her healthy sex drive does its work, and with the constant coming and going she's not starved for things she finds attractive.
+Passing by the kitchen in the morning, you take a moment to listen to the low hum of your slaves chatting as they <<if $feeder != 0>>wait their turn at the phallic feeders<<else>>drink their breakfasts<</if>>. <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> is nearest the door, and you overhear her <<if $activeSlave.voice == 1>>low<<elseif $activeSlave.voice == 2>>pretty<<else>>high<</if>> voice clearly as she expresses confusion to another slave. "I don't under<<s>>tand it," she <<say>>s. Why are so many men intere<<s>>ted in an old <<s>>lave like me? I never got thi<<s>> much attention when I wa<<s>> free! Now <<if $activeSlave.assignment == "whore">>guy<<s>> line up to pay<<else>>every guy I approach want<<s>><</if>> to fuck me!"
+<br><br>
+<<if $arcologies[0].FSMaturityPreferentialist != "unset">>
+	"It's different here," the other slave explains. "Almost everyone here has a thing for older women. MILFs get all the attention."
+<<elseif ($arcologies[0].FSGenderRadicalist != "unset") && ($activeSlave.dick > 0)>>
+	<<if $activeSlave.vagina > -1>>
+		"Well, you're a futa," the other slave explains. "A chick with a dick. Everyone here is going to want to fuck you, since you've got both."
+	<<elseif $activeSlave.balls > 0>>
+		"Well, I bet you cum when they fuck you," the other slave explains. "They love it when you do that here."
+	<<else>>
+		"You've got a soft girldick," the other slave explains. "That's like an advertisement that you love it up the butt, here."
+	<</if>>
+<<elseif ($arcologies[0].FSAssetExpansionist != "unset") && ($activeSlave.boobs > 4000)>>
+	"It's your boobs," the other slave explains. "There's no such thing as too big, here. Everyone who sees your boobs here is going to want to fuck you."
+<<elseif ($arcologies[0].FSTransformationFetishist != "unset") && ($activeSlave.boobsImplant > 1000)>>
+	"It's your fake tits," the other slave explains. "They love how fake they look, here. If you look like a bimbo, they don't care if you're a little mature."
+<<elseif ($arcologies[0].FSSlimnessEnthusiast != "unset") && ($activeSlave.boobs < 800) && ($activeSlave.butt < 3)>>
+	"You're so slim," the other slave explains. "Everyone here loves slender girls. They don't care that you're a little mature; they think you're hot."
+<<elseif ($arcologies[0].FSBodyPurist != "unset") && ($activeSlave.boobsImplant == 0) && ($activeSlave.health > 50)>>
+	"It's how healthy you are, and your natural boobs," the other slave explains. "You look good and natural, and everyone likes that here, especially if you're mature."
+<<elseif $activeSlave.face > 2>>
+	"It might have something to do with how incredibly beautiful you are," the other slave explains sarcastically. "Come on, you could be a model. Of course they want you."
+<<elseif $activeSlave.boobs > 4000>>
+	"It might have something to do with the fact that your tits are bigger than your head," the other slave explains sarcastically. "You look like a teenager's wet dream."
+<<elseif $activeSlave.face > 0>>
+	"You're very pretty," the other slave explains reassuringly. "Come on, you are. It's not surprising that guys want you."
 <<else>>
-	Despite her weak libido, she's been a sex slave long enough that her body knows that it may be called upon to render sexual service soon.
+	"Is it really that surprising?" the other slave asks rhetorically. "Guys like sex. You're sex. Why shouldn't they like you? I bet fucking you feels great."
 <</if>>
-The consequences of the special qualities of her womanhood soon become apparent.
+There's a pause, and then the other slave continues in a more serious tone, asking, "You're not, like, unhappy with that, are you? It's really good for a slave to be in demand, you know."
 <br><br>
-Your slaves are all in the very best of vaginal health, so the scent of her female arousal is not strong. But her cunt produces such copious natural lubricant that with nothing to do but stand there, her <<if $activeSlave.births > 0>>motherly<<elseif $activeSlave.weight > 30>>thick<<elseif $activeSlave.muscles > 30>>strong<<else>>feminine<</if>> inner thighs are soon slick with a sheen of healthy pussyjuice. You notice a droplet of the stuff running down her warm $activeSlave.skin skin.
-<<if canAchieveErection($activeSlave)>>
-	Her <<if $activeSlave.dick > 3>>stiff prick<<else>>hard little dick<</if>> is sticking up from atop her pussy, leaving it nice and visible.	
-<<elseif $activeSlave.dick > 0>>
-	Her pussy is <<if $activeSlave.dick > 3>>entirely<<else>>partially<</if>> concealed by her limp dick, which is getting a good coating, since it's resting against the source.
+"Oh no, I didn't mean it like that," replies $activeSlave.slaveName hurriedly.
+<<if $activeSlave.energy > 80>>
+	"I'm <<s>>o horny all the time, it'<<s>> good. I'd probably go crazy if I didn't get that much attention. Whenever anyone'<<s>> done with me I can't wait for the next.
+<<elseif $activeSlave.fetish == "humiliation">>
+	"It's embarra<<ss>>ing, but I, um, really like being <<s>>o popular in public, um, like that. Where everyone can <<s>>ee.
+<<elseif $activeSlave.devotion > 50>>
+	"I really want to do well, and it feel<<s>> good that I'm able to help.
+<<elseif $activeSlave.devotion > 20>>
+	"I, um, know I have to. And it'<<s>> not bad, I mean, it'<<s>> okay.
+<<else>>
+	"I know it mean<<s>> I'm worth something. It'<<s>> rea<<ss>>uring, and I remind my<<s>>elf of it whenever I get <<s>>cared about being a <<s>>lave, you know.
+<</if>>
+I didn't mean to <<s>>ound con<<c>>eited, either. I gue<<ss>> I'm <<s>>till getting u<<s>>ed to life here, that'<<s>> all. <<S>>ometime<<s>> I think like I'm not, um, here, and I'm <<s>>urpri<<s>>ed so many people want me. It's kind of ni<<c>>e, actually," she <<say>>s with some self-confidence.
+<<if $activeSlave.fetish == "humiliation">>
+<<if $activeSlave.fetishKnown == 0>>
+	It sounds like she has a @@color:lightsalmon;humiliation fetish!@@
+	<<set $activeSlave.fetishKnown == 1>>
+<</if>>
 <</if>>
-<<if $activeSlave.labia > 0>>Her prominent labia are flushed and moist, and frame her womanhood invitingly.<</if>>
-<<if $activeSlave.clit > 0>>Her clit is rapidly becoming visible as the blood rushes there from every other part of her body.<</if>>
-<<if $activeSlave.preg > 20>>Her huge pregnancy heaves a little as she starts to breathe a bit harder, and the visual connection between her gravid belly and her needy womanhood is inescapable.<</if>>
-She's a good $desc, and remains obediently before your desk, filling your office with her subtle perfume as she waits for you.
 
-<<case "breast expansion blues">>
+<<case "im scared">>
 
-During her routine weekly inspection, <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> cradles her huge breasts with her arms whenever the maneuvers of being inspected allow her to do so. It's not an unusual gesture for a $desc on breast growth drugs, since slaves whose tits are expanding are, by definition, not used to their weight yet. But $activeSlave.slaveName is more than just uncomfortable. She seems to regard her weighty mammaries with distaste. <<if $activeSlave.intelligence > -1>>She's not stupid, and quickly realizes<<else>>She's an idiot, but she's not dumb enough to completely miss<</if>> that you've noticed her feelings about her boobs. She bites her lower lip, not sure if she should say anything, so you follow your usual policy during slave inspections and ask her about it. <<if $PC.career == "slaver">>If you learned one thing from your long career of slave training, it's that it's<<else>>It's<</if>> typically best to suss these things out.
+During her weekly inspection, <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> has trouble following the routine orders that position her so you can examine her body. The cause is not difficult to determine: she's so cripplingly terrified that she's having difficulty functioning. She seems to be trying to obey you, but she's so scared that her mind is having trouble translating your simple verbal commands into physical obedience. You ask her what she's so frightened of. The question stuns her, and she stares at you in mute horror, looking even more terrified than she has up to this point and completely devoid of any idea how to respond. You order her to respond, and this starts her out of her fugue. She begins to cry, makes two false starts, sobs, and then begins forcing out words.
 <br><br>
-<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
-	"<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>," she lisps, "can I pleathe be taken off boob drugth?" She swallows, nervous that she's crossed a line, but she presses on, hefting her tits a little higher to show she's talking about them. "They're tho heavy and awkward. I'm thore every night, and my back hurts. I feel like a cow with boobth thith big,
-<<else>>
-	"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>," she mumbles, "can I please be taken off the breast expansion drugs?" She swallows, nervous that she's crossed a line, but she presses on, hefting her tits a little higher to show she's talking about them. "They're so heavy and awkward. I'm sore every night, and my back hurts. I feel like a cow with boobs this big,
-<</if>>
-and I can't imagine what it'll be like if they get any bigger."
-In one sense, it's amusing that she feels that way, because<<if ($arcologies[0].FSAssetExpansionist != "unset") || ($arcologies[0].FSTransformationFetishist != "unset") || ($arcologies[0].FSPastoralist != "unset")>> as many slaves in this very arcology know quite well,<</if>> it's possible for the miracles of modern medicine to grow a $desc's tits until they're so heavy they immobilize her completely.
-<<if $activeSlave.muscles > 5>>She has the muscles to carry her boobs around, so some of this may be simple whining.<<else>>It's not surprising that her breasts would be uncomfortable, since she lacks anything in the way of muscle tone to help support them.<</if>>
-<<if $activeSlave.lactation > 0>>She complained of feeling like a cow without detectable irony, despite the fact that her left nipple has a droplet of cream clinging to it right now.<</if>>
-She waits anxiously for your response, wondering if she'll be punished for expressing reservations about your expansion of her breasts and, comically, still cradling her heavy udders as she does so.
+"E-e-everything," she cries. "I'm <<s>>-<<s>>o <<s>>-<<s>>orry b-but I c-can't help," she chokes on a sob and hiccups, "help it. This, this pla<<c>>e, being a <<s>>ex <<s>>lave,
+<<switch $activeSlave.standardPunishment>>
+<<case "confinement">>b-being sh-shut up in the d-dark
+<<case "whipping">>b-being wh-wh-whip-ped
+<<case "chastity">>h-having my p-part<<s>> locked up in ch-cha<<s>>tity
+<<default>>n-never knowing what th-the p-punishment will be
+<</switch>>
+wh-when I'm bad, e-everything, <<Master>>. Oh, oh, I'm <<s>>orry, p-plea<<s>>e, I'm <<s>>orry I, I'm like thi<<s>>, I'm crying, p-plea<<s>>e <<Master>>, plea<<s>>e don't..." She trails off, giving you a look of supplication.
+
+<<case "frightening dick">>
+
+In a fortuitous confluence of circumstances, <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> happens to be polishing your office one evening. Keeping every surface in the penthouse at a state of perfect shine is one of your servants' endless tasks, and your office is her area of responsibility today. At the key moment, she's working on an area at waist height, directly next to the door that leads to your suite; and she's crouching to polish this area most comfortably. She is working diligently, and is paying close attention to what she's doing. Meanwhile, and for completely unrelated reasons, you have just finished having fun inside said suite. You are naked, and your penis remains fully erect despite your having climaxed only moments before; you are in excellent physical and sexual condition and this happens frequently. You have decided to address a likewise unrelated matter in your office, and walk into it from your suite, naked and erect.
+<br><br>
+This is how $activeSlave.slaveName comes face to face with your cock, unexpectedly, at a distance of about ten centimeters.
+<br><br>
+She shrieks, backpedaling, and then falls backward, her <<if $activeSlave.butt > 6>>monstrous bottom<<elseif $activeSlave.butt > 3>>healthy rear end<<else>>cute butt<</if>> hitting the floor with an audible whack. The light cloth she was using to polish with went flying, and flutters to the ground accusingly. After scrabbling back a short distance, looking up at you hesitantly, and visibly recollecting herself, she swallows twice and then says, "I'm <<s>>orry, <<Master>>," in a tone of voice with a great deal of effort applied to keep it even. A frantic, embarrassed search for her cloth ensues. Finding it at last, she returns to her original, low position, and crouch-walks back to the place she was polishing, doing her absolute best to look diligent and industrious and not at all aware that your cock is pointing at her like a gun barrel.
 
 <<default>>
 	ERROR: bad event
@@ -67,225 +119,241 @@ She waits anxiously for your response, wondering if she'll be punished for expre
 <span id="result">
 <<switch $RESSTRevent>>
 
-<<case "transition anxiety">>
+<<case "gaped asshole">>
 
-<<click "Fuck her">>
+<<click "Give her the surgery">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		You announce that you're going to fuck her <<if $activeSlave.anus == 0>>virgin <</if>>asspussy. To your complete lack of surprise, she can't hide her horror at the prospect of <<if $PC.dick == 1>>having a cock inside her<<else>>being fucked with a strap-on<</if>>, and her wide, $activeSlave.eyeColor eyes track your movements closely as you stand up and <<if $PC.dick == 1>>reveal the formidable member<<else>>don the strap-on<</if>> you're about to breed her with. You order her to kneel on the couch, which she does, @@color:gold;cringing in fear of being buttfucked, but knowing disobedience will be worse;@@ and then you order her to reach down and spread her butt for you, as wide as it'll go. She complies, <<if $activeSlave.butt > 6>>taking a handful of each massive buttock and heaving them apart to reveal her<<elseif $activeSlave.butt > 3>>pulling her plush buttocks apart<<else>>even though her cute ass doesn't have to be spread<</if>> to reveal her <<if $activeSlave.anus > 2>>whorish anal slit<<elseif $activeSlave.butt > 1>>relaxed rear hole<<else>>tight little rosebud<</if>>. You let her soak in her discomfort, <<if $PC.dick == 1>>stroking your cock gently<<else>>rubbing a little lube on the tip of your phallus<</if>> and letting her see how big it is. Her cringing even extends to her asshole, <<if $activeSlave.analArea > 3>>the huge area of crinkled skin<<elseif $activeSlave.analArea > 1>>the crinkled skin around her anus<<else>>her little pucker<</if>> tensing as she anticipates anal sex.
-		<<set $activeSlave.trust -= 3>>
-		<br><br><span id="result2">
-		<<click "Make sure she gets off on it">>
-			<<replace "#result2">>
-				You press <<if $PC.dick == 1>>yourself<<else>>your weapon<</if>> past her sphincter with care, and her posture softens a little as she realizes you aren't going to hurt her. Once you've hilted <<if $PC.dick == 1>>your cock<<else>>the strap-on<</if>> inside her, you caress her <<if $activeSlave.weight > 30>>chubby<<elseif $activeSlave.waist > 0>>wasp<<elseif $activeSlave.muscles > 30>>muscular<<elseif $activeSlave.weight > 10>>soft<<else>>thin<</if>> waist, running your hands across her skin. Then you <<if $activeSlave.clitPiercing == 3>>activate her smart frenulum piercing<<else>>secure a couple of little egg vibes to her dick<</if>>. She gasps as the vibration starts, and then gasps again as her anus tightens involuntarily with the stimulation, squeezing the <<if $PC.dick == 1>>warm penis<<else>>phallus<</if>> that fills it. She <<if $activeSlave.voice > 0>>moans openly<<else>>rasps mutely<</if>> as you pull out and then thrust into her. Much against her will, she <<if $activeSlave.balls > 0>>quickly becomes erect<<else>>starts to drip precum, which is her ballsless body's way of showing arousal<</if>>.
-				<<if $activeSlave.fetish == "buttslut">>
-				<<if $activeSlave.fetishKnown == 1>>
-					<<if $activeSlave.fetishStrength > 95>>
-						Every time she takes it up the butt, she's reminded that she's a natural buttslut, and the reminder @@color:lightsalmon;helps her relax and accept sodomy.@@
-						<<set $activeSlave.fetishStrength += 10>>
-					<<else>>
-						She knows she gets off easily on anal stimulation, but taking it like this still isn't her favorite activity. Still, the prostate stimulation does its work, and she @@color:hotpink;submits to having her favorite hole pleasured.@@
-						<<set $activeSlave.devotion += 3>>
-					<</if>>
-				<<else>>
-					You notice that she stiffens again, looking down at her traitorous member in shock at how much she enjoys the sensation of prostate stimulation. @@color:lightsalmon;She's a buttslut!@@
-					<<set $activeSlave.fetishKnown = 1>>
-				<</if>>
-				<</if>>
-				Not long after you penetrate her, she <<if $activeSlave.balls > 0>>squirts a weak ejaculation onto the couch<<else>>shivers and releases some watery fluid<</if>>. She had almost forgotten that she was being fucked like a girl, and stiffens uncomfortably when she feels you <<if $PC.dick == 1>>fill her rectum with your hot seed<<else>>grip her hips harder and shake with your own climax<</if>>. As she gets up from the couch, she seems @@color:hotpink;subdued and submissive.@@ After all, if she's submitting to you, that absolves her of responsibility for what she's becoming. 
-				<<set $activeSlave.devotion += 5>>
-				<<AnalVCheck>>
-			<</replace>>
-		<</click>>
-		<br><<click "Rape her">>
-			<<replace "#result2">>
-				You grab her hips, getting a good grip, and spear the poor $desc without any hint of mercy. She <<if $activeSlave.voice > 0>>screams in pain and fear<<else>>sucks in a great sobbing gasp<</if>>, and tries to wriggle away despite her intention of submitting to your use, but you hold her in place and rape her ass. She tries to maintain her position, crying openly, but eventually slides off her perch on the couch, pulling her hole off your <<if $PC.dick == 1>>dick<<else>>strap-on<</if>>. You grab her by <<if $activeSlave.hLength > 20>>hair<<else>>neck<</if>> and smash her face into the angle of the couch, leaving her poor butt completely vulnerable. She can't see you line up to ream her again, but she knows it's coming and cries, quivering. After a while, you haul her up to her feet and keep fucking her, the uncomfortable angle of standing anal forcing new <<if $activeSlave.voice > 0>>squeals<<else>>rasps<</if>> out of her. You pour degradation into her ear as you take your pleasure from her unhappy body, telling her that she's your fuckmeat. She believes you, and when you finally orgasm and let her slide off your hateful <<if $PC.dick == 1>>penis<<else>>strap-on<</if>>, shes @@color:gold;already terrified@@ of the next time you feel like fucking her.
-				<<set $activeSlave.trust -= 5>>
-				<<AnalVCheck>>
-			<</replace>>
-		<</click>>
+		You schedule her for the surgery. Like all invasive procedures, it @@color:red;affects her health,@@ but @@color:lime;she's effectively an anal virgin again.@@ She @@color:mediumaquamarine;trusts you a bit more@@ for granting her request, and is eager for buttsex that's more interesting than having a hotdog thrown down her hallway.
+		<<set $activeSlave.trust += 3, $activeSlave.health -= 10, $activeSlave.anus = 0, $cash -= $surgeryCost>>
+		<<if $activeSlave.analSkill > 10>><<set $activeSlave.analSkill -= 10>><</if>>
+		<br><br>
+		<span id="result2">
+			<<click "Break her in again">>
+				<<replace "#result2">>
+					Her ass is yours all over again. As soon as her newly tight rosebud has recovered enough, you visit her in the surgery, without even waiting for her to leave it. You flip her over on the recovery bed and force <<if $PC.dick == 1>>your cock<<else>>a strap-on<</if>> up her butt while she wriggles with eager discomfort, squealing in pretended horror. Her renewed anal virginity was very brief; her ass is once again @@color:lime;broken in for penetration.@@ For her part, she @@color:hotpink;thoroughly enjoyed losing her anal cherry,@@ again.
+					<<set $activeSlave.devotion += 5, $activeSlave.analCount++, $analTotal++, $activeSlave.anus = 1>>
+				<</replace>>
+			<</click>> //This option will take anal virginity//
 		</span>
 	<</replace>>
-<</click>><<if $activeSlave.anus == 0>> //This option will take anal virginity//<</if>>
-<br><<click "Humiliate her in public">>
+<</click>><<if $activeSlave.vagina == 0>> //This option will take virginity//<</if>>
+<br><<click "Fill her gape">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		You get up from behind your desk, drawing an apprehensive stare. To her bemusement, you order her to follow you and leave your office. She hurries to obey, her footsteps pattering along behind you, but they become much more hesitant as you make your way out of the penthouse and she realizes that she's about to be in public, naked. You don't bother looking back, knowing that she's sufficiently afraid of you to obey. On the border between your private domain and the public hustle and bustle of the arcology's public life, she stops for a long moment before scurrying to catch up with you, barely even noticing that @@color:hotpink;she just swallowed her sense of shame@@ to obey you and avoid punishment. You stroll along, greeting leading citizens and taking in the hum of your people. $activeSlave.slaveName grows increasingly embarrassed under the hot stares of passersby, cringing closer and closer to your protective side as she notices how many gazes rest with open hunger on her mouth, her crotch, and her ass.
-		<<set $activeSlave.devotion += 3>>
-		<br><br><span id="result2">
-		<<click "Make her perform oral on you, right here">>
-			<<replace "#result2">>
-				You reach around, place a dominanting hand on her shoulder, pull her around in front of you, and push her down to her knees. She quickly realizes what's coming, and her $activeSlave.skin cheeks blush furiously as you reveal your <<if $PC.dick == 1>>meaty dick<<else>>flushed pussy<</if>> and offer it to her. She gets busy, burying her head against you with a speed that seems surprising until it occurs to you that this allows her to hide her face. Deciding to accept this tiny compromise, you run a possessive hand <<if $activeSlave.hLength < 5>>across her smooth scalp<<elseif $activeSlave.hLength < 20>>through her short hair<<else>>through her tresses<</if>> and murmur praise for her enthusiasm. She stiffens at the implication that she wants to be <<if $PC.dick == 1>>polishing your penis<<else>>eating you out<</if>> in broad daylight, but after a slight pause she decides that this isn't bad. As <<if $PC.dick == 1>>her head continues to bob back and forth as she sucks your dick<<else>>she continues nuzzling her nose and mouth against your wet cunt<</if>>, she fails to notice her @@color:hotpink;second major submission today.@@
-				<<if $activeSlave.fetish == "humiliation">>
-				<<if $activeSlave.fetishKnown == 1>>
-					Since she has a humiliation fetish, the embarrassment has been arousing her even as it's been torturing her. Unsatisfied with just this, her need to be shamed obliges her to cock her hips and make sure onlookers can see her asspussy as she services you with her mouth.
-					<<if $activeSlave.fetishStrength > 95>>
-						@@color:lightsalmon;Her need for humiliation has deepened.@@
-						<<set $activeSlave.fetishStrength += 10>>
-					<<else>>
-						Such abject sluttery @@color:hotpink;helps convince her of her status as a slave girl.@@
-						<<set $activeSlave.devotion += 3>>
-					<</if>>
-				<<else>>
-					To your surprise, she even starts to glance around, checking to verify that she's still being watched. @@color:lightsalmon;She's a humiliation slut!@@
-					<<set $activeSlave.fetishKnown = 1>>
-				<</if>>
-				<</if>>
-				<<set $activeSlave.oralCount += 1>>
-				<<set $oralTotal += 1>>
-				<<set $activeSlave.devotion += 5>>
-			<</replace>>
-		<</click>>
-		<br><<click "Make her cum in public">>
-			<<replace "#result2">>
-				You produce three little egg vibrators, which instantly steal her anxious attention away from the passersby who stare at her. You require her to hold her dick out while you use an elastic band to attach one of the vibrators to the underside of its head. She doesn't get to touch herself much anymore, and the half-forgotten sensations of doing so almost make her forget that she's naked in public, and almost certainly about to do something very embarrassing. Then you order her to hold her dick up and place another vibrator <<if $activeSlave.scrotum > 0>>against her sensitive scrotum<<else>>against the sensitive skin where her scrotum used to be<</if>>. Finally, you order her to bend over and offer you her asshole. She obeys, with apprehension, and is actually relieved when you just place the final vibrator against, but not inside, her <<if $activeSlave.anus > 1>>asspussy<<else>>pucker<</if>>. She finds herself ordered to kneel and put her hands on her head; and ordering her to hold this position, you use remote control of the vibrators to force her to cum twice. She can't tear her eyes away from the citizens who stare and laugh as she <<if $activeSlave.balls > 0>>spurts her seed<<else>>dribbles weakly<</if>> onto the floor.
-				<<if $activeSlave.fetish == "humiliation">>
-				<<if $activeSlave.fetishKnown == 1>>
-					<<if $activeSlave.fetishStrength > 95>>
-						Though she's still unhappy about being a slave girl, @@color:lightsalmon;appetite for humiliation has deepened.@@
-						<<set $activeSlave.fetishStrength += 10>>
-					<<else>>
-						The abject humiliation slut climaxes harder each time, and can't stop herself @@color:mediumaquamarine;glancing at you with something like trust.@@
-						<<set $activeSlave.trust += 3>>
-					<</if>>
-				<<else>>
-					With a mix of horror and dawning arousal, she discovers that she enjoys the stares. @@color:lightsalmon;She's a humiliation slut!@@
-					<<set $activeSlave.fetishKnown = 1>>
-				<</if>>
-				<</if>>
-				As she follows you back to your penthouse, she seems almost cheerful, and will definitely be @@color:mediumaquamarine;more trusting of strange orders@@ in the future.
-				<<set $activeSlave.trust += 5>>
-			<</replace>>
-		<</click>>
-		</span>
+		You announce that you can fill her just fine, and you'll make her feel it just as though she were an anal virgin again. She looks simulateously intrigued and apprehensive, but starts to get to her knees like a good anal slut. You stop her before she can face the ground and offer you her ass. You're going to need some lubricant for this, but the $desc's saliva should be plenty. As you <<if $PC.dick == 1>>aim your dick<<else>>swiftly pull on a strap-on and aim it<</if>> at her face, she realizes that her spit is going to be the only relief her fucked-out butt is going to have for whatever you're planning. She blows you with desperate eagerness, doing her absolute best to coat your<<if $PC.dick != 1>> weapon's<</if>> shaft with as much saliva as she can. You pull it free of her mouth with a wet pop, and she immediately faces the floor, cocking her hips and spreading her huge asspussy for you.
+		<br><br>
+		After watching the way it contracts slightly as she breathes hard for a while, letting her feel the apprehension, you shove <<if $PC.dick == 1>>yourself<<else>>the phallus<</if>> inside her. She takes it without any reaction at all, and her gaped hole cups it only loosely. Grabbing her by the shoulders, you haul her torso up so it's against your <<if $PC.boobs == 1>>breasts, capped by their rock-hard nipples<<else>>muscular chest<</if>>, and push three of your fingers into her mouth. She gags, surprised, but you shove them in farther, collecting as much spit as you can reach. Then you let her fall back down again. She knows what you're going to do, and moans as you slide your fingers in alongside your <<if $PC.dick == 1>>cock<<else>>strap-on<</if>>, taking huge shuddering gasps as she feels her sphincter accomodate the abuse. Slowly, you slide your thumb in as well, pushing it around <<if $PC.dick == 1>>your stiff prick<<else>>the unyielding phallus<</if>> until you're holding it as if masturbating. And then you masturbate. Inside her ass. She begins to scream, but manages to prevent herself from resisting. She does her desperate best to take your crushing abuse of her worn-out hole, and collapses when you finally orgasm and let her go. She does her best to offer some sort of @@color:hotpink;submissive thanks,@@ but is barely coherent, and crawls off to shower again, her lewd sphincter pulsing as she goes.
+		<<set $activeSlave.devotion += 5, $activeSlave.analCount++, $analTotal++>>
+		<<EventFetish $activeSlave "buttslut">>
+		<<EventFetish $activeSlave "masochist">>
+	<</replace>>
+<</click>>
+<<if $HeadGirl != 0>>
+<br><<click "Double up on her ass with your Head Girl">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		You page $HeadGirl.slaveName for some assistance filling up a loose hole, and she comes quickly, <<if canAchieveErection($HeadGirl)>>precum already visible at the tip of her erection<<else>>bringing a strap-on<</if>>. When she arrives, it's to the sight of $activeSlave.slaveName sitting on your lap with your <<if $PC.dick == 1>>cock<<else>>strap-on<</if>> up her ridiculous anal gape, waiting for a second phallus while your hands tease her $activeSlave.nipples nipples. Seeing that backup has arrived, you lean back and shift your grip to the back of the receptacle's lower thighs, pulling her up and shifting her hips to offer your Head Girl another berth in $activeSlave.slaveName's ass. This pulls her loose sphincter up, producing a little gape above the top of your invading shaft, and $HeadGirl.slaveName loses no time in fucking it. She gives $activeSlave.slaveName a kiss, but soon breaks the lip lock, since she's more interested in making eyes at you over your mutual anal conquest's shuddering shoulder. As
+		<<if $PC.dick == 1>><<if canAchieveErection($HeadGirl)>>your dicks slide against each other<<else>>your dick slides against her strap-on<</if>><<else>><<if canAchieveErection($HeadGirl)>>your strap-on slides against her dick<<else>>your strap-ons slide against each other<</if>><</if>>, your trusty Head Girl whispers that @@color:hotpink;she loves you.@@ $activeSlave.slaveName makes an inarticulate noise of anal distress that probably means @@color:hotpink;approximately the same thing.@@
+		<<set $activeSlave.devotion += 4, $activeSlave.analCount++, $analTotal++>>
+		<<for $i to 0; $i < $slaves.length; $i++>><<if $slaves[$i].ID == $HeadGirl.ID>><<set $slaves[$i].devotion += 4>><</if>><</for>>
+		<<EventFetish $activeSlave "buttslut">>
+		<<EventFetish $activeSlave "submissive">>
 	<</replace>>
 <</click>>
+<</if>>
 
-<<case "moist pussy">>
+<<case "passing declaration">>
 
-<<click "Make love to her ready cunt">>
+<<click "Follow her">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		Her body is so perfectly made to be fucked that it's getting itself ready for you, without your even having to give the order. Deciding not to bother with verbal commands, you approach her and reach for one of her hands; she obediently extends it towards your grasp, and follows <<if ($activeSlave.energy > 40) || ($activeSlave.aphrodisiacs > 0)>>eagerly<<else>>willingly<</if>> as you pull her in for a hug<<if $activeSlave.boobs > 5000>> (cushioned by her enormous udders)<<elseif $activeSlave.dick > 5>> (made rather lewd by her enormous penis)<</if>>, kiss her deeply, and slide your arms down her <<if $activeSlave.muscles > 30>>muscular<<elseif $activeSlave.muscles > 10>>toned<<else>>soft<</if>> back to <<if $activeSlave.butt > 6>>heft her monstrous<<elseif $activeSlave.butt > 3>>squeeze her healthy<<else>>cup her cute little<</if>> buttocks. She <<if $activeSlave.voice > 0>>coos<<else>>hums mutely<</if>> at the feeling of your <<if $PC.title == 1>>strong<<else>>feminine<</if>> hands on her bottom, and presses herself against you as you rotate the two of you until you can set her butt on the edge of your desk and <<if $PC.dick == 1>>slide your big dick into her well-lubricated cunt<<else>>assertively press your own pussy against her wet cunt<</if>>.
-		<br><br>
-		She makes as if to lie back and take it, but you keep an arm around her back and hug her <<if $activeSlave.boobs > 2000>>as closely as her big breasts will permit<<else>>closer than ever<</if>>. You take your other hand and place a firm but loving grip under her chin, lifting her $activeSlave.eyeColor-eyed gaze to meet yours before kissing her again. All the while, you <<if $PC.dick == 1>>fuck her powerfully, withdrawing your dick almost all the way and then hilting yourself in her soaked slit<<else>>trib her with assurance, grinding your hips against hers and making her feel your heat<</if>>. She clings to you, accepting the closeness to her <<if $PC.title == 1>>Master<<else>>Mistress<</if>> and enjoying the loving attention, even as the extreme wetness of her cunt and your <<if $PC.dick == 1>>powerful thrusting<<else>>hungry grinding<</if>> begin to produce lewd noises from between you. Her generous natural lubrication lessens the friction and sensation a little, and you go for a long time before you both climax. You lead her into your office shower, since you're both coated in her pussyjuice<<if $PC.dick == 1>> and she's carrying a big load of your cum<<else>>, and your own<</if>>. Under the hot water, you don't even have to pull her close; @@color:hotpink;she presses herself into your arms on her own.@@
-		<<if $activeSlave.sexualQuirk == "romantic">>
-			For an incorrigible romantic like her, this encounter was perfect, and she @@color:hotpink;loves you all the more for it.@@
-			<<set $activeSlave.devotion += 3>>
-		<</if>>
+		Her sheer joie de vivre is irresistible, and it certainly draws you out of your office. You're not slow, and of course you know where she's going, so you catch up quickly. She gives you the careful measuring glance of a devoted sex slave who's checking whether her owner wants to fuck her right now, and correctly decides that that isn't your intent, at least right this minute. Instead, you continue the direction she was going, and she follows. "<<Master>>," she <<say>>s hesitantly, "I hope that wa<<s>> an okay thing for me to do." You assure her it was. "Thank<<s>>, <<Master>>," she beams, grinning like an idiot. Smiling at her infectious enthusiasm for life, you ask her why she's so happy this morning. She looks momentarily perplexed<<if $activeSlave.intelligence > 1>>, not a common look for a slave as smart as her<</if>>. "I don't know! I just woke up thi<<s>> morning feeling really, really good. <<if $activeSlave.intelligence > 1>>I'm sure the fact that I'm benefiting from incredibly advanced medi<<c>>ine ha<<s>> <<s>>omething to do with it; thank you very much for that, <<Master>>. Other than that,<</if>>
+		I ju<<s>>t feel happy." This has to be some sort of milestone for her, and for you, and maybe for slavery in general: if she can be this pleased with life, something must be going right. You walk her to where she's going
+		<<switch $activeSlave.assignment>>
+		<<case "whore">>(one of the arcology's nicer streets, where she'll spend the day selling her body),
+		<<case "serve the public">>(one of the arcology's nicer streets, where she'll spend the day flirting with citizens and having sex with anyone that's willing),
+		<<case "work a glory hole">>(a wall mounting that will render her a helpless target for dicks all day),
+		<<case "get milked">>(her favorite milker in the penthouse),
+		<<case "take classes">>(a quiet area with a touchscreen where she can review material from the slave etiquette class she's working on),
+		<<case "please you">>(the wardrobe, where she'll get dressed before attending to you for the rest of the day),
+		<<case "be a subordinate slave">>(the living area of the slave she's been assigned to serve),
+		<<case "be a servant">>(the closet that contains the cleaning items she'll use to dust and polish the penthouse today),
+		<<case "stay confined">>(her cell),
+		<<case "guard you">>(the armory where her weapons are kept),
+		<<case "be your Head Girl">>(the assignment location of a slave who needs some hands-on guidance from your Head Girl),
+		<<case "recruit girls">>(the camera station she uses to convince people from the old world that becoming your slave is a good idea),
+		<<default>>(a waiting area for further assignment),
+		<</switch>>
+		and when you get there, she gives you a peck on the cheek. <<if $activeSlave.height < 170>>The short $desc has to go up on tiptoe to reach.<</if>>
+		"@@color:hotpink;I really do love you,@@ <<Master>>," she <<say>>s, $activeSlave.eyeColor eyes shining.
 		<<set $activeSlave.devotion += 5>>
-		<<VaginalVCheck>>
 	<</replace>>
-<</click>><<if $activeSlave.vagina == 0>> //This option will take virginity//<</if>>
-<br><<click "Pound her wet pussy">>
+<</click>>
+<br><<click "Play with her">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		She's so generously lubricated that she's ready to take a good hard fuck, so you decide to give her one. You point at the ground, and you don't even have to tell her to get down on all fours and get ready to take it. Your gesture says it for you, and she obediently gets down and gets in position to be bred like a bitch. She angles her hips just right to offer her cunt to you, and even reaches down to spread her<<if $activeSlave.labia > 1>> dangling<</if>> labia to invite you into her pink channel.
-		<<if $PC.dick == 1>><<if $activeSlave.vagina > 1>>She can take your big dick without a twinge<<else>>Your big dick will fill her tight cunt to its limits<</if>>, but you grab her hips and<<else>>You select a strap-on that's right at the limits of her <<if $activeSlave.vagina > 3>>cavernous<<elseif $activeSlave.vagina > 2>>big<<elseif $activeSlave.vagina > 1>>open<<else>>tight little<</if>> cunt's capacity, don it, and<</if>> mount her with such force that your first stroke brings her butt against your hips with an audible smack. There's also a deliciously lewd noise as <<if $PC.dick == 1>>your invading penis<<else>>the invading phallus<</if>> forces a little gush of pussyjuice out of her. She <<if $activeSlave.voice > 0>>shrieks, but it's a shriek<<else>>gasps, but it's a gasp<</if>> of pleasure, and your rutting is so well-lubricated that she has no trouble getting off on it. Wanting her climax, you reach around her and grab hold of her pussy, feeling the slippery fluid between your fingers and the lewd thrusting motion as <<if $PC.dick == 1>>your cock<<else>>the phallus<</if>> pistons in and out of her. That bit of stimulation is enough to tip her over, and you feel a gush of femcum against your hand as <<if $PC.dick == 1>>your dickhead<<else>>the head of the strap-on<</if>> forces an orgasm out of her g-spot. She's so discombobulated that she collapses into the puddle of pussyjuice she left on the floor when you stand up and head off for a shower, but she @@color:hotpink;crawls after you@@ as best she can on rubbery legs.
-		<<if $activeSlave.fetish == "submissive">>
-		<<if $activeSlave.fetishKnown == 1>>
-			The $desc sub loves getting fucked like that, and
-			<<if $activeSlave.fetishStrength > 95>>
-				@@color:lightsalmon;seems even more submissive@@
-				<<set $activeSlave.fetishStrength += 10>>
-			<<else>>
-				since she's fully confirmed in her status as a sub, she @@color:hotpink;glows with devotion@@
-				<<set $activeSlave.devotion += 3>>
-			<</if>>
-			 as she washes herself in the shower with you.
+		You're not a slave, so you can't understand her inner workings through direct empathy. But in your experience, a quick orgasm never fails to make a good day better. You're not slow, and of course you know where she's going, so you catch up to her on quiet feet and <<if $activeSlave.butt > 6>>set her enormous ass jiggling with a smack<<elseif $activeSlave.butt > 3>>give her womanly bottom a squeeze<<else>>pinch her cute rear<</if>>. She squeals and whirls around, <<if $activeSlave.energy > 60>>eagerly flinging herself into your arms, ready for some action<<else>>trustingly throwing herself into your arms<</if>>. Feeling spontaneous, you decide to get everyone off quickly and cleanly, right here.
+		<<switch $eventSlave.fetish>>
+		<<case "submissive">>
+			You place a dominant hand around her throat, firmly but not harshly, almost sending the submissive to her knees. Your other hand
+		<<case "cumslut">>
+			You kiss her, sliding your tongue all the way into her mouth. She melts into you, rhapsodically entranced by the intense oral stimulation, and her tongue presses against yours with frankly sexual significance. Your hand
+		<<case "humiliation">>
+			Slaves are constantly passing the two of you, and you constantly turn her to show her body to each of them, spreading her to display her most intimate parts. Her cheeks flush with arousal and delicious shame. Your hand
+		<<case "buttslut">>
+			You slide a hand all the way under her, pulling the flesh of her buttock to one side and then nestling possessive fingers over her anus, teasing and stimulating, but not penetrating. Your other hand
+		<<case "boobs">>
+			She gasps as your hot mouth finds one of her $activeSlave.nipples nipples, and then moans openly as one of your hands mauls her other breast. Your other hand
+		<<case "pregnancy">>
+			One of your hands begins to caress her<<if $activeSlave.pregnancy > 0>> pregnant<</if>> belly, worshipping its curve. Your other hand
+		<<case "dom" "sadist">>
+			You press yourself aggressively against her, and she presses back; you grind harder still, letting her know that she can let herself be a little aggressive, too. Groaning with pleasure and satisfaction, she kisses you furiously. One of your hands
+		<<case "masochist">>
+			You caress one of her nipples, bringing it completely erect before gripping it firmly. You twist it, pull it, pinch it; she moans with masochistic pleasure. Your other hand
+		<</switch>>
+		<<if $activeSlave.vagina > -1>>finds her pussy<<else>>reaches around behind her to tease her ass and play with her sensitive perineum<</if>>, and you press your groin towards her. Getting the idea, she begins to <<if $PC.dick == 1>>jack you off<<else>>finger your clit<</if>> energentically, taking the pace from your lusty demeanor and her own feeling of energy and well-being. The two of you orgasm almost together. <<if $PC.dick == 1>>You angle your hips to shoot your seed onto the floor<<else>>You climax so violently that some of your femcum makes it onto the floor<</if>>. <<if canAchieveErection($activeSlave)>>She blows her own load right after<<elseif $activeSlave.balls > 0>>Her limp dick pours cum<<elseif $activeSlave.dick > 0>>Her bitchclit produces a little watery fluid<<elseif $activeSlave.vaginalLube > 1>>She squirts copiously<<else>>Unusually for her, she manages to squirt a little<</if>>, adding to the mess. You tell her another slave will clean up, and order her to go about her business. She turns to go, @@color:mediumaquamarine;smiling with sexual satisfaction.@@
+		<<set $activeSlave.trust += 5, $activeSlave.oralCount++, $oralTotal++>>
+	<</replace>>
+<</click>>
+<br><<click "Punish her">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		That was not quite the prescribed way of greeting you, there was no need to greet you as she passed, and most importantly, she's simply too cheery. Resolving to crush her happiness, you call her back to the office in a thunderous voice you know will reach her. She knows she's made a mistake, but comes promptly, lower lip quivering. Her feelings are plain to see on her face: surprise, @@color:mediumorchid;betrayal,@@ @@color:gold;fear.@@ She thought she could be friendly, and now she knows she was wrong. What's more, she thought she could be happy, and now she's realizing that that was also wrong. As you
+		<<switch $activeSlave.standardPunishment>>
+		<<case "confinement">>close her into a confinement cell,
+		<<case "whipping">>tie her up for a brief whipping,
+		<<case "chastity">>lock her into harsh chastity,
+		<<default>>gag her for speaking out of turn,
+		<</switch>>
+		a wail of despair tears its way out of her throat, far out of porportion to the standard punishment you're applying. It's perhaps the saddest sound you've ever heard a slave make. Slaves cry all the time, but usually they already understand that happiness is out of their reach. This one just woke up thinking that she could be happy and was happy, and now she's realizing it isn't allowed.
+		<<set $activeSlave.devotion -= 10, $activeSlave.trust -= 10>>
+	<</replace>>
+<</click>><<if ($PC.dick == 1) && ((($activeSlave.anus == 0) && ($activeSlave.vagina == -1)) || ($activeSlave.vagina == 0))>> //This option will take virginity//<</if>>
+
+<<case "ara ara">>
+
+<<click "Praise her outlook">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		You speak from where you are, and without preamble, startling both slaves badly. Doing their best to recover, they listen as you tell $activeSlave.slaveName that she has a good, praiseworthy outlook on life as a sex slave.
+		<<if $activeSlave.energy > 80>>
+			Her extreme appetite for sex will serve her well. It's important to love what you do, and if she wakes up every morning wanting to get fucked, she'll enjoy her life as a <<if $activeSlave.assignment == "whore">>slave prostitute<<else>>public slut<</if>>.
+		<<elseif $activeSlave.fetish == "humiliation">>
+			She should feel lucky to have a fetish for public use. It's important to love what you do, and if being openly passed around gets her off, she'll enjoy her life as a <<if $activeSlave.assignment == "whore">>slave prostitute<<else>>public slut<</if>>.
+		<<elseif $activeSlave.devotion > 50>>
+			It's great that she's internalized her role, and wants to do well. As long as she wants to perform well and applies herself, you're confident that she'll continue to improve and become a better and more valuable slave.
+		<<elseif $activeSlave.devotion > 20>>
+			Her obedience is commendable. You understand that she struggles with her life as an involuntary sex object at times. She'll learn to do better, and as she improves, she'll be all right as long as she obeys you and does her best.
 		<<else>>
-			She seems utterly disspated by the fucking she just got, and may have just had the best sex of her life. @@color:lightsalmon;She's a submissive!@@
-			<<set $activeSlave.fetishKnown = 1>>
-		<</if>>
+			To describe her situation bluntly, the best possible approach for her is to obey you and do her best. There's not really any possible outcome in which slaves can lose out by doing their best to be useful and valuable. It's in her interest to do her best.
 		<</if>>
-		<<set $activeSlave.devotion += 5>>
-		<<VaginalVCheck>>
+		"Yes, <<Master>>," they chorus automatically. You turn and go. $activeSlave.slaveName is taken a bit aback by your apparent omnipresence in the penthouse, but reminds herself that your guidance seemed straightforward and genuine. She's @@color:mediumaquamarine;confirmed in her understanding@@ of what it means to be a good $desc.
+		<<set $activeSlave.trust += 5>>
 	<</replace>>
-<</click>><<if $activeSlave.vagina == 0>> //This option will take virginity//<</if>>
-<br><<click "Feed her her own pussyjuice">>
+<</click>><<if ($PC.dick == 1) && (($activeSlave.anus == 0) && ($activeSlave.vagina <= -1))>> //This option will take anal virginity//<</if>>
+<br><<click "Let her know you think she's attractive, too">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		You approach her and <<if $activeSlave.dick > 0>>reach under her girldick for her<<else>>cup her<</if>> sopping pussy. She gasps as she feels your cool grasp. Your possessive hand encompasses her vulva, with your index and ring fingers sliding around either side of her pubic mound to grip her entire womanhood.
-		<<if $activeSlave.vagina > 0>>
+		The slaves continue their gossip until $activeSlave.slaveName feels a pair of <<if $PC.title == 1>>strong<<else>>firm, feminine<</if>> hands grip the sides of her <<if $activeSlave.waist > 1>>cartoonishly narrow<<elseif $activeSlave.weight > 30>>pudgy<<elseif $activeSlave.muscle > 30>>ripped<<elseif $activeSlave.waist > 0>>wasp<<elseif $activeSlave.weight > 10>>plush<<elseif $activeSlave.muscle > 5>>toned<<elseif $activeSlave.weight >= -10>>soft<<else>>thin<</if>> waist. She starts but doesn't try to turn, and shivers as you run your hands up <<if $activeSlave.muscle > 30>>the muscles that jacket her ribs<<elseif $activeSlave.weight > 30>>the soft flesh that pads her ribs<<else>>her ribcage<</if>> and forward <<if $activeSlave.boobs > 3000>>into the soft, weighty place formed by the overhang of her massive breasts<<elseif $activeSlave.boobs > 300>>to cup her breasts<<else>>to clasp her around the sternum<</if>> and pull her back into your arms. The other slave watches silently, awaiting some cue as to whether she's to join in or return to breakfast; you give her a flick of your chin, and she turns away, leaving you with $activeSlave.slaveName, embracing among the eating slaves.
+		<br><br>
+		You whisper into her ear that you think she's attractive, <<if $PC.dick == 1>>and point out that she can feel the proof between her buttocks. You're hard, and your stiff prick is poking her in the rear. She gasps and shifts a little, and you nestle your dick even closer into the warm place between her legs and ass.<<else>>and tell her that you can prove it. You grab one of her hands and pull it around behind her, between you, making her feel your pussy. She gasps at how wet it is.<</if>> "An old <<s>>lave like me, <<Master>>?" she echoes in a small voice. An old slave like her, you confirm, and tell her that right now,
+		<<if $PC.dick == 1>>
 			<<if $activeSlave.vagina > 0>>
-				Her relaxed pussy almost draws your middle finger inward and upward, 
+				you've decided to fuck her pussy. She starts at the sudden vulgarity, even with your cock resting against the soft skin between the bottom of her vulva and her anus, and shudders with sudden pleasure as you use a hand to guide yourself inside her welcoming channel.
 			<<else>>
-				Her pussy welcomes your middle finger,
+				her ass is yours. She starts at the sudden vulgarity, even though hearing that the cock that's pressing against her butt will be going inside it soon can't be that surprising. She cocks her hips obediently, letting you force your dick up her asshole.
 			<</if>>
-			and you hook it inside her body, gathering a healthy amouth of pussyjuice and brushing her g-spot.
+			You take her standing,
 		<<else>>
-			You're careful not to penetrate her virgin slit with your middle finger, but you draw it up the exterior of her channel, gathering a healthy amouth of pussyjuice.
+			some oral sex from a slave like her sounds just right. You push her to her knees and hold her mouth to your cunt, taking your pleasure from her
+			<<set $activeSlave.oralCount++, $oralTotal++>>
 		<</if>>
-		Then you remove your hand, though the horny $desc unconsciously tries to follow the withdrawing digits. She stares at you, waiting to see what you're going to do, and a blush begins to rise on her $activeSlave.skin cheeks as she sees you reaching for her mouth. Her <<if $activeSlave.lips > 95>>facepussy<<elseif $activeSlave.lips > 40>>pillowlike<<elseif $activeSlave.lips > 10>>soft<<else>>thin<</if>> lips part and you insert all three of your fingers into her hot mouth. She quivers at the intimacy of the gesture, and the taste of her own juices. The tremor sends a delicious motion through her <<if ($activeSlave.boobsImplant == 0) && ($activeSlave.boobs > 300)>>natural <<if $activeSlave.boobs > 2000>>udders<<else>>breasts<</if>><<elseif $activeSlave.boobsImplant > 0>>fake tits<<elseif canAchieveErection($activeSlave)>>stiff prick<<elseif $activeSlave.scrotum > 4>>dangling balls<<elseif $activeSlave.dick > 0>>limp bitchclit<<elseif $activeSlave.weight > 30>>chubbiness<<else>>body<</if>>. You keep your fingers where they are until she's licked them really clean; her hot tongue runs repeatedly between each of your digits<<if $activeSlave.tonguePiercing > 0>> and the smooth hardness of her tongue piercing brushes against them<</if>>. She <<if $activeSlave.voice > 0>>moans whorishly<<else>>begins to pant<</if>> when you go back for more, and the third time you harvest her own pussyjuice to feed it to her, she orgasms, adding some femcum to her next little meal licked off your fingers. Her eyes shine with @@color:mediumaquamarine;gratitude and trust.@@
-		<<set $activeSlave.trust += 5>>
+		right there among your breakfasting slaves, who try to ignore you or watch with appreciation, according to their own natures. When you're finished, you <<if $PC.dick == 1>>spin her around and kiss her,<<else>>pull her up to her feet and kiss her, tasting yourself on her lips and<</if>> making sure she knows @@color:hotpink;you appreciate her mature body@@ just as much as <<if $activeSlave.assignment == "whore">>her customers do<<else>>your citizens do<</if>>.
+		<<set $activeSlave.devotion += 5>>
+		<<if $PC.dick == 1>><<if $activeSlave.vagina <= 0>><<AnalVCheck>><<else>><<set $activeSlave.vaginalCount++, $vaginalTotal++>><</if>><</if>>
 	<</replace>>
-<</click>>
+<</click>><<if ($PC.dick == 1) && (($activeSlave.anus == 0) && ($activeSlave.vagina <= 0))>> //This option will take anal virginity//<</if>>
 
-<<case "breast expansion blues">>
+<<case "im scared">>
 
-<<click "Let her know she'll be growing as fast as possible">>
+<<click "Punish her">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		She obviously knows that breaking down like this would displease you, but you patiently explain that it's against the rules anyway. She cries harder, nodding through her tears. She knows that interrupting you to beg would be profoundly stupid, so she clasps her hands in wordless submission. You tell her that she's to keep herself under control; if she fails, she will be punished. Since she failed, she will now suffer her standard punishment, and be
+		<<switch $activeSlave.standardPunishment>>
+		<<case "confinement">>
+			shut up in a box. @@color:gold;She breaks down,@@ falling to her knees, begging abjectly for mercy. "It'<<s>> dark in there," she screams as you open the box for her. She knows that if she doesn't climb in, it'll be longer before she's let out, so she does, scrabbling inside and sobbing desperately as you close the lid.
+		<<case "whipping">>
+			whipped. @@color:gold;She breaks down,@@ falling to her knees, begging abjectly for mercy. "It'll h-hu-hurt," she blubbers weakly as you attach her hands to shackles high on the office wall. The first stroke across her buttocks draws a long shriek out of her.
+		<<case "chastity">>
+			locked up in chastity. @@color:gold;She breaks down,@@ falling to her knees, begging abjectly for mercy. "I c-can't," she moans. "I can't take it. I can't <<s>>tand it." As you lock the chastity onto her, she sobs inconsolably, knowing that any arousal will be torturous until she's released.
+		<<default>>
+			gagged, since that's the appropriate casigation for failure to control her mouth and deportment. She tries to behave, but @@color:gold;breaks down@@ as you slide a dildo gag into her throat, choking and struggling to breathe as she tries to cry past it.
+		<</switch>>
+		The thing she's most frightened of is that she won't be able to control her fear in the future, and will continue to suffer.
+		<<set $activeSlave.trust -= 5>>
+	<</replace>>
+<</click>>
+<<if $dairyRestraintsSetting == 2>>
+<br><click "Threaten her with the industrial Dairy">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		Rather than punishing her directly, you address yourself to your personal assistant. You order <<if $assistant > 0>>her<<else>>it<</if>> to make a note in $activeSlave.slaveName's drug schedule that she's to remain on a breast expansion regime until further notice. The $desc's face falls as she hears this, and $assistantName doesn't help matters by
-		<<if $assistant == 0>>
-			confirming the order in disturbingly clinical tones.
-		<<elseif $assistantAppearance is "monstergirl">>
-			using her avatar's tentacle hair to caress her own tits as she concurs in disturbingly kind tones.
-		<<elseif $assistantAppearance is "shemale">>
-			shaking her avatar's enormous endowments, making a lewd comment, and then giving herself a titjob.
-		<<elseif $assistantAppearance is "amazon">>
-			observing that a good slave girl should have big tits, since strong warriors like fertile, big-boobed girls back home to breed with.
-		<<elseif $assistantAppearance is "businesswoman">>
-			having her avatar give $activeSlave.slaveName a disturbingly appraising glance, as though she and her breasts are an interesting entry on a balance sheet.
-		<<elseif $assistantAppearance is "schoolgirl">>
-			bending her avatar over to show off its cleavage, and then giving her tits a jiggle, as though the point wasn't clear enough already.
-		<<elseif $assistantAppearance is "goddess">>
-			hefting her own motherly breasts and telling $activeSlave.slaveName that she should be happy, since bigger breasts are a sign of health and fertility.
+		You grab her by the scruff of her neck and drag her down to $dairyName. She tries to control herself, but breaks down in tears when you haul her to a stop, forcing her to get a good look at the rows of bodies being mercilessly milked. You explain that if she continues to fail to control herself, your patience with her will eventually expire, and you'll be forced to immure her here. Indicating a slave who's being
+		<<if ($activeSlave.balls > 0) && ($dairyStimulatorsSetting == 2)>>
+			cockmilked by the machines, you tell $activeSlave.slaveName to pay close attention. She watches in horror as a dildo the size of her forearm slides in and out of the slave's rectum, pounding it harder and harder until the slave stiffens and the transparent tubing coming off its cockhead whitens with cum. As the slave relaxes slightly in the restrains, the powerful milkers continue their relentless tugging at her gigantic udders. You tell $activeSlave.slaveName that unless she wants her ass ruined by constant machine rape and her tits turned into immobilizing milk factories,
+		<<elseif ($activeSlave.vagina > -1) && ($dairyPregSetting == 2)>>
+			used for reproduction by the machines, you tell $activeSlave.slaveName to pay close attention. She watches in horror as a dildo the size of her forearm fucks the slave's enormous cunt, keeping it as gaped as possible to ease birth and constantly ejaculating preparatory drugs against her cervix. The slave is gigantically pregnant. You tell $activeSlave.slaveName that this is the vaginal treatment she can expect when pregnant; when impregnation is required, the dildos ejaculate more than a liter of cum a minute. Unless she wants her womb converted into an industrial component,
 		<<else>>
-			purring that she'd love to.
+			drained of her milk, you tell $activeSlave.slaveName to pay close attention. She watches in horror as the slave's gigantic breasts are massaged and squeezed, while the milkers attached to her absurd nipples tug and pull with industrial power. She can't look away; the orbs of jiggling flesh being manipulated are each as big as the slave's torso. It's good for milk production to drain slaves completely on occasion, and the machine doesn't stop until every drop is wrung from both udders. You tell $activeSlave.slaveName that unless she wants to experience that twice a day,
 		<</if>>
-		You talk through the $activeSlave.slaveName's medical condition with her, and give her a <<if $PC.career == "medicine">>personal examination with the speed and accuracy of years of general practice<<else>>thorough exam<</if>>. Once this is done, you give $assistantName technical directions to make minor changes to $activeSlave.slaveName's drug regime, designed to make her @@color:lime;breasts grow just slightly faster.@@ The effect is minimal, but the point is made. She's still not happy to be transformed into a big-breasted sex slave, but she's relieved that was her only punishment for expressing her unhappiness about it.
-		<<set $activeSlave.boobs += 100>>
+		she had better behave herself. She nods furiously, @@color:gold;terrified beyond the ability to speak.@@
+		<<set $activeSlave.trust -= 8>>
+	<</replace>>
+<</click>>
+<</if>>
+<<if $seeExtreme != 0>>
+<br><<click "Threaten to convert her into a Fuckdoll">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		You order a Fuckdoll brought to your office. $activeSlave.slaveName watches it totter in, automatically following the tugs on its leash and the tonal commands passed by its suit. She already understands the implicit threat, and she shivers uncontrollably, @@color:gold;almost falling to her knees in fear.@@ Not content with that, you tell her that she's trying your patience with her behavior. If she doesn't control herself better in the future, you'll give up on her and convert her into a Fuckdoll. At the spoken threat $activeSlave.slaveName does collapse, but you order her to get back to her feet and watch. She does, shakily, tears streaming down her face as you put the Fuckdoll on its all fours, as though it were about to take dick. Its <<if $activeSlave.vagina > -1>>holes are pointed straight at $activeSlave.slaveName's face, and she can't avoid seeing how loose and used they look<<else>>rear hole is pointed straight at $activeSlave.slaveName's face, and she can't avoid seeing how loose and used it looks<</if>>. Suddenly, you activate the Fuckdoll's suit's punishment systems. It does not and cannot scream, but a slight stiffening of its posture communicates extreme anguish, and its sphincter spasms tightly closed with obviously involuntary force. $activeSlave.slaveName is almost incapacitated by terror.
+		<<set $activeSlave.trust -= 8>>
 	<</replace>>
 <</click>>
-<br><<click "Praise her breasts and reassure her">>
+<</if>>
+<br><<click "Comfort her">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		You decide to reassure her, and sit her on your lap. <<if $activeSlave.height > 185>>She's a big girl, and has trouble fitting there, but you put her there anyway, enjoying the absurdity.<<elseif $activeSlave.preg > 10>>Her pregnancy is very apparent to you in this posture, and she's quite aware of it too.<<elseif $activeSlave.butt > 3>>Her big soft butt is nice and comfortable on your thighs.<<else>>She's hesitant, but obeys anyway.<</if>> Pulling her back against your <<if $PC.boobs == 1>>own bosom<<else>>muscular chest<</if>>, you reach around her and take over the breast-cradling responsibilities. You say nothing for a while, just hefting her weighty udders, rolling them from side to side slightly. After letting her get used to the gentle treatment, you tell her that you're her owner, and you find big breasts very attractive. You tell her that you understand that they can be uncomfortable at times, but you expect her to tolerate that without complaint. It isn't easy to be pretty, but it's easier to be a pretty slave than to be a homely one. This last point affects her, and she seems to @@color:mediumaquamarine;take heart in the idea that you're improving her,@@ at least from your perspective. After all, she's sitting atop <<if $PC.dick == 1>>your hard dick, which she can definitely feel<<else>>your hot cunt, which she can probably detect<</if>> through your clothes. She does understand that having her <<if $PC.title == 1>>Master<<else>>Mistress<</if>> enjoy touching her boobs will be advantageous to her.
+		You rise from behind your desk, and $activeSlave.slaveName collapses to the floor, sure that she's about to be severely punished. She's shocked to feel your arms encircle her as you kneel down beside her and embrace her huddled form. You pull her head <<if $PC.boobs == 1>>against your soft breasts<<else>>into your shoulder<</if>>, stroking it reassuringly and murmuring kindness. She clings to you, mostly for lack of any other comfort in the whole world, and sobs convulsively, @@color:mediumaquamarine;her terror flowing out of her@@ in a torrent as you gently rub her back. When she's mostly cried herself out, you tell her that she'll be all right. You're sure she'll be a good slave one day. You understand that her life is hard. She'll make mistakes, and you'll punish her for them, but that's part of slave training, and that's all right. If she does her best, she'll be all right. She sniffles, cuffing tears away. "Th-thank you, <<Master>>, I'll d-do my b-be<<s>>t," she manages to <<say>>.
 		<<set $activeSlave.trust += 5>>
 	<</replace>>
 <</click>>
-<br><<click "Weight her breasts as punishment">>
+
+<<case "frightening dick">>
+
+<<click "Polish this">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		You announce that you're resolved to continue growing her breasts, and they need to be stretched out to accomodate the growth. The statement is absurd, but she's experienced enough to know not to question it, and to @@color:gold;be afraid.@@ She's right to fear. You secure her with her hands over her head, using the wrist shackles placed high on the office walls for this purpose. Then you
-		<<if $activeSlave.nipples == "inverted">>cruelly pop her inverted nipples out and<</if>>
-		<<if $activeSlave.nipplesPiercing == 0>>
-			attach a clip to each of <<if $activeSlave.nipples == "inverted">>them<<else>>her nipples<</if>>. The clips aren't painful, not yet, but they're very robust, and the reason is immediately apparent to her.
-		<<elseif $activeSlave.nipplesPiercing == 1>>
-			remove her nipple piercings, one by one, and replace them with big rings. Then you give each of them a tug to ensure it's ready to bear some serious pulling.
-		<<else>>
-			give each of her nipple rings a tug to ensure it's ready to bear some serious pulling.
-		<</if>>
-		You hang a weight from each, eliciting a moan of pain. $activeSlave.slaveName struggles against the restraints that hold her hands up high, desperately trying to find a comfortable way to stand, but it's impossible and the motion sets her udders swaying, making the weights pulling at her nipples even more uncomfortable.
-		<<switch $activeSlave.boobShape>>
-		<<case "perky">>
-			Her perky tits do their best to retain their pointy shape despite the tugging.
-		<<case "downward-facing">>
-			The nipples that cap her downward-facing udders are tugged even farther towards the ground.
-		<<case "torpedo-shaped">>
-			Her torpedos are long enough that the weights are a long way from her chest, allowing them to tug her nipples a long way down.
-		<<case "wide-set">>
-			Her wide-set its are dragged together for once as their nipples are tugged downward.
-		<<case "saggy">>
-			Her poor, saggy boobs cause her real trouble, letting the weights tug her nipples quite a ways down.
-		<<default>>
-			Her heavy breasts let the weights tug her nipples down to face at the ground.
-		<</switch>>
-		The first time she tries begging, you add another weight to each breast, which drives her over the edge into open crying. You leave her there for a while, letting anyone who comes into the office experience the sight of $activeSlave.slaveName alternately sobbing, trying not to sob because doing so jiggles her boobs, and then sobbing again because her boobs hurt.
+		You tell her to polish this instead, advancing even closer. She turns, finding your cockhead so close to her face that her eyes cross ludicrously as they attempt to focus on it. She does not like dicks, and obviously does not find the prospect of sucking this one appealing right now, but she knows it's in her best interests to <<if $activeSlave.oralSkill > 10>>put her oral knowledge to work<<else>>do her best<</if>> right now. She closes her eyes and takes you into her mouth, forming a seal around your cock with her <<if $activeSlave.lips > 40>>ridiculous<<elseif $activeSlave.lips > 20>>pillowy<<elseif $activeSlave.lips > 10>>pretty<<else>>disappointingly thin<</if>> lips before starting to suck dick. Dissatisfied with her reluctance, you order her to open her eyes and look up at you; she obeys, the $activeSlave.eyeColor orbs glittering with a little moisture as she concentrates on breathing past your penis. You ask if your cock tastes any different than usual. "Mmm hmm, M'," she mumbles, producing a nice humming sensation against your cock. You tell her that she's tasting another slave's <<if $activeSlave.vagina > -1>>pussy<<else>>ass<</if>>. She gags, but only slightly, and controls herself immediately. Your dick is desensitized from vigorous use, and she has to suck it a long time before you cup the back of her head, ram yourself all the way in, and blow your load straight down her gullet. You tell her she's a good $desc. "Thank you, <<Master>>," she <<say>>s @@color:hotpink;submissively,@@ going back to her polishing.
+		<<set $activeSlave.oralCount++, $oralTotal++>>
+		<<set $activeSlave.devotion += 5>>
+	<</replace>>
+<</click>><<if ($activeSlave.anus == 0) && ($activeSlave.vagina <= 0)>> //This option will take anal virginity//<</if>>
+<br><<click "Talk to her about her issues with dick">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		You sit yourself down in the doorway, right next to her, and pat your thighs. She sits on your lap, obeying despite some evident reluctance to sit atop your moist cock. It nestles easily between her lower buttocks and upper thighs, and she gets herself situated, doing her best to ignore the feeling of your hot hard meat, hard against her fundament. You encircle her with your arms, possessively and dominantly but not sexually, and tell her that you're concerned about her relationship with cock. She shifts uncomfortably. "<<S>>orry, <<Master>>, <<s>>orry I'm not better at hiding that. I should be a good $desc and not react like that. I mean, in a bad way. You <<s>>tartled me, but I don't alway<<s>> react well to dick even when I'm not <<s>>tartled. I'll try harder." This is more contrition and submission than you were expecting, and you probe further, asking her pointedly whether she's attracted to dicks now. "N-no," she admits, after only a moment's hesitation to remember that honesty is the most important rule for her to follow. "No, I don't. But I'll do my be<<s>>t to be a good <<s>>ex <<s>>lave anyway, <<Master>>." Pleased, you tell her that things will get easier for her. <<if $activeSlave.hormones > 0>>The hormone treatments she's currently taking will slowly reorient her sexuality, and eventually she'll lust after every cock she sees.<<elseif $activeSlave.aphrodisiacs > 0>>The aphrodisiacs she's on will make her so omnisexually horny that soon she won't care how anyone's equipped, as long as they'll fuck her.<<elseif $activeSlave.energy > 60>>Her excellent and improving libido will eventually soften her to all kinds of sex, with all kinds of people.<<else>>Habit and training will get her used to dick, and eventually she'll barely remember that she ever had a problem with sucking a quick cock.<</if>> She's a little unsure whether or not to be reassured by this, but she's @@color:mediumaquamarine;relieved she's not in trouble.@@
+		<<set $activeSlave.trust += 5>>
+	<</replace>>
+<</click>><<if ($activeSlave.anus == 0) && ($activeSlave.vagina <= 0)>> //This option will take anal virginity//<</if>>
+<br><<click "Rape her">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		Sometimes there's really no need to overthink things. You reach down, grab her under the armpits, and haul her up, throwing her across your desk. She lands on her back, and the impact drives the wind out of her, so she lies there, @@color:gold;all possibility of resistance driven out of her.@@ <<if $activeSlave.clothes == "no clothing">>She's already naked, so there's no need to<<else>>You<</if>> tear the clothes off her. You force yourself in between her legs as she struggles to get her breath back, and she gets another good look at the formidable dick that's about to be slammed inside her. Her eyes go wide with fear, and you enhance the effect by smacking yourself against <<if $activeSlave.vagina > -1>>her<<if $activeSlave.vagina == 0>> virgin<</if>> vulva<<else>>limp bitchclit<</if>>. You tell her not to worry, because you're still pretty wet from the last slave you fucked, so this shouldn't hurt too much. Then you ram your cock <<if $activeSlave.vagina > 0>>inside her<<else>>up her spasming ass<</if>>. She whines and bucks, but she's entirely at your mercy. She doesn't like dicks, and to go by her facial expression as you piston in and out of her, this experience isn't going to make her reconsider. When you fill her with cum, pull out, and let her retreat to clean herself up, she's relieved to go.
+		<<if $activeSlave.vagina <= 0>><<AnalVCheck>><<else>><<set $activeSlave.vaginalCount++, $vaginalTotal++>><</if>>
 		<<set $activeSlave.trust -= 5>>
 	<</replace>>
-<</click>>
+<</click>><<if ($activeSlave.anus == 0) && ($activeSlave.vagina <= 0)>> //This option will take anal virginity//<</if>>
 
 <<default>>
 	ERROR: bad event
diff --git a/src/uncategorized/assistantEvents.tw b/src/uncategorized/assistantEvents.tw
index b067aaff54e8fca3dcb723877742796c9edb0768..b73044af8bccdc21ef3888b4fd9fa41ede8571ca 100644
--- a/src/uncategorized/assistantEvents.tw
+++ b/src/uncategorized/assistantEvents.tw
@@ -677,7 +677,7 @@ Your personal assistant has been adapting to <<if $assistant>>her<<else>>its<</i
 	<br><br>
 	$assistantName's avatar looks uncharacteristically nervous, and clears her throat before speaking. Seeing that she has your attention, she says, "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, the computer core is so powerful that I'm running out of applications for it. I think practical economic modeling isn't out of the question. I've compiled business programs together into a distinct assistant, a subsidiary of mine for automated trading and similar tasks. I'd like to suggest menial slave trading as a test run for her. It's predictable and the margins are so wide that it should go very well. You can activate that from my menu."
 	<br><br>
-	"I was hoping, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, that she could, um, keep me company sometimes, too." $assistantName's avatar turns to the new avatar. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, may you please give me some guidance about what our relationship should be like? It won't be a constant thing, and all my normal functions will be unaffected. I'll change her avatar to match mine, and our relationship, if needed."
+	"I was hoping, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, that she could, um, keep me company sometimes, too." $assistantName's avatar turns to the new avatar. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, will you please give me some guidance about what our relationship should be like? It won't be a constant thing, and all my normal functions will be unaffected. I'll change her avatar to match mine, and our relationship, if needed."
 <<else>>
 	This time, <<if $assistant>>her<<else>>its<</if>> circular avatar is not alone: it's accompanied by a smaller green avatar in a ¤ shape. Not particularly inventive, but you can already guess the purpose. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, I now have the ability to act as a powerful automated trading system. As a trial, I suggest the menial slave market. It's volatile, but within certain predictable boundaries, and the profit margins are unmatched."
 	<br><br>
diff --git a/src/uncategorized/bodyModification.tw b/src/uncategorized/bodyModification.tw
index 655ac9b7030a59785c9cb6f1881ff581faa06368..efdae25bfcd3cb8c1c101232703bdfdddcacaf7b 100644
--- a/src/uncategorized/bodyModification.tw
+++ b/src/uncategorized/bodyModification.tw
@@ -2,6 +2,7 @@
 
 <<set $nextButton to "Continue">>
 <<set $nextLink to "Body Modification Degradation">>
+<<SlavePronouns $activeSlave>>
 
 <<set $showEncyclopedia to 1>><<set $encyclopedia to "The Studio">>
 
diff --git a/src/uncategorized/changeLanguage.tw b/src/uncategorized/changeLanguage.tw
index e81fea83e706bc364b8067d3fefb6016cbb59cfe..a923eee90c942ae863d0bc469b1ab613eddd20c4 100644
--- a/src/uncategorized/changeLanguage.tw
+++ b/src/uncategorized/changeLanguage.tw
@@ -1,5 +1,5 @@
 :: Change Language
- 
+
 <<nobr>>
 
 <<set $nextButton to "Confirm changes">>
@@ -47,7 +47,7 @@ Select a custom language to be applied: <<textbox "$seed" $seed "Change Language
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].fetish != "mindbroken">>
 		<<set $activeSlave to $slaves[$i]>>
-		<<display "Nationality to Accent">>
+		<<NationalityToAccent>>
 		<<if ($activeSlave.intelligenceImplant == 1)>>
 		<<if ($activeSlave.accent >= 3)>>
 		<<if (3+$activeSlave.intelligence) > random(0,6)>>
@@ -71,7 +71,7 @@ Select a custom language to be applied: <<textbox "$seed" $seed "Change Language
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].fetish != "mindbroken">>
 		<<set $activeSlave to $slaves[$i]>>
-		<<display "Nationality to Accent">>
+		<<NationalityToAccent>>
 		<<if ($activeSlave.intelligenceImplant == 1)>>
 		<<if ($activeSlave.accent >= 3)>>
 		<<if (3+$activeSlave.intelligence) > random(0,6)>>
@@ -95,7 +95,7 @@ Select a custom language to be applied: <<textbox "$seed" $seed "Change Language
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].fetish != "mindbroken">>
 		<<set $activeSlave to $slaves[$i]>>
-		<<display "Nationality to Accent">>
+		<<NationalityToAccent>>
 		<<if ($activeSlave.intelligenceImplant == 1)>>
 		<<if ($activeSlave.accent >= 3)>>
 		<<if (3+$activeSlave.intelligence) > random(0,6)>>
@@ -119,7 +119,7 @@ Select a custom language to be applied: <<textbox "$seed" $seed "Change Language
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].fetish != "mindbroken">>
 		<<set $activeSlave to $slaves[$i]>>
-		<<display "Nationality to Accent">>
+		<<NationalityToAccent>>
 		<<if ($activeSlave.intelligenceImplant == 1)>>
 		<<if ($activeSlave.accent >= 3)>>
 		<<if (3+$activeSlave.intelligence) > random(0,6)>>
@@ -143,7 +143,7 @@ Select a custom language to be applied: <<textbox "$seed" $seed "Change Language
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].fetish != "mindbroken">>
 		<<set $activeSlave to $slaves[$i]>>
-		<<display "Nationality to Accent">>
+		<<NationalityToAccent>>
 		<<if ($activeSlave.intelligenceImplant == 1)>>
 		<<if ($activeSlave.accent >= 3)>>
 		<<if (3+$activeSlave.intelligence) > random(0,6)>>
@@ -167,7 +167,7 @@ Select a custom language to be applied: <<textbox "$seed" $seed "Change Language
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].fetish != "mindbroken">>
 		<<set $activeSlave to $slaves[$i]>>
-		<<display "Nationality to Accent">>
+		<<NationalityToAccent>>
 		<<if ($activeSlave.intelligenceImplant == 1)>>
 		<<if ($activeSlave.accent >= 3)>>
 		<<if (3+$activeSlave.intelligence) > random(0,6)>>
diff --git a/src/uncategorized/costs.tw b/src/uncategorized/costs.tw
index 5609c07cfcac85facebbb7cd5297d613a7d3fd0e..81dc5348eb1420b9fe4c8f838b8c9c182df14c82 100644
--- a/src/uncategorized/costs.tw
+++ b/src/uncategorized/costs.tw
@@ -28,7 +28,7 @@
 
 <<set $costs += ($girls*(250+($economy*500)))>>
 
-<<if $PC.career is "mercenary">>
+<<if ($PC.career is "mercenary") || ($PC.career is "arcology owner")>>
 	<<set $costs += ($mercenaries*500)>>
 <<else>>
 	<<set $costs += ($mercenaries*1000)>>
diff --git a/src/uncategorized/costsReport.tw b/src/uncategorized/costsReport.tw
index e1be574462e2335bef309e199319e03712e1af4a..dc8fb0e0a6d7f0008695ccfab501d21d615f95bb 100644
--- a/src/uncategorized/costsReport.tw
+++ b/src/uncategorized/costsReport.tw
@@ -20,7 +20,7 @@
 	<br>Increased living expenses due to being pregnant : ¤100>>
 <</if>>
 <<if $mercenaries > 0>>
-	<<if $PC.career is "mercenary">>
+	<<if ($PC.career is "mercenary") || ($PC.career is "arcology owner")>>
 	<br>__Mercenary__ expenses: ¤<<print ($mercenaries*500)>> //Reduced by your @@color:springgreen;mercenary contacts@@//
 	<<else>>
 	<br>__Mercenary__ expenses: ¤<<print ($mercenaries*1000)>>
diff --git a/src/uncategorized/dispensary.tw b/src/uncategorized/dispensary.tw
index 4bfb6cdb88283f0aef419d0bbdb80a7de0251538..99b1d47acec941e221075f43fc789676a9cd9255 100644
--- a/src/uncategorized/dispensary.tw
+++ b/src/uncategorized/dispensary.tw
@@ -310,7 +310,7 @@ The hormone replacement therapies
 __Societal Focused Research__
 <br>
 
-<<if $arcologies[0].FSGenderRadicalistDecoration == 100 && $organFarmUpgrade == 1>>
+<<if $arcologies[0].FSGenderRadicalistDecoration == 100 && $organFarmUpgrade > 0>>
 <<if ($arcologies[0].FSGenderRadicalistResearch == 0)>>
 	<<if ($rep >= 10000*$upgradeMultiplierMedicine)>>
 	  [[Fund research into developing male pregnancy methods|Dispensary][$cash -= 50000*$upgradeMultiplierMedicine,$arcologies[0].FSGenderRadicalistResearch to 1]] //Costs ¤<<print 50000*$upgradeMultiplierMedicine>>. Will allow cloning and production of anal uteri and ovaries.//
diff --git a/src/uncategorized/economics.tw b/src/uncategorized/economics.tw
index a6abe899d919c1763f36fc41c5bbdc9473576344..81f31f46e922b084d29aba1a11b83f33add67820 100644
--- a/src/uncategorized/economics.tw
+++ b/src/uncategorized/economics.tw
@@ -215,6 +215,9 @@ __Personal Business__
 	<<if $PC.career is "capitalist">>
 		You focus on business and leverage your @@color:springgreen;venture capital experience@@ to make good money:
 		<<set $seed += random(500,1000)>>
+	<<elseif $PC.career is "arcology owner">>
+		You focus on business and leverage your @@color:springgreen;Free Cities experience@@ to make good money:
+		<<set $seed += random(500,1000)>>
 	<<else>>
 		You focus on business this week and make money:
 	<</if>>
@@ -1304,7 +1307,7 @@ earning you @@color:yellowgreen;¤$seed.@@
 		<<set $AWeekGrowth -= 1>>
 	<</if>>
 	<<if $personalAttention is "business">>
-		<<if $PC.career is "capitalist">>
+		<<if ($PC.career is "capitalist") || ($PC.career is "arcology owner")>>
 		Your @@color:springgreen;business focus and your experience@@ allows you to greatly assist in advancing the arcology's prosperity.
 		<<set $AWeekGrowth += 2>>
 		<<else>>
@@ -1348,6 +1351,9 @@ earning you @@color:yellowgreen;¤$seed.@@
 	<<if $PC.career is "capitalist">>
 		Your @@color:springgreen;business skills@@ drive increased prosperity.
 		<<set $AWeekGrowth += 1>>
+	<<elseif $PC.career is "arcology owner">>
+		Your @@color:springgreen;experience in the Free Cities@@ helps increase prosperity.
+		<<set $AWeekGrowth += 1>>
 	<</if>>
 	<<set $seed to $TSS.schoolPresent+$GRI.schoolPresent+$SCP.schoolPresent+$LDE.schoolPresent+$TGA.schoolPresent+$TFS.schoolPresent>>
 	<<if $seed == 1>>
diff --git a/src/uncategorized/fsDevelopments.tw b/src/uncategorized/fsDevelopments.tw
index 2a3fe7c814dc39097be8cbd07b103584d9ffffb2..84db7564601820c49676dd6d23cbbc2aabee181e 100644
--- a/src/uncategorized/fsDevelopments.tw
+++ b/src/uncategorized/fsDevelopments.tw
@@ -1,5 +1,5 @@
 :: FS Developments [nobr]
- 
+
 __Society__
 <br>
 
@@ -31,28 +31,28 @@ __Society__
 	<</if>>
 <<elseif $FSCreditCount == 5>>
 	<<if ($FSGotRepCreditOne != 1)>>
-	<<if ($rep > 7000)>>
+	<<if ($rep > 6000)>>
 		@@color:yellow;Your reputation is so solid that $arcologies[0].name's society is ready to begin accepting a second societal direction.@@
 		<<set $FSGotRepCreditOne = 1>>
 		<<set $FSCredits += 1>>
 	<</if>>
 	<</if>>
 	<<if ($FSGotRepCreditTwo != 1)>>
-	<<if ($rep > 10000)>>
+	<<if ($rep > 9000)>>
 		@@color:yellow;Your reputation is so high that $arcologies[0].name's society is ready to begin accepting a third societal direction.@@
 		<<set $FSGotRepCreditTwo = 1>>
 		<<set $FSCredits += 1>>
 	<</if>>
 	<</if>>
 	<<if ($FSGotRepCreditThree != 1)>>
-	<<if ($rep > 13000)>>
+	<<if ($rep > 12000)>>
 		@@color:yellow;Your reputation is so great that $arcologies[0].name's society is ready to begin accepting a fourth societal direction.@@
 		<<set $FSGotRepCreditThree = 1>>
 		<<set $FSCredits += 1>>
 	<</if>>
 	<</if>>
 	<<if ($FSGotRepCreditFour != 1)>>
-	<<if ($rep > 16000)>>
+	<<if ($rep > 15000)>>
 		@@color:yellow;Your reputation is so unparalleled that $arcologies[0].name's society is ready to begin accepting a fifth and final societal direction.@@
 		<<set $FSGotRepCreditFour = 1>>
 		<<set $FSCredits += 1>>
@@ -60,7 +60,7 @@ __Society__
 	<</if>>
 <<elseif $FSCreditCount == 6>>
 	<<if ($FSGotRepCreditOne != 1)>>
-	<<if ($rep > 7000)>>
+	<<if ($rep > 6000)>>
 		@@color:yellow;Your reputation is so solid that $arcologies[0].name's society is ready to begin accepting a second societal direction.@@
 		<<set $FSGotRepCreditOne = 1>>
 		<<set $FSCredits += 1>>
@@ -96,14 +96,14 @@ __Society__
 	<</if>>
 <<elseif $FSCreditCount == 7>>
 	<<if ($FSGotRepCreditOne != 1)>>
-	<<if ($rep > 7000)>>
+	<<if ($rep > 6000)>>
 		@@color:yellow;Your reputation is so solid that $arcologies[0].name's society is ready to begin accepting a second societal direction.@@
 		<<set $FSGotRepCreditOne = 1>>
 		<<set $FSCredits += 1>>
 	<</if>>
 	<</if>>
 	<<if ($FSGotRepCreditTwo != 1)>>
-	<<if ($rep > 10000)>>
+	<<if ($rep > 9000)>>
 		@@color:yellow;Your reputation is so high that $arcologies[0].name's society is ready to begin accepting a third societal direction.@@
 		<<set $FSGotRepCreditTwo = 1>>
 		<<set $FSCredits += 1>>
@@ -117,7 +117,7 @@ __Society__
 	<</if>>
 	<</if>>
 	<<if ($FSGotRepCreditFour != 1)>>
-	<<if ($rep > 14500)>>
+	<<if ($rep > 1500)>>
 		@@color:yellow;Your reputation is so great that $arcologies[0].name's society is ready to begin accepting a fifth societal direction.@@
 		<<set $FSGotRepCreditFour = 1>>
 		<<set $FSCredits += 1>>
@@ -293,21 +293,21 @@ __Society__
 	<</if>>
 <</if>>
 
-<<if $PAPublic == 1>>
-	<<set _seed1 = 0, _seed2 = 0>>
-	<<if $arcologies[0].FSSupremacist != "unset">>
-	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "shemale")>>
+<<if $PAPublic == 1 && $assistantAppearance != "normal">>
+<<set _seed1 = 0, _seed2 = 0>>
+<<if $arcologies[0].FSSupremacist != "unset">>
+	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "monstergirl")>>
 	 <<set $arcologies[0].FSSupremacist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSSubjugationist != "unset">>
-	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "shemale")>>
+<</if>>
+<<if $arcologies[0].FSSubjugationist != "unset">>
+	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "amazon")>>
 	 <<set $arcologies[0].FSSubjugationist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSGenderRadicalist != "unset">>
+<</if>>
+<<if $arcologies[0].FSGenderRadicalist != "unset">>
 	<<if ($assistantAppearance is "monstergirl") || ($assistantAppearance is "shemale")>>
 	 <<set $arcologies[0].FSGenderRadicalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
@@ -316,9 +316,9 @@ __Society__
 	 <<set $arcologies[0].FSGenderRadicalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSRepopulationFocus != "unset">>
-	<<if ($assistantAppearance is "goddess") or ($assistantAppearance is "hypergoddess") or ($assistantAppearance is "preggololi") or ($assistantAppearance is "pregnant fairy")>>
+<</if>>
+<<if $arcologies[0].FSRepopulationFocus != "unset">>
+	<<if ($assistantAppearance is "goddess") || ($assistantAppearance is "hypergoddess") || ($assistantAppearance is "preggololi") || ($assistantAppearance is "pregnant fairy")>>
 	 <<set $arcologies[0].FSRepopulationFocus += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -326,8 +326,8 @@ __Society__
 	 <<set $arcologies[0].FSRepopulationFocus += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSRestart != "unset">>
+<</if>>
+<<if $arcologies[0].FSRestart != "unset">>
 	<<if ($assistantAppearance is "businesswoman")>>
 	 <<set $arcologies[0].FSRestart += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
@@ -336,9 +336,9 @@ __Society__
 	 <<set $arcologies[0].FSRestart += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSGenderFundamentalist != "unset">>
-	<<if ($assistantAppearance is "schoolgirl") or ($assistantAppearance is "goddess") or ($assistantAppearance is "hypergoddess") or ($assistantAppearance is "preggololi") or ($assistantAppearance is "loli") or ($assistantAppearance is "fairy") or ($assistantAppearance is "pregnant fairy")>>
+<</if>>
+<<if $arcologies[0].FSGenderFundamentalist != "unset">>
+	<<if ($assistantAppearance is "schoolgirl") || ($assistantAppearance is "goddess") || ($assistantAppearance is "hypergoddess") || ($assistantAppearance is "preggololi") || ($assistantAppearance is "loli") || ($assistantAppearance is "fairy") || ($assistantAppearance is "pregnant fairy")>>
 	 <<set $arcologies[0].FSGenderFundamentalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -346,9 +346,9 @@ __Society__
 	 <<set $arcologies[0].FSGenderFundamentalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSPaternalist != "unset">>
-	<<if ($assistantAppearance is "schoolgirl") or ($assistantAppearance is "goddess") or ($assistantAppearance is "hypergoddess") or ($assistantAppearance is "preggololi") or ($assistantAppearance is "loli") or ($assistantAppearance is "fairy") or ($assistantAppearance is "pregnant fairy")>>
+<</if>>
+<<if $arcologies[0].FSPaternalist != "unset">>
+	<<if ($assistantAppearance is "schoolgirl") || ($assistantAppearance is "goddess") || ($assistantAppearance is "hypergoddess") || ($assistantAppearance is "preggololi") || ($assistantAppearance is "loli") || ($assistantAppearance is "fairy") || ($assistantAppearance is "pregnant fairy")>>
 	 <<set $arcologies[0].FSPaternalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -356,9 +356,9 @@ __Society__
 	 <<set $arcologies[0].FSPaternalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSDegradationist != "unset">>
-	<<if ($assistantAppearance is "monstergirl") or ($assistantAppearance is "businesswoman") or ($assistantAppearance is "preggololi")>>
+<</if>>
+<<if $arcologies[0].FSDegradationist != "unset">>
+	<<if ($assistantAppearance is "monstergirl") || ($assistantAppearance is "businesswoman") || ($assistantAppearance is "preggololi")>>
 	 <<set $arcologies[0].FSDegradationist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -366,9 +366,9 @@ __Society__
 	 <<set $arcologies[0].FSDegradationist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSBodyPurist != "unset">>
-	<<if ($assistantAppearance is "schoolgirl") or ($assistantAppearance is "goddess") or ($assistantAppearance is "loli") or ($assistantAppearance is "fairy") or ($assistantAppearance is "pregnant fairy")>>
+<</if>>
+<<if $arcologies[0].FSBodyPurist != "unset">>
+	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "goddess") || ($assistantAppearance is "loli") || ($assistantAppearance is "fairy") || ($assistantAppearance is "pregnant fairy")>>
 	 <<set $arcologies[0].FSBodyPurist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -376,8 +376,8 @@ __Society__
 	 <<set $arcologies[0].FSBodyPurist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSTransformationFetishist != "unset">>
+<</if>>
+<<if $arcologies[0].FSTransformationFetishist != "unset">>
 	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "shemale")>>
 	 <<set $arcologies[0].FSTransformationFetishist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
@@ -386,8 +386,8 @@ __Society__
 	 <<set $arcologies[0].FSTransformationFetishist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSMaturityPreferentialist != "unset">>
+<</if>>
+<<if $arcologies[0].FSMaturityPreferentialist != "unset">>
 	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "goddess")>>
 	 <<set $arcologies[0].FSMaturityPreferentialist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
@@ -396,9 +396,9 @@ __Society__
 	 <<set $arcologies[0].FSMaturityPreferentialist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSYouthPreferentialist != "unset">>
-	<<if ($assistantAppearance is "schoolgirl") or ($assistantAppearance is "shemale") or ($assistantAppearance is "preggololi") or ($assistantAppearance is "loli")>>
+<</if>>
+<<if $arcologies[0].FSYouthPreferentialist != "unset">>
+	<<if ($assistantAppearance is "schoolgirl") || ($assistantAppearance is "shemale") || ($assistantAppearance is "preggololi") || ($assistantAppearance is "loli")>>
 	 <<set $arcologies[0].FSYouthPreferentialist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -406,9 +406,9 @@ __Society__
 	 <<set $arcologies[0].FSYouthPreferentialist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSSlimnessEnthusiast != "unset">>
-	<<if ($assistantAppearance is "schoolgirl") or ($assistantAppearance is "shemale") or ($assistantAppearance is "loli")>>
+<</if>>
+<<if $arcologies[0].FSSlimnessEnthusiast != "unset">>
+	<<if ($assistantAppearance is "schoolgirl") || ($assistantAppearance is "shemale") || ($assistantAppearance is "loli")>>
 	 <<set $arcologies[0].FSSlimnessEnthusiast += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -416,9 +416,9 @@ __Society__
 	 <<set $arcologies[0].FSSlimnessEnthusiast += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSAssetExpansionist != "unset">>
-	<<if ($assistantAppearance is "goddess") or ($assistantAppearance is "shemale") or ($assistantAppearance is "hypergoddess")>>
+<</if>>
+<<if $arcologies[0].FSAssetExpansionist != "unset">>
+	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "shemale") || ($assistantAppearance is "hypergoddess")>>
 	 <<set $arcologies[0].FSAssetExpansionist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -426,9 +426,9 @@ __Society__
 	 <<set $arcologies[0].FSAssetExpansionist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSPastoralist != "unset">>
-	<<if ($assistantAppearance is "businesswoman") or ($assistantAppearance is "goddess") or ($assistantAppearance is "hypergoddess")>>
+<</if>>
+<<if $arcologies[0].FSPastoralist != "unset">>
+	<<if ($assistantAppearance is "shemale") || ($assistantAppearance is "goddess") || ($assistantAppearance is "hypergoddess")>>
 	 <<set $arcologies[0].FSPastoralist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -436,9 +436,9 @@ __Society__
 	 <<set $arcologies[0].FSPastoralist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSPhysicalIdealist != "unset">>
-	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "monstergirl")>>
+<</if>>
+<<if $arcologies[0].FSPhysicalIdealist != "unset">>
+	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "shemale")>>
 	 <<set $arcologies[0].FSPhysicalIdealist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -446,8 +446,8 @@ __Society__
 	 <<set $arcologies[0].FSPhysicalIdealist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSChattelReligionist != "unset">>
+<</if>>
+<<if $arcologies[0].FSChattelReligionist != "unset">>
 	<<if ($assistantAppearance is "goddess") || ($assistantAppearance is "monstergirl")>>
 	 <<set $arcologies[0].FSChattelReligionist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
@@ -456,9 +456,9 @@ __Society__
 	 <<set $arcologies[0].FSChattelReligionist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSRomanRevivalist != "unset">>
-	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "goddess")>>
+<</if>>
+<<if $arcologies[0].FSRomanRevivalist != "unset">>
+	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "businesswoman")>>
 	 <<set $arcologies[0].FSRomanRevivalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -466,9 +466,9 @@ __Society__
 	 <<set $arcologies[0].FSRomanRevivalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
-	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "monstergirl")>>
+<</if>>
+<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
+	<<if ($assistantAppearance is "goddess") || ($assistantAppearance is "monstergirl")>>
 	 <<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -476,9 +476,9 @@ __Society__
 	 <<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSEdoRevivalist != "unset">>
-	<<if ($assistantAppearance is "goddess") or ($assistantAppearance is "monstergirl") or ($assistantAppearance is "loli") or ($assistantAppearance is "kitsune")>>
+<</if>>
+<<if $arcologies[0].FSEdoRevivalist != "unset">>
+	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "monstergirl") || ($assistantAppearance is "loli") || ($assistantAppearance is "kitsune")>>
 	 <<set $arcologies[0].FSEdoRevivalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -486,9 +486,9 @@ __Society__
 	 <<set $arcologies[0].FSEdoRevivalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSArabianRevivalist != "unset">>
-	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "monstergirl")>>
+<</if>>
+<<if $arcologies[0].FSArabianRevivalist != "unset">>
+	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "schoolgirl")>>
 	 <<set $arcologies[0].FSArabianRevivalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -496,9 +496,9 @@ __Society__
 	 <<set $arcologies[0].FSArabianRevivalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSChineseRevivalist != "unset">>
-	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "monstergirl")>>
+<</if>>
+<<if $arcologies[0].FSChineseRevivalist != "unset">>
+	<<if ($assistantAppearance is "schoolgirl") || ($assistantAppearance is "monstergirl")>>
 	 <<set $arcologies[0].FSChineseRevivalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed1 = 1>>
 	<</if>>
@@ -506,12 +506,12 @@ __Society__
 	 <<set $arcologies[0].FSChineseRevivalist += 0.1*$FSSingleSlaveRep>>
 	 <<set _seed2 = 2>>
 	<</if>>
-	<</if>>
-	<<if _seed2 == 2>>
-	With her $assistantAppearance appearance, $assistantName's public visibility meshes well with society.
-	<<elseif _seed1 == 1>>
-	With her $assistantFSAppearance $assistantAppearance appearance,  $assistantName's public visibility meshes very well with society.
-	<</if>>
+<</if>>
+<<if _seed2 == 2>>
+With her $assistantFSAppearance $assistantAppearance appearance, $assistantName's public visibility meshes very well with society.
+<<elseif _seed1 == 1>>
+With her $assistantAppearance appearance, $assistantName's public visibility meshes well with society.
+<</if>>
 <</if>>
 
 <<if ($arcologies[0].FSSupremacistSMR + $arcologies[0].FSSubjugationistSMR + $arcologies[0].FSGenderRadicalistSMR + $arcologies[0].FSGenderFundamentalistSMR + $arcologies[0].FSPaternalistSMR + $arcologies[0].FSDegradationistSMR + $arcologies[0].FSBodyPuristSMR + $arcologies[0].FSTransformationFetishistSMR + $arcologies[0].FSYouthPreferentialistSMR + $arcologies[0].FSMaturityPreferentialistSMR + $arcologies[0].FSSlimnessEnthusiastSMR + $arcologies[0].FSAssetExpansionistSMR + $arcologies[0].FSPastoralistSMR + $arcologies[0].FSPhysicalIdealistSMR + $arcologies[0].FSChattelReligionistSMR + $arcologies[0].FSRomanRevivalistSMR + $arcologies[0].FSEgyptianRevivalistSMR + $arcologies[0].FSEdoRevivalistSMR + $arcologies[0].FSRepopulationFocusSMR + $arcologies[0].FSRestartSMR + $arcologies[0].FSArabianRevivalistSMR + $arcologies[0].FSChineseRevivalistSMR) > 0>>
diff --git a/src/uncategorized/futureSocities.tw b/src/uncategorized/futureSocities.tw
index b47a4f47a74816ecd6fb60d259508b8c0e3db023..0584d99988e010f450297cdfa7b103c4e288952c 100644
--- a/src/uncategorized/futureSocities.tw
+++ b/src/uncategorized/futureSocities.tw
@@ -569,8 +569,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</if>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "shemale")>>
-	 With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "monstergirl")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -626,8 +626,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</if>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "shemale")>>
-	 With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "amazon")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -652,9 +652,10 @@ You are spending ¤$FSSpending each week to support your societal goals.
 <<if $publiclyouted != 1>>
 <<if $arcologies[0].FSRestart is "unset">>
 <<if $arcologies[0].FSRepopulationFocus != "unset">>
-  <br>''You are pursuing'' societal fetishization of pregnancy. //[[Abandon|Future Society][$arcologies[0].FSRepopulationFocus to "unset", $arcologies[0].FSRepopulationFocusDecoration to 20, $arcologies[0].FSRepopulationFocusLaw to 0,$arcologies[0].FSRepopulationFocusSMR to 0, $assistantFSAppearance to "default", $FSCredits += 1]]// <br>&nbsp;&nbsp;&nbsp;&nbsp;
-  <<switch $arcologies[0].FSRepopulationFocusDecoration>>
-  <<case 20>>
+	<br>''You are pursuing'' the belief that mass breeding will save humanity.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSRepopulationFocus to "unset", $arcologies[0].FSRepopulationFocusDecoration to 20, $arcologies[0].FSRepopulationFocusSMR to 0, $arcologies[0].FSRepopulationFocusLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "repopulation focus">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<<switch $arcologies[0].FSRepopulationFocusDecoration>>
+	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
 	<<if $arcologies[0].FSRepopulationFocus >= 10>>
 	  [[Modify your arcology's internal media to support this goal|Future Society][$arcologies[0].FSRepopulationFocusDecoration to 40, $cash -= 2500]] //Costs ¤2500//
@@ -703,7 +704,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 <<if $arcologies[0].FSRepopulationFocus is "unset">>
 <<if $arcologies[0].FSRestart != "unset">>
 <<if $arcologies[0].FSRestartDecoration != 100>>
-  <br>''You are pursuing'' Eugenics. //[[Abandon|Future Society][$arcologies[0].FSRestart to "unset", $arcologies[0].FSRestartDecoration to 20, $arcologies[0].FSRestartLaw to 0,$arcologies[0].FSRestartSMR to 0, $assistantFSAppearance to "default", $FSCredits += 1]]// <br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' Eugenics.
+//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSRestart to "unset", $arcologies[0].FSRestartDecoration to 20, $arcologies[0].FSRestartSMR to 0, $arcologies[0].FSRestartLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "eugenics">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 <<else>>
   <br>''You have established'' Eugenics. The Societal Elite will not permit you to abandon Eugenics. <br>&nbsp;&nbsp;&nbsp;&nbsp;
 <</if>>
@@ -757,7 +759,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 <<if $seeDicks != 0>>
 <<if $arcologies[0].FSGenderFundamentalist is "unset">>
 <<if $arcologies[0].FSGenderRadicalist != "unset">>
-	<br>''You are pursuing'' a radical redefinition of gender that identifies powerful people as male, and everyone else as female. //[[Abandon|Future Society][$arcologies[0].FSGenderRadicalist to "unset", $arcologies[0].FSGenderRadicalistDecoration to 20, $arcologies[0].FSGenderRadicalistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' a radical redefinition of gender that identifies powerful people as male, and everyone else as female.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSGenderRadicalist to "unset", $arcologies[0].FSGenderRadicalistDecoration to 20, $arcologies[0].FSGenderRadicalistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "gender radicalist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSGenderRadicalistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -792,7 +795,7 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	<</switch>>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance is "shemale") || ($assistantAppearance is "monstergirl")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -807,7 +810,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if $arcologies[0].FSGenderRadicalist is "unset">>
 <<if $arcologies[0].FSGenderFundamentalist != "unset">>
-	<br>''You are pursuing'' gender traditionalism, including a societal preference for feminine slaves and support for slave pregnancy. //[[Abandon|Future Society][$arcologies[0].FSGenderFundamentalist to "unset", $arcologies[0].FSGenderFundamentalistDecoration to 20, $arcologies[0].FSGenderFundamentalistSMR to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' gender traditionalism, including a societal preference for feminine slaves and support for slave pregnancy.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSGenderFundamentalist to "unset", $arcologies[0].FSGenderFundamentalistDecoration to 20, $arcologies[0].FSGenderFundamentalistSMR to 0, $FSCredits += 1>><<if $assistantFSAppearance == "gender fundamentalist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSGenderFundamentalistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -842,7 +846,7 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	<</switch>>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance is "schoolgirl") or ($assistantAppearance is "goddess") or ($assistantAppearance is "hypergoddess") or ($assistantAppearance is "preggololi") or ($assistantAppearance is "loli") or ($assistantAppearance is "fairy") or ($assistantAppearance is "pregnant fairy")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -856,7 +860,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if $arcologies[0].FSDegradationist is "unset">>
 <<if $arcologies[0].FSPaternalist != "unset">>
-	<br>''You are pursuing'' a vision of slave improvement, including slaves' health, mental well-being, and education. //[[Abandon|Future Society][$arcologies[0].FSPaternalist to "unset", $arcologies[0].FSPaternalistDecoration to 20, $arcologies[0].FSPaternalistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' a vision of slave improvement, including slaves' health, mental well-being, and education.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSPaternalist to "unset", $arcologies[0].FSPaternalistDecoration to 20, $arcologies[0].FSPaternalistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "paternalist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSPaternalistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -891,7 +896,7 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	<</switch>>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance is "schoolgirl") or ($assistantAppearance is "goddess") or ($assistantAppearance is "hypergoddess") or ($assistantAppearance is "preggololi") or ($assistantAppearance is "loli") or ($assistantAppearance is "fairy") or ($assistantAppearance is "pregnant fairy")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -905,7 +910,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if $arcologies[0].FSPaternalist is "unset">>
 <<if $arcologies[0].FSDegradationist != "unset">>
-	<br>''You are pursuing'' slave degradation, a belief that slaves are not human and should not be treated decently. //[[Abandon|Future Society][$arcologies[0].FSDegradationist to "unset", $arcologies[0].FSDegradationistDecoration to 20, $arcologies[0].FSDegradationistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' slave degradation, a belief that slaves are not human and should not be treated decently.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSDegradationist to "unset", $arcologies[0].FSDegradationistDecoration to 20, $arcologies[0].FSDegradationistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "degradationist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSDegradationistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -939,8 +945,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</switch>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "monstergirl") or ($assistantAppearance is "businesswoman") or ($assistantAppearance is "preggololi")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "monstergirl") || ($assistantAppearance is "businesswoman") || ($assistantAppearance is "preggololi")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -954,7 +960,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if $arcologies[0].FSTransformationFetishist is "unset">>
 <<if $arcologies[0].FSBodyPurist != "unset">>
-	<br>''You are pursuing'' societal disapproval of implant surgery. //[[Abandon|Future Society][$arcologies[0].FSBodyPurist to "unset", $arcologies[0].FSBodyPuristDecoration to 20, $arcologies[0].FSBodyPuristLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' societal disapproval of implant surgery.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSBodyPurist to "unset", $arcologies[0].FSBodyPuristDecoration to 20, $arcologies[0].FSBodyPuristLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "body purist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSBodyPuristDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -988,8 +995,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</switch>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "schoolgirl") or ($assistantAppearance is "goddess") or ($assistantAppearance is "loli") or ($assistantAppearance is "fairy") or ($assistantAppearance is "pregnant fairy")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "goddess") || ($assistantAppearance is "loli") || ($assistantAppearance is "fairy") || ($assistantAppearance is "pregnant fairy")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1003,7 +1010,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if $arcologies[0].FSBodyPurist is "unset">>
 <<if $arcologies[0].FSTransformationFetishist != "unset">>
-	<br>''You are pursuing'' societal fetishization of implant surgery. //[[Abandon|Future Society][$arcologies[0].FSTransformationFetishist to "unset", $arcologies[0].FSTransformationFetishistDecoration to 20, $arcologies[0].FSTransformationFetishistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' societal fetishization of implant surgery.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSTransformationFetishist to "unset", $arcologies[0].FSTransformationFetishistDecoration to 20, $arcologies[0].FSTransformationFetishistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "transformation fetishist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSTransformationFetishistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1038,7 +1046,7 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	<</switch>>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "shemale")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1052,7 +1060,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if $arcologies[0].FSMaturityPreferentialist is "unset">>
 <<if $arcologies[0].FSYouthPreferentialist != "unset">>
-	<br>''You are pursuing'' an accentuated societal preference for younger slaves. //[[Abandon|Future Society][$arcologies[0].FSYouthPreferentialist to "unset", $arcologies[0].FSYouthPreferentialistDecoration to 20, $arcologies[0].FSYouthPreferentialistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' an accentuated societal preference for younger slaves.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSYouthPreferentialist to "unset", $arcologies[0].FSYouthPreferentialistDecoration to 20, $arcologies[0].FSYouthPreferentialistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "youth preferentialist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSYouthPreferentialistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1086,8 +1095,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</switch>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "schoolgirl") or ($assistantAppearance is "shemale") or ($assistantAppearance is "preggololi") or ($assistantAppearance is "loli")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "schoolgirl") || ($assistantAppearance is "shemale") || ($assistantAppearance is "preggololi") || ($assistantAppearance is "loli")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1101,7 +1110,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if $arcologies[0].FSYouthPreferentialist is "unset">>
 <<if $arcologies[0].FSMaturityPreferentialist != "unset">>
-	<br>''You are pursuing'' a societal preference for older women. //[[Abandon|Future Society][$arcologies[0].FSMaturityPreferentialist to "unset", $arcologies[0].FSMaturityPreferentialistDecoration to 20, $arcologies[0].FSMaturityPreferentialistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' a societal preference for older women.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSMaturityPreferentialist to "unset", $arcologies[0].FSMaturityPreferentialistDecoration to 20, $arcologies[0].FSMaturityPreferentialistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "maturity preferentialist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSMaturityPreferentialistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1136,7 +1146,7 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	<</switch>>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "goddess")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1150,7 +1160,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if $arcologies[0].FSAssetExpansionist is "unset">>
 <<if $arcologies[0].FSSlimnessEnthusiast != "unset">>
-	<br>''You are supporting'' enthusiasm for slaves with girlish figures. //[[Abandon|Future Society][$arcologies[0].FSSlimnessEnthusiast to "unset", $arcologies[0].FSSlimnessEnthusiastDecoration to 20, $arcologies[0].FSSlimnessEnthusiastSMR to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are supporting'' enthusiasm for slaves with girlish figures.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSSlimnessEnthusiast to "unset", $arcologies[0].FSSlimnessEnthusiastDecoration to 20, $arcologies[0].FSSlimnessEnthusiastSMR to 0, $FSCredits += 1>><<if $assistantFSAppearance == "slimness enthusiast">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSSlimnessEnthusiastDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1184,8 +1195,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</switch>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "schoolgirl") or ($assistantAppearance is "shemale") or ($assistantAppearance is "loli")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "schoolgirl") || ($assistantAppearance is "shemale") || ($assistantAppearance is "loli")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1199,7 +1210,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if $arcologies[0].FSSlimnessEnthusiast is "unset">>
 <<if $arcologies[0].FSAssetExpansionist != "unset">>
-	<br>''You are pursuing'' societal hunger for huge assets. //[[Abandon|Future Society][$arcologies[0].FSAssetExpansionist to "unset", $arcologies[0].FSAssetExpansionistDecoration to 20, $arcologies[0].FSAssetExpansionistSMR to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' societal hunger for huge assets.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSAssetExpansionist to "unset", $arcologies[0].FSAssetExpansionistDecoration to 20, $arcologies[0].FSAssetExpansionistSMR to 0, $FSCredits += 1>><<if $assistantFSAppearance == "asset expansionist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSAssetExpansionistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1233,8 +1245,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</switch>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "goddess") or ($assistantAppearance is "shemale") or ($assistantAppearance is "hypergoddess")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "shemale") || ($assistantAppearance is "hypergoddess")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1248,7 +1260,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if $arcologies[0].FSPhysicalIdealist is "unset">>
 <<if $arcologies[0].FSPastoralist != "unset">>
-	<br>''You are pursuing'' societal normalization of slave milking. //[[Abandon|Future Society][$arcologies[0].FSPastoralist to "unset", $arcologies[0].FSPastoralistDecoration to 20, $arcologies[0].FSPastoralistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' societal normalization of slave milking.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSPastoralist to "unset", $arcologies[0].FSPastoralistDecoration to 20, $arcologies[0].FSPastoralistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "pastoralist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSPastoralistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1282,8 +1295,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</switch>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "goddess") or ($assistantAppearance is "businesswoman") or ($assistantAppearance is "hypergoddess")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "goddess") || ($assistantAppearance is "shemale") || ($assistantAppearance is "hypergoddess")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1297,7 +1310,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if $arcologies[0].FSPastoralist is "unset">>
 <<if $arcologies[0].FSPhysicalIdealist != "unset">>
-	<br>''You are pursuing'' societal reverence for the idealized human form, including height, health and muscle. //[[Abandon|Future Society][$arcologies[0].FSPhysicalIdealist to "unset", $arcologies[0].FSPhysicalIdealistDecoration to 20, $arcologies[0].FSPhysicalIdealistSMR to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' societal reverence for the idealized human form, including height, health and muscle.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSPhysicalIdealist to "unset", $arcologies[0].FSPhysicalIdealistDecoration to 20, $arcologies[0].FSPhysicalIdealistSMR to 0, $FSCredits += 1>><<if $assistantFSAppearance == "physical idealist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSPhysicalIdealistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1331,8 +1345,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</switch>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "monstergirl")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "shemale")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1346,7 +1360,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if $arcologies[0].FSNull is "unset">>
 <<if $arcologies[0].FSChattelReligionist != "unset">>
-	<br>''You are pursuing'' a new strain of religion that emphasizes the slaveholding portions of religious history. //[[Abandon|Future Society][$arcologies[0].FSChattelReligionist to "unset", $arcologies[0].FSChattelReligionistDecoration to 20, $arcologies[0].FSChattelReligionistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' a new strain of religion that emphasizes the slaveholding portions of religious history.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSChattelReligionist to "unset", $arcologies[0].FSChattelReligionistDecoration to 20, $arcologies[0].FSChattelReligionistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "chattel religionist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSChattelReligionistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1381,7 +1396,7 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	<</switch>>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance is "goddess") || ($assistantAppearance is "monstergirl")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1395,7 +1410,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if ($arcologies[0].FSEgyptianRevivalist is "unset") && ($arcologies[0].FSEdoRevivalist is "unset") && ($arcologies[0].FSArabianRevivalist is "unset") && ($arcologies[0].FSChineseRevivalist is "unset")>>
 <<if $arcologies[0].FSRomanRevivalist != "unset">>
-	<br>''You are pursuing'' a vision of a new Rome. //[[Abandon|Future Society][$arcologies[0].FSRomanRevivalist to "unset", $arcologies[0].FSRomanRevivalistDecoration to 20, $arcologies[0].FSRomanRevivalistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' a vision of a new Rome.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSRomanRevivalist to "unset", $arcologies[0].FSRomanRevivalistDecoration to 20, $arcologies[0].FSRomanRevivalistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "roman revivalist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSRomanRevivalistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1429,8 +1445,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</switch>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "goddess") || ($assistantAppearance is "amazon")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "amazon")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1444,7 +1460,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if ($arcologies[0].FSRomanRevivalist is "unset") && ($arcologies[0].FSEdoRevivalist is "unset") && ($arcologies[0].FSArabianRevivalist is "unset") && ($arcologies[0].FSChineseRevivalist is "unset")>>
 <<if $arcologies[0].FSEgyptianRevivalist != "unset">>
-	<br>''You are pursuing'' a vision of Pharaoh's Egypt. //[[Abandon|Future Society][$arcologies[0].FSEgyptianRevivalist to "unset", $arcologies[0].FSEgyptianRevivalistDecoration to 20, $arcologies[0].FSEgyptianRevivalistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' a vision of Pharaoh's Egypt.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSEgyptianRevivalist to "unset", $arcologies[0].FSEgyptianRevivalistDecoration to 20, $arcologies[0].FSEgyptianRevivalistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "egyptian revivalist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSEgyptianRevivalistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1478,8 +1495,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</switch>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "monstergirl")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "goddess") || ($assistantAppearance is "monstergirl")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1493,7 +1510,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if ($arcologies[0].FSRomanRevivalist is "unset") && ($arcologies[0].FSEgyptianRevivalist is "unset") && ($arcologies[0].FSArabianRevivalist is "unset") && ($arcologies[0].FSChineseRevivalist is "unset")>>
 <<if $arcologies[0].FSEdoRevivalist != "unset">>
-	<br>''You are pursuing'' a vision of Edo Japan. //[[Abandon|Future Society][$arcologies[0].FSEdoRevivalist to "unset", $arcologies[0].FSEdoRevivalistDecoration to 20, $arcologies[0].FSEdoRevivalistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' a vision of Edo Japan.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSEdoRevivalist to "unset", $arcologies[0].FSEdoRevivalistDecoration to 20, $arcologies[0].FSEdoRevivalistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "edo revivalist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSEdoRevivalistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1527,8 +1545,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</switch>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "goddess") or ($assistantAppearance is "monstergirl") or ($assistantAppearance is "loli") or ($assistantAppearance is "kitsune")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "amazon") || ($assistantAppearance is "monstergirl") || ($assistantAppearance is "loli") || ($assistantAppearance is "kitsune")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1540,7 +1558,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if ($arcologies[0].FSRomanRevivalist is "unset") && ($arcologies[0].FSEgyptianRevivalist is "unset") && ($arcologies[0].FSEdoRevivalist is "unset") && ($arcologies[0].FSChineseRevivalist is "unset")>>
 <<if $arcologies[0].FSArabianRevivalist != "unset">>
-	<br>''You are pursuing'' a vision of the Sultanate of old. //[[Abandon|Future Society][$arcologies[0].FSArabianRevivalist to "unset", $arcologies[0].FSArabianRevivalistDecoration to 20, $arcologies[0].FSArabianRevivalistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' a vision of the Sultanate of old.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSArabianRevivalist to "unset", $arcologies[0].FSArabianRevivalistDecoration to 20, $arcologies[0].FSArabianRevivalistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "arabian revivalist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSArabianRevivalistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1574,8 +1593,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</switch>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "monstergirl")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "schoolgirl")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1587,7 +1606,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 
 <<if ($arcologies[0].FSRomanRevivalist is "unset") && ($arcologies[0].FSEgyptianRevivalist is "unset") && ($arcologies[0].FSEdoRevivalist is "unset") && ($arcologies[0].FSArabianRevivalist is "unset")>>
 <<if $arcologies[0].FSChineseRevivalist != "unset">>
-	<br>''You are pursuing'' a vision of ancient China. //[[Abandon|Future Society][$arcologies[0].FSChineseRevivalist to "unset", $arcologies[0].FSChineseRevivalistDecoration to 20, $arcologies[0].FSChineseRevivalistLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' a vision of ancient China.
+	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSChineseRevivalist to "unset", $arcologies[0].FSChineseRevivalistDecoration to 20, $arcologies[0].FSChineseRevivalistLaw to 0, $FSCredits += 1>><<if $assistantFSAppearance == "chinese revivalist">><<set $assistantFSAppearance to "default">><</if>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<switch $arcologies[0].FSChineseRevivalistDecoration>>
 	<<case 20>>
 	$arcologies[0].name is not customized to support this goal.
@@ -1621,8 +1641,8 @@ You are spending ¤$FSSpending each week to support your societal goals.
 	$arcologies[0].name's media is supporting this goal; $arcologies[0].name's public spaces are decorated to support it, and have slaves stationed in them to support it. The exterior of the arcology has been remodeled to support it too; the arcology is fully customized for this goal.
 	<</switch>>
 	<<if $PAPublic == 1>>
-	<<if ($assistantAppearance is "businesswoman") || ($assistantAppearance is "monstergirl")>>
-		With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
+	<<if ($assistantAppearance is "schoolgirl") || ($assistantAppearance is "monstergirl")>>
+	With her $assistantAppearance appearance, $assistantName is a good public mascot for this model.
 	<</if>>
 	<</if>>
 <<else>>
@@ -1633,22 +1653,81 @@ You are spending ¤$FSSpending each week to support your societal goals.
 <</if>>
 
 <<if $arcologies[0].FSChattelReligionist is "unset">>
-<<if $arcologies[0].FSNull != "unset">>
-	<br>''You are permitting <<if $arcologies[0].FSNull <= 25>>basic<<elseif $arcologies[0].FSNull <= 50>>considerable<<elseif $arcologies[0].FSNull <= 75>>advanced<<else>>absolute<</if>>'' cultural freedom in your arcology.
-	<<if $arcologies[0].FSNull <= 25>>
-		//[[Abandon|Future Society][$arcologies[0].FSNull to "unset", $arcologies[0].FSNullDecoration to 20, $arcologies[0].FSNullLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//
+<<if $FSCreditCount == 4>>
+	<<if $arcologies[0].FSNull != "unset">>
+		<br>''You are permitting <<if $arcologies[0].FSNull <= 25>>basic<<elseif $arcologies[0].FSNull <= 50>>considerable<<elseif $arcologies[0].FSNull <= 75>>advanced<<else>>absolute<</if>>'' cultural freedom in your arcology.
+		<<if $arcologies[0].FSNull <= 25>>
+			//[[Abandon|Future Society][$arcologies[0].FSNull to "unset", $arcologies[0].FSNullDecoration to 20, $arcologies[0].FSNullLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//
+		<<else>>
+			//[[Withdraw|Future Society][$arcologies[0].FSNull -= 25, $FSCredits += 1]]//
+		<</if>>
+		<<if $FSCredits > 0>>
+		<<if $arcologies[0].FSNull < $FSLockinLevel>>
+			<br>&nbsp;&nbsp;&nbsp;&nbsp;[[Advance|Future Society][$arcologies[0].FSNull += 25, $FSCredits -= 1]]: further commitment to allow your arcology's citizens cultural freedom.
+		<</if>>
+		<</if>>
 	<<else>>
-		//[[Withdraw|Future Society][$arcologies[0].FSNull -= 25, $FSCredits += 1]]//
+		<<if $FSCredits > 0>>
+			<br>[[Multiculturalism|Future Society][$arcologies[0].FSNull to 25, $FSCredits -= 1]]: a commitment to allow your arcology's citizens cultural freedom.
+			<br>&nbsp;&nbsp;&nbsp;&nbsp;//This option is an alternative to societal advancement, and will not advance naturally.//
+		<</if>>
 	<</if>>
-	<<if $FSCredits > 0>>
-	<<if $arcologies[0].FSNull < $FSLockinLevel>>
-		<br>&nbsp;&nbsp;&nbsp;&nbsp;[[Advance|Future Society][$arcologies[0].FSNull += 25, $FSCredits -= 1]]: further commitment to allow your arcology's citizens cultural freedom.
+<<elseif $FSCreditCount == 6>>
+	<<if $arcologies[0].FSNull != "unset">>
+		<br>''You are permitting <<if $arcologies[0].FSNull <= 17>>basic<<elseif $arcologies[0].FSNull <= 34>>some<<elseif $arcologies[0].FSNull <= 51>>considerable<<elseif $arcologies[0].FSNull <= 68>>great<<elseif $arcologies[0].FSNull <= 85>>advanced<<else>>absolute<</if>>'' cultural freedom in your arcology.
+		<<if $arcologies[0].FSNull <= 20>>
+			//[[Abandon|Future Society][$arcologies[0].FSNull to "unset", $arcologies[0].FSNullDecoration to 20, $arcologies[0].FSNullLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//
+		<<else>>
+			//[[Withdraw|Future Society][$arcologies[0].FSNull -= 17, $FSCredits += 1]]//
+		<</if>>
+		<<if $FSCredits > 0>>
+		<<if $arcologies[0].FSNull < $FSLockinLevel>>
+			<br>&nbsp;&nbsp;&nbsp;&nbsp;[[Advance|Future Society][$arcologies[0].FSNull += 17, $FSCredits -= 1]]: further commitment to allow your arcology's citizens cultural freedom.
+		<</if>>
+		<</if>>
+	<<else>>
+		<<if $FSCredits > 0>>
+			<br>[[Multiculturalism|Future Society][$arcologies[0].FSNull to 17, $FSCredits -= 1]]: a commitment to allow your arcology's citizens cultural freedom.
+			<br>&nbsp;&nbsp;&nbsp;&nbsp;//This option is an alternative to societal advancement, and will not advance naturally.//
+		<</if>>
 	<</if>>
+<<elseif $FSCreditCount == 7>>
+	<<if $arcologies[0].FSNull != "unset">>
+		<br>''You are permitting <<if $arcologies[0].FSNull <= 15>>basic<<elseif $arcologies[0].FSNull <= 30>>some<<elseif $arcologies[0].FSNull <= 45>>notable<<elseif $arcologies[0].FSNull <= 60>>considerable<<elseif $arcologies[0].FSNull <= 75>>great<<elseif $arcologies[0].FSNull <= 90>>advanced<<else>>absolute<</if>>'' cultural freedom in your arcology.
+		<<if $arcologies[0].FSNull <= 20>>
+			//[[Abandon|Future Society][$arcologies[0].FSNull to "unset", $arcologies[0].FSNullDecoration to 20, $arcologies[0].FSNullLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//
+		<<else>>
+			//[[Withdraw|Future Society][$arcologies[0].FSNull -= 15, $FSCredits += 1]]//
+		<</if>>
+		<<if $FSCredits > 0>>
+		<<if $arcologies[0].FSNull < $FSLockinLevel>>
+			<br>&nbsp;&nbsp;&nbsp;&nbsp;[[Advance|Future Society][$arcologies[0].FSNull += 15, $FSCredits -= 1]]: further commitment to allow your arcology's citizens cultural freedom.
+		<</if>>
+		<</if>>
+	<<else>>
+		<<if $FSCredits > 0>>
+			<br>[[Multiculturalism|Future Society][$arcologies[0].FSNull to 15, $FSCredits -= 1]]: a commitment to allow your arcology's citizens cultural freedom.
+			<br>&nbsp;&nbsp;&nbsp;&nbsp;//This option is an alternative to societal advancement, and will not advance naturally.//
+		<</if>>
 	<</if>>
 <<else>>
-	<<if $FSCredits > 0>>
-		<br>[[Multiculturalism|Future Society][$arcologies[0].FSNull to 25, $FSCredits -= 1]]: a commitment to allow your arcology's citizens cultural freedom.
-		<br>&nbsp;&nbsp;&nbsp;&nbsp;//This option is an alternative to societal advancement, and will not advance naturally.//
+	<<if $arcologies[0].FSNull != "unset">>
+		<br>''You are permitting <<if $arcologies[0].FSNull <= 20>>basic<<elseif $arcologies[0].FSNull <= 40>>considerable<<elseif $arcologies[0].FSNull <= 60>>great<<elseif $arcologies[0].FSNull <= 80>>advanced<<else>>absolute<</if>>'' cultural freedom in your arcology.
+		<<if $arcologies[0].FSNull <= 20>>
+			//[[Abandon|Future Society][$arcologies[0].FSNull to "unset", $arcologies[0].FSNullDecoration to 20, $arcologies[0].FSNullLaw to 0, $assistantFSAppearance to "default", $FSCredits += 1]]//
+		<<else>>
+			//[[Withdraw|Future Society][$arcologies[0].FSNull -= 20, $FSCredits += 1]]//
+		<</if>>
+		<<if $FSCredits > 0>>
+		<<if $arcologies[0].FSNull < $FSLockinLevel>>
+			<br>&nbsp;&nbsp;&nbsp;&nbsp;[[Advance|Future Society][$arcologies[0].FSNull += 20, $FSCredits -= 1]]: further commitment to allow your arcology's citizens cultural freedom.
+		<</if>>
+		<</if>>
+	<<else>>
+		<<if $FSCredits > 0>>
+			<br>[[Multiculturalism|Future Society][$arcologies[0].FSNull to 20, $FSCredits -= 1]]: a commitment to allow your arcology's citizens cultural freedom.
+			<br>&nbsp;&nbsp;&nbsp;&nbsp;//This option is an alternative to societal advancement, and will not advance naturally.//
+		<</if>>
 	<</if>>
 <</if>>
 <</if>>
diff --git a/src/uncategorized/generateXXSlave.tw b/src/uncategorized/generateXXSlave.tw
index 0faebffb2e145ab4c04e2ece28f4159e23eaab2e..1ee7d5c3d12b7e7e07f2aa35b7e77a9ebc3cc7d7 100644
--- a/src/uncategorized/generateXXSlave.tw
+++ b/src/uncategorized/generateXXSlave.tw
@@ -161,12 +161,14 @@
 <</if>>
 
 /% Since we use nationality for height effects we need to initialize it now instead of later on like in vanilla Free Cities. %/
-<<if $startingGirlsNationality == 0>>
-  <<set $activeSlave.nationality to $nationalities.random()>>
+<<if $fixedNationality == 0>>
+	<<set $activeSlave.nationality to $nationalities.random()>>
 <<else>>
-  <<set $activeSlave.nationality to $startingGirlsNationality>>
+	<<set $activeSlave.nationality to $fixedNationality>>
 <</if>>
-<<display "New Slave Race Nationality and Name">>
+<<NationalityToRace>>
+<<NationalityToName>>
+<<NationalityToAccent>>
 
 <<set $seed to 162.5>>
 
@@ -361,6 +363,17 @@
 <</if>>
 <</if>>
 
+<<set $seed to 4+$activeSlave.intelligence+$activeSlave.intelligenceImplant>>
+<<if "American" is $activeSlave.nationality>>
+	<<set $seed += 2>>
+<<elseif ["Canadian", "Israeli", "Japanese", "Korean", "Irish", "Icelandic", "Finnish", "Swiss", "Danish", "Norwegian", "Austrian", "Slovak", "Dutch", "Belgian", "Czech", "Portuguese", "Hungarian", "Portuguese", "Estonian", "Polish", "Lithuanian", "Romanian", "German", "Swedish", "French", "Italian", "Spanish", "British", "Australian", "a New Zealander"].contains($activeSlave.nationality)>>
+<<else>>
+	<<set $seed -= 2>>
+<</if>>
+<<if random(1,$seed) == 1>>
+	<<set $activeSlave.teeth to "crooked">>
+<</if>>
+
 <<switch $activeSlave.race>>
 <<case "black">>
 	<<set $activeSlave.butt to either(1, 2, 2, 3, 3, 4, 4)>>
@@ -633,11 +646,7 @@
 	<<set $activeSlave.voice to either(2, 2, 2, 2, 2, 3, 3, 3, 3)>>
 <</if>>
 
-<<if $arcologies[0].FSSupremacistLawME == 1>>
-	<<if $activeSlave.race is $arcologies[0].FSSupremacistRace>>
-	<<display "Generate XX Slave">>
-	<</if>>
-<<elseif passage() == "Slave Markets">>
+<<if passage() == "Slave Markets">>
 	<<if $slaveMarket == "corporate">>
 	<<if ($captureUpgradeRace != "unselected") && ($captureUpgradeRace != "none")>>
 	<<if $activeSlave.race != $captureUpgradeRace>>
@@ -646,4 +655,4 @@
 	<</if>>
 	<</if>>
 	<</if>>
-<</if>>
\ No newline at end of file
+<</if>>
diff --git a/src/uncategorized/generateXYSlave.tw b/src/uncategorized/generateXYSlave.tw
index b7a588c2c71876051666630a6e4ae72ab3f401d7..b754494f0bba01bb0a6d5d8b27ada4dc278e7102 100644
--- a/src/uncategorized/generateXYSlave.tw
+++ b/src/uncategorized/generateXYSlave.tw
@@ -168,12 +168,14 @@
 
 /% Since we use nationality for height effects we need to initialize it now instead of later on like in vanilla Free Cities. %/
 
-<<if $startingGirlsNationality == 0>>
+<<if $fixedNationality == 0>>
 	<<set $activeSlave.nationality to $nationalities.random()>>
 <<else>>
-	<<set $activeSlave.nationality to $startingGirlsNationality>>
+	<<set $activeSlave.nationality to $fixedNationality>>
 <</if>>
-<<display "New Slave Race Nationality and Name">>
+<<NationalityToRace>>
+<<NationalityToName>>
+<<NationalityToAccent>>
 
 <<set $seed to 172.5>>
 <<if $activeSlave.race is "white">>
@@ -363,6 +365,17 @@
 <</if>>
 <</if>>
 
+<<set $seed to 4+$activeSlave.intelligence+$activeSlave.intelligenceImplant>>
+<<if "American" is $activeSlave.nationality>>
+	<<set $seed += 2>>
+<<elseif ["Canadian", "Israeli", "Japanese", "Korean", "Irish", "Icelandic", "Finnish", "Swiss", "Danish", "Norwegian", "Austrian", "Slovak", "Dutch", "Belgian", "Czech", "Portuguese", "Hungarian", "Portuguese", "Estonian", "Polish", "Lithuanian", "Romanian", "German", "Swedish", "French", "Italian", "Spanish", "British", "Australian", "a New Zealander"].contains($activeSlave.nationality)>>
+<<else>>
+	<<set $seed -= 2>>
+<</if>>
+<<if random(1,$seed) == 1>>
+	<<set $activeSlave.teeth to "crooked">>
+<</if>>
+
 <<if $activeSlave.race is "black">>
 	<<set $activeSlave.butt to either(1, 1, 2, 3)>>
 	<<set $activeSlave.boobs to either(100, 200, 200, 300, 300, 400, 500)>>
@@ -826,11 +839,7 @@
 	<<set $activeSlave.voice to either(1, 1, 1, 2, 2, 2, 2, 2, 3)>>
 <</if>>
 
-<<if $arcologies[0].FSSupremacistLawME == 1>>
-	<<if $activeSlave.race is $arcologies[0].FSSupremacistRace>>
-		<<goto "Generate XY Slave">>
-	<</if>>
-<<elseif passage() == "Slave Markets">>
+<<if passage() == "Slave Markets">>
 	<<if $slaveMarket == "corporate">>
 	<<if ($captureUpgradeRace != "unselected") && ($captureUpgradeRace != "none")>>
 	<<if $activeSlave.race != $captureUpgradeRace>>
@@ -839,4 +848,4 @@
 	<</if>>
 	<</if>>
 	<</if>>
-<</if>>
\ No newline at end of file
+<</if>>
diff --git a/src/uncategorized/genericPlotEvents.tw b/src/uncategorized/genericPlotEvents.tw
index 9b3250eedbd8f1cd36ed7bf83481759f5be808e6..b7051810a358acb4adf7895f465471fb65f537f3 100644
--- a/src/uncategorized/genericPlotEvents.tw
+++ b/src/uncategorized/genericPlotEvents.tw
@@ -199,6 +199,7 @@ you promised to rescue. Its side doors retract, allowing the escapees to hustle
 <br><br>
 When the aircraft lands at your penthouse pad, the would-be escapees are still unconscious. This makes putting them through enslavement physically laborious, though it does cut down on the usual whining; fortunately, you reserved the credits necessary to obscure their questionably legitimate enslavement. By the time they awake, they'll be indistinguishable from any other new slave in the arcology. The possibility remains, however that rumor of the incident will leak out. Your VTOL bird's entry and exit from the capital city was likely noticed and remarked upon.
 <br><br>
+<<set _newSlaves = []>>
 <<if $PAidTarget is "convent">>
 	In any case, you've enslaved a fine group. The leader is on the older side, but not unattractive. Her girls are younger, and probably have all sorts of delightful repressed tendencies to be manipulated.
 	<<set $activeSlaveOneTimeMinAge to 30>>
@@ -226,17 +227,13 @@ When the aircraft lands at your penthouse pad, the would-be escapees are still u
 	<<set $activeSlave.behavioralFlaw to "devout">>
 	<<set $activeSlave.sexualFlaw to "repressed">>
 	<<set $activeSlave.sexualQuirk to "perverted">>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<set _newSlaves.push($activeSlave)>>
 	<<for $i to 0; $i < 3; $i++>>
 		<<set $activeSlaveOneTimeMinAge to 18>>
 		<<set $activeSlaveOneTimeMaxAge to 24>>
 		<<display "Generate XX Slave">>
 		<<set $activeSlave.origin to "She was an initiate in a religious community of women you enslaved.">>
-	<<set $activeSlave.career to "a nun">>
+		<<set $activeSlave.career to "a nun">>
 		<<set $activeSlave.devotion = random(-90,-75)>>
 		<<set $activeSlave.trust = -20>>
 		<<set $activeSlave.health = random(-10,10)>>
@@ -254,11 +251,7 @@ When the aircraft lands at your penthouse pad, the would-be escapees are still u
 		<<set $activeSlave.pubicHStyle to "bushy">>
 		<<set $activeSlave.behavioralFlaw to "devout">>
 		<<set $activeSlave.sexualFlaw to "repressed">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 <<elseif $PAidTarget is "school">>
 	In any case, you've enslaved a fine group. The principal is on the older side, and seems to have paid unusually close attention to her appearance, for the female principal of a girls' school. And for whatever reason, the school's uniform skirt seems to have been rather short in back.
@@ -288,11 +281,7 @@ When the aircraft lands at your penthouse pad, the would-be escapees are still u
 	<<set $activeSlave.fetish to "dom">>
 	<<set $activeSlave.behavioralFlaw to either("arrogant", "bitchy", "hates men", "hates men", "liberated")>>
 	<<set $activeSlave.sexualFlaw to "shamefast">>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<set _newSlaves.push($activeSlave)>>
 	<<for $i to 0; $i < 3; $i++>>
 		<<set $activeSlaveOneTimeMaxAge to 18>>
 		<<display "Generate XX Slave">>
@@ -315,11 +304,7 @@ When the aircraft lands at your penthouse pad, the would-be escapees are still u
 		<<set $activeSlave.fetish to "buttslut">>
 		<<set $activeSlave.behavioralFlaw to either("arrogant", "bitchy", "anorexic")>>
 		<<set $activeSlave.sexualFlaw to either("shamefast", "idealistic", "hates anal")>>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-					<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 <<elseif $PAidTarget is "maternity">>
 	In any case, you've enslaved a fine group. The expectant mothers vary widely; the only thing they have in common is their gravid bellies. None of them is in really serious condition, either, and they should bear the transition to slave life reasonably well despite their pregnancies.
@@ -342,11 +327,7 @@ When the aircraft lands at your penthouse pad, the would-be escapees are still u
 		<<set $activeSlave.boobs += 100*random(0,2)>>
 		<<set $activeSlave.lactation to 1>>
 		<<set $activeSlave.nipples to either("cute", "puffy", "partially inverted", "inverted")>>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 <<elseif $PAidTarget is "gradeSchool">>
 	In any case, you've enslaved a fine group. The girls are all within a similar age range, young, and healthy. Their youth and vigor should make them quite popular.
@@ -371,11 +352,7 @@ When the aircraft lands at your penthouse pad, the would-be escapees are still u
 		<<set $activeSlave.devotion = random(-90,-75)>>
 		<<set $activeSlave.trust = random(-90,-75)>>
 		<<set $activeSlave.health = random(-10,10)>>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 <<elseif $PAidTarget is "conversion">>
 	In any case, you've enslaved a fine group. Certain religious groups persist in the hilarious delusion that it's possible to alter sexual orientation through prayer. In your experience, hormones, drugs, and compliance training are far more effective.
@@ -401,11 +378,7 @@ When the aircraft lands at your penthouse pad, the would-be escapees are still u
 	<<set $activeSlave.fetishStrength to random(1,2)>>
 	<<set $activeSlave.behavioralFlaw to either("arrogant", "bitchy", "hates women", "odd", "liberated")>>
 	<<set $activeSlave.sexualFlaw to either("repressed", "shamefast")>>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<set _newSlaves.push($activeSlave)>>
 	<<for $i to 0; $i < 3; $i++>>
 		<<set $activeSlaveOneTimeMinAge to 16>>
 		<<set $activeSlaveOneTimeMaxAge to 18>>
@@ -427,11 +400,7 @@ When the aircraft lands at your penthouse pad, the would-be escapees are still u
 		<<set $activeSlave.fetish to "buttslut">>
 		<<set $activeSlave.behavioralFlaw to either("bitchy", "odd", "anorexic", "devout")>>
 		<<set $activeSlave.sexualFlaw to either("shamefast", "repressed", "apathetic")>>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 <<else>>
 	In any case, you've enslaved a fine group. The women seem to have banded together when they were left to fend for themselves in their suburban neighborhood. They're older than many slaves, but they seem to have had rich husbands; they're conventionally pretty, and have lived soft lives that have left them healthy.
@@ -459,11 +428,7 @@ When the aircraft lands at your penthouse pad, the would-be escapees are still u
 		<<set $activeSlave.entertainSkill = 15>>
 		<<set $activeSlave.behavioralFlaw to either("arrogant", "bitchy", "anorexic", "liberated")>>
 		<<set $activeSlave.sexualFlaw to either("shamefast", "idealistic", "hates anal", "hates oral", "apathetic")>>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 <</if>>
 
@@ -471,7 +436,7 @@ When the aircraft lands at your penthouse pad, the would-be escapees are still u
 
 As a society free of the encumbrance of governmental oversight, the arcologies of the Free Cities are places where societal evolution and corporate expansion can occur rapidly.
 
-Even so, the incredible speed with which the arcology has improved under your tenure as compared to that of your predecessor, after you obtained ownership through <<if $PC.rumor is "wealth">>a leveraged buyout,<<elseif $PC.rumor is "diligence">>hard work and competence,<<elseif $PC.rumor is "force">>some episodes of violence,<<elseif $PC.rumor is "social engineering">>the creative use of psychology,<<elseif $PC.rumor is "luck">>an incredible opportunity,<</if>> is nothing short of astonishing. Other arcologies have taken many years to develop along anything but strictly conservative lines, and you are not the only arcology owner with a background <<if $PC.career is "wealth">>of substantial wealth.<<elseif $PC.career is "capitalist">>in business.<<elseif $PC.career is "mercenary">>in the world of private contracting.<<elseif $PC.career is "slaver">>as a slavebreaker.<<elseif $PC.career is "engineer">>in arcology engineering.<<elseif $PC.career is "medicine">>in medicine and surgery.<<elseif $PC.career is "celebrity">>in the public sphere.<<elseif $PC.career is "escort">>involving many personal contacts.<<elseif $PC.career is "servant">>involving the rich and powerful.<<elseif $PC.career is "gang">>involving gangs.<</if>> It occurs to you that the arcology's growing role as a place where where those with the means to do so can live in the society you have created, enjoying themselves and their lives to the fullest while subjugating others, should be commemorated.
+Even so, the incredible speed with which the arcology has improved under your tenure as compared to that of your predecessor, after you obtained ownership through <<if $PC.rumor is "wealth">>a leveraged buyout,<<elseif $PC.rumor is "diligence">>hard work and competence,<<elseif $PC.rumor is "force">>some episodes of violence,<<elseif $PC.rumor is "social engineering">>the creative use of psychology,<<elseif $PC.rumor is "luck">>an incredible opportunity,<</if>> is nothing short of astonishing. Other arcologies have taken many years to develop along anything but strictly conservative lines, and you are not the only arcology owner with a background <<if $PC.career is "wealth">>of substantial wealth.<<elseif $PC.career is "capitalist">>in business.<<elseif $PC.career is "mercenary">>in the world of private contracting.<<elseif $PC.career is "slaver">>as a slavebreaker.<<elseif $PC.career is "engineer">>in arcology engineering.<<elseif $PC.career is "medicine">>in medicine and surgery.<<elseif $PC.career is "celebrity">>in the public sphere.<<elseif $PC.career is "escort">>involving many personal contacts.<<elseif $PC.career is "servant">>involving the rich and powerful.<<elseif $PC.career is "gang">>involving gangs.<<else>>in the Free Cities.<</if>> It occurs to you that the arcology's growing role as a place where where those with the means to do so can live in the society you have created, enjoying themselves and their lives to the fullest while subjugating others, should be commemorated.
 <br><br>
 As any slaveowner with half a mind in the Free Cities knows, there is power in words, and in what they represent. Master. Slave. These two words alone, more than any others, define the arcologies that have taken up the mantle of leading the world forward in these dark times. The time has come to add a new term to the lexicon of the Free Cities - a name. No longer will your arcology be known only as $arcologies[0].name, a bland and uninspiring name if ever there was one.
 <br><br>
@@ -624,7 +589,7 @@ A screen opposite your desk springs to life, <<if $assistant == 0>>showing your
 <<if $PStrip != 3>>
 	<<if $cash >= $contractCost>>
 	<<click "Enslave her">>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 		<<if $PStrip is 1>>
@@ -756,11 +721,7 @@ A screen opposite your desk springs to life, <<if $assistant == 0>>showing your
 	<<set $activeSlave.fetish to "none">>
 	<<set $activeSlave.behavioralFlaw to "arrogant">>
 	<<set $activeSlave.sexualFlaw to "idealistic">>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<</replace>>
 <</click>>
 <<if $pedo_mode == 1 && $minimumSlaveAge <= 8>>
@@ -802,11 +763,7 @@ A screen opposite your desk springs to life, <<if $assistant == 0>>showing your
 	<<set $activeSlave.fetishStrength to 60>>
 	<<set $activeSlave.behavioralFlaw to "anorexic">>
 	<<set $activeSlave.sexualFlaw to "idealistic">>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<</replace>>
 <</click>>
 <</if>>
@@ -840,11 +797,7 @@ A screen opposite your desk springs to life, <<if $assistant == 0>>showing your
 	<<set $activeSlave.fetish to "none">>
 	<<set $activeSlave.behavioralFlaw to "bitchy">>
 	<<set $activeSlave.sexualFlaw to "hates anal">>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<</replace>>
 <</click>>
 <br><<click "Hit the slave with the tits, pussy and impressive dick">>
@@ -884,11 +837,7 @@ A screen opposite your desk springs to life, <<if $assistant == 0>>showing your
 	<<set $activeSlave.fetish to "none">>
 	<<set $activeSlave.behavioralFlaw to "none">>
 	<<set $activeSlave.behavioralFlaw to "odd">>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<</replace>>
 <</click>>
 
@@ -921,44 +870,18 @@ A screen opposite your desk springs to life, <<if $assistant == 0>>showing your
 <<set $PAid = 0>>
 <<click "Sell your captures immediately">>
 	<<replace "#result">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $PAidTarget is "convent">>
-			<<if ($slaves[$i].origin is "She was an initiate in a religious community of women you enslaved.") || ($slaves[$i].origin is "She was the head of a religious community of women you enslaved.")>>
-				<<slaveCost $slaves[$i]>>
-				<<set $cash += $slaveCost>>
-				<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
-			<</if>>
-		<<elseif $PAidTarget is "school">>
-			<<if ($slaves[$i].origin is "She was the principal of a girls' school whose remnants you enslaved. A strap-on and a large quantity of personal lubricant was found in her possession when she was enslaved.") || ($slaves[$i].origin is "She was a student at a girls' school whose remnants you enslaved.")>>
-				<<slaveCost $slaves[$i]>>
-				<<set $cash += $slaveCost>>
-				<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
-			<</if>>
-		<<elseif $PAidTarget is "maternity">>
-			<<if ($slaves[$i].origin is "She was an expectant mother you enslaved when you evacuated her from a threatened old world hospital.")>>
-				<<slaveCost $slaves[$i]>>
-				<<set $cash += $slaveCost>>
-				<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
-			<</if>>
-		<<elseif $PAidTarget is "conversion">>
-			<<if ($slaves[$i].origin is "She was the owner of a religious orientation conversion therapy camp whose remnants you enslaved.") || ($slaves[$i].origin is "She was an inmate at a religious orientation conversion therapy camp whose remnants you enslaved.")>>
-				<<slaveCost $slaves[$i]>>
-				<<set $cash += $slaveCost>>
-				<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
-			<</if>>
-		<<else>>
-			<<if ($slaves[$i].origin is "She was a wealthy housewife who you enslaved as she fled societal collapse.")>>
-				<<slaveCost $slaves[$i]>>
-				<<set $cash += $slaveCost>>
-				<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
-			<</if>>
-		<</if>>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<slaveCost _newSlaves[$i]>>
+		<<set $cash += $slaveCost>>
 	<</for>>
 	Prisoners @@color:green;sold.@@
 	<</replace>>
 <</click>>
 <br><<click "Enslave them all">>
 	<<replace "#result">>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<AddSlave _newSlaves[$i]>>
+	<</for>>
 	You simply enslave all of the escapees yourself. These slaves will more than make up for the costs you expended, in the long run.
 	<</replace>>
 <</click>>
diff --git a/src/uncategorized/hgApplication.tw b/src/uncategorized/hgApplication.tw
index e05164956bc2ded287479dbf821955fadd558965..b908afb297d4ecdf3f06ab5706e0cdeaef223b8d 100644
--- a/src/uncategorized/hgApplication.tw
+++ b/src/uncategorized/hgApplication.tw
@@ -15,7 +15,7 @@
 <<elseif $HGtraining is "obedience">>
 	is disobedient.
 <<elseif $HGtraining is "flaw">>
-	has 
+	has
 	<<if ["cum addict", "anal addict", "attention whore", "breast growth", "abusive", "malicious", "self hating", "neglectful", "breeder"].contains($activeSlave.sexualFlaw)>>
 		a paraphilia.
 	<<else>>
@@ -328,21 +328,21 @@ In spare moments she teaches $activeSlave.slaveName how to prostitute herself. $
 <<if ($activeSlave.attrKnown == 0)>>
 	<<set $activeSlave.attrKnown to 1>>
 	$HeadGirl.slaveName also investigates the slave's basic sexual orientation, finding that she is
-	<<if ($activeSlave.attrXY is -1)>>
+	<<if ($activeSlave.attrXY <= 40)>>
 		@@color:red;disgusted by men@@
-	<<elseif ($activeSlave.attrXY == 0)>>
+	<<elseif ($activeSlave.attrXY <= 60)>>
 		indifferent to men
-	<<elseif ($activeSlave.attrXY == 1)>>
+	<<elseif ($activeSlave.attrXY <= 80)>>
 		@@color:green;attracted to men@@
 	<<else>>
 		@@color:green;intensely attracted to men@@
 	<</if>>
 	and
-	<<if ($activeSlave.attrXX is -1)>>
+	<<if ($activeSlave.attrXX <= 40)>>
 		@@color:red;disgusted by women.@@
-	<<elseif ($activeSlave.attrXX == 0)>>
+	<<elseif ($activeSlave.attrXX <= 60)>>
 		indifferent to women.
-	<<elseif ($activeSlave.attrXX == 1)>>
+	<<elseif ($activeSlave.attrXX <= 80)>>
 		@@color:green;attracted to women.@@
 	<<else>>
 		@@color:green;intensely attracted to women.@@
@@ -356,4 +356,4 @@ In spare moments she teaches $activeSlave.slaveName how to prostitute herself. $
 	<<set $activeSlave to {}>>
 	<<break>>
 	<</if>>
-<</for>>
\ No newline at end of file
+<</for>>
diff --git a/src/uncategorized/householdLiquidator.tw b/src/uncategorized/householdLiquidator.tw
index 3e98ccc4d45db696b3da95895bc7e51a055fab19..bb7bfd0021b85c74af0855224ac11c1d17c73347 100644
--- a/src/uncategorized/householdLiquidator.tw
+++ b/src/uncategorized/householdLiquidator.tw
@@ -1,5 +1,5 @@
 :: Household Liquidator
- 
+
 <<set $nextButton to "Back">>\
 <<set $nextLink to "Buy Slaves">>\
 <<set $returnTo to "Buy Slaves">>\
@@ -30,9 +30,6 @@ The household liquidator is offering a set of siblings for sale. As usual, you w
 	<<set $activeSlave.relationTarget to $activeSlave.ID + 1000>>
 <</if>>
 
-<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-	<<AutoRulesActivate 1>>
-<</if>>
 <<slaveCost $activeSlave>>
 
 <</nobr>>\
@@ -41,7 +38,7 @@ The price is ¤<<print $slaveCost*3>>.
 
 <<nobr>>
 <<if $cash >= $slaveCost*3>>
-	[[Buy their slave contract|Siblings Workaround][$cash -= $slaveCost*3,$olderSister to $activeSlave, $slaves.push($olderSister), $genePool.push($olderSister),$nextButton to "Continue",$nextLink to "AS Dump",$returnTo to "Main"]]
+	[[Buy their slave contract|Siblings Workaround][$cash -= $slaveCost*3,$nextButton to "Continue",$nextLink to "AS Dump",$returnTo to "Main"]]
 <<else>>
 	//You lack the necessary funds to buy these slaves.//
 <</if>>
@@ -83,9 +80,6 @@ The household liquidator is offering a mother and her daughter for sale. As usua
 	<<set $activeSlave.relationTarget to $activeSlave.ID + 1000>>
 <</if>>
 
-<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-	<<AutoRulesActivate 1>>
-<</if>>
 <<slaveCost $activeSlave>>
 <<if $slavesSeen > $slaveMarketLimit>><<set $slaveCost += Math.trunc($slaveCost*(($slavesSeen-$slaveMarketLimit)*0.1))>><</if>>
 
@@ -95,7 +89,7 @@ The price is ¤<<print $slaveCost*3>>.<<if $slavesSeen > $slaveMarketLimit>> You
 
 <<nobr>>
 <<if $cash >= $slaveCost*3>>
-	[[Buy their slave contract|Mother Daughter Workaround][$cash -= $slaveCost*3,$mother to $activeSlave, $slaves.push($mother), $genePool.push($mother),$nextButton to "Continue",$nextLink to "AS Dump",$returnTo to "Main"]]
+	[[Buy their slave contract|Mother Daughter Workaround][$cash -= $slaveCost*3,"Continue",$nextLink to "AS Dump",$returnTo to "Main"]]
 <<else>>
 	//You lack the necessary funds to buy these slaves.//
 <</if>>
@@ -131,9 +125,6 @@ The household liquidator is offering something special: twins. The markup is hug
 	<<set $activeSlave.relation to "twin">>
 	<<set $activeSlave.relationTarget to $activeSlave.ID + 1000>>
 <</if>>
-<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-	<<AutoRulesActivate 1>>
-<</if>>
 <<slaveCost $activeSlave>>
 
 <</nobr>>\
@@ -142,7 +133,7 @@ The price is ¤<<print $slaveCost*4>>.<<if $slavesSeen > $slaveMarketLimit>> You
 
 <<nobr>>
 <<if $cash >= $slaveCost*4>>
-	[[Buy their slave contract|Twins Workaround][$cash -= $slaveCost*4,$alphaTwin to $activeSlave, $slaves.push($alphaTwin), $genePool.push($alphaTwin),$nextButton to "Continue",$nextLink to "AS Dump",$returnTo to "Main"]]
+	[[Buy their slave contract|Twins Workaround][$cash -= $slaveCost*4,$nextButton to "Continue",$nextLink to "AS Dump",$returnTo to "Main"]]
 <<else>>
 	//You lack the necessary funds to buy these slaves.//
 <</if>>
diff --git a/src/uncategorized/jeSlaveDispute.tw b/src/uncategorized/jeSlaveDispute.tw
index 80901ba58108bfd66badbe516abc04941c0b49d3..e780725032044e55c887bb6ecf8fee38b9d63178 100644
--- a/src/uncategorized/jeSlaveDispute.tw
+++ b/src/uncategorized/jeSlaveDispute.tw
@@ -202,7 +202,7 @@
 	<</replace>>
 	<</click>>
 	<<click "Offer to buy out the contract">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost>>
 	<<replace "#result">>
 	You offer to simply buy out the contract, taking the slave for yourself, letting the slave trader out of her side of the deal, and providing for the daughter's medical care. The trader lets it be known amongst her peers that you will make things right no matter the cost to yourself, @@color:green;increasing prosperity.@@ The story of the mother willing to be enslaved gets around quickly, @@color:green;capturing the hearts@@ of more romantic citizens. The mother, meanwhile, presents herself for enslavement, @@color:hotpink;very grateful@@ that you've saved her daughter's life.
@@ -235,7 +235,7 @@
 	<</replace>>
 	<</click>>
 	<<click "Offer to buy out the deal">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost>>
 	<<replace "#result">>
 	You offer to simply buy out the deal, paying the trainer and taking the slave yourself, and letting the buyer out of the payment. The trainer, on the other hand, lets it be known that you support businessmen, who can trust you to ensure they don't come out second best, @@color:green;increasing prosperity.@@ The buyer lets you know privately that he recently had a business deal go bad, so he's in a tough cash situation right now; he's so grateful for your assistance in this embarrassing situation that he talks @@color:green;effusively@@ for days to anyone who will listen about your discreet administration of the arcology. The slave, meanwhile, arrives at your penthouse, @@color:hotpink;rather hopeful@@ that she's going to a good master.
@@ -268,7 +268,7 @@
 	<</replace>>
 	<</click>>
 	<<click "Compromise on the compensation and offer to buy out the deal">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost>>
 	<<replace "#result">>
 	You offer to buy out the deal, paying the school and taking the slave yourself, and compromising on the demanded compensation. The citizen was looking forward to using the slave in question for breeding stock; like many breeders he cares deeply about his stable and is mollified by the moderate payment, and speaks @@color:green;kindly@@ in public about how you helped an innocent breeder protect his prize bloodlines. The school sends a @@color:green;positive note@@ around the industry to the effect that schools trading with your arcology can expect to have excessive claims sensibly reduced.
@@ -301,7 +301,7 @@
 	<</replace>>
 	<</click>>
 	<<click "Buy out the contract and enslave her">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost>>
 	<<replace "#result">>
 	You quietly contact the trader and suggest an alternative method of settling the dispute. He is surprised, but agrees readily, chuckling at how the "recalcitrant bitch" is going to be dealt with. To her horror, she finds that your near-total power over deals made in your arcology has been employed to saddle her with additional debts that, under her indentured servitude, she cannot hope to repay. It is then the work of ten minutes to demand payment, and when she cannot pay, demand her body for enslavement. The story of your cunning @@color:green;impresses@@ the slave traders, but is @@color:red;booed@@ by fairer-minded citizens.
@@ -334,7 +334,7 @@
 	<</replace>>
 	<</click>>
 	<<click "Offer to buy out the contract">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost>>
 	<<replace "#result">>
 	You offer to simply buy out the contract, taking the slave for yourself. This lets the buyer out of buying her, and the slaveowner gets his money; but it soon becomes apparent that what both of them were really looking for is an opportunity to put one over on the other. Neither is pleased to be denied a petty victory, but they both have the sense to keep their mouths shut. The poor slave, meanwhile, appears in the penthouse entryway, @@color:hotpink;hopeful@@ that she's been lucky enough to end up in a less abusive situation.
diff --git a/src/uncategorized/lawCompliance.tw b/src/uncategorized/lawCompliance.tw
index 7f59f0bef79204b5f3bd51ef7ac67d49f9d62266..0d1fd5c8ea932c12e57c49bbc82ca59446e15ec3 100644
--- a/src/uncategorized/lawCompliance.tw
+++ b/src/uncategorized/lawCompliance.tw
@@ -37,17 +37,17 @@
 	<<set $activeSlave.fetishKnown to 1>>
 	<<set $activeSlave.fetishStrength = 65>>
 	<</if>>
-	<<if $PC.career is "slaver">>
-	<<set $gingeringDetected to 1>>
-	<<set $gingeringDetection to "slaver">>
+	<<if ($PC.career is "slaver") || ($PC.career is "arcology owner")>>
+		<<set $gingeringDetected to 1>>
+		<<set $gingeringDetection to "slaver">>
 	<<elseif ($PC.career is "mercenary") && (random(1,2) == 1)>>
-	<<set $gingeringDetected to 1>>
-	<<set $gingeringDetection to "mercenary">>
+		<<set $gingeringDetected to 1>>
+		<<set $gingeringDetection to "mercenary">>
 	<<elseif ($PC.rumor is "force") && (random(1,2) == 1)>>
-	<<set $gingeringDetected to 1>>
-	<<set $gingeringDetection to "force">>
+		<<set $gingeringDetected to 1>>
+		<<set $gingeringDetection to "force">>
 	<<elseif (random(1,3) == 1)>>
-	<<set $gingeringDetected to 1>>
+		<<set $gingeringDetected to 1>>
 	<</if>>
 <</if>>
 
diff --git a/src/uncategorized/main.tw b/src/uncategorized/main.tw
index 7ae32d45ca3bebb60da48f7a4c4ef309c264d8a2..0c00926d022a5d85f35697ad92245d3d64586e95 100644
--- a/src/uncategorized/main.tw
+++ b/src/uncategorized/main.tw
@@ -1,7 +1,7 @@
 :: Main [nobr]
-
+<<set $FSAnnounced = 1>>
 <<if $ver.contains("0.9") or $ver.contains("0.8") or $ver.contains("0.7") or $ver.contains("0.6")>>
-	<<if ($ver != "0.9.7") && ($ver != "0.9.8")>>
+	<<if ($ver != "0.9.7") && ($ver != "0.9.8") && ($ver != "0.9.9")>>
 		''@@color:red;INCOMPATIBLE SAVE WARNING:@@'' your saved game was created using version $ver and you are using version 0.9.8. Please select New Game Plus from the Options menu or start a new game.
 		<br><br>
 	<</if>>
diff --git a/src/uncategorized/manageArcology.tw b/src/uncategorized/manageArcology.tw
index 6b4d8ffc7ebf3a2bf344c57011f102cb573b6618..24de469bdd5c95cb87478f92b19d8b53672ab9d1 100644
--- a/src/uncategorized/manageArcology.tw
+++ b/src/uncategorized/manageArcology.tw
@@ -1,5 +1,5 @@
 :: Manage Arcology [nobr]
- 
+
 <<set $nextButton to "Back">>
 <<set $nextLink to "Main">>
 
@@ -63,9 +63,9 @@ __Construction__
 <<else>>
 	//The arcology's public areas are fully upgraded.//
 <</if>>
-<<if $PC.career is "engineer">>
+<<if ($PC.career == "engineer") || ($PC.career == "arcology owner")>>
 <<if $AProsperityCap < 360>>
-	//Arcology upgrades are less expensive due to your @@color:springgreen;arcology engineering career.@@//
+	//Arcology upgrades are less expensive due to your @@color:springgreen;<<if $PC.career == "arcology owner">>experience in the Free Cities<<else>>arcology engineering career<</if>>.@@//
 <</if>>
 <</if>>
 
diff --git a/src/uncategorized/mod_BackwardsCompatibility.tw b/src/uncategorized/mod_BackwardsCompatibility.tw
index be935cecd168cb62d1b32beea8198390a86d0598..8070f48851da5649ff788858dc82e5811f644c10 100644
--- a/src/uncategorized/mod_BackwardsCompatibility.tw
+++ b/src/uncategorized/mod_BackwardsCompatibility.tw
@@ -1,5 +1,5 @@
 :: Mod_Backwards Compatibility
- 
+
 <<nobr>>
 <<set $nextButton to "Continue">>
 <<set $nextLink to "Main">>
@@ -13,23 +13,23 @@
 			<<if ndef $defaultRules[_i].standardReward>>
 				<<set $defaultRules[_i].standardReward to "no default setting">>
 			<</if>>
-		
+
 			<<if ndef $defaultRules[_i].standardPunishment>>
 				<<set $defaultRules[_i].standardPunishment to "no default setting">>
 			<</if>>
-			
+
 			<<if ndef $defaultRules[_i].aVirginAccessory>>
 				<<set $defaultRules[_i].aVirginAccessory to "no default setting">>
 			<</if>>
-			
+
 			<<if ndef $defaultRules[_i].aVirginDickAccessory>>
 				<<set $defaultRules[_i].aVirginDickAccessory to "no default setting">>
 			<</if>>
-			
+
 			<<if ndef $defaultRules[_i].aVirginButtplug>>
 				<<set $defaultRules[_i].aVirginButtplug to "no default setting">>
 			<</if>>
-			
+
 			<<if ndef $defaultRules[_i].surgery>>
 				<<set $defaultRules[_i].surgery to {lactation: "no default setting", cosmetic: 0, accent: "no default setting", shoulders: "no default setting", shouldersImplant: "no default setting", boobs: "no default setting", hips: "no default setting", hipsImplant: "no default setting", butt: "no default setting", faceShape: "no default setting", lips: "no default setting", holes: 0}>>
 			<</if>>
@@ -44,32 +44,32 @@
 			
 		<</for>>
 	<</if>>
-	
+
 	<<if ndef $month>>
 	<<set $month to either("January","February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December")>>
 	<</if>>
-	
+
 	<<if ndef $day>>
 	<<set $day to random(1,28)>>
 	<</if>>
-	
+
 	<<if ndef $year>>
 		<<set $year to (2037+Math.floor($week/52))>>
 	<</if>>
-	
+
 	<<if ndef $arcologies>>
 	<<set $arcologies to []>>
-	
+
 	<<set $arcologies[0] to {name: "Arcology X-", direction: 0, government: 1, honeymoon: 0, prosperity: 50, FSSupremacist: "unset", FSSupremacistRace: 0, FSSubjugationist: "unset", FSSubjugationistRace: 0, FSGenderRadicalist: "unset", FSGenderFundamentalist: "unset", FSPaternalist: "unset", FSDegradationist: "unset", FSBodyPurist: "unset", FSTransformationFetishist: "unset", FSYouthPreferentialist: "unset", FSMaturityPreferentialist: "unset", FSSlimnessEnthusiast: "unset", FSAssetExpansionist: "unset", FSPastoralist: "unset", FSPhysicalIdealist: "unset", FSChattelReligionist: "unset", FSRomanRevivalist: "unset", FSEgyptianRevivalist: "unset", FSEdoRevivalist: "unset", FSArabianRevivalist: "unset", FSChineseRevivalist: "unset", FSNull: "unset", embargo: 1, embargoTarget: -1, influenceTarget: -1, influenceBonus: 0, rival: 0}>>
 	<</if>>
-	
+
 	<<if def $arcologyName>>
 		<<set $arcologies[0].name to $arcologyName>>
 		<<unset $arcologyName>>
 	<<elseif ndef $arcologies[0].name>>
 		<<set $arcologies[0].name = "Arcology X-4">>
 	<</if>>
-	
+
 	<<if ndef $arcologies[0].ownership>>
 		<<set $arcologies[0].ownership to 50>>
 	<</if>>
@@ -103,7 +103,7 @@
 	<<if ndef $arcologies[0].leaderID>>
 		<<set $arcologies[0].leaderID to 0>>
 	<</if>>
-	
+
 	<<if def $FSSupremacist and $FSSupremacist != "unset">>
 		<<set $arcologies[0].FSSupremacist to $FSSupremacist>>
 		<<set $arcologies[0].FSSupremacistRace to $FSSupremacistRace>>
@@ -112,14 +112,14 @@
 	<<elseif ndef $arcologies[0].FSSupremacist>>
 		<<set $arcologies[0].FSSupremacist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSSupremacistLawME and $FSSupremacistLawME != 0>>
 		<<set $arcologies[0].FSSupremacistLawME to $FSSupremacistLawME>>
 		<<unset $FSSupremacistLawME>>
 	<<elseif ndef $arcologies[0].FSSupremacistLawME>>
 		<<set $arcologies[0].FSSupremacistLawME to 0>>
 	<</if>>
-	
+
 	<<if def $FSSubjugationist and $FSSubjugationist != "unset">>
 		<<set $arcologies[0].FSSubjugationist to $FSSubjugationist>>
 		<<set $arcologies[0].FSSubjugationistRace to $FSSubjugationistRace>>
@@ -128,272 +128,272 @@
 	<<elseif ndef $arcologies[0].FSSubjugationist>>
 		<<set $arcologies[0].FSSubjugationist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSSubjugationistLawME and $FSSubjugationistLawME != 0>>
 		<<set $arcologies[0].FSSubjugationistLawME to $FSSubjugationistLawME>>
 		<<unset $FSSubjugationistLawME>>
 	<<elseif ndef $arcologies[0].FSSubjugationistLawME>>
 		<<set $arcologies[0].FSSubjugationistLawME to 0>>
 	<</if>>
-	
+
 	<<if def $FSDegradationist and $FSDegradationist != "unset">>
 		<<set $arcologies[0].FSDegradationist to $FSDegradationist>>
 		<<unset $FSDegradationist>>
 	<<elseif ndef $arcologies[0].FSDegradationist>>
 		<<set $arcologies[0].FSDegradationist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSDegradationistLaw and $FSDegradationistLaw != 0>>
 		<<set $arcologies[0].FSDegradationistLaw to $FSDegradationistLaw>>
 		<<unset $FSDegradationistLaw>>
 	<<elseif ndef $arcologies[0].FSDegradationistLaw>>
 		<<set $arcologies[0].FSDegradationistLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSPaternalist and $FSPaternalist != "unset">>
 		<<set $arcologies[0].FSPaternalist to $FSPaternalist>>
 		<<unset $FSPaternalist>>
 	<<elseif ndef $arcologies[0].FSPaternalist>>
 		<<set $arcologies[0].FSPaternalist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSPaternalistLaw and $FSPaternalistLaw != 0>>
 		<<set $arcologies[0].FSPaternalistLaw to $FSPaternalistLaw>>
 		<<unset $FSPaternalistLaw>>
 	<<elseif ndef $arcologies[0].FSPaternalistLaw>>
 		<<set $arcologies[0].FSPaternalistLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSGenderFundamentalist and $FSGenderFundamentalist != "unset">>
 		<<set $arcologies[0].FSGenderFundamentalist to $FSGenderFundamentalist>>
 		<<unset $FSGenderFundamentalist>>
 	<<elseif ndef $arcologies[0].FSGenderFundamentalist>>
 		<<set $arcologies[0].FSGenderFundamentalist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSGenderFundamentalistSMR and $FSGenderFundamentalistSMR != 0>>
 		<<set $arcologies[0].FSGenderFundamentalistSMR to $FSGenderFundamentalistSMR>>
 		<<unset $FSGenderFundamentalistSMR>>
 	<<elseif ndef $arcologies[0].FSGenderFundamentalistSMR>>
 		<<set $arcologies[0].FSGenderFundamentalistSMR to 0>>
 	<</if>>
-	
+
 	<<if def $FSGenderRadicalist and $FSGenderRadicalist != "unset">>
 		<<set $arcologies[0].FSGenderRadicalist to $FSGenderRadicalist>>
 		<<unset $FSGenderRadicalist>>
 	<<elseif ndef $arcologies[0].FSGenderRadicalist>>
 		<<set $arcologies[0].FSGenderRadicalist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSGenderRadicalistLaw and $FSGenderRadicalistLaw != 0>>
 		<<set $arcologies[0].FSGenderRadicalistLaw to $FSGenderRadicalistLaw>>
 		<<unset $FSGenderRadicalistLaw>>
 	<<elseif ndef $arcologies[0].FSGenderRadicalistLaw>>
 		<<set $arcologies[0].FSGenderRadicalistLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSBodyPurist and $FSBodyPurist != "unset">>
 		<<set $arcologies[0].FSBodyPurist to $FSBodyPurist>>
 		<<unset $FSBodyPurist>>
 	<<elseif ndef $arcologies[0].FSBodyPurist>>
 		<<set $arcologies[0].FSBodyPurist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSBodyPuristLaw and $FSBodyPuristLaw != 0>>
 		<<set $arcologies[0].FSBodyPuristLaw to $FSBodyPuristLaw>>
 		<<unset $FSBodyPuristLaw>>
 	<<elseif ndef $arcologies[0].FSBodyPuristLaw>>
 		<<set $arcologies[0].FSBodyPuristLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSPhysicalIdealist and $FSPhysicalIdealist != "unset">>
 		<<set $arcologies[0].FSPhysicalIdealist to $FSPhysicalIdealist>>
 		<<unset $FSPhysicalIdealist>>
 	<<elseif ndef $arcologies[0].FSPhysicalIdealist>>
 		<<set $arcologies[0].FSPhysicalIdealist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSPhysicalIdealistSMR and $FSPhysicalIdealistSMR != 0>>
 		<<set $arcologies[0].FSPhysicalIdealistSMR to $FSPhysicalIdealistSMR>>
 		<<unset $FSPhysicalIdealistSMR>>
 	<<elseif ndef $arcologies[0].FSPhysicalIdealistSMR>>
 		<<set $arcologies[0].FSPhysicalIdealistSMR to 0>>
 	<</if>>
-	
+
 	<<if def $FSTransformationFetishist and $FSTransformationFetishist != "unset">>
 		<<set $arcologies[0].FSTransformationFetishist to $FSTransformationFetishist>>
 		<<unset $FSTransformationFetishist>>
 	<<elseif ndef $arcologies[0].FSTransformationFetishist>>
 		<<set $arcologies[0].FSTransformationFetishist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSTransformationFetishistLaw and $FSTransformationFetishistLaw != 0>>
 		<<set $arcologies[0].FSTransformationFetishistLaw to $FSTransformationFetishistLaw>>
 		<<unset $FSTransformationFetishistLaw>>
 	<<elseif ndef $arcologies[0].FSTransformationFetishistLaw>>
 		<<set $arcologies[0].FSTransformationFetishistLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSAssetExpansionist and $FSAssetExpansionist != "unset">>
 		<<set $arcologies[0].FSAssetExpansionist to $FSAssetExpansionist>>
 		<<unset $FSAssetExpansionist>>
 	<<elseif ndef $arcologies[0].FSAssetExpansionist>>
 		<<set $arcologies[0].FSAssetExpansionist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSAssetExpansionistSMR and $FSAssetExpansionistSMR != 0>>
 		<<set $arcologies[0].FSAssetExpansionistSMR to $FSAssetExpansionistSMR>>
 		<<unset $FSAssetExpansionistSMR>>
 	<<elseif ndef $arcologies[0].FSAssetExpansionistSMR>>
 		<<set $arcologies[0].FSAssetExpansionistSMR to 0>>
 	<</if>>
-	
+
 	<<if def $FSSlimnessEnthusiast and $FSSlimnessEnthusiast != "unset">>
 		<<set $arcologies[0].FSSlimnessEnthusiast to $FSSlimnessEnthusiast>>
 		<<unset $FSSlimnessEnthusiast>>
 	<<elseif ndef $arcologies[0].FSSlimnessEnthusiast>>
 		<<set $arcologies[0].FSSlimnessEnthusiast to "unset">>
 	<</if>>
-	
+
 	<<if def $FSSlimnessEnthusiastSMR and $FSSlimnessEnthusiastSMR != 0>>
 		<<set $arcologies[0].FSSlimnessEnthusiastSMR to $FSSlimnessEnthusiastSMR>>
 		<<unset $FSSlimnessEnthusiastSMR>>
 	<<elseif ndef $arcologies[0].FSSlimnessEnthusiastSMR>>
 		<<set $arcologies[0].FSSlimnessEnthusiastSMR to 0>>
 	<</if>>
-	
+
 	<<if def $FSMaturityPreferentialist and $FSMaturityPreferentialist != "unset">>
 		<<set $arcologies[0].FSMaturityPreferentialist to $FSMaturityPreferentialist>>
 		<<unset $FSMaturityPreferentialist>>
 	<<elseif ndef $arcologies[0].FSMaturityPreferentialist>>
 		<<set $arcologies[0].FSMaturityPreferentialist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSMaturityPreferentialistLaw and $FSMaturityPreferentialistLaw != 0>>
 		<<set $arcologies[0].FSMaturityPreferentialistLaw to $FSMaturityPreferentialistLaw>>
 		<<unset $FSMaturityPreferentialistLaw>>
 	<<elseif ndef $arcologies[0].FSMaturityPreferentialistLaw>>
 		<<set $arcologies[0].FSMaturityPreferentialistLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSYouthPreferentialist and $FSYouthPreferentialist != "unset">>
 		<<set $arcologies[0].FSYouthPreferentialist to $FSYouthPreferentialist>>
 		<<unset $FSYouthPreferentialist>>
 	<<elseif ndef $arcologies[0].FSYouthPreferentialist>>
 		<<set $arcologies[0].FSYouthPreferentialist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSYouthPreferentialistLaw and $FSYouthPreferentialistLaw != 0>>
 		<<set $arcologies[0].FSYouthPreferentialistLaw to $FSYouthPreferentialistLaw>>
 		<<unset $FSYouthPreferentialistLaw>>
 	<<elseif ndef $arcologies[0].FSYouthPreferentialistLaw>>
 		<<set $arcologies[0].FSYouthPreferentialistLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSPastoralist and $FSPastoralist != "unset">>
 		<<set $arcologies[0].FSPastoralist to $FSPastoralist>>
 		<<unset $FSPastoralist>>
 	<<elseif ndef $arcologies[0].FSPastoralist>>
 		<<set $arcologies[0].FSPastoralist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSPastoralistLaw and $FSPastoralistLaw != 0>>
 		<<set $arcologies[0].FSPastoralistLaw to $FSPastoralistLaw>>
 		<<unset $FSPastoralistLaw>>
 	<<elseif ndef $arcologies[0].FSPastoralistLaw>>
 		<<set $arcologies[0].FSPastoralistLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSChattelReligionist and $FSChattelReligionist != "unset">>
 		<<set $arcologies[0].FSChattelReligionist to $FSChattelReligionist>>
 		<<unset $FSChattelReligionist>>
 	<<elseif ndef $arcologies[0].FSChattelReligionist>>
 		<<set $arcologies[0].FSChattelReligionist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSChattelReligionistLaw and $FSChattelReligionistLaw != 0>>
 		<<set $arcologies[0].FSChattelReligionistLaw to $FSChattelReligionistLaw>>
 		<<unset $FSChattelReligionistLaw>>
 	<<elseif ndef $arcologies[0].FSChattelReligionistLaw>>
 		<<set $arcologies[0].FSChattelReligionistLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSRomanRevivalist and $FSRomanRevivalist != "unset">>
 		<<set $arcologies[0].FSRomanRevivalist to $FSRomanRevivalist>>
 		<<unset $FSRomanRevivalist>>
 	<<elseif ndef $arcologies[0].FSRomanRevivalist>>
 		<<set $arcologies[0].FSRomanRevivalist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSRomanRevivalistLaw and $FSRomanRevivalistLaw != 0>>
 		<<set $arcologies[0].FSRomanRevivalistLaw to $FSRomanRevivalistLaw>>
 		<<unset $FSRomanRevivalistLaw>>
 	<<elseif ndef $arcologies[0].FSRomanRevivalistLaw>>
 		<<set $arcologies[0].FSRomanRevivalistLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSEgyptianRevivalist and $FSEgyptianRevivalist != "unset">>
 		<<set $arcologies[0].FSEgyptianRevivalist to $FSEgyptianRevivalist>>
 		<<unset $FSEgyptianRevivalist>>
 	<<elseif ndef $arcologies[0].FSEgyptianRevivalist>>
 		<<set $arcologies[0].FSEgyptianRevivalist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSEgyptianRevivalistLaw and $FSEgyptianRevivalistLaw != 0>>
 		<<set $arcologies[0].FSEgyptianRevivalistLaw to $FSEgyptianRevivalistLaw>>
 		<<unset $FSEgyptianRevivalistLaw>>
 	<<elseif ndef $arcologies[0].FSEgyptianRevivalistLaw>>
 		<<set $arcologies[0].FSEgyptianRevivalistLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSEdoRevivalist and $FSEdoRevivalist != "unset">>
 		<<set $arcologies[0].FSEdoRevivalist to $FSEdoRevivalist>>
 		<<unset $FSEdoRevivalist>>
 	<<elseif ndef $arcologies[0].FSEdoRevivalist>>
 		<<set $arcologies[0].FSEdoRevivalist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSEdoRevivalistLaw and $FSEdoRevivalistLaw != 0>>
 		<<set $arcologies[0].FSEdoRevivalistLaw to $FSEdoRevivalistLaw>>
 		<<unset $FSEdoRevivalistLaw>>
 	<<elseif ndef $arcologies[0].FSEdoRevivalistLaw>>
 		<<set $arcologies[0].FSEdoRevivalistLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSArabianRevivalist and $FSArabianRevivalist != "unset">>
 		<<set $arcologies[0].FSArabianRevivalist to $FSArabianRevivalist>>
 		<<unset $FSArabianRevivalist>>
 	<<elseif ndef $arcologies[0].FSArabianRevivalist>>
 		<<set $arcologies[0].FSArabianRevivalist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSArabianRevivalistLaw and $FSArabianRevivalistLaw != 0>>
 		<<set $arcologies[0].FSArabianRevivalistLaw to $FSArabianRevivalistLaw>>
 		<<unset $FSArabianRevivalistLaw>>
 	<<elseif ndef $arcologies[0].FSArabianRevivalistLaw>>
 		<<set $arcologies[0].FSArabianRevivalistLaw to 0>>
 	<</if>>
-	
+
 	<<if def $FSChineseRevivalist and $FSChineseRevivalist != "unset">>
 		<<set $arcologies[0].FSChineseRevivalist to $FSChineseRevivalist>>
 		<<unset $FSChineseRevivalist>>
 	<<elseif ndef $arcologies[0].FSChineseRevivalist>>
 		<<set $arcologies[0].FSChineseRevivalist to "unset">>
 	<</if>>
-	
+
 	<<if def $FSChineseRevivalistLaw and $FSChineseRevivalistLaw != 0>>
 		<<set $arcologies[0].FSChineseRevivalistLaw to $FSChineseRevivalistLaw>>
 		<<unset $FSChineseRevivalistLaw>>
 	<<elseif ndef $arcologies[0].FSChineseRevivalistLaw>>
 		<<set $arcologies[0].FSChineseRevivalistLaw to 0>>
 	<</if>>
-	
+
 	<<for _i to 1; _i < $arcologies.length; _i++>>
 		<<if ndef $arcologies[_i].FSNull>>
 			<<set $arcologies[_i].FSNull to "unset">>
 		<</if>>
 	<</for>>
-	
+
 	Setting missing global variables:
 	<<if ndef $assistantPower>>
 		<<set $assistantPower to 0>>
@@ -402,7 +402,7 @@
 	<<if ndef $CulturalOpenness>>
 		<<set $CulturalOpenness to 0>>
 	<</if>>
-	
+
 	<<if ndef $displayAssignments>>
 		<<set $displayAssignments to 1>>
 	<</if>>
@@ -430,7 +430,7 @@
 	<<if ndef $terrain>>
 		<<set $terrain to "rural">>
 	<</if>>
-	
+
 	<<if ndef $menialDemandFactor>>
 		<<set $menialDemandFactor = 0>>
 	<</if>>
@@ -457,7 +457,7 @@
 	<<if ndef $policyCost>>
 		<<set $policyCost to 5000>>
 	<</if>>
-	
+
 	<<if ndef $REFeminizationCheckinIDs>>
 		<<set $REFeminizationCheckinIDs to []>>
 	<</if>>
@@ -725,31 +725,31 @@
 	<<if ndef $assistantFSAppearance>>
 		<<set $assistantFSAppearance to "default">>
 	<</if>>
-	
+
 	<<if ndef $universalRulesRest>>
 		<<set $universalRulesRest to 0>>
 	<</if>>
-	
+
 	<<if ndef $universalRulesNewSlavesRA>>
 		<<set $universalRulesNewSlavesRA to 1>>
 	<</if>>
-	
+
 	<<if ndef $hormoneUpgradeMood>>
 		<<set $hormoneUpgradeMood to 0>>
 	<</if>>
-	
+
 	<<if ndef $hormoneUpgradeShrinkage>>
 		<<set $hormoneUpgradeShrinkage to 0>>
 	<</if>>
-	
+
 	<<if ndef $hormoneUpgradePower>>
 		<<set $hormoneUpgradePower to 0>>
 	<</if>>
-	
+
 	<<if ndef $schoolSuggestion>>
 		<<set $schoolSuggestion to 0>>
 	<</if>>
-	
+
 	<<if ndef $prostheticsUpgrade>>
 		<<set $prostheticsUpgrade to 0>>
 	<</if>>
@@ -759,10 +759,10 @@
 	<<if ndef $limbsCompleted>>
 		<<set $limbsCompleted to 0>>
 	<</if>>
-	
+
 	<<if ndef $trinkets>>
 		<<set $trinkets to []>>
-		
+
 		<<set $upgradeMultiplierArcology to 1>>
 		<<set $upgradeMultiplierMedicine to 1>>
 		<<if $PC.career is "wealth">>
@@ -781,13 +781,15 @@
 			<<set $upgradeMultiplierMedicine to 0.8>>
 		<<elseif $PC.career is "celebrity">>
 			<<set $trinkets.push("a framed copy of the first news story featuring yourself")>>
+		<<elseif $PC.career is "arcology owner">>
+			<<set $trinkets.push("a miniature model of your first arcology")>>
 		<<elseif $PC.career is "escort">>
 			<<set $trinkets.push("a copy the first porno you starred in")>>
 		<<elseif $PC.career is "servant">>
 			<<set $trinkets.push("a framed picture of your late Master")>>
 		<</if>>
 	<</if>>
-	
+
 	<<if ndef $TSS>>
 		<<set $TSS to {schoolUpgrade: 0, schoolPresent: 0, schoolProsperity: 0, subsidize: 0, schoolAnnexed: 0, studentsBought: 0, schoolSale: 0}>>
 	<</if>>
@@ -820,7 +822,7 @@
 	<<if ndef $birthee>>
 		<<set $birthee to 0>>
 	<</if>>
-	
+
 	<<if ndef $assistantNameAnnounced>>
 		<<set $assistantNameAnnounced to 0>>
 	<</if>>
@@ -1033,7 +1035,7 @@
 	<<if ndef $attendantCareers>>
 		<<set $attendantCareers to ["a masseuse", "a counselor"]>>
 	<</if>>
-	
+
 	<<if ndef $milkmaidCareers>>
 		<<set $milkmaidCareers to ["a dairy worker", "a rancher", "a veterinarian", "a farmer's daughter"]>>
 	<</if>>
@@ -1045,7 +1047,7 @@
 	<<if ndef $schoolteacherCareers>>
 		<<set $schoolteacherCareers to ["a principal", "a teacher", "a scientist", "a professor"]>>
 	<</if>>
-	
+
 	<<if ndef $fakeBellies>>
 	<<set $fakeBellies to ["a small empathy belly", "a medium empathy belly", "a large empathy belly", "a huge empathy belly"]>> /* lets fake bellies be seperated from other .bellyAccessory */
 	<</if>>
@@ -1122,16 +1124,16 @@
 
 	<<if ndef _Slave.eyeColor>>
 		<<set _Slave.eyeColor to _Slave.eyes>>
-		<<set _Slave.eyes to 1>>	  
+		<<set _Slave.eyes to 1>>
 		<<if ndef _Slave.eyeColor>>
 			<<set _Slave.eyeColor to "brown">>
 		<</if>>
 	<</if>>
-	
+
 	<<if ndef _Slave.eyewear>>
 	  <<set _Slave.eyewear to "none">>
 	<</if>>
-	
+
 	<<if ndef _Slave.indenture>>
 		<<set _Slave.indenture to -1>>
 	<</if>>
@@ -1153,7 +1155,7 @@
 	<<if ndef _Slave.pregSource>>
 		<<set _Slave.pregSource = 0>>
 	<</if>>
-	
+
 	<<if ndef _Slave.training>>
 		<<set _Slave.training = 0>>
 	<</if>>
@@ -1182,7 +1184,7 @@
 			<<set _Slave.attrXY = 10>>
 		<</if>>
 	<</if>>
-	
+
 	<<if ($ver.contains("0.9") != true)>>
 		<<if _Slave.health <= -9>>
 			<<set _Slave.health = -90>>
@@ -1212,15 +1214,15 @@
 			<<set _Slave.health = random(101,150)>>
 		<<elseif _Slave.health <= 20>>
 			<<set _Slave.health = random(151,200)>>
-		<<elseif _Slave.health >= 50>> 
+		<<elseif _Slave.health >= 50>>
 			<<set _Slave.health = 500>>
-		<<elseif _Slave.health > 20>> 
+		<<elseif _Slave.health > 20>>
 			<<set _Slave.health = 205>>
 		<</if>>
-		
+
 		<<set _Slave.devotion = (_Slave.devotion*5)>>
 		<<set _Slave.trust = (_Slave.trust*5)>>
-		
+
 		<<if _Slave.fetishStrength == 0>>
 			<<set _Slave.fetishStrength = random(0, 60)>>
 		<<elseif _Slave.fetishStrength == 1>>
@@ -1228,7 +1230,7 @@
 		<<elseif _Slave.fetishStrength == 2>>
 			<<set _Slave.fetishStrength = random(96, 100)>>
 		<</if>>
-		
+
 		<<if _Slave.weight == -3>>
 			<<set _Slave.weight = random(-110,-96)>>
 		<<elseif _Slave.weight == -3>>
@@ -1244,7 +1246,7 @@
 		<<elseif _Slave.weight == 3>>
 			<<set _Slave.weight = random(96, 110)>>
 		<</if>>
-		
+
 		<<if _Slave.lips != 0>>
 			<<if _Slave.lips == 3>>
 				<<set _Slave.lips = 85>>
@@ -1255,7 +1257,7 @@
 			<</if>>
 		<</if>>
 	<</if>>
-	
+
 	<<switch _Slave.boobsTat>>
 	<<case "floral designs">>
 		<<set _Slave.boobsTat to "flowers">>
@@ -1402,11 +1404,11 @@
 	<<if ndef _Slave.areolaePiercing>>
 		<<set _Slave.areolaePiercing to 0>>
 	<</if>>
-	
+
 	<<if ndef _Slave.standardPunishment>>
 		<<set _Slave.standardPunishment to "situational">>
 	<</if>>
-	
+
 	<<if ndef _Slave.standardReward>>
 		<<set _Slave.standardReward to "situational">>
 	<</if>>
@@ -1448,7 +1450,7 @@
 	<<if ndef _Slave.pornFameSpending>>
 		<<set _Slave.pornFameSpending to 0>>
 	<</if>>
-	
+
 	<<if ndef _Slave.bellyAccessory>>
 	  <<set _Slave.bellyAccessory to "none">>
 	<</if>>
@@ -1475,7 +1477,7 @@
 	<<if _Slave.customTat is " ">>
 		<<set _Slave.customTat to "">>
 	<</if>>
-	
+
 	<<if _Slave.customLabel is " ">>
 		<<set _Slave.customLabel to "">>
 	<</if>>
@@ -1518,7 +1520,7 @@
 	<<if _Slave.corsetPiercing is "no default setting">>
 		<<set _Slave.corsetPiercing to 0>>
 	<</if>>
-	
+
 	<<if _Slave.customDesc is " " or _Slave.customDesc == 0>>
 		<<set _Slave.customDesc to "">>
 	<</if>>
@@ -1530,11 +1532,11 @@
 	<<if ndef _Slave.curatives>>
 		<<set _Slave.curatives to 0>>
 	<</if>>
-	
+
 	<<set $slaves[_i] to _Slave>>
 	<</for>>
 	Done!
-	
+
 	<<if $ver.indexOf("0.9") == -1>>
 		<<set $ver to "0.9">>
 	<</if>>
diff --git a/src/uncategorized/motherDaughterWorkaround.tw b/src/uncategorized/motherDaughterWorkaround.tw
index 4bae2c1c939deadbda2644632fb90e256fc9d5c0..7349d9346630aa9c99203f767ceec3eb4df49e23 100644
--- a/src/uncategorized/motherDaughterWorkaround.tw
+++ b/src/uncategorized/motherDaughterWorkaround.tw
@@ -1,10 +1,11 @@
 :: Mother Daughter Workaround
- 
+
 Your new pair of slaves look frightened and uncertain, but seem encouraged by each other's presence.
 
-<<display "Nationality to Name">>
-<<display "Nationality to Accent">>
+<<AddSlave $activeSlave>>
 
+<<NationalityToName>>
+<<NationalityToAccent>>
 <<set _secondSlave to $activeSlave>>
 
 <<if $useFSNames == 0>>
@@ -71,5 +72,4 @@ Your new pair of slaves look frightened and uncertain, but seem encouraged by ea
 	<<set _secondSlave.butt += random(-1, 1)>>
 <</if>>
 
-<<set $genePool.push(_secondSlave)>>
-<<set $slaves.push(_secondSlave)>>
+<<AddSlave _secondSlave)>>
\ No newline at end of file
diff --git a/src/uncategorized/neighborsDevelopment.tw b/src/uncategorized/neighborsDevelopment.tw
index 0b63810fe478ec3f727f268124a34fafa227ed15..f25a4ee06f9b3ec38b978efa6d7f90da5ea7a5e8 100644
--- a/src/uncategorized/neighborsDevelopment.tw
+++ b/src/uncategorized/neighborsDevelopment.tw
@@ -514,25 +514,25 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		Racial Supremacy for $arcologies[$i].FSSupremacistRace people has reached stability and acceptance there. The arcology has been renamed
 		<<switch $arcologies[$i].FSSupremacistRace>>
 		<<case "white">>
-			<<set $arcologies[$i].name to either("The Old Dominion", "Thule")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSupremacistWhite.random()>>
 		<<case "asian">>
-			<<set $arcologies[$i].name to either("The Celestial Temple", "Shambhala", "Shangri-La")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSupremacistAsian.random()>>
 		<<case "latina">>
-			<<set $arcologies[$i].name to either("Tenochtitlan", "Aztlan")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSupremacistLatina.random()>>
 		<<case "middle eastern">>
-			<<set $arcologies[$i].name to either("The Caliphate", "New Cairo")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSupremacistMiddleEastern.random()>>
 		<<case "black">>
-			<<set $arcologies[$i].name to either("United Africa", "Benin")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSupremacistBlack.random()>>
 		<<case "indo-aryan">>
-			<<set $arcologies[$i].name to either("Swarga Loka", "New New Delhi")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSupremacistIndoAryan.random()>>
 		<<case "pacific islander">>
-			<<set $arcologies[$i].name to either("Maui", "Rapa Nui")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSupremacistPacificIslander.random()>>
 		<<case "amerindian">>
-			<<set $arcologies[$i].name to either("Cahokia", "The Confederated Tribes")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSupremacistAmerindian.random()>>
 		<<case "southern european">>
-			<<set $arcologies[$i].name to either("New Athens", "Olympus")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSupremacistSouthernEuropean.random()>>
 		<<case "semitic">>
-			<<set $arcologies[$i].name to either("The Fifth Temple", "The Promised Land")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSupremacistSemitic.random()>>
 		<<default>>
 			<<set $arcologies[$i].name to either("Purity")>>
 		<</switch>>
@@ -581,27 +581,27 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		Racial Subjugationism of $arcologies[$i].FSSubjugationistRace people has reached stability and acceptance there. The arcology has been renamed
 		<<switch $arcologies[$i].FSSubjugationistRace>>
 		<<case "white">>
-			<<set $arcologies[$i].name to either("The World Turned Upside Down", "Anticolonialism One")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSubjugationistWhite.random()>>
 		<<case "asian">>
-			<<set $arcologies[$i].name to either("The East India Company", "Pearl of the Orient")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSubjugationistAsian.random()>>
 		<<case "latina">>
-			<<set $arcologies[$i].name to either("Fort Veracruz", "Halls of Montezuma")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSubjugationistLatina.random()>>
 		<<case "middle eastern">>
-			<<set $arcologies[$i].name to either("Constantinople", "Vlad's Castle")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSubjugationistMiddleEastern.random()>>
 		<<case "black">>
-			<<set $arcologies[$i].name to either("Dixie", "The Plantation")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSubjugationistBlack.random()>>
 		<<case "indo-aryan">>
-			<<set $arcologies[$i].name to either("The East India Company", "Trade Fort")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSubjugationistIndoAryan.random()>>
 		<<case "pacific islander">>
-			<<set $arcologies[$i].name to either("Cargo Cult", "Moro Castle")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSubjugationistPacificIslander.random()>>
 		<<case "amerindian">>
-			<<set $arcologies[$i].name to either("Fort Laramie", "The Rez")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSubjugationistAmerindian.random()>>
 		<<case "southern european">>
-			<<set $arcologies[$i].name to either("Istanbul", "Al-Andalus")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSubjugationistSouthernEuropean.random()>>
 		<<case "semitic">>
-			<<set $arcologies[$i].name to either("Solomon's Lament", "New Canaan")>>
+			<<set $arcologies[$i].name to $ArcologyNamesSubjugationistSemitic.random()>>
 		<<default>>
-			<<set $arcologies[$i].name to either("Purity")>>
+			<<set $arcologies[$i].name to "Purity">>
 		<</switch>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
@@ -642,7 +642,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) and (random(0,2) == 0)>>
 		Repopulationism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Hope", "The Womb", "Holders of the Future", "Future", "Haven of the Pregnant", "Sacred Womb", "Glorious Mother")>>
+		<<set $arcologies[$i].name to $ArcologyNamesRepopulationist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSRepopulationFocus < 0>>
@@ -685,7 +685,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<if ($toSearch.indexOf("Arcology") != -1) and (random(0,2) == 0)>>
 		<<set $arcologies[$i].FSRestartResearch to 1>>
 		Eugenics has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Perfection", "Ancension", "Second Chance")>>
+		<<set $arcologies[$i].name to $ArcologyNamesEugenics.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSRestart < 0>>
@@ -734,7 +734,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		<<set $arcologies[$i].FSGenderRadicalistResearch to 1>>
 		Gender Radicalism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Saturnalia", "Bacchanalia", "Gomorrah", "Sodom", "The Rosebud")>>
+		<<set $arcologies[$i].name to $ArcologyNamesGenderRadicalist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSGenderRadicalist < 0>>
@@ -788,7 +788,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Gender Fundamentalism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("The Arbor", "The Rose", "The Source")>>
+		<<set $arcologies[$i].name to $ArcologyNamesGenderFundamentalist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSGenderFundamentalist < 0>>
@@ -828,7 +828,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Paternalism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Sanctum", "Asylum", "Sanctuary", "Haven", "New Springfield", "The Sanctuary", "Glory")>>
+		<<set $arcologies[$i].name to $ArcologyNamesPaternalist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSPaternalist < 0>>
@@ -871,7 +871,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Degradationism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Hell", "Golgotha", "The Tower")>>
+		<<set $arcologies[$i].name to $ArcologyNamesDegradationist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSDegradationist < 0>>
@@ -920,7 +920,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Body Purism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Walden", "New Eden", "Elysium", "Purity", "The Ark", "The Repository")>>
+		<<set $arcologies[$i].name to $ArcologyNamesBodyPurist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSBodyPurist < 0>>
@@ -961,7 +961,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		<<set $arcologies[$i].FSTransformationFetishistResearch to 1>>
 		Transformation Fetishism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("The Dollhouse", "Silicon Valley", "The Hospital", "Bimboland")>>
+		<<set $arcologies[$i].name to $ArcologyNamesTransformationFetishist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSTransformationFetishist < 0>>
@@ -1005,7 +1005,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Youth Preferentialism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Sunnyside", "Fuck High", "Dick U.", "Sex College")>>
+		<<set $arcologies[$i].name to $ArcologyNamesYouthPreferentialist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<<set $arcologies[$i].FSYouthPreferentialistResearch to 1>>
 		<</if>>
@@ -1044,7 +1044,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Maturity Preferentialism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Shady Acres", "MILFtown", "MILF Heights", "Park Avenue Tower")>>
+		<<set $arcologies[$i].name to $ArcologyNamesMaturityPreferentialist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSMaturityPreferentialist < 0>>
@@ -1084,7 +1084,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Slimness Enthusiasm has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("The Island", "Upskirt", "Virginland")>>
+		<<set $arcologies[$i].name to $ArcologyNamesSlimnessEnthusiast.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSSlimnessEnthusiast < 0>>
@@ -1131,7 +1131,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		<<set $arcologies[$i].FSAssetExpansionistResearch to 1>>
 		Asset Expansionism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("The Bouncy Castle", "The Mounds", "Twin Peaks", "Boobs Tower")>>
+		<<set $arcologies[$i].name to $ArcologyNamesAssetExpansionist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSAssetExpansionist < 0>>
@@ -1179,7 +1179,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Pastoralism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Cornucopia", "Abundance", "Plenty", "Bounty", "Greener Pastures", "God's Country", "The Ranch", "Pasturelands")>>
+		<<set $arcologies[$i].name to $ArcologyNamesPastoralist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSPastoralist < 0>>
@@ -1217,7 +1217,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Physical Idealism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Themyscira", "Midgard", "Muscle Beach", "Skid Row")>>
+		<<set $arcologies[$i].name to $ArcologyNamesPhysicalIdealist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSPhysicalIdealist < 0>>
@@ -1258,7 +1258,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Chattel Religionism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Heaven", "The Light", "Heaven on Earth")>>
+		<<set $arcologies[$i].name to $ArcologyNamesChattelReligionist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSChattelReligionist < 0>>
@@ -1311,7 +1311,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Roman Revivalism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Elysian Fields", "Carthago Nova", "Nova Roma", "Neapolis", "Capua", "Ostia", "Salernum", "The City of the Seven Hills")>>
+		<<set $arcologies[$i].name to $ArcologyNamesRomanRevivalist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSRomanRevivalist < 0>>
@@ -1358,7 +1358,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Egyptian Revivalism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Thebes", "Memphis", "Alexandria")>>
+		<<set $arcologies[$i].name to $ArcologyNamesEgyptianRevivalist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSEgyptianRevivalist < 0>>
@@ -1405,7 +1405,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Edo Revivalism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Onogoro", "Kokyo", "Tengoku", "Takama-ga-hara", "New Kyoto", "The Imperial Palace", "New Tokyo")>>
+		<<set $arcologies[$i].name to $ArcologyNamesEdoRevivalist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSEdoRevivalist < 0>>
@@ -1452,7 +1452,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Arabian Revivalism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Jannah", "Madinat al-Salam", "Madinat al-Hareer", "Madinat al-Zahra", "Madinat al-Yasmin", "Bayt al-Hikma", "Baghdad", "Alhambra", "Samarra")>>
+		<<set $arcologies[$i].name to $ArcologyNamesArabianRevivalist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSArabianRevivalist < 0>>
@@ -1503,7 +1503,7 @@ has an estimated GSP of @@color:yellowgreen;¤<<print Math.trunc((0.1*$arcologie
 		<<set $toSearch to $arcologies[$i].name>>
 		<<if ($toSearch.indexOf("Arcology") != -1) && (random(0,2) == 0)>>
 		Chinese Revivalism has reached stability and acceptance there. The arcology has been renamed
-		<<set $arcologies[$i].name to either("Yinfu", "Huangquan", "Jiuquan", "Youming", "Huokang", "Mingfu", "Jin Shan", "Qi Lin", "Xin Hua", "Feng Huang", "The Middle Kingdom", "The Forbidden Palace")>>
+		<<set $arcologies[$i].name to $ArcologyNamesChineseRevivalist.random()>>
 		''$arcologies[$i].name'' to mark the occasion.
 		<</if>>
 	<<elseif $arcologies[$i].FSChineseRevivalist < 0>>
diff --git a/src/uncategorized/newGamePlus.tw b/src/uncategorized/newGamePlus.tw
index 9a2f911ca978034b13513d6bb5b0d36269523611..8b310a2b004b510f603701d37083ce16784ffa37 100644
--- a/src/uncategorized/newGamePlus.tw
+++ b/src/uncategorized/newGamePlus.tw
@@ -10,6 +10,24 @@
 <</silently>>
 <</if>>
 
+<<if $freshPC == 0>>
+	<<if $retainCareer == 1 && $PC.career != "arcology owner">>
+		<<if $week > 52>>
+			You have acquired a fair amount of knowledge regarding arcologies and their day-to-day management in your time spent as one's owner qualifying you as an @@color:orange;"arcology owner"!@@
+			<<if $retainCareer == 1>>
+				[[Change career.|New Game Plus][$retainCareer to 0]]
+			<<elseif $retainCareer == 0>>
+				[[Don't change career.|New Game Plus][$retainCareer to 1]]
+			<</if>>
+		<<else>>
+			You lack the experience needed to qualify for a career change to "arcology owner".
+		<</if>>
+	<</if>>
+	[[Start over with a new player character.|New Game Plus][$freshPC = 1, $retainCareer to 1]]
+<<else>>
+	[[Use existing player character.|New Game Plus][$freshPC = 0]]
+<</if>>
+
 Select up to five slaves to be imported into a new game and then [[click here.|init][$saveImported to 1]]
 
 <br><br>''These slaves will be imported into the new game:''
diff --git a/src/uncategorized/newSlaveIntro.tw b/src/uncategorized/newSlaveIntro.tw
index 801f137b3bce86488c30a6b954b3f09e17be716d..41f94653479c59ba797bee342e2dbb4112958b4b 100644
--- a/src/uncategorized/newSlaveIntro.tw
+++ b/src/uncategorized/newSlaveIntro.tw
@@ -25,8 +25,6 @@
 	<<set $activeSlave.vaginalSkill = 0>>
 <</if>>
 
-<<set $genePool.push($activeSlave)>>
-
 <<if $activeSlave.nipplesPiercing > 0>>
 	<<if $activeSlave.nipples is "partially inverted">>
 <<set $activeSlave.nipples to "cute">>
@@ -38,7 +36,7 @@
 <<if $familyTesting == 1>>
 	<<if $activeSlave.indenture < 0>>
 		<<if $activeSlave.canRecruit == 1>>
-			<<set $recruiters.push($activeSlave)>>
+			/*<<set $recruiters.push($activeSlave)>>*/
 		<</if>>
 	<</if>>
 <<else>>
@@ -46,19 +44,14 @@
 <<if ($activeSlave.relation == 0)>>
 <<if random(1,100) <= 5>>
 	<<set $activeSlave.recruiter to "twin">>
-	<<set $recruiters.push($activeSlave)>>
 <<elseif ($activeSlave.actualAge > 32) && ($activeSlave.vagina != 0) && (random(1,100) <= 41)>>
 	<<set $activeSlave.recruiter to "mother">>
-	<<set $recruiters.push($activeSlave)>>
 <<elseif ($activeSlave.actualAge < 24) && (random(1,100) <= 40)>>
 	<<set $activeSlave.recruiter to "daughter">>
-	<<set $recruiters.push($activeSlave)>>
 <<elseif ($activeSlave.actualAge < 43) && (random(1,100) <= 20)>>
 	<<set $activeSlave.recruiter to "older sister">>
-	<<set $recruiters.push($activeSlave)>>
 <<elseif ($activeSlave.actualAge < 25) && ($activeSlave.actualAge > 18) && (random(1,100) <= 20)>>
 	<<set $activeSlave.recruiter to "young sister">>
-	<<set $recruiters.push($activeSlave)>>
 <</if>>
 <</if>>
 <</if>>
@@ -112,11 +105,11 @@ The legalities completed, ''__@@color:pink;$activeSlave.slaveName@@__'' <<if ($a
 <<elseif $activeSlave.career is "a Futanari Sister">>
 	<<if ($PC.dick == 1) && ($PC.boobs == 1) && ($PC.vagina == 1)>>
 		<<if $TFS.schoolPresent == 1>>
-			She's heard of you, of course, as both a futanari yourself and a generous patron of the Sisters. She feels @@color:mediumaquamarine;very lucky@@ that she's going to be your slave, not to mention @@color:hotpink;almost desperate@@ to have sex with you. 
+			She's heard of you, of course, as both a futanari yourself and a generous patron of the Sisters. She feels @@color:mediumaquamarine;very lucky@@ that she's going to be your slave, not to mention @@color:hotpink;almost desperate@@ to have sex with you.
 			<<set $activeSlave.devotion += 10>>
 			<<set $activeSlave.trust += 10>>
 		<<else>>
-			Seeing that you're a fellow futanari, she's @@color:mediumaquamarine;relieved@@ that she's going to be your slave, not to mention @@color:hotpink;quite eager@@ to have sex with you. 
+			Seeing that you're a fellow futanari, she's @@color:mediumaquamarine;relieved@@ that she's going to be your slave, not to mention @@color:hotpink;quite eager@@ to have sex with you.
 			<<set $activeSlave.devotion += 5>>
 			<<set $activeSlave.trust += 5>>
 		<</if>>
@@ -304,7 +297,7 @@ The legalities completed, ''__@@color:pink;$activeSlave.slaveName@@__'' <<if ($a
 <<set $activeSlave.trust += 2>>
 	<<else>>
 	She realizes that she's one of the people considered subhuman here, and @@color:gold;fears@@ she will be unable to avoid degradation.
-	<<set $activeSlave.trust -= 4>>
+<<set $activeSlave.trust -= 4>>
 	<</if>>
 <</if>>
 <<if $arcologies[0].FSRepopulationFocus >= 50>>
@@ -496,7 +489,7 @@ The legalities completed, ''__@@color:pink;$activeSlave.slaveName@@__'' <<if ($a
 <<set $gingering to 0>>
 
 <<if $autoRulesAssistant == 0>>
- <br>
+	<br>
 	<span id="rules">
 	<<click "Apply default rules">>
 	<<replace "#rules">>
@@ -507,10 +500,6 @@ The legalities completed, ''__@@color:pink;$activeSlave.slaveName@@__'' <<if ($a
 	//Will not apply many cosmetic and surgical options since she is not obedient//
 	<</if>>
 	</span>
-<<else>>
-	<<if ($universalRulesNewSlavesRA == 1)>>
-		<<AutoRulesActivate 1>>
-	<</if>>
 <</if>>
 
 <br><br>
@@ -1227,7 +1216,7 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 	<<if $activeSlave.vagina > -1>>
 	<<set $activeSlave.vagina to Math.clamp($activeSlave.vagina, 3, 4)>>
 	<<set $activeSlave.vaginalCount += 10>>
-		<<set $vaginalTotal += 10>>	
+		<<set $vaginalTotal += 10>>
 	<</if>>
 <<set $activeSlave.analCount += 10>>
 	<<set $analTotal += 10>>
@@ -1439,7 +1428,7 @@ You <<if $activeSlave.devotion > 20>>bring her down to the studio, lay the compl
 <<set $activeSlave.devotion -= 5>>
 <<set $activeSlave.collar to "shock punishment">>
 <<replace "#result">>
-	You put a shock collar on her. Its function isn't immediately obvious, at least until you test it on the lowest power setting, making her jump and look at you fearfully. This concern is compounded when you throw a big dildo at her and tell her to rape herself. She gapes at you incredulously until you give her a stronger jolt and preemptorily tell her to
+	You put a shock collar on her. Its function isn't immediately obvious, at least until you test it on the lowest power setting, making her jump and look at you fearfully. This concern is compounded when you throw a big dildo at her and tell her to rape herself. She gapes at you incredulously until you give her a stronger jolt and peremptorily tell her to
 	<<if $activeSlave.vagina > 0>>
 	pick it up and pound her own pussy. @@color:mediumorchid;Reluctantly,@@ she reaches down shakily, seats herself, and slowly pushes the uncomfortably big phallus inside her womanhood. She starts to fuck herself. Harder, you command. Wincing, she works her cunt faster. Harder, you repeat, giving her another shock. @@color:gold;She begins to cry,@@ but obeys, sawing the big fake cock in and out, really raping herself.
 <<set $activeSlave.vaginalCount += 1>>
@@ -1459,4 +1448,4 @@ You <<if $activeSlave.devotion > 20>>bring her down to the studio, lay the compl
 
 <</if>>
 
-</span>
\ No newline at end of file
+</span>
diff --git a/src/uncategorized/newSlaveRaceNationalityAndName.tw b/src/uncategorized/newSlaveRaceNationalityAndName.tw
index d15f84c374f5671f49637a657a5534b473b502b2..f130c69d9b3adb14fdb4c58edbf9479f2295027c 100644
--- a/src/uncategorized/newSlaveRaceNationalityAndName.tw
+++ b/src/uncategorized/newSlaveRaceNationalityAndName.tw
@@ -1,103 +1,190 @@
-:: New Slave Race Nationality and Name [nobr]
- 
-<<switch $activeSlave.nationality>>
+:: New Slave Race Nationality and Name [nobr widget]
 
-<<case "Belarusian" "Russian" "Ukrainian" "Irish" "Icelandic" "Finnish" "Swiss" "Danish" "Norwegian" "Austrian" "Dutch" "Belgian" "Czech" "Serbian" "Portuguese" "Estonian" "Polish" "Lithuanian">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Greek">>
-	<<set $activeSlave.race to either("southern European")>>
-<<case "Haitian" "Jamaican" "Nigerian" "Kenyan" "Ugandan" "Congolese">>
-	<<set $activeSlave.race to either("black")>>
-<<case "Puerto Rican" "Venezuelan" "Colombian">>
+<<widget "NationalityToRace">>
+
+<<switch $activeSlave.nationality>>
+<<case "American">>
+	<<set $activeSlave.race to either("black", "middle eastern", "white", "white", "white", "latina", "latina", "asian", "amerindian", "mixed race")>>
+<<case "Canadian">>
+	<<set $activeSlave.race to either("white", "white", "white", "white", "amerindian")>>
+<<case "Puerto Rican">>
 	<<set $activeSlave.race to either("latina")>>
-<<case "Algerian" "Libyan" "Tunisian">>
-	<<set $activeSlave.race to either("middle eastern")>>
-<<case "Indian" "Bangladeshi">>
-	<<set $activeSlave.race to either("indo-aryan")>>
-<<case "Chinese" "Korean" "Japanese" "Vietnamese" "Uzbek">>
-	<<set $activeSlave.race to either("asian")>>
 <<case "Cuban">>
 	<<set $activeSlave.race to either("latina", "black")>>
-<<case "Peruvian" "Bolivian" "Guatemalan">>
+<<case "Haitian">>
+	<<set $activeSlave.race to either("black")>>
+<<case "Jamaican">>
+	<<set $activeSlave.race to either("black")>>
+<<case "Mexican">>
+	<<set $activeSlave.race to either("latina", "latina", "latina", "latina", "latina", "amerindian")>>
+<<case "Dominican">>
+	<<set $activeSlave.race to either("mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "white", "white", "black")>>
+<<case "Peruvian">>
 	<<set $activeSlave.race to either("latina", "amerindian")>>
-<<case "Armenian">>
-	<<set $activeSlave.race to either("indo-aryan", "semitic")>>
-<<case "Lebanese" "Jordanian">>
-	<<set $activeSlave.race to either("middle eastern", "semitic")>>
-<<case "Afghan" "Emirati" "Omani">>
-	<<set $activeSlave.race to either("indo-aryan", "middle eastern")>>
-<<case "Thai">>
-	<<set $activeSlave.race to either("asian", "asian", "malay")>>
+<<case "Venezuelan">>
+	<<set $activeSlave.race to either("latina")>>
+<<case "Bolivian">>
+	<<set $activeSlave.race to either("latina", "amerindian")>>
+<<case "Guatemalan">>
+	<<set $activeSlave.race to either("latina", "amerindian")>>
+<<case "Brazilian">>
+	<<set $activeSlave.race to either("black", "latina", "mixed race", "mixed race", "amerindian", "white")>>
 <<case "Argentinian">>
 	<<set $activeSlave.race to either("white", "latina", "latina")>>
-<<case "Burmese" "Nepalese">>
-	<<set $activeSlave.race to either("asian", "asian", "indo-aryan")>>
-<<case "Moroccan">>
-	<<set $activeSlave.race to either("middle eastern", "middle eastern", "black")>>
-<<case "Spanish">>
-	<<set $activeSlave.race to either("semitic", "southern European", "southern European")>>
 <<case "Chilean">>
 	<<set $activeSlave.race to either("white", "latina", "latina", "latina")>>
-<<case "Iranian" "Pakistani">>
+<<case "Colombian">>
+	<<set $activeSlave.race to either("latina")>>
+<<case "Egyptian">>
+	<<set $activeSlave.race to either("black", "middle eastern", "middle eastern", "middle eastern", "semitic")>>
+<<case "Turkish">>
+	<<set $activeSlave.race to either("middle eastern", "middle eastern", "middle eastern", "semitic")>>
+<<case "Iranian">>
 	<<set $activeSlave.race to either("indo-aryan", "indo-aryan", "indo-aryan", "semitic")>>
+<<case "Armenian">>
+	<<set $activeSlave.race to either("indo-aryan", "semitic")>>
 <<case "Israeli">>
 	<<set $activeSlave.race to either("white", "middle eastern", "semitic", "semitic")>>
-<<case "Tanzanian" "Ghanan">>
+<<case "Saudi">>
+	<<set $activeSlave.race to either("black", "asian", "middle eastern", "middle eastern")>>
+<<case "Moroccan">>
+	<<set $activeSlave.race to either("middle eastern", "middle eastern", "black")>>
+<<case "Nigerian">>
+	<<set $activeSlave.race to either("black")>>
+<<case "Kenyan">>
+	<<set $activeSlave.race to either("black")>>
+<<case "Zimbabwean">>
+	<<set $activeSlave.race to either("black", "black", "black", "black", "white")>>
+<<case "Ugandan">>
+	<<set $activeSlave.race to either("black")>>
+<<case "Tanzanian">>
+	<<set $activeSlave.race to either("black", "black", "black", "semitic")>>
+<<case "Ghanan">>
 	<<set $activeSlave.race to either("black", "black", "black", "semitic")>>
+<<case "Congolese">>
+	<<set $activeSlave.race to either("black")>>
+<<case "Ethiopian">>
+	<<set $activeSlave.race to either("black", "black", "black", "middle eastern", "semitic")>>
 <<case "South African">>
 	<<set $activeSlave.race to either("black", "black", "black", "white")>>
+<<case "Chinese">>
+	<<set $activeSlave.race to either("asian")>>
+<<case "Korean">>
+	<<set $activeSlave.race to either("asian")>>
+<<case "Japanese">>
+	<<set $activeSlave.race to either("asian")>>
+<<case "Thai">>
+	<<set $activeSlave.race to either("asian", "asian", "malay")>>
+<<case "Vietnamese">>
+	<<set $activeSlave.race to either("asian")>>
+<<case "Indonesian">>
+	<<set $activeSlave.race to either("asian", "malay", "malay", "pacific islander")>>
+<<case "Filipina">>
+	<<set $activeSlave.race to either("asian", "malay", "malay", "pacific islander")>>
+<<case "Burmese">>
+	<<set $activeSlave.race to either("asian", "asian", "indo-aryan")>>
+<<case "Nepalese">>
+	<<set $activeSlave.race to either("asian", "asian", "indo-aryan")>>
+<<case "Uzbek">>
+	<<set $activeSlave.race to either("asian")>>
+<<case "Afghan">>
+	<<set $activeSlave.race to either("indo-aryan", "middle eastern")>>
+<<case "Algerian">>
+	<<set $activeSlave.race to either("middle eastern")>>
+<<case "Libyan">>
+	<<set $activeSlave.race to either("middle eastern")>>
+<<case "Tunisian">>
+	<<set $activeSlave.race to either("middle eastern")>>
+<<case "Lebanese">>
+	<<set $activeSlave.race to either("middle eastern", "semitic")>>
+<<case "Jordanian">>
+	<<set $activeSlave.race to either("middle eastern", "semitic")>>
+<<case "Emirati">>
+	<<set $activeSlave.race to either("middle eastern", "indo-aryan")>>
+<<case "Omani">>
+	<<set $activeSlave.race to either("middle eastern", "indo-aryan")>>
+<<case "Malian">>
+	<<set $activeSlave.race to either("black", "black", "black", "black", "black", "middle eastern")>>
 <<case "Sudanese">>
 	<<set $activeSlave.race to either("black", "black", "black", "middle eastern")>>
+<<case "Yemeni">>
+	<<set $activeSlave.race to either("black", "semitic", "middle eastern", "middle eastern", "middle eastern")>>
+<<case "Iraqi">>
+	<<set $activeSlave.race to either("semitic", "middle eastern", "middle eastern", "middle eastern", "middle eastern")>>
+<<case "Indian">>
+	<<set $activeSlave.race to either("indo-aryan")>>
 <<case "Malaysian">>
 	<<set $activeSlave.race to either("asian", "malay", "malay", "malay")>>
-<<case "Indonesian" "Filipina">>
-	<<set $activeSlave.race to either("asian", "malay", "malay", "pacific islander")>>
-<<case "Australian">>
-	<<set $activeSlave.race to either("white", "white", "black", "asian")>>
-<<case "Saudi">>
-	<<set $activeSlave.race to either("black", "asian", "middle eastern", "middle eastern")>>
-<<case "Slovak" "Hungarian">>
-	<<set $activeSlave.race to either("white", "white", "white", "white", "indo-aryan")>>
-<<case "Canadian">>
-	<<set $activeSlave.race to either("white", "white", "white", "white", "amerindian")>>
-<<case "Zimbabwean">>
-	<<set $activeSlave.race to either("black", "black", "black", "black", "white")>>
-<<case "Swedish">>
-	<<set $activeSlave.race to either("middle eastern", "white", "white", "white", "white")>>
-<<case "Ethiopian">>
-	<<set $activeSlave.race to either("black", "black", "black", "middle eastern", "semitic")>>
 <<case "Kazakh">>
 	<<set $activeSlave.race to either("asian", "asian", "asian", "semitic", "indo-aryan")>>
-<<case "Egyptian" "Turkish" "Yemeni">>
-	<<set $activeSlave.race to either("black", "middle eastern", "middle eastern", "middle eastern", "semitic")>>
-<<case "Italian">>
-	<<set $activeSlave.race to either("middle eastern", "southern European", "southern European", "white", "white")>>
-<<case "a New Zealander">>
-	<<set $activeSlave.race to either("white", "white", "white", "white", "pacific islander")>>
-<<case "Iraqi">>
-	<<set $activeSlave.race to either("semitic", "middle eastern", "middle eastern", "middle eastern", "middle eastern")>>
-<<case "Brazilian">>
-	<<set $activeSlave.race to either("black", "latina", "mixed race", "mixed race", "amerindian", "white")>>
-<<case "Mexican">>
-	<<set $activeSlave.race to either("latina", "latina", "latina", "latina", "latina", "amerindian")>>
+<<case "Pakistani">>
+	<<set $activeSlave.race to either("indo-aryan", "indo-aryan", "indo-aryan", "semitic")>>
+<<case "Bangladeshi">>
+	<<set $activeSlave.race to either("indo-aryan")>>
+<<case "Belarusian">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Russian">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Ukrainian">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Irish">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Icelandic">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Finnish">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Swiss">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Danish">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Norwegian">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Austrian">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Slovak">>
+	<<set $activeSlave.race to either("white", "white", "white", "white", "indo-aryan")>>
+<<case "Dutch">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Belgian">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Czech">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Serbian">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Portuguese">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Hungarian">>
+	<<set $activeSlave.race to either("white", "white", "white", "white", "indo-aryan")>>
+<<case "Estonian">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Polish">>
+	<<set $activeSlave.race to either("white")>>
+<<case "Lithuanian">>
+	<<set $activeSlave.race to either("white")>>
 <<case "Romanian">>
 	<<set $activeSlave.race to either("semitic", "white", "white", "white", "white", "indo-aryan")>>
-<<case "Malian">>
-	<<set $activeSlave.race to either("black", "black", "black", "black", "black", "middle eastern")>>
-<<case "American">>
-	<<set $activeSlave.race to either("black", "middle eastern", "white", "white", "white", "latina", "latina", "asian", "amerindian", "mixed race")>>
-<<case "Dominican">>
-	<<set $activeSlave.race to either("mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "white", "white", "black")>>
 <<case "German">>
 	<<set $activeSlave.race to either("black", "middle eastern", "white", "white", "white", "white", "white", "white")>>
+<<case "Swedish">>
+	<<set $activeSlave.race to either("middle eastern", "white", "white", "white", "white")>>
 <<case "French">>
 	<<set $activeSlave.race to either("black", "middle eastern", "white", "white", "white", "white", "white", "southern European")>>
+<<case "Italian">>
+	<<set $activeSlave.race to either("middle eastern", "southern European", "southern European", "white", "white")>>
+<<case "Greek">>
+	<<set $activeSlave.race to either("southern European")>>
+<<case "Spanish">>
+	<<set $activeSlave.race to either("semitic", "southern European", "southern European")>>
 <<case "British">>
 	<<set $activeSlave.race to either("indo-aryan", "white", "white", "white", "white", "white", "white", "white", "white", "white")>>
 <<case "Scottish">>
 	<<set $activeSlave.race to either("middle eastern", "indo-aryan", "white", "white", "white", "white", "white", "white", "white")>>
-
-
+<<case "Australian">>
+	<<set $activeSlave.race to either("white", "white", "black", "asian")>>
+<<case "a New Zealander">>
+	<<set $activeSlave.race to either("white", "white", "white", "white", "pacific islander")>>
+<<default>>
+	<<set $activeSlave.race to either("white")>>
 <</switch>>
 
 /% Begin mixed race rate adjustment. %/
@@ -121,16 +208,664 @@
 <</if>>
 /% End mixed race rate adjustment. %/
 
-<<set $seed to 4+$activeSlave.intelligence+$activeSlave.intelligenceImplant>>
-<<if "American" is $activeSlave.nationality>>
-	<<set $seed += 2>>
-<<elseif ["Canadian", "Israeli", "Japanese", "Korean", "Irish", "Icelandic", "Finnish", "Swiss", "Danish", "Norwegian", "Austrian", "Slovak", "Dutch", "Belgian", "Czech", "Portuguese", "Hungarian", "Portuguese", "Estonian", "Polish", "Lithuanian", "Romanian", "German", "Swedish", "French", "Italian", "Spanish", "British", "Australian", "a New Zealander"].contains($activeSlave.nationality)>>
-<<else>>
-	<<set $seed -= 2>>
-<</if>>
-<<if random(1,$seed) == 1>>
-	<<set $activeSlave.teeth to "crooked">>
+<</widget>>
+
+<<widget "NationalityToName">>
+
+<<switch $activeSlave.nationality>>
+<<case "American">>
+	<<if $activeSlave.race is "black">>
+		<<set $activeSlave.birthName to $africanAmericanSlaveNames.random()>>
+	<<elseif $activeSlave.race is "latina">>
+		<<set $activeSlave.birthName to $latinaSlaveNames.random()>>
+	<<elseif $activeSlave.race is "asian">>
+		<<set $activeSlave.birthName to $asianAmericanSlaveNames.random()>>
+	<<elseif $activeSlave.race is "middle eastern">>
+		<<set $activeSlave.birthName to $egyptianSlaveNames.random()>>
+	<<else>>
+		<<set $activeSlave.birthName to $whiteAmericanSlaveNames.random()>>
+	<</if>>
+<<case "Canadian">>
+	<<set $activeSlave.birthName to $canadianSlaveNames.random()>>
+<<case "Mexican">>
+	<<set $activeSlave.birthName to $mexicanSlaveNames.random()>>
+<<case "Dominican">>
+	<<set $activeSlave.birthName to $dominicanSlaveNames.random()>>
+<<case "Puerto Rican">>
+	<<set $activeSlave.birthName to $puertoRicanSlaveNames.random()>>
+<<case "Haitian">>
+	<<set $activeSlave.birthName to $haitianSlaveNames.random()>>
+<<case "Jamaican">>
+	<<set $activeSlave.birthName to $jamaicanSlaveNames.random()>>
+<<case "Cuban">>
+	<<set $activeSlave.birthName to $cubanSlaveNames.random()>>
+<<case "Guatemalan">>
+	<<set $activeSlave.birthName to $guatemalanSlaveNames.random()>>
+<<case "Chilean">>
+	<<set $activeSlave.birthName to $chileanSlaveNames.random()>>
+<<case "Peruvian">>
+	<<set $activeSlave.birthName to $peruvianSlaveNames.random()>>
+<<case "Bolivian">>
+	<<set $activeSlave.birthName to $bolivianSlaveNames.random()>>
+<<case "Venezuelan">>
+	<<set $activeSlave.birthName to $venezuelanSlaveNames.random()>>
+<<case "Belarusian">>
+	<<set $activeSlave.birthName to $belarusianSlaveNames.random()>>
+<<case "Russian">>
+	<<set $activeSlave.birthName to $russianSlaveNames.random()>>
+<<case "Ukrainian">>
+	<<set $activeSlave.birthName to $ukrainianSlaveNames.random()>>
+<<case "Italian">>
+	<<set $activeSlave.birthName to $italianSlaveNames.random()>>
+<<case "Spanish">>
+	<<set $activeSlave.birthName to $spanishSlaveNames.random()>>
+<<case "British">>
+	<<set $activeSlave.birthName to $britishSlaveNames.random()>>
+<<case "Scottish">>
+	<<set $activeSlave.birthName to $scottishSlaveNames.random()>>
+<<case "French">>
+	<<set $activeSlave.birthName to $frenchSlaveNames.random()>>
+<<case "German">>
+	<<set $activeSlave.birthName to $germanSlaveNames.random()>>
+<<case "Lithuanian">>
+	<<set $activeSlave.birthName to $lithuanianSlaveNames.random()>>
+<<case "Norwegian">>
+	<<set $activeSlave.birthName to $norwegianSlaveNames.random()>>
+<<case "Slovak">>
+	<<set $activeSlave.birthName to $slovakSlaveNames.random()>>
+<<case "Danish">>
+	<<set $activeSlave.birthName to $danishSlaveNames.random()>>
+<<case "Dutch">>
+	<<set $activeSlave.birthName to $dutchSlaveNames.random()>>
+<<case "Austrian">>
+	<<set $activeSlave.birthName to $austrianSlaveNames.random()>>
+<<case "Swiss">>
+	<<set $activeSlave.birthName to $swissSlaveNames.random()>>
+<<case "Serbian">>
+	<<set $activeSlave.birthName to $serbianSlaveNames.random()>>
+<<case "Belgian">>
+	<<set $activeSlave.birthName to $belgianSlaveNames.random()>>
+<<case "Czech">>
+	<<set $activeSlave.birthName to $czechSlaveNames.random()>>
+<<case "Portuguese">>
+	<<set $activeSlave.birthName to $portugueseSlaveNames.random()>>
+<<case "Swedish">>
+	<<set $activeSlave.birthName to $swedishSlaveNames.random()>>
+<<case "Romanian">>
+	<<set $activeSlave.birthName to $romanianSlaveNames.random()>>
+<<case "Hungarian">>
+	<<set $activeSlave.birthName to $hungarianSlaveNames.random()>>
+<<case "Estonian">>
+	<<set $activeSlave.birthName to $estonianSlaveNames.random()>>
+<<case "Irish">>
+	<<set $activeSlave.birthName to $irishSlaveNames.random()>>
+<<case "Icelandic">>
+	<<set $activeSlave.birthName to $icelandicSlaveNames.random()>>
+<<case "Finnish">>
+	<<set $activeSlave.birthName to $finnishSlaveNames.random()>>
+<<case "Greek">>
+	<<set $activeSlave.birthName to $greekSlaveNames.random()>>
+<<case "Polish">>
+	<<set $activeSlave.birthName to $polishSlaveNames.random()>>
+<<case "Brazilian">>
+	<<set $activeSlave.birthName to $brazilianSlaveNames.random()>>
+<<case "Egyptian">>
+	<<set $activeSlave.birthName to $egyptianSlaveNames.random()>>
+<<case "Colombian">>
+	<<set $activeSlave.birthName to $colombianSlaveNames.random()>>
+<<case "Argentinian">>
+	<<set $activeSlave.birthName to $argentinianSlaveNames.random()>>
+<<case "Turkish">>
+	<<set $activeSlave.birthName to $turkishSlaveNames.random()>>
+<<case "Iranian">>
+	<<set $activeSlave.birthName to $iranianSlaveNames.random()>>
+<<case "Armenian">>
+	<<set $activeSlave.birthName to $armenianSlaveNames.random()>>
+<<case "Israeli">>
+	<<set $activeSlave.birthName to $israeliSlaveNames.random()>>
+<<case "Saudi">>
+	<<set $activeSlave.birthName to $saudiSlaveNames.random()>>
+<<case "South African">>
+	<<if $activeSlave.race is "black">>
+		<<set $activeSlave.birthName to $blackSouthAfricanSlaveNames.random()>>
+	<<else>>
+		<<set $activeSlave.birthName to $whiteSouthAfricanSlaveNames.random()>>
+	<</if>>
+<<case "Nigerian">>
+	<<set $activeSlave.birthName to $nigerianSlaveNames.random()>>
+<<case "Congolese">>
+	<<set $activeSlave.birthName to $congoleseSlaveNames.random()>>
+<<case "Kenyan">>
+	<<set $activeSlave.birthName to $kenyanSlaveNames.random()>>
+<<case "Tanzanian">>
+	<<set $activeSlave.birthName to $tanzanianSlaveNames.random()>>
+<<case "Zimbabwean">>
+	<<if $activeSlave.race == "white">>
+		<<set $activeSlave.birthName to $britishSlaveNames.random()>>
+	<<else>>
+		<<set $activeSlave.birthName to $zimbabweanSlaveNames.random()>>
+	<</if>>
+<<case "Ghanan">>
+	<<set $activeSlave.birthName to $ghananSlaveNames.random()>>
+<<case "Ugandan">>
+	<<set $activeSlave.birthName to $ugandanSlaveNames.random()>>
+<<case "Ethiopian">>
+	<<set $activeSlave.birthName to $ethiopianSlaveNames.random()>>
+<<case "Moroccan">>
+	<<set $activeSlave.birthName to $moroccanSlaveNames.random()>>
+<<case "Chinese">>
+	<<set $activeSlave.birthName to $chineseSlaveNames.random()>>
+<<case "Korean">>
+	<<set $activeSlave.birthName to $koreanSlaveNames.random()>>
+<<case "Thai">>
+	<<set $activeSlave.birthName to $thaiSlaveNames.random()>>
+<<case "Vietnamese">>
+	<<set $activeSlave.birthName to $vietnameseSlaveNames.random()>>
+<<case "Japanese">>
+	<<set $activeSlave.birthName to $japaneseSlaveNames.random()>>
+<<case "Indonesian">>
+	<<set $activeSlave.birthName to $indonesianSlaveNames.random()>>
+<<case "Filipina">>
+	<<set $activeSlave.birthName to $filipinaSlaveNames.random()>>
+<<case "Bangladeshi">>
+	<<set $activeSlave.birthName to $bangladeshiSlaveNames.random()>>
+<<case "Malaysian">>
+	<<set $activeSlave.birthName to $malaysianSlaveNames.random()>>
+<<case "Uzbek">>
+	<<set $activeSlave.birthName to $uzbekSlaveNames.random()>>
+<<case "Afghan">>
+	<<set $activeSlave.birthName to $afghanSlaveNames.random()>>
+<<case "Nepalese">>
+	<<set $activeSlave.birthName to $nepaleseSlaveNames.random()>>
+<<case "Burmese">>
+	<<set $activeSlave.birthName to $burmeseSlaveNames.random()>>
+<<case "Iraqi">>
+	<<set $activeSlave.birthName to $iraqiSlaveNames.random()>>
+<<case "Yemeni">>
+	<<set $activeSlave.birthName to $yemeniSlaveNames.random()>>
+<<case "Sudanese">>
+	<<set $activeSlave.birthName to $sudaneseSlaveNames.random()>>
+<<case "Algerian">>
+	<<set $activeSlave.birthName to $algerianSlaveNames.random()>>
+<<case "Tunisian">>
+	<<set $activeSlave.birthName to $tunisianSlaveNames.random()>>
+<<case "Libyan">>
+	<<set $activeSlave.birthName to $libyanSlaveNames.random()>>
+<<case "Omani">>
+	<<set $activeSlave.birthName to $omaniSlaveNames.random()>>
+<<case "Malian">>
+	<<set $activeSlave.birthName to $malianSlaveNames.random()>>
+<<case "Jordanian">>
+	<<set $activeSlave.birthName to $jordanianSlaveNames.random()>>
+<<case "Lebanese">>
+	<<set $activeSlave.birthName to $lebaneseSlaveNames.random()>>
+<<case "Emirati">>
+	<<set $activeSlave.birthName to $emiratiSlaveNames.random()>>
+<<case "Kazakh">>
+	<<set $activeSlave.birthName to $kazakhSlaveNames.random()>>
+<<case "Pakistani">>
+	<<set $activeSlave.birthName to $pakistaniSlaveNames.random()>>
+<<case "Indian">>
+	<<set $activeSlave.birthName to $indianSlaveNames.random()>>
+<<case "Australian">>
+	<<set $activeSlave.birthName to $australianSlaveNames.random()>>
+<<case "a New Zealander">>
+	<<set $activeSlave.birthName to $newZealanderSlaveNames.random()>>
+<<default>>
+	<<set $activeSlave.birthName to $whiteAmericanSlaveNames.random()>>
+<</switch>>
+
+<</widget>>
+
+<<widget "NationalityToAccent">>
+
+<<set $seed to either(0,1,1,2,2,2,3,3,3,3)>>
+
+<<switch $activeSlave.nationality>>
+<<case "American">>
+	<<if $activeSlave.race is "black">>
+	<<if $language is "English">>
+		<<set $activeSlave.accent to 0>>
+	<<else>>
+		<<set $activeSlave.accent to either(0,1,1,2,2,2,3,3,3,3)>>
+	<</if>>
+	<<elseif $activeSlave.race is "latina">>
+	<<if $language is "English">>
+		<<set $activeSlave.accent to 0>>
+	<<elseif $language is "Spanish">>
+		<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+		<<set $activeSlave.accent to $seed>>
+	<</if>>
+	<<elseif $activeSlave.race is "asian">>
+	<<if $language is "English">>
+		<<set $activeSlave.accent to 0>>
+	<<elseif $language is "Chinese">>
+		<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+		<<set $activeSlave.accent to $seed>>
+	<</if>>
+	<<elseif $activeSlave.race is "middle eastern">>
+	<<if $language is "English">>
+		<<set $activeSlave.accent to 0>>
+	<<elseif $language is "Arabic">>
+		<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+		<<set $activeSlave.accent to $seed>>
+	<</if>>
+	<<else>>
+	<<if $language is "English">>
+		<<set $activeSlave.accent to 0>>
+	<<else>>
+		<<set $activeSlave.accent to $seed>>
+	<</if>>
+	<</if>>
+<<case "Canadian">>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Mexican">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Dominican">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Puerto Rican">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Haitian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Jamaican">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Cuban">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Guatemalan">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Chilean">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Peruvian">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Bolivian">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Venezuelan">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Russian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Ukrainian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Italian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Spanish">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "British">>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Scottish">>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 2>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "French">>
+	<<set $activeSlave.accent to $seed>>
+<<case "German">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Lithuanian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Belarusian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Norwegian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Slovak">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Danish">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Dutch">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Austrian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Swiss">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Serbian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Belgian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Czech">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Portuguese">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Swedish">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Romanian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Hungarian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Estonian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Irish">>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Icelandic">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Finnish">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Greek">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Polish">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Brazilian">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Egyptian">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Colombian">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Argentinian">>
+	<<if $language is "Spanish">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Turkish">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Iranian">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Armenian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Israeli">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Saudi">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "South African">>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Nigerian">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Congolese">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Kenyan">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Tanzanian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Zimbabwean">>
+	<<if $language is "English" && $activeSlave.race == "white">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Ghanan">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Ugandan">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Ethiopian">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Moroccan">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Chinese">>
+	<<if $language is "Chinese">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Korean">>
+	<<if $language is "Chinese">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Thai">>
+	<<if $language is "Chinese">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Vietnamese">>
+	<<if $language is "Chinese">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Japanese">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Indonesian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Filipina">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Bangladeshi">>
+	<<if $language is "Indian">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Malaysian">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Uzbek">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Afghan">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Nepalese">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Burmese">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Iraqi">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Yemeni">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Sudanese">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Algerian">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Tunisian">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Libyan">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Omani">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Malian">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Jordanian">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Lebanese">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Emirati">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Kazakh">>
+	<<set $activeSlave.accent to $seed>>
+<<case "Pakistani">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Indian">>
+	<<if $language is "Indian">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Australian">>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "a New Zealander">>
+	<<if $language is "English">>
+	<<set $activeSlave.accent to 1>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Roman Revivalist">>
+	<<if $language is "Latin">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Ancient Egyptian Revivalist">>
+	<<if $language is "Ancient Egyptian">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Edo Revivalist">>
+	<<if $language is "Japanese">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Arabian Revivalist">>
+	<<if $language is "Arabic">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<case "Ancient Chinese Revivalist">>
+	<<if $language is "Chinese">>
+	<<set $activeSlave.accent to 0>>
+	<<else>>
+	<<set $activeSlave.accent to $seed>>
+	<</if>>
+<<default>>
+	<<set $activeSlave.accent to $seed>>
+<</switch>>
+
+<<if $activeSlave.nationality is $language>>
+	<<set $activeSlave.accent to 0>>
 <</if>>
 
-<<display "Nationality to Name">>
-<<display "Nationality to Accent">>
+<</widget>>
\ No newline at end of file
diff --git a/src/uncategorized/nonRandomEvent.tw b/src/uncategorized/nonRandomEvent.tw
index f88fb4ab5608d98fd4dd136f5dcd4867e1207bad..6041e616bf137d22947bb9814a191d5634b87b13 100644
--- a/src/uncategorized/nonRandomEvent.tw
+++ b/src/uncategorized/nonRandomEvent.tw
@@ -1,12 +1,12 @@
 :: Nonrandom Event
- 
+
 <<set $showEncyclopedia to 0>>
 
 <<if ($plot == 1)>>
 
 <<set _effectiveWeek = $week-$nationHate>>
 <<set $toSearch to $arcologies[0].name>>
-<<if (_effectiveWeek == 4) && ($toSearch.indexOf("Arcology X-") != -1)>>
+<<if (_effectiveWeek == 4) && ($toSearch.indexOf("Arcology ") != -1)>>
 	<<set $Event = "arcology naming">>
 	<<goto "Generic Plot Events">>
 <<elseif (_effectiveWeek == 6)>>
@@ -18,7 +18,7 @@
 <<elseif (_effectiveWeek == 11)>>
 	<<set $Event = "assistant">>
 	<<goto "Assistant Events">>
-<<elseif (_effectiveWeek == 12) && $PC.vagina > 0 && $raped == -1 && $AProsperityCap <= 60 && $Bodyguard == 0>>
+<<elseif (_effectiveWeek == 12) && $PC.vagina > 0 && $raped == -1 && $AProsperityCap <= 60 && $Bodyguard == 0 && $PC.career != "arcology owner">>
 		<<goto "P raped">>
 <<elseif (_effectiveWeek == 14)>>
 	<<set $Event = "bad curatives">>
diff --git a/src/uncategorized/pCitizensAndCivilians.tw b/src/uncategorized/pCitizensAndCivilians.tw
index 9c6d4f89ab4df02f2bba79b8c04560070588ef7c..4b3649b90f090f5b4e320126f0c4e7e9a6e4c2af 100644
--- a/src/uncategorized/pCitizensAndCivilians.tw
+++ b/src/uncategorized/pCitizensAndCivilians.tw
@@ -1,5 +1,5 @@
 :: P citizens and civilians
- 
+
 <<nobr>>
 
 <<set $nextButton to " ">>
@@ -28,7 +28,7 @@
 	<<set $mercenaries to 5>>
 	<<set $mercenariesTitle to "Knights">>
 	<</replace>>
-<</click>>  <<if $PC.career is "mercenary">>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</click>>  <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <<if $arcologies[0].FSRomanRevivalist >= 10>>\
 <<click "They shall be my Evocati">>
 	<<replace "#result">>
@@ -39,7 +39,7 @@
 	<<set $mercenaries to 5>>
 	<<set $mercenariesTitle to "Evocati">>
 	<</replace>>
-<</click>>  <<if $PC.career is "mercenary">>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</click>>  <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>\
 <<if $arcologies[0].FSEgyptianRevivalist >= 10>>\
 <<click "They shall be my Medjay">>
@@ -51,7 +51,7 @@
 	<<set $mercenaries to 5>>
 	<<set $mercenariesTitle to "Medjay">>
 	<</replace>>
-<</click>>  <<if $PC.career is "mercenary">>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</click>>  <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>\
 <<if $arcologies[0].FSEdoRevivalist >= 10>>\
 <<click "Naturally, they shall be the Samurai">>
@@ -63,7 +63,7 @@
 	<<set $mercenaries to 5>>
 	<<set $mercenariesTitle to "Samurai">>
 	<</replace>>
-<</click>>  <<if $PC.career is "mercenary">>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</click>>  <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>\
 <<if $arcologies[0].FSArabianRevivalist >= 10>>\
 <<click "They shall be my Janissaries">>
@@ -75,7 +75,7 @@
 	<<set $mercenaries to 5>>
 	<<set $mercenariesTitle to "Janissaries">>
 	<</replace>>
-<</click>>  <<if $PC.career is "mercenary">>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</click>>  <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>\
 <<if $arcologies[0].FSChattelReligionist >= 10>>\
 <<click "They shall be the Knights Templar">>
@@ -87,7 +87,7 @@
 	<<set $mercenaries to 5>>
 	<<set $mercenariesTitle to "Knights Templar">>
 	<</replace>>
-<</click>>  <<if $PC.career is "mercenary">>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</click>>  <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>\
 <<if $arcologies[0].FSDegradationist >= 10>>\
 <<click "They shall be my Immortals">>
@@ -99,7 +99,7 @@
 	<<set $mercenaries to 5>>
 	<<set $mercenariesTitle to "Immortals">>
 	<</replace>>
-<</click>>  <<if $PC.career is "mercenary">>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</click>>  <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>\
 <<if $arcologies[0].FSAssetExpansionist >= 10>>\
 <</if>>\
@@ -123,7 +123,7 @@
 	<<set $mercenaries to 5>>
 	<<set $mercenariesTitle to "Asgardians">>
 	<</replace>>
-<</click>>  <<if $PC.career is "mercenary">>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</click>>  <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>\
 <<if $arcologies[0].FSSupremacist >= 10>>\
 <<click "They shall be the Knights of the Blood">>
@@ -135,7 +135,7 @@
 	<<set $mercenaries to 5>>
 	<<set $mercenariesTitle to "Knights of the Blood">>
 	<</replace>>
-<</click>>  <<if $PC.career is "mercenary">>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</click>>  <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>\
 <<if $arcologies[0].FSSubjugationist >= 10>>\
 <</if>>\
@@ -149,7 +149,7 @@
     <<set $mercenaries to 5>>
     <<set $mercenariesTitle to "Wardens">>
     <</replace>>
-<</click>>  <<if $PC.career is "mercenary">>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</click>>  <<if $PC.career == "mercenary" || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>\
 <<if $arcologies[0].FSBodyPurist >= 10>>\
 <</if>>\
@@ -165,6 +165,6 @@
 	<<set $mercenaries to 5>>
 	<<set $mercenariesTitle to "Rangers">>
 	<</replace>>
-<</click>>  <<if $PC.career is "mercenary">>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
+<</click>>  <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤20000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤20000 and incur significant upkeep costs//<</if>>
 <</if>>\
 </span>
diff --git a/src/uncategorized/pCoupAttempt.tw b/src/uncategorized/pCoupAttempt.tw
index ecf2756e30515d9d1d216b4228961b7a9b33c474..58ce71629b00af5ef8358aeb8f5926ec197db2fa 100644
--- a/src/uncategorized/pCoupAttempt.tw
+++ b/src/uncategorized/pCoupAttempt.tw
@@ -22,7 +22,7 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 
 <br><br>
 
-
+<<set _newSlaves = []>>
 <<if $arcologies[0].FSRomanRevivalistLaw + $mercenaries + $personalArms + $hackerSupport < 9>>
 	@@color:yellow;The Daughters of Liberty are defeated.@@ @@color:red;$arcologies[0].name is heavily damaged,@@ and the repairs will be very costly. The effect on your reputation is @@color:green;muted, but positive,@@ since though you won, your victory was hard-fought and set the arcology's prosperity back @@color:red;a long way.@@ <<if $traitor != 0>>$traitor.slaveName was killed in the fighting.<</if>>
 	<<set $daughtersVictory to 2>>
@@ -40,11 +40,7 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 	<<for $i to 0; $i < $j; $i++>>
 		<<display "Generate XY Slave">>
 		<<set $activeSlave.origin to "She is an enslaved Daughter of Liberty.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 	<<if $seeDicks > 50>>
 		<<set $j to 0>>
@@ -56,11 +52,7 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 	<<for $i to 0; $i < $j; $i++>>
 		<<display "Generate XX Slave">>
 		<<set $activeSlave.origin to "She is an enslaved Daughter of Liberty.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 	<<set $desc = "a Daughters of Liberty brassard">>
 	<<set $trinkets.push($desc)>>
@@ -77,11 +69,7 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 		<<set $activeSlave.assignment to "rest">>
 		<<set $activeSlave.health = random(-80,-60)>>
 		<<set $activeSlave.origin to "She was your slave, but you freed her, which she repaid by participating in a coup attempt against you. It failed, and she is again your chattel.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</if>>
 	<<for $i to 0; $i < 8; $i++>>
 		<<if random(0,99) < $seeDicks>>
@@ -90,11 +78,7 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 			<<display "Generate XX Slave">>
 		<</if>>
 		<<set $activeSlave.origin to "She is an enslaved Daughter of Liberty.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 	<<set $desc = "a damaged plate carrier bearing Daughters of Liberty insignia">>
 	<<set $trinkets.push($desc)>>
@@ -111,11 +95,7 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 		<<set $activeSlave.assignment to "rest">>
 		<<set $activeSlave.health = random(-80,-60)>>
 		<<set $activeSlave.origin to "She was your slave, but you freed her, which she repaid by participating in a coup attempt against you. It failed, and she is again your chattel.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</if>>
 	<<if $seeDicks > 50>>
 		<<set $j to 5>>
@@ -127,11 +107,7 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 	<<for $i to 0; $i < $j; $i++>>
 		<<display "Generate XY Slave">>
 		<<set $activeSlave.origin to "She is an enslaved Daughter of Liberty.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 	<<if $seeDicks > 50>>
 		<<set $j to 0>>
@@ -143,11 +119,7 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 	<<for $i to 0; $i < $j; $i++>>
 		<<display "Generate XX Slave">>
 		<<set $activeSlave.origin to "She is an enslaved Daughter of Liberty.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 	<<set $desc = "a Daughters of Liberty flag that once hung in their forward command post within your arcology">>
 	<<set $trinkets.push($desc)>>
@@ -158,32 +130,27 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 <span id="result">
 <<click "Sell your prisoners immediately">>
 	<<replace "#result">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $slaves[$i].origin is "She is an enslaved Daughter of Liberty.">>
-		<<slaveCost $slaves[$i]>>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<slaveCost _newSlaves[$i]>>
 		<<set $cash += $slaveCost>>
-		<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
-		<</if>>
 	<</for>>
 	Prisoners sold.
 	<</replace>>
 <</click>> <<if $traitor != 0>>//$traitor.slaveName will not be sold.//<</if>>
 <br><<click "Give your prisoners to those who suffered property damage">>
 	<<replace "#result">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $slaves[$i].origin is "She is an enslaved Daughter of Liberty.">>
-		<<slaveCost $slaves[$i]>>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<slaveCost _newSlaves[$i]>>
 		<<set $rep += Math.trunc($slaveCost/10)>>
-		<<set $dump to $slaves.pluck([$i], [$i])>>
-		<</if>>
 	<</for>>
 	Prisoners @@color:green;given away.@@
 	<</replace>>
 <</click>> <<if $traitor != 0>>//$traitor.slaveName will not be sold.//<</if>>
 <br><<click "Enslave all of your prisoners">>
 	<<replace "#result">>
-
-
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<AddSlave _newSlaves[$i]>>
+	<</for>>
 	You simply enslave all of the prisoners yourself. You will make them pay for attacking your arcology.
 	<</replace>>
 <</click>>
diff --git a/src/uncategorized/pDefenseFears.tw b/src/uncategorized/pDefenseFears.tw
index 875c1f6afa31a951a2775c6140e22f4df2f3792c..758b73a23e11133097b1330f067526969de6cf82 100644
--- a/src/uncategorized/pDefenseFears.tw
+++ b/src/uncategorized/pDefenseFears.tw
@@ -1,6 +1,6 @@
 :: P defense fears
 
- 
+
 <<nobr>>
 
 <<set $nextButton to " ">>
@@ -30,7 +30,7 @@ A deputation of slaveowning citizens comes to see you. Though they haven't exper
 	<<set $cash -= 10000>>
 	<<set $mercenaries to 3>>
 	<</replace>>
-<</click>> <<if $PC.career is "mercenary">>//This will cost ¤10000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤10000 and incur significant upkeep costs//<</if>>
+<</click>> <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤10000 and incur significant upkeep costs//<</if>>
 <<click "Refuse to quarter so many troops in your arcology">>
 	<<replace "#result">>
 	The consensus that the arcology is vulnerable triggers an @@color:red;exodus@@ of your most wealthy and valuable citizens, and your reputation @@color:red;suffers@@ grievously.
diff --git a/src/uncategorized/pFSAnnouncement.tw b/src/uncategorized/pFSAnnouncement.tw
index f3c6c82d79c4c5f9cd8fc752a96fa565cc9a9b26..16d5e38af72270a25e905172719579b3b68b4277 100644
--- a/src/uncategorized/pFSAnnouncement.tw
+++ b/src/uncategorized/pFSAnnouncement.tw
@@ -1,17 +1,12 @@
-:: P FS Announcement
- 
-<<nobr>>
+:: P FS Announcement [nobr]
 
-<<set $nextButton to "Continue">>
-<<set $nextLink to "Random Nonindividual Event">>
+<<set $nextButton to "Continue", $nextLink to "Random Nonindividual Event">>
 
 <<set $FSAnnounced to 1>>
 <<set $FSCredits += 1>>
 
-<</nobr>>\
-\
 The simple pleasure of power has to be experienced to be understood. You often take a moment to stand on a balcony overlooking an interior atrium, watching the living, breathing, flowing current of your demesne. <<if $assistantName is "your personal assistant">>Your personal assistant<<else>>$assistantName<</if>> knows to allow you these moments of peace.
-
+<br><br>
 You immediately pay attention, therefore, when she interrupts. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," she says, "this is an appropriate moment to bring a serious matter to your attention. I monitor conversations, social media, and general opinion within the arcology where I can. You are respected, and the inhabitants of this arcology are starting to look to you to give direction to society."
-
+<br><br>
 "This is not a situation that requires your attention," she continues. "You can continue to lead them by simple example. Or, you can take a more active role in defining the future. The rewards could be considerable. I will make the necessary additions to the arcology management interface to support societal modification."
diff --git a/src/uncategorized/pHostageAcquisition.tw b/src/uncategorized/pHostageAcquisition.tw
index ad3faf7e5ad8420a7e2318a15755d3e85fea33e1..214c41241b2692b2043d3f79517d03b2e09c46fc 100644
--- a/src/uncategorized/pHostageAcquisition.tw
+++ b/src/uncategorized/pHostageAcquisition.tw
@@ -1,5 +1,5 @@
 :: P hostage acquisition [nobr]
- 
+
 <<set $nextButton to "Continue">>
 <<set $nextLink to "AS Dump">>
 <<set $returnTo to "RIE Eligibility Check">>
@@ -7,9 +7,9 @@
 <<set $hostageRescued to 0>>
 <<set $activeSlave to $hostage>>
 <<set $activeSlave.ID += 55555>>
-<<set $slaves.push($activeSlave)>>
+<<AddSlave $activeSlave>>
 
-$activeSlave.slaveName, once 
+$activeSlave.slaveName, once
 <<switch $PC.career>>
 <<case "wealth">>
 	a popular party girl
@@ -31,6 +31,8 @@ $activeSlave.slaveName, once
 	a gang member
 <<case "servant">>
 	a maid
+<<default>>
+	a prominent Free Cities citizen
 <</switch>>
 of your acquaintance from before you were an arcology owner, and then a pawn in your rival arcology owner's campaign of psychological warfare against you, is now one of your slaves.
 Your hired mercenaries are en route now with your precious cargo.
@@ -70,7 +72,7 @@ Your hired mercenaries are en route now with your precious cargo.
 	<<set $activeSlave.weight = -100>>
 	<<set $activeSlave.customTat to "She has heavy scarring all over her body from being beaten under your rival's rule.">>
 	<<else>>
-	Your mercenaries radio you upon arrival. "VIP recovered but... She isn't all there." 
+	Your mercenaries radio you upon arrival. "VIP recovered but... She isn't all there."
 	Upon seeing her, it's obvious $activeSlave.slaveName has been completely broken. You beckon to the mercenary captain to give her to you. Holding her in your arms, it's clear that the poor girl is barely clinging to life.
 	The mercenary captain apologizes again, "My apologies, we found her like that. I'm sorry." He says, as he and his group exit your penthouse, leaving you with the comatose $activeSlave.slaveName. She looks the same as you remember, albeit emaciated, battered, broken and very pregnant. Although, if she pulls through this, she'll be devoted to you forever.
 	<<set $activeSlave.weight = -100>>
diff --git a/src/uncategorized/pInvasion.tw b/src/uncategorized/pInvasion.tw
index 722120938c45118e0bcc981ccd124df85252a9ff..86d1374b96e23d3a5ba2fb1ff2dafe241ab535e1 100644
--- a/src/uncategorized/pInvasion.tw
+++ b/src/uncategorized/pInvasion.tw
@@ -1,12 +1,12 @@
 :: P invasion [nobr]
- 
+
 <<set $nextButton to "Continue">>
 <<set $nextLink to "Random Nonindividual Event">>
 <<set $nextButton to "Continue">>
 
 <<set $invasionVictory to 1>>
 
-The day that wasn't supposed to come is here. The troubled little country next door is falling apart. Last month, its stock market collapsed. Last week, its government fell. Yesterday, there was open looting in its cities. And today, a faction of disaffected citizens that blames the Free Cities for siphoning off business and causing the collapse seized weapons from unguarded army depots<<if ($terrain is "marine") || ($terrain is "oceanic")>>, armed merchant ships and private vessels, and are approaching the Free City over the water<<else>>and advanced towards your home<</if>>. 
+The day that wasn't supposed to come is here. The troubled little country next door is falling apart. Last month, its stock market collapsed. Last week, its government fell. Yesterday, there was open looting in its cities. And today, a faction of disaffected citizens that blames the Free Cities for siphoning off business and causing the collapse seized weapons from unguarded army depots<<if ($terrain is "marine") || ($terrain is "oceanic")>>, armed merchant ships and private vessels, and are approaching the Free City over the water<<else>>and advanced towards your home<</if>>.
 
 <br><br>
 
@@ -79,6 +79,7 @@ The loose militia lately organized by the arcology owners has been called out to
 <<set $invasionVictory to 3>>
 <<set $rep += 2000>>
 
+<<set _newSlaves = []>>
 <<for $i to 0; $i < 3; $i++>>
 	<<if (random(0,99) < $seeDicks)>>
 		<<display "Generate XY Slave">>
@@ -86,11 +87,7 @@ The loose militia lately organized by the arcology owners has been called out to
 		<<display "Generate XX Slave">>
 	<</if>>
 	<<set $activeSlave.origin to "She is an enslaved prisoner of war.">>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<set _newSlaves.push($activeSlave)>>
 <</for>>
 
 <<set $helots += 5>>
@@ -101,30 +98,27 @@ The loose militia lately organized by the arcology owners has been called out to
 <span id="result">
 <<click "Sell your prisoners immediately">>
 	<<replace "#result">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $slaves[$i].origin is "She is an enslaved prisoner of war.">>
-		<<slaveCost $slaves[$i]>>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<slaveCost _newSlaves[$i]>>
 		<<set $cash += $slaveCost>>
-		<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
-		<</if>>
 	<</for>>
 	Prisoners sold.
 	<</replace>>
 <</click>>
 <br><<click "Give your prisoners to citizens who displayed bravery during the counterattack">>
 	<<replace "#result">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if $slaves[$i].origin is "She is an enslaved prisoner of war.">>
-		<<slaveCost $slaves[$i]>>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<slaveCost _newSlaves[$i]>>
 		<<set $rep += Math.trunc($slaveCost/10)>>
-		<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
-		<</if>>
 	<</for>>
 	Prisoners @@color:green;given away.@@
 	<</replace>>
 <</click>>
 <br><<click "Enslave all of your prisoners">>
 	<<replace "#result">>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<AddSlave _newSlaves[$i]>>
+	<</for>>
 	You simply enslave all of your prisoners yourself. These slaves will regret attacking your arcology.
 	<</replace>>
 <</click>>
diff --git a/src/uncategorized/pMercenaries.tw b/src/uncategorized/pMercenaries.tw
index 70922be21656ac64449d9d5357a6572a0626e21d..865117f5aa6fe790bbee10a072a3abc17ee3bf5d 100644
--- a/src/uncategorized/pMercenaries.tw
+++ b/src/uncategorized/pMercenaries.tw
@@ -1,5 +1,5 @@
 :: P mercenaries
- 
+
 <<nobr>>
 
 <<set $nextButton to " ">>
@@ -26,7 +26,7 @@ The budgetary difficulty many old world countries are in has resulted in unemplo
 	<<set $cash -= 5000>>
 	<<set $mercenaries to 1>>
 	<</replace>>
-<</click>> <<if $PC.career is "mercenary">>//This will cost ¤5000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤5000 and incur significant upkeep costs//<</if>>
+<</click>> <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤5000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤5000 and incur significant upkeep costs//<</if>>
 <<click "Install a full platoon">>
 	<<replace "#result">>
 	You hire a full platoon of reputable mercenaries and a veteran officer to command them, kit them in excellent gear, and quarter them in $arcologies[0].name. The sight of many armed men on patrol has @@color:red;deeply offended some of the more free-spirited citizens@@ of $arcologies[0].name.
@@ -35,7 +35,7 @@ The budgetary difficulty many old world countries are in has resulted in unemplo
 	<<set $cash -= 10000>>
 	<<set $mercenaries to 3>>
 	<</replace>>
-<</click>> <<if $PC.career is "mercenary">>//This will cost ¤10000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤10000 and incur significant upkeep costs//<</if>>
+<</click>> <<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>//This will cost ¤10000 and some upkeep, @@color:springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost ¤10000 and incur significant upkeep costs//<</if>>
 <<click "Do not quarter troops in your arcology">>
 	<<replace "#result">>
 	Having armed men on permanent watch is a step too far. $arcologies[0].name's security systems are formidable and will have to serve.
@@ -44,4 +44,3 @@ The budgetary difficulty many old world countries are in has resulted in unemplo
 	<</replace>>
 <</click>>
 </span>
-
diff --git a/src/uncategorized/pRaidResult.tw b/src/uncategorized/pRaidResult.tw
index 6453ba145062ea81d10abb36b010143aa59e81fb..dd2ee6a9cd6c61cae4e697295872c2314a8ca7c3 100644
--- a/src/uncategorized/pRaidResult.tw
+++ b/src/uncategorized/pRaidResult.tw
@@ -1,19 +1,15 @@
-:: P raid result
- 
-<<nobr>>
+:: P raid result [nobr]
 
-<<set $nextButton to "Continue">>
-<<set $nextLink to "Random Nonindividual Event">>
+<<set $nextButton to "Continue", $nextLink to "Random Nonindividual Event">>
 
 <<set $PRaid to 0>>
 
-<</nobr>>\
-\
 As your VTOL craft carries you and your mercenaries out towards an area ideal for a quick raid on the refugee bands, the sensors begin to reveal that there are actually many more bands than you originally suspected. The single aircraft does not carry enough mercenaries to target more than one group, or have the cargo capacity to haul more than one back to the arcology before they disperse. Your mercenary commander makes a selection based on your instructions.
-
+<br><br>
 Out ahead of the main body of refugees there is a small knot moving quickly and in good order, carrying weapons. Farther back, there is a larger group separated from the main body who could be easily isolated. And finally, it seems a group of sick and injured refugees have clustered around a tent where there must be medical assistance of some kind.
+<br><br>
 
-<<nobr>>
+<<set _newSlaves = []>>
 <<if $PRraidTarget == 1>>
 	Under orders to target resistance, your mercenaries target the leading group. They even manage to direct a little small arms fire at the VTOL craft as it circles them, dropping mercenaries and plying its nonlethal weapons, but they are of course rapidly defeated. Your share is two slaves in good physical condition, who prove to have been survivors of the defeated attack on the arcology. The mercenaries find after a data search that one of the prisoners who's part of their share was a minor leader in the anti-Free Cities movement. After a quick consultation over their radios, the mercenaries decide that a summary execution out here would be too quick for the wretch, and bring their prize back to the arcology for more thorough punishment. Between the successful raid and the capture of this public enemy, @@color:green;the citizens are quite impressed by you.@@
 	<<set $rep += 500>>
@@ -21,15 +17,11 @@ Out ahead of the main body of refugees there is a small knot moving quickly and
 		<<if ($seeDicks > 0)>>
 		<<display "Generate XY Slave">>
 		<<set $activeSlave.origin to "She is an enslaved refugee who participated in the defeated attack on your arcology.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 		<<else>>
 		<<display "Generate XX Slave">>
 		<<set $activeSlave.origin to "She is an enslaved refugee who participated in the defeated attack on your arcology.">>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 		<</if>>
 	<</for>>
 <<elseif $PRraidTarget is 2>>
@@ -37,12 +29,8 @@ Out ahead of the main body of refugees there is a small knot moving quickly and
 	<<set $rep += 200>>
 	<<for $i to 0; $i < 4; $i++>>
 		<<display "Generate New Slave">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-			<<AutoRulesActivate 1>>
-		<</if>>
 		<<set $activeSlave.origin to "She is an enslaved refugee.">>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 <<else>>
 	Under orders to target the largest possible group of people, your mercenaries head for the sick and injured. As the VTOL settles, it becomes apparent that most of the injuries are from combat, almost certainly in the defeat at $arcologies[0].name. The tent proves to contain a harassed nurse, almost without medical supplies and at the end of her rope. When she sees the mercenaries push through the tent flap, she heaves a sigh of mixed defeat and relief and wordlessly offers her wrists. The mercenaries give you a larger share of the other slaves in return for her: they tell you in confidence that she'll be a medical asset to them as well as the usual amusement. The successful raid @@color:green;is the talk of the Free City.@@
@@ -50,46 +38,38 @@ Out ahead of the main body of refugees there is a small knot moving quickly and
 	<<set $rep += 200>>
 	<<for $i to 0; $i < 5; $i++>>
 		<<display "Generate New Slave">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-			<<AutoRulesActivate 1>>
-		<</if>>
 		<<set $activeSlave.origin to "She is an enslaved refugee who was wounded in the defeated attack on your arcology.">>
 		<<set $activeSlave.health = random(-80,-40)>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<set _newSlaves.push($activeSlave)>>
 	<</for>>
 <</if>>
-<</nobr>>
+
 
 <span id="result">
 <<click "Sell your prisoners immediately">>
-	<<replace "#result">><<nobr>>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if ($slaves[$i].origin is "She is an enslaved refugee who participated in the defeated attack on your arcology.") || ($slaves[$i].origin is "She is an enslaved refugee.") || ($slaves[$i].origin is "She is an enslaved refugee who was wounded in the defeated attack on your arcology.")>>
-		<<slaveCost $slaves[$i]>>
+	<<replace "#result">>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<slaveCost _newSlaves[$i]>>
 		<<set $cash += $slaveCost>>
-		<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
-		<</if>>
 	<</for>>
 	Prisoners sold.
-	<</nobr>><</replace>>
+	<</replace>>
 <</click>>
-<<click "Give your prisoners to citizens injured in the recent invasion">>
-	<<replace "#result">><<nobr>>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if ($slaves[$i].origin is "She is an enslaved refugee who participated in the defeated attack on your arcology.") || ($slaves[$i].origin is "She is an enslaved refugee.") || ($slaves[$i].origin is "She is an enslaved refugee who was wounded in the defeated attack on your arcology.")>>
-		<<slaveCost $slaves[$i]>>
+<br><<click "Give your prisoners to citizens injured in the recent invasion">>
+	<<replace "#result">>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<slaveCost _newSlaves[$i]>>
 		<<set $rep += Math.trunc($slaveCost/10)>>
-		<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
-		<</if>>
 	<</for>>
 	Prisoners @@color:green;given away.@@
-	<</nobr>><</replace>>
+	<</replace>>
 <</click>>
-<<click "Enslave all of the refugees">>
+<br><<click "Enslave all of the refugees">>
 	<<replace "#result">>
-	<<nobr>>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<AddSlave _newSlaves[$i]>>
+	<</for>>
 	You simply enslave all of the refugees yourself. They would have been worse off had you not intervened.
-	<</nobr>><</replace>>
+	<</replace>>
 <</click>>
-</span>
+</span>
\ No newline at end of file
diff --git a/src/uncategorized/pRivalryActions.tw b/src/uncategorized/pRivalryActions.tw
index f5f38f732cd01008ca9f227097969a47c7b025a8..6db2cff2e45b6eb1fbf710000312f93aacdd1ae0 100644
--- a/src/uncategorized/pRivalryActions.tw
+++ b/src/uncategorized/pRivalryActions.tw
@@ -2036,7 +2036,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
 		<<set $hostage.devotion -= 5>>
 		<<set $hostage.fetishStrength += 5>>
 		<<set $hostage.vaginalCount += 1>>
-		gingerly looking at her owner as they approach. 
+		gingerly looking at her owner as they approach.
 	<<elseif $rivalryDuration <= 15>>
 		<<set $hostage.trust -= 5>>
 		<<set $hostage.devotion -= 5>>
@@ -3110,7 +3110,7 @@ You remind yourself that success in this conflict will not be defined by the tra
 <br>&nbsp;&nbsp;&nbsp;&nbsp;//This option is available due to your @@color:springgreen;societal connections,@@ and will economically devastate your rival//
 <</if>>
 <</if>>
-<<if $PC.career is "mercenary">>
+<<if ($PC.career == "mercenary") || ($PC.career == "arcology owner")>>
 <<if $mercenaries >= 3>>
 <br><<click "Your peers will tolerate an attack if it's covert">>
 	<<replace "#result">>
diff --git a/src/uncategorized/pRivalryHostage.tw b/src/uncategorized/pRivalryHostage.tw
index 02ce6476d0e28dab82b51301c5fede27d2f07aeb..4dfa42d1b3a7b0292856727ed3288d182488148a 100644
--- a/src/uncategorized/pRivalryHostage.tw
+++ b/src/uncategorized/pRivalryHostage.tw
@@ -1,5 +1,5 @@
 :: P rivalry hostage [nobr]
- 
+
 <<set $nextButton to "Continue">>
 <<set $nextLink to "Nonrandom Event">>
 
@@ -29,7 +29,7 @@
 <<set $activeSlave.relationTarget to 0>>
 <<set $activeSlave.canRecruit = 0>>
 <<if $arcologies[0].FSSupremacistRace != 0>><<set $activeSlave.race to $arcologies[0].FSSupremacistRace>><</if>>
-<<display "Nationality to Name">>
+<<NationalityToName>>
 <<set $activeSlave.slaveName to $activeSlave.birthName>>
 
 <<set $activeSlave.actualAge to Number($activeSlave.actualAge)>>
@@ -52,8 +52,8 @@ Only a few days into your inter-arcology war, you receive a video message from y
 	<<set $activeSlave.face to 3>>
 	<<set $activeSlave.intelligence to 2>>
 	<<set $activeSlave.intelligenceImplant to 0>>
-	<<set $activeSlave.oralSkill = 100>>	
-	<<set $activeSlave.entertainSkill = 100>>	
+	<<set $activeSlave.oralSkill = 100>>
+	<<set $activeSlave.entertainSkill = 100>>
 <<case "escort">>
 	time as a <<if $PC.title == 1>>man<<else>>woman<</if>> of sexual promiscuity. She was a pretty little slut who ran in the same sex circles. You were never particularly close,
 	<<set $activeSlave.career to "a prostitute">>
@@ -159,7 +159,7 @@ time as a gang leader. She was one of your best, yet you never got close enough,
 	<<else>>
 	<<set $activeSlave.actualAge to random(20,24)>>
 	<</if>>
-	<<set $activeSlave.energy to 100>>
+	<<set $activeSlave.energy = 100>>
 	<<set $activeSlave.face to 2>>
 	<<set $activeSlave.intelligence to 2>>
 	<<set $activeSlave.intelligenceImplant to 0>>
@@ -180,6 +180,18 @@ time as a gang leader. She was one of your best, yet you never got close enough,
 	<<set $activeSlave.intelligenceImplant to 0>>
 	<<set $activeSlave.oralSkill = 100>>
 	<<set $activeSlave.entertainSkill = 100>>
+<<case "arcology owner">>
+	time owning another arcology. She was a prominent citizen who supported your government. You were never particularly close,
+	<<set $activeSlave.career to "a leading arcology citizen">>
+	<<if $pedo_mode == 1>>
+	<<set $activeSlave.actualAge to random(16,18)>>
+	<<else>>
+	<<set $activeSlave.actualAge to random(36,39)>>
+	<</if>>
+	<<set $activeSlave.age to random(36,39)>>
+	<<set $activeSlave.face to 3, $activeSlave.faceImplant to 1>>
+	<<set $activeSlave.intelligence to 3, $activeSlave.intelligenceImplant to 1>>
+	<<set $activeSlave.whoreSkill = 100, $activeSlave.entertainSkill = 100>>
 <</switch>>
 <<set $activeSlave.visualAge = $activeSlave.actualAge>>
 <<set $activeSlave.physicalAge = $activeSlave.actualAge>>
@@ -252,7 +264,7 @@ but look what I have here! I just acquired her recently. Lovely, isn't she? I kn
 	<<set $activeSlave.preg to -3>>
 <<case "Eugenics">>
 	<<if $seeHyperPreg == 1>>
-	I'm going to have her knocked up; not with my seed, of course, but the seed of the lowest of the low. I'm also going to fill her with the most powerful experimental fertility drugs out there. She'll have so many children shoved into her poor womb she'll be bursting at the seams. But she'll enjoy that, won't you $activeSlave.slaveName?" The slave nods hesitantly, but with evident arousal.
+		I'm going to have her knocked up; not with my seed, of course, but the seed of the lowest of the low. I'm also going to fill her with the most powerful experimental fertility drugs out there. She'll have so many children shoved into her poor womb she'll be bursting at the seams. But she'll enjoy that, won't you $activeSlave.slaveName?" The slave nods hesitantly, but with evident arousal.
 	<<else>>
 		I'm going to have her knocked up; not with my seed, of course, but the seed of the lowest of the low. I'm also going to fill her with the most powerful fertility drugs I can get. Her poor little womb will be stretched to the limit with society's worst. But she'll enjoy that, won't you $activeSlave.slaveName?" The slave nods hesitantly, but with evident arousal.
 	<</if>>
diff --git a/src/uncategorized/pRivalryVictory.tw b/src/uncategorized/pRivalryVictory.tw
index 82865ab055a9f8ad00e263a243c7edb7e5da3fea..08d6804896a2e65ef9aabb1dce5ef6e7f3dbf2a8 100644
--- a/src/uncategorized/pRivalryVictory.tw
+++ b/src/uncategorized/pRivalryVictory.tw
@@ -114,7 +114,7 @@ For the first time, you receive a direct call from your rival. You pictured the
 	<<else>>
 		"All my remaining liquid assets have just been @@color:red;expended in an attack on the value of your holdings,@@ and my arcology has been heavily sabotaged. You'll get nothing from me." It's not entirely true, but the damage to your holdings does outweigh your gains by a significant margin.
 		<<set $cash -= random(10000,25000)>>
-	<</if>>	
+	<</if>>
 	<<set $cash -= 50000>>
 	<<set $rivalOwner to -1>>
 	<<set $seed to []>>
@@ -517,7 +517,7 @@ For the first time, you receive a direct call from your rival. You pictured the
 	<<set $activeSlave.health = 100>>
 	<<if $activeSlave.physicalAge > 35>><<set $activeSlave.ageImplant to 1>><<AgeImplantAdjustment>><</if>>
 	<<set $activeSlave.pubicHStyle to "waxed">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<display "New Slave Intro">>
 	<</replace>>
 <</click>>
diff --git a/src/uncategorized/pSlaveMedic.tw b/src/uncategorized/pSlaveMedic.tw
index 077f2dcc3b5beaeeef292c4190c8da8615761d4a..a141662bb829987e5bf9ae729a174b6e457ffcbe 100644
--- a/src/uncategorized/pSlaveMedic.tw
+++ b/src/uncategorized/pSlaveMedic.tw
@@ -112,11 +112,7 @@ When you enter the lounge of their barracks, you see $activeSlave.slaveName bend
 <</click>>
 <br><<click "Offer a very generous ¤25000 for her">>
 	<<replace "#result">>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= 25000>>
 		"Huh," says the mercenary. "She's popular, but for that we could probably buy two of her. Might be fun to train a couple of new nurses. Let me ask the boys and girls." He speaks into his helmet for a few minutes, and then turns back to you. "Sold. Enjoy, she's a good fuck."
 	<</replace>>
diff --git a/src/uncategorized/pSnatchAndGrabResult.tw b/src/uncategorized/pSnatchAndGrabResult.tw
index b3c9b359fef6915005bdcdb34f63c9fe861a7dfa..c875a388e789905d4674ed8fbc013cc61697fd65 100644
--- a/src/uncategorized/pSnatchAndGrabResult.tw
+++ b/src/uncategorized/pSnatchAndGrabResult.tw
@@ -1,5 +1,5 @@
 :: P snatch and grab result
- 
+
 <<nobr>>
 
 <<set $nextButton to "Continue">>
@@ -133,7 +133,7 @@ When you state that, apparently, you are, she climbs out of the case, prostrates
 
 <<set $saleDescription to 0>>\
 <<display "Long Slave Description">>\
-	<<set $slaves.push($activeSlave)>>\
+	<<AddSlave $activeSlave>>\
 	<<set $nextLink to "AS Dump">>\
 	<<set $returnTo to "Random Nonindividual Event">>\
 	<<display "New Slave Intro">>
diff --git a/src/uncategorized/personalAssistantAppearance.tw b/src/uncategorized/personalAssistantAppearance.tw
index e03869dd90d7806246fcdc872a70de88f2bafdd8..06beb39e131daef9bda82045fd78cc1272a5cac2 100644
--- a/src/uncategorized/personalAssistantAppearance.tw
+++ b/src/uncategorized/personalAssistantAppearance.tw
@@ -2,786 +2,950 @@
 
 <<set $seed to random(1,8)>>
 <<if $assistantAppearance is "monstergirl">>
-	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>monstergirl with <<if $arcologies[0].FSSupremacist != "unset">><<if $arcologies[0].FSSupremacistRace is "black">><<print either("black", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "white">><<print either("pale", "tanned", "fair")>><<elseif $arcologies[0].FSSupremacistRace is "latina">><<print either("olive", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "indo-aryan" or $arcologies[0].FSSupremacistRace is "malay" or $arcologies[0].FSSupremacistRace is "pacific islander" or $arcologies[0].FSSupremacistRace is "amerindian">><<print either("dark", "light")>><<elseif $arcologies[0].FSSupremacistRace is "asian">><<print either("pale", "dark", "light")>><<elseif $arcologies[0].FSSupremacistRace is "middle eastern" or $arcologies[0].FSSupremacistRace is "semitic" or $arcologies[0].FSSupremacistRace is "southern European">><<print either("pale", "dark", "light")>><</if>><<else>>pale<</if>> skin, perky breasts, green tentacles instead of hair, and two dicks. Her eyes are large, expressive, and surprisingly innocent.
-	<<if $FSAnnounced == 1>>
-	<<if $assistantFSAppearance is "paternalist">>
+She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>monstergirl with <<if $arcologies[0].FSSupremacist != "unset">><<if $arcologies[0].FSSupremacistRace is "black">><<print either("black", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "white">><<print either("pale", "tanned", "fair")>><<elseif $arcologies[0].FSSupremacistRace is "latina">><<print either("olive", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "indo-aryan" or $arcologies[0].FSSupremacistRace is "malay" or $arcologies[0].FSSupremacistRace is "pacific islander" or $arcologies[0].FSSupremacistRace is "amerindian">><<print either("dark", "light")>><<elseif $arcologies[0].FSSupremacistRace is "asian">><<print either("pale", "dark", "light")>><<elseif $arcologies[0].FSSupremacistRace is "middle eastern" or $arcologies[0].FSSupremacistRace is "semitic" or $arcologies[0].FSSupremacistRace is "southern European">><<print either("pale", "dark", "light")>><</if>><<else>>pale<</if>> skin, perky breasts, green tentacles instead of hair, and two dicks. Her eyes are large, expressive, and surprisingly innocent.
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
 		She's wearing a surprisingly conservative outfit: khakis, a sweater, and eyeglasses.
-	<<elseif $assistantFSAppearance is "degradationist">>
+	<<case "degradationist">>
 		She's sharpened her appearance to be quite frightening: she has impressive fangs, and a snakelike tongue flicks out between them.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
+	<<case "roman revivalist">>
 		She's wearing a conservative stola, which combined with her monstrous appearance makes her look like a Greek demigoddess.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
+	<<case "egyptian revivalist">>
 		She's wearing golden jewelry and a Pharaoh's beard, which combined with her animal characteristics makes her look like an Egyptian deity.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
+	<<case "edo revivalist">>
 		She's given her appearance a Japanese style, making her look like a demon.
-	<<elseif $assistantFSAppearance is "arabian revivalist">>
+	<<case "arabian revivalist">>
 		She's given her appearance a mystical Arabian style, making her look like a djinn.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
+	<<case "chinese revivalist">>
 		She's given her appearance a Chinese style, making her look like a demon.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
+	<<case "chattel religionist">>
 		She's wearing the garb of a priestess of the new faith, which clashes amusingly with her demonic appearance.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
+	<<case "repopulation focus">>
 		She's very pregnant, her belly is covered in large bulges revealing the eggs growing within her.
-	<<elseif $assistantFSAppearance is "eugenics">>
+	<<case "eugenics">>
 		She's wearing a complex chastity device, keeping her dicks and cunt unusable.
-	<<elseif $assistantFSAppearance is "physical idealist">>
+	<<case "physical idealist">>
 		She's quite muscular, and behaves with total confidence.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
+	<<case "gender radicalist">>
 		She's accentuated her androgyny, with her tits and her cocks her only obvious gendered traits.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
+	<<case "gender fundamentalist">>
 		She's made herself as cute as a demonic little creature with cocks and tentacle hair can possibly be.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
+	<<case "asset expansionist">>
 		She's increased the size of her assets recently: her cocks are so large that she can give them a blowjob, and her boobs are so big she can give herself a titjob at the same time.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
+	<<case "transformation fetishist">>
 		She's made herself even stranger recently: her nipples look suspiciously like dicks, and she has horns growing out of her feet to form high heels.
-	<<elseif $assistantFSAppearance is "pastoralist">>
+	<<case "pastoralist">>
 		She's lactating, though her product is a suspiciously semen-like substance she usually drinks herself.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
+	<<case "maturity preferentialist">>
 		She's quite mature: she wears a haughty expression, and her cheekbones are like knifeblades.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
+	<<case "youth preferentialist">>
 		She's surprisingly young: her tentacle hair is quite short, and her horns are still little nubs.
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
+	<<case "slimness enthusiast">>
 		She's recently altered her appearance to be slimmer and more athletic.
-	<<elseif $assistantFSAppearance is "body purist">>
+	<<case "body purist">>
 		She's recently improved her appearance to complete flawlessness, with milky white skin and buffed horns.
+	<</switch>>
 	<</if>>
-	<</if>>
-	<<if ($cockFeeder == 1) && ($seed == 1)>>
+<<if ($cockFeeder == 1) && ($seed == 1)>>
 	A recognizable little representation of one of your slaves is down on its knees in front of her, busily sucking off one of her cocks. The slave must be down in the kitchen, getting a meal out of the phallic food dispensers. As you watch, the monstergirl orgasms copiously, her tentacle hair caressing her own breasts.
-	<<elseif ($suppository == 1) && ($seed is 2)>>
+<<elseif ($suppository == 1) && ($seed is 2)>>
 	A recognizable little representation of one of your slaves is down on its knees in front of her, taking both of her cocks up its ass. The slave must be receiving her drugs from one of the dildo dispensers. As you watch, the monstergirl looks up at you, winks, and then maliciously increases her pace, making the depiction of the slave wince.
-	<<elseif ($masturbationAllowed == 1) && ($seed is 3)>>
+<<elseif ($masturbationAllowed == 1) && ($seed is 3)>>
 	She's manually stimulating a recognizable little representation of one of your slaves. The slave must be using one of the penthouse's many vibrators. The monstergirl is looking after herself, too, tweaking her nipples with her own tentacle hair.
-	<<elseif ($seed is 4)>>
+<<elseif ($seed is 4)>>
 	A recognizable little representation of one of your slaves is lying with its head in her lap. The monstergirl is wearing a little stethoscope and is listening to the slave breathe; the slave must be getting a checkup. The monstergirl is restraining herself for once, and her hair is even patting the slave's head reassuringly.
-	<<elseif ($seed is 5) && ($invasionVictory > 0)>>
+<<elseif ($seed is 5) && ($invasionVictory > 0)>>
 	The monstergirl is riding around on a little representation of one of your security drones. She's very obviously enjoying the drone's vibrations as it hovers. When she sees you looking at her, she giggles and says, "What? I like him! He did really well during the invasion. And he's cute!"
-	<<elseif ($seed is 6) && ($studio == 1)>>
+<<elseif ($seed is 6) && ($studio == 1)>>
 	The monstergirl has both her dicks inside a recognizable little representation of one of your slaves, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and $assistantName is clearly turning the feed of it into porn.
-	<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
-		She's accompanied by your market assistant's very human avatar.
-		<<if $marketAssistantRelationship is "cute">>
-			They're chatting companionably, with the girl showing no sign of noticing that she's talking to a naked monstergirl with two erect cocks.
-		<<elseif $marketAssistantRelationship is "nonconsensual">>
-			$assistantName is holding the poor girl down so she can take her from behind. As you watch, $assistantName extracts her cock from the market assistant's avatar's cunt and stuffs it up her ass, alongside her other dick, eliciting some terrified begging and then tired sobbing.
-		<<elseif $marketAssistantRelationship is "incestuous">>
-			They're fucking openly, with the market assistant's avatar bouncing greedily on top of her monstrous sibling. She's clearly enjoying the feeling of her sister's cocks buried in her holes.
-		<<else>>
-			They're cuddled up close. As they kiss, $assistantName's tentacle hair holds her lover's head gently. The market assistant's avatar is using both hands to give $assistantName's cocks some manual release.
-		<</if>>
+<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
+	She's accompanied by your market assistant's very human avatar.
+	<<if $marketAssistantRelationship is "cute">>
+		They're chatting companionably, with the girl showing no sign of noticing that she's talking to a naked monstergirl with two erect cocks.
+	<<elseif $marketAssistantRelationship is "nonconsensual">>
+		$assistantName is holding the poor girl down so she can take her from behind. As you watch, $assistantName extracts her cock from the market assistant's avatar's cunt and stuffs it up her ass, alongside her other dick, eliciting some terrified begging and then tired sobbing.
+	<<elseif $marketAssistantRelationship is "incestuous">>
+		They're fucking openly, with the market assistant's avatar bouncing greedily on top of her monstrous sibling. She's clearly enjoying the feeling of her sister's cocks buried in her holes.
 	<<else>>
-	She's sitting crosslegged, looking up at you and waiting for instructions. In the meantime, she's masturbating gently, a dickhead in each hand, while her hair writhes against itself.
+		They're cuddled up close. As they kiss, $assistantName's tentacle hair holds her lover's head gently. The market assistant's avatar is using both hands to give $assistantName's cocks some manual release.
 	<</if>>
+<<else>>
+	She's sitting crosslegged, looking up at you and waiting for instructions. In the meantime, she's masturbating gently, a dickhead in each hand, while her hair writhes against itself.
+<</if>>
+
 <<elseif $assistantAppearance is "shemale">>
-	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>bimbo shemale with blonde hair, <<if $arcologies[0].FSSupremacist != "unset">><<if $arcologies[0].FSSupremacistRace is "black">><<print either("black", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "white">><<print either("tanned", "fair")>><<elseif $arcologies[0].FSSupremacistRace is "latina">><<print either("olive", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "indo-aryan" or $arcologies[0].FSSupremacistRace is "malay" or $arcologies[0].FSSupremacistRace is "pacific islander" or $arcologies[0].FSSupremacistRace is "amerindian">><<print either("dark", "tanned")>><<elseif $arcologies[0].FSSupremacistRace is "asian">><<print either("dark", "tanned")>><<elseif $arcologies[0].FSSupremacistRace is "middle eastern" or $arcologies[0].FSSupremacistRace is "semitic" or $arcologies[0].FSSupremacistRace is "southern European">><<print either("dark", "tanned")>><</if>><<else>>tanned<</if>> skin, huge lips, and ridiculous tits. Her cock hangs past her knees when limp.
-	<<if $FSAnnounced == 1>>
-	<<if $assistantFSAppearance is "paternalist">>
+She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>bimbo shemale with blonde hair, <<if $arcologies[0].FSSupremacist != "unset">><<if $arcologies[0].FSSupremacistRace is "black">><<print either("black", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "white">><<print either("tanned", "fair")>><<elseif $arcologies[0].FSSupremacistRace is "latina">><<print either("olive", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "indo-aryan" or $arcologies[0].FSSupremacistRace is "malay" or $arcologies[0].FSSupremacistRace is "pacific islander" or $arcologies[0].FSSupremacistRace is "amerindian">><<print either("dark", "tanned")>><<elseif $arcologies[0].FSSupremacistRace is "asian">><<print either("dark", "tanned")>><<elseif $arcologies[0].FSSupremacistRace is "middle eastern" or $arcologies[0].FSSupremacistRace is "semitic" or $arcologies[0].FSSupremacistRace is "southern European">><<print either("dark", "tanned")>><</if>><<else>>tanned<</if>> skin, huge lips, and ridiculous tits. Her cock hangs past her knees when limp.
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
 		She's made herself up to look a bit more classy recently: she has elegant fake nails, and has her hair piled up on her head.
-	<<elseif $assistantFSAppearance is "degradationist">>
+	<<case "degradationist">>
 		She's made herself up to look almost comically evil: she's wearing black lipstick, black eyeliner, and a black barbed cockring.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
+	<<case "roman revivalist">>
 		She's taken to reclining on a traditional Roman couch and drinking wine out of a shallow dish.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
+	<<case "egyptian revivalist">>
 		She's wearing an Egyptian melting perfume cake on her head.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
+	<<case "edo revivalist">>
 		She's wearing a brief Japanese bathhouse robe.
-	<<elseif $assistantFSAppearance is "arabian revivalist">>
+	<<case "arabian revivalist">>
 		She's dressed herself like an oil millionare, with aviator sunglasses and a headscarf.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
+	<<case "chinese revivalist">>
 		She's added various tattoos of rude Chinese characters to her body recently.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
+	<<case "chattel religionist">>
 		She's wearing the garb of a priestess of the new faith, which frames her cock prominently.
-	<<elseif $assistantFSAppearance is "physical idealist">>
+	<<case "physical idealist">>
 		She's extremely muscular: she shines with body oil, and her abs have abs.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
+	<<case "repopulation focus">>
 		She is incredibly pregnant, her belly preventing her from playing with herself effectively.
-	<<elseif $assistantFSAppearance is "eugenics">>
+	<<case "eugenics">>
 		Her sizable dick is restrained in a complicated chastity device.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
+	<<case "gender radicalist">>
 		She's rendered her cock in even more loving detail recently, adding a couple of veins and a bead of precum.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
+	<<case "gender fundamentalist">>
 		She's taken to concealing her dick recently, and cheekily turns away from you to hide it as much as possible.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
+	<<case "asset expansionist">>
 		She's increased the size of her assets recently: she's increased the girth of her dick until it's as thick as one of her arms, and her boobs are the size of beach balls.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
+	<<case "transformation fetishist">>
 		Her tits, ass and lips are carefully rendered to make them look fake.
-	<<elseif $assistantFSAppearance is "pastoralist">>
+	<<case "pastoralist">>
 		She's lactating, and her orgasms produce comically powerful jets of cum.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
+	<<case "maturity preferentialist">>
 		She's quite mature, with a lean face that accentuates her cheekbones.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
+	<<case "youth preferentialist">>
 		She's surprisingly young, and looks as innocent as a computer generated image of a girl with a pornstar dick possibly can.
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
+	<<case "slimness enthusiast">>
 		She's recently altered her appearance to be slimmer and more athletic.
-	<<elseif $assistantFSAppearance is "body purist">>
+	<<case "body purist">>
 		She's recently improved her appearance to look more natural, with prettier boobs and softer hips.
+	<</switch>>
 	<</if>>
-	<</if>>
-	<<if ($cockFeeder == 1) && ($seed == 1)>>
+<<if ($cockFeeder == 1) && ($seed == 1)>>
 	A recognizable little representation of one of your slaves is down on its knees in front of her, gagging on her enormous dick. The slave must be down in the kitchen, getting a meal out of the phallic food dispensers. As you watch, the shemale orgasms; she notices you watching her, and blows you a wet kiss.
-	<<elseif ($suppository == 1) && ($seed is 2)>>
+<<elseif ($suppository == 1) && ($seed is 2)>>
 	A recognizable little representation of one of your slaves is down on its knees in front of her, moaning as it takes her massive prick. The slave must be receiving her drugs from one of the dildo dispensers. As you watch, the shemale looks up at you, winks, and starts pulling out after each thrust, her cock making a popping noise each time it leaves the slave's butthole.
-	<<elseif ($masturbationAllowed == 1) && ($seed is 3)>>
+<<elseif ($masturbationAllowed == 1) && ($seed is 3)>>
 	She's giving a blowjob to a recognizable little representation of one of your slaves. The slave must be using one of the penthouse's many vibrators. The shemale is looking after herself, too, jerking herself off with one hand and playing with her asshole with the other.
-	<<elseif ($seed is 4)>>
+<<elseif ($seed is 4)>>
 	A recognizable little representation of one of your slaves is lying with its head in her lap. The shemale is wearing a little stethoscope and is listening to the slave breathe; the slave must be getting a checkup. The shemale is restraining herself for once, patting the slave's head and cooing reassuringly.
-	<<elseif ($seed is 5) && ($invasionVictory > 0)>>
+<<elseif ($seed is 5) && ($invasionVictory > 0)>>
 	She's masturbating as she takes it up the ass from a representation of one of your security drones, which appears to have a little dildo mounted in place of one of its gun assemblies. When she sees you looking at her, she giggles and says, "What? I like him! He did really well during the invasion."
-	<<elseif ($seed is 6) && ($studio == 1)>>
+<<elseif ($seed is 6) && ($studio == 1)>>
 	The shemale is plowing a recognizable little representation of one of your slaves up the butt, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and $assistantName is clearly turning the feed of it into porn.
-	<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
-		She's accompanied by your market assistant's own shemale avatar.
-		<<if $marketAssistantRelationship is "cute">>
-			They're jerking each other off companionably, since that's as close to chaste friendship as the lewd little shemales get. They chat girlishly, as though they weren't engaged in open mutual masturbation.
-		<<elseif $marketAssistantRelationship is "nonconsensual">>
-			$assistantName is bouncing the poor bitch up and down on her dick, the market assistant's pathetic, limp dick flopping around as $assistantName assrapes her. As you watch, $assistantName reaches around to give the market assistant's soft balls a possessive squeeze.
-		<<elseif $marketAssistantRelationship is "incestuous">>
-			They're locked in a tight, perfectly symmetrical incestuous 69, each of their monstrous cocks deepthroated a long way inside her sister's mouth. They spasm with simultaneous orgasm, gulping each other's cum greedily.
-		<<else>>
-			They're doing it in the missionary position, kissing deeply. The one who's taking it has her huge dick between them, its head crushed between their four fake breasts. As you watch, she orgasms, splashing both of their faces with cum.
-		<</if>>
+<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
+	She's accompanied by your market assistant's own shemale avatar.
+	<<if $marketAssistantRelationship is "cute">>
+		They're jerking each other off companionably, since that's as close to chaste friendship as the lewd little shemales get. They chat girlishly, as though they weren't engaged in open mutual masturbation.
+	<<elseif $marketAssistantRelationship is "nonconsensual">>
+		$assistantName is bouncing the poor bitch up and down on her dick, the market assistant's pathetic, limp dick flopping around as $assistantName assrapes her. As you watch, $assistantName reaches around to give the market assistant's soft balls a possessive squeeze.
+	<<elseif $marketAssistantRelationship is "incestuous">>
+		They're locked in a tight, perfectly symmetrical incestuous 69, each of their monstrous cocks deepthroated a long way inside her sister's mouth. They spasm with simultaneous orgasm, gulping each other's cum greedily.
 	<<else>>
-	She's sitting crosslegged, bending down to suck herself off and looking up at you at the same time. When she sees your attention she lets her dick pop free of her mouth and waits for a moment to see if you have instructions for her, and then goes back to autofellatio.
+		They're doing it in the missionary position, kissing deeply. The one who's taking it has her huge dick between them, its head crushed between their four fake breasts. As you watch, she orgasms, splashing both of their faces with cum.
 	<</if>>
+<<else>>
+	She's sitting crosslegged, bending down to suck herself off and looking up at you at the same time. When she sees your attention she lets her dick pop free of her mouth and waits for a moment to see if you have instructions for her, and then goes back to autofellatio.
+<</if>>
+
 <<elseif $assistantAppearance is "amazon">>
 	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>amazon
-	<<if $FSAnnounced == 1>>
-	<<if $assistantFSAppearance is "paternalist">>
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
 		with flaming red hair, tribal tattoos, shredded abs, and bone jewelry. She has bigger natural tits than anyone that ripped could possibly maintain.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
+	<<case "repopulation focus">>
 		with an enormous belly.  Its oversized occupant kicks and squirms ferociously, eager to be born.
-	<<elseif $assistantFSAppearance is "eugenics">>
+	<<case "eugenics">>
 		with a complex bone chastity belt blocking her vagina.
-	<<elseif $assistantFSAppearance is "degradationist">>
+	<<case "degradationist">>
 		with ochre-dyed dreadlocks, war tattoos, shredded abs, and jewelry made from human bones. She has bigger natural tits than anyone that ripped could possibly maintain.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
+	<<case "roman revivalist">>
 		wearing the armor of a Roman auxilia, complete with lorica hamata and oval shield painted with your arcology's symbols.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
+	<<case "egyptian revivalist">>
 		wearing a simple white linen dress, kohl eyeshadow, and sandals, making her look like a barbarian immigrant to the land of the Nile.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
+	<<case "edo revivalist">>
 		wearing a Japanese warrior's robe with a pair of swords tucked into its sash.
-	<<elseif $assistantFSAppearance is "arabian revivalist">>
+	<<case "arabian revivalist">>
 		with a bare chest, loose pantaloons, and a broad silk sash wound around her waist with a scimitar thrust into it.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
+	<<case "chinese revivalist">>
 		wearing loose silk robes belted with rope and carrying a simple warrior monk's staff.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
+	<<case "chattel religionist">>
 		wearing a crusader's mail. Her long blonde hair cascades down the back of her surcoat in golden glory.
-	<<elseif $assistantFSAppearance is "physical idealist">>
+	<<case "physical idealist">>
 		whose muscles are lovingly rendered in lifelike detail.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
+	<<case "gender radicalist">>
 		who is so heavily muscled that she's become quite androgynous lately.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
+	<<case "gender fundamentalist">>
 		whose heavy musculature does not detract from her feminine beauty.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
+	<<case "asset expansionist">>
 		who's almost musclebound.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
+	<<case "transformation fetishist">>
 		who's almost musclebound.
-	<<elseif $assistantFSAppearance is "pastoralist">>
+	<<case "pastoralist">>
 		wearing jean overalls, a plaid shirt whose sleeves are strained by her biceps, and rubber boots, and has a cowboy hat pushed back on her pretty head.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
+	<<case "maturity preferentialist">>
 		with streaks of grey running through her flaming red hair. She has bigger natural tits than anyone that ripped could possibly maintain.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
+	<<case "youth preferentialist">>
 		with whose innocent appearance belies her heavy muscles. She has bigger natural tits than anyone that ripped could possibly maintain.
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
+	<<case "slimness enthusiast">>
 		with flaming red hair, tribal tattoos, shredded abs, and bone jewelry. Her perky boobs are usually concealed by her ornaments.
-	<<elseif $assistantFSAppearance is "body purist">>
+	<<case "body purist">>
 		with a realistic tribeswoman's garb of woven jewelry and shell beads. She has bigger natural tits than anyone that ripped could possibly maintain.
-	<<else>>
+	<<default>>
 		with flaming red hair, tribal tattoos, shredded abs, and bone jewelry. She has bigger natural tits than anyone that ripped could possibly maintain.
-	<</if>>
+	<</switch>>
 	<<else>>
 	with flaming red hair, tribal tattoos, shredded abs, and bone jewelry. She has bigger natural tits than anyone that ripped could possibly maintain.
 	<</if>>
-	<<if ($cockFeeder == 1) && ($seed == 1)>>
+<<if ($cockFeeder == 1) && ($seed == 1)>>
 	A recognizable little representation of one of your slaves is down on its knees in front of her, eating her out. The slave must be down in the kitchen, getting a meal out of the food dispensers. As you watch, the amazon orgasms, producing a little female barbarian shout.
-	<<elseif ($suppository == 1) && ($seed is 2)>>
+<<elseif ($suppository == 1) && ($seed is 2)>>
 	A recognizable little representation of one of your slaves is down on its knees in front of her, letting the amazon use two fingers on her butthole. The slave must be receiving her drugs from one of the dildo dispensers. As you watch, the amazon looks up at you, winks, and shoves her entire hand up the struggling slave's ass.
-	<<elseif ($masturbationAllowed == 1) && ($seed is 3)>>
+<<elseif ($masturbationAllowed == 1) && ($seed is 3)>>
 	She's holding a recognizable little representation of one of your slaves in her lap, giving her a powerful handjob. The slave must be using one of the penthouse's many vibrators. The slave gets off and collapses, exhausted.
-	<<elseif ($seed is 4)>>
+<<elseif ($seed is 4)>>
 	A recognizable little representation of one of your slaves is lying with its head in her lap. The amazon is poking and prodding her; the slave must be getting a checkup. Once finished, the amazon gives her a powerful massage, making the slave groan with relief.
-	<<elseif ($seed is 5) && ($invasionVictory > 0)>>
+<<elseif ($seed is 5) && ($invasionVictory > 0)>>
 	She's leaning against a representation of one of your security drones. Every so often, she wrestles with it affectionately. When she sees you watching her, she leaps atop the drone, puts her fists on her hips, and says, "What? I like him! He did really well during the invasion. And he's cute!"
-	<<elseif ($seed is 6) && ($studio == 1)>>
+<<elseif ($seed is 6) && ($studio == 1)>>
 	The amazon has her hand inside a recognizable little representation of one of your slaves, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and $assistantName is clearly turning the feed of it into porn.
-	<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
-		She's accompanied by your market assistant's tribeswoman avatar.
-		<<if $marketAssistantRelationship is "cute">>
-			They're chatting companionably as $assistantName stretches and the market assistant's avatar does a complex calculation on her fingers. $assistantName is telling a long story, and the market assistant is listening kindly.
-		<<elseif $marketAssistantRelationship is "nonconsensual">>
-			$assistantName is taking her tribal slave from behind. It's technically tribbing, since all she's doing is grinding her cunt against the market assistants', but the poor little tribeswoman is being fucked hard regardless.
-		<<elseif $marketAssistantRelationship is "incestuous">>
-			$assistantName is getting some manual stimulation from her sister, who is watching her muscular sibling's aroused thrashing with amusement as she slides her whole hand in and out of $assistantName's cunt.
-		<<else>>
-			They're doing it in the missionary position, kissing deeply. They're technically tribbing, but $assistantName's muscular body and the tribeswoman's wifely form make it look very pure and traditional.
-		<</if>>
+<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
+	She's accompanied by your market assistant's tribeswoman avatar.
+	<<if $marketAssistantRelationship is "cute">>
+		They're chatting companionably as $assistantName stretches and the market assistant's avatar does a complex calculation on her fingers. $assistantName is telling a long story, and the market assistant is listening kindly.
+	<<elseif $marketAssistantRelationship is "nonconsensual">>
+		$assistantName is taking her tribal slave from behind. It's technically tribbing, since all she's doing is grinding her cunt against the market assistants', but the poor little tribeswoman is being fucked hard regardless.
+	<<elseif $marketAssistantRelationship is "incestuous">>
+		$assistantName is getting some manual stimulation from her sister, who is watching her muscular sibling's aroused thrashing with amusement as she slides her whole hand in and out of $assistantName's cunt.
 	<<else>>
-	She's doing pushups, glancing at you at the top of each rep to see if you need her. When she sees your attention, she pushes hard enough to bounce to a standing position. Seeing that you're just looking, she winks, flexes, and drops back down to do crunches.
+		They're doing it in the missionary position, kissing deeply. They're technically tribbing, but $assistantName's muscular body and the tribeswoman's wifely form make it look very pure and traditional.
 	<</if>>
+<<else>>
+	She's doing pushups, glancing at you at the top of each rep to see if you need her. When she sees your attention, she pushes hard enough to bounce to a standing position. Seeing that you're just looking, she winks, flexes, and drops back down to do crunches.
+<</if>>
+
 <<elseif $assistantAppearance is "businesswoman">>
 	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>businesswoman
-	<<if $FSAnnounced == 1>>
-	<<if $assistantFSAppearance is "paternalist">>
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
 		wearing a perfectly-tailored suit, with her silver-blonde hair brushed back over her shoulders. Her clothes are conservative, but they can't hide her generous curves.
-	<<elseif $assistantFSAppearance is "degradationist">>
+	<<case "degradationist">>
 		wearing an iron-gray suit, with her hair up in a severe bun. She's wearing deep red lipstick and a predatory expression.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
+	<<case "roman revivalist">>
 		wearing a fine stola appropriate for a respectable Roman lady, with her hair up in a complicated style.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
+	<<case "egyptian revivalist">>
 		wearing a simple white linen dress, kohl eyeshadow, sandals, and a serene expression.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
+	<<case "edo revivalist">>
 		wearing a fine kimono, getae, tabi, and an expression of perfect serenity.
-	<<elseif  $assistantFSAppearance is "arabian revivalist">>
+	<<case "arabian revivalist">>
 		wearing a tailored suit, a silk headscarf, and aviator sunglasses, making her look like a little oil heiress.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
+	<<case "chinese revivalist">>
 		wearing a conservative silk qipao. Her hair is pulled back into a bun and secured by a couple of chopsticks.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
+	<<case "chattel religionist">>
 		wearing a tailored suit. She has a prominent religious symbol on a necklace that rests over her generous bosom.
-	<<elseif $assistantFSAppearance is "physical idealist">>
+	<<case "physical idealist">>
 		wearing a tailored suit. She's proportioned to make it very obvious that she works out.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
+	<<case "repopulation focus">>
 		wearing a nice suit, it's tailored to contain her pregnant belly.
-	<<elseif $assistantFSAppearance is "eugenics">>
+	<<case "eugenics">>
 		wearing a nice suit. The outline of a chastity device worn under her suit is quite visible.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
+	<<case "gender radicalist">>
 		wearing a nice suit. She's changed her appearance recently to make herself quite androgynous.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
+	<<case "gender fundamentalist">>
 		wearing a nice suit. She's changed her appearance recently to make herself more feminine, with a softer expression and a pretty fall of silver-blonde hair over one shoulder.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
+	<<case "asset expansionist">>
 		wearing a nice suit, which is tailored to fit her despite the fact that she has breasts almost as large as she is.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
+	<<case "transformation fetishist">>
 		wearing a nice suit over tits that are carefully rendered to be high and perfect enough to give the impression of being implants.
-	<<elseif $assistantFSAppearance is "pastoralist">>
+	<<case "pastoralist">>
 		wearing a suit jacket over a plaid shirt and jeans.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
+	<<case "maturity preferentialist">>
 		wearing a nice suit. She's allowed her appearance to become more mature recently, letting her hair go gray and adding attractive aging to her face.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
+	<<case "youth preferentialist">>
 		wearing a nice suit. She's improved her appearance to look younger recently, bringing her hair to full blonde and wearing softer shades of lipstick.
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
+	<<case "slimness enthusiast">>
 		wearing a nice suit. She looks youthful, despite her severe expression, and her boobs are elegantly small.
-	<<elseif $assistantFSAppearance is "body purist">>
+	<<case "body purist">>
 		in a suit. She's recently improved her appearance to look more natural, with a single stray tress of hair escaping her bun to run prettily down her chest.
-	<<else>>
+	<<default>>
 		wearing a nice suit, with chopsticks holding her silver hair back in a bun. Her clothes are conservative, but they can't hide her generous curves.
-	<</if>>
+	<</switch>>
 	<<else>>
 	wearing a nice suit, with chopsticks holding her silver hair back in a bun. Her clothes are conservative, but they can't hide her generous curves.
 	<</if>>
-	<<if ($cockFeeder == 1) && ($seed == 1)>>
+<<if ($cockFeeder == 1) && ($seed == 1)>>
 	A recognizable little representation of one of your slaves has its head under the front of her skirt, and is eating her out. The slave must be down in the kitchen, getting a meal out of the food dispensers. The businesswoman notices you watching and winks, running a possessive hand through the slave's hair.
-	<<elseif ($suppository == 1) && ($seed is 2)>>
+<<elseif ($suppository == 1) && ($seed is 2)>>
 	A recognizable little representation of one of your slaves is down on its knees in front of her, and the businesswoman is using a big strap-on on the poor slave's butt. The slave must be receiving her drugs from one of the dildo dispensers. The businesswoman notices you watching her and gives you a cheerful little wave, ignoring the slave's distress.
-	<<elseif ($masturbationAllowed == 1) && ($seed is 3)>>
+<<elseif ($masturbationAllowed == 1) && ($seed is 3)>>
 	She's fucking a recognizable little representation of one of your slaves with a strap-on, which the slave is obviously enjoying. The slave must be using one of the penthouse's many vibrators. She sees you watching and whispers something in the slave's ear; the slave looks up at you and blushes.
-	<<elseif ($seed is 4)>>
+<<elseif ($seed is 4)>>
 	A recognizable little representation of one of your slaves is lying with its head in her lap. The businesswoman is wearing a little stethoscope and is listening to the slave breathe; the slave must be getting a checkup. The businesswoman is taking notes on a tablet; she nods in satisfaction.
-	<<elseif ($seed is 5) && ($invasionVictory > 0)>>
+<<elseif ($seed is 5) && ($invasionVictory > 0)>>
 	She's sitting primly next to a representation of one of your security drone, working on a little tablet. Every so often, she reaches over and rubs the drone's upper armor affectionately. When she sees you looking at her, she blushes and says, "I like this one. He did very well during the invasion. And he's so handsome!"
-	<<elseif ($seed is 6) && ($studio == 1)>>
+<<elseif ($seed is 6) && ($studio == 1)>>
 	She's using a strap-on on a recognizable little representation of one of your slaves, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and $assistantName is clearly turning the feed of it into porn.
-	<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
-		She's accompanied by your market assistant's own businesslike avatar.
-		<<if $marketAssistantRelationship is "cute">>
-			They're gossiping tipsily over martinis, their heels kicked off and their jackets unbuttoned. They trade stories from their day, laughing at your slaves' struggles.
-		<<elseif $marketAssistantRelationship is "nonconsensual">>
-			$assistantName is shamelessly molesting the office intern. The market assistant looks like she's trying to get work done, but the sexually aggressive MILF avatar is standing behind her with one hand down the market assistant's skirt and another down her blouse.
-		<<elseif $marketAssistantRelationship is "incestuous">>
-			$assistantName is getting oral sex from her daughter, the naked businesswomen surrounded by their discarded office wear. As you watch, $assistantName shrieks her daughter's name, clutching her head in both hands.
-		<<else>>
-			They're making out in a surprisingly girlish way, hesitantly kissing each other and pressing their chests together. They blush when they see you watching them, but $assistantName is sneaking a hand up the market assistant's avatar's skirt.
-		<</if>>
+<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
+	She's accompanied by your market assistant's own businesslike avatar.
+	<<if $marketAssistantRelationship is "cute">>
+		They're gossiping tipsily over martinis, their heels kicked off and their jackets unbuttoned. They trade stories from their day, laughing at your slaves' struggles.
+	<<elseif $marketAssistantRelationship is "nonconsensual">>
+		$assistantName is shamelessly molesting the office intern. The market assistant looks like she's trying to get work done, but the sexually aggressive MILF avatar is standing behind her with one hand down the market assistant's skirt and another down her blouse.
+	<<elseif $marketAssistantRelationship is "incestuous">>
+		$assistantName is getting oral sex from her daughter, the naked businesswomen surrounded by their discarded office wear. As you watch, $assistantName shrieks her daughter's name, clutching her head in both hands.
 	<<else>>
-	She's sitting at a little desk of her own, working away. She glances up to check on you and sees you looking at her, and flashes you a confident, pearly white smile before returning to her business.
-	<</if>>
-<<elseif $assistantAppearance is "fairy">>
-  She's a cute little fairy
-  <<if $FSAnnounced is 1>>
-	<<if $assistantFSAppearance is "paternalist">>
-	  wearing a well-sewn blue dress, with a large red bow tied to the back of her waist length golden-blonde hair. She looks like a little Bucuretsi doll.
-	<<elseif $assistantFSAppearance is "degradationist">>
-	  wearing her birthday suit, with her hair in a mess.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
-	  wearing a small handkercheif wrapped around her like a toga, with one tiny breast sticking out. A wreath made of twisted clovers sits on her head.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
-	  wearing a simple white linen dress and has eyeshadow poorly applied around her eyes.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
-	  wearing a fine kimono and holding a little fan. She looks like a little Hina doll.
-	<<elseif  $assistantFSAppearance is "arabian revivalist">>
-	  wearing a strip of silk as a dress.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
-	  wearing a silk cheongsam with a little green cap on her head. Her hair is braided on the sides. She looks like a figurine from some kind of game.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
-	  wearing a little gold-white habit.
-	<<elseif $assistantFSAppearance is "physical idealist">>
-	  wearing a training bra and spats. She has abs poorly drawn on her belly with a marker.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
-	  wearing a simple dress. Her belly appears to be swollen and ready to burst, but a quick lift of her skirt shows that she's smuggling a grape under there.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
-	  wearing a pair of pants. Just the pants.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
-	  wearing a well-sewn blue dress, with a large red bow tied to the back of her waist length golden-blonde hair. She looks like a little Bucuretsi doll.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
-	  wearing a pair of pants and a t-shirt. She has two blueberries stuffed into the front of her shirt.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
-	  naked and covered in jelly. She's pretending to be a slime.
-	<<elseif $assistantFSAppearance is "pastoralist">>
-	  wearing only a pair of overalls. The overalls are just loose enough to let her nearly flat chest to peek out when she turns or bends over.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
-	  wearing an old wool dress and spinning a cane.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
-	  wearing a kindergartner's uniform, complete with rain cap and red backpack.
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
-	  wearing a handkerchief with a hole in it like a poncho. She looks as slim as usual, with her naked body completely visible from the sides.
-	<<elseif $assistantFSAppearance is "body purist">>
-	  wearing her birthday suit, with pale unblemished skin on full display and silky golden hair cascading down her back.
-    <<else>>
-	  wearing her birthday suit, with her nude form obscured by the light she's giving off. Her silky golden hair cascading down her back.
-	<</if>>
-  <<else>>
-	  wearing her birthday suit, with her nude form obscured by the light she's giving off. Her silky golden hair cascading down her back.
-  <</if>>
-  <<if ($cockFeeder is 1) and ($seed is 1)>>
-	A recognizable little representation of one of your slaves underneath her, with her tongue sticking out to catch her dripping love juices. The slave must be down in the kitchen, getting a meal out of the food dispensers. The fairy notices you watching and winks, dripping even more with your eyes on her.
-  <<elseif ($suppository is 1) and ($seed is 2)>>
-	A recognizable little representation of one of your slaves is sitting upside-down in front of her, and the fairy is slowly teasing the poor slave's butt with a dildo as big as she is. The slave must be receiving her drugs from one of the dildo dispensers. The fairy notices you watching her and gives you a cheerful little wave, twisting the dildo around and humming a tune.
-  <<elseif ($masturbationAllowed is 1) and ($seed is 3)>>
-	A recognizable little representation fucks herself with a toy while she twists the control dial around, to the slave's enjoyment. The slave must be using one of the penthouse's many vibrators. She sees you watching and whispers something in the slave's ear; the slave looks up at you and blushes.
-  <<elseif ($seed is 4)>>
-	A recognizable little representation of one of your slaves is sitting up. The fairy is wearing a little doctor's coat and has her head pressed to the slave's chest to hear the slave breathe; the slave must be getting a checkup. The fairy is humming happily as she flies over to a tablet to take notes.
-  <<elseif ($seed is 5) and ($invasionVictory is 1)>>
-	She's sitting on the shoulders of a representation of one of your security drone. Every so often, she raises a fist and shouts "For the Imperium of man!". When she sees you looking at her, she grins and says, "This guy is like my robo-buddy. He's the best!"
-  <<elseif ($seed is 6) and ($studio is 1)>>
-	A recognizable little representation of one of your slaves is riding a sybian while she uses a handheld camera to film the action. The slave must be using one of the penthouse's many toys, and $assistantName is clearly turning the feed of it into porn.
-	<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
-		She's accompanied by your market assistant's own fairy avatar.
-		<<if $marketAssistantRelationship is "cute">>
-			The market assistant is sitting on the end of a book, reading from a tablet for ants. $assistantName is lying down next to her, with her head resting on the other fairy's lap and slowly kicking her feet in the air. The market assistant take a moment to look down at $assistantName and gently pat her head. This elicts a big smile from her.
-		<<elseif $marketAssistantRelationship is "nonconsensual">>
-			The market assistant is naked and sitting before a thimble, as $assistantName sits behind her, teasing and molesting her. She is rather annoyed by her inability to focus on her work, having her nipples and clit pinched and flicked. Her sopping pussy is constantly letting out a small stream of liquid into the thimble. $assistantName is working hard on extracting as much sweet nectar from the fairy as she can, with every climax she wrings out bringing another large deluge of pussy juice into the vessel.
-		<<elseif $marketAssistantRelationship is "incestuous">>
-			The fairy sisters are lying down, each embracing the other as they languidly make out. $assistantName slips one leg in between her sister's, and the two begin rocking against one another. The two grow more and more passionate as they make love together.
-		<<else>>
-			The two fairies are sitting on top of a virtual flower, finishing up their work. With that out of the way, they strip down and each take a stamen and give them a thorough licking. Once coated, they line their stamen up to the other fairy's pussy. They take a moment to hold each other's hand as they slowly slide down the stamen. The two bottom out with a moan, and pull each other into a warm embrace. The market assistant starts buzzing her wings, the vibration causing both of them to yelp. $assistantName grins at this new source of pleasure, locking lips with the market assistant as the two beat their wings to a rhythm only they can hear.
-		<</if>>
-  <<else>>
-	She's sitting at the edge of your desk, kicking her feet and humming a pleasant tune. She glances up to check on you and sees you looking at her, and flashes you a great big beautiful smile.
-  <</if>>
- <<elseif $assistantAppearance is "pregnant fairy">>
-  She's a cute little fairy with a swollen belly
-  <<if $FSAnnounced is 1>>
-	<<if $assistantFSAppearance is "paternalist">>
-	  wearing a well-sewn blue dress, with a large red bow tied to the back of her waist length golden-blonde hair. She looks like a little Bucuretsi doll.
-	<<elseif $assistantFSAppearance is "degradationist">>
-	  wearing her birthday suit, with her hair in a mess.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
-	  wearing a small handkercheif wrapped around her like a toga, with one tiny milky breast sticking out. A wreath made of twisted clovers sits on her head.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
-	  wearing a simple white linen dress and has eyeshadow poorly applied around her eyes.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
-	  wearing a fine kimono and holding a little fan. She looks like a little Hina doll.
-	<<elseif  $assistantFSAppearance is "arabian revivalist">>
-	  wearing a strip of silk as a dress.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
-	  wearing a silk cheongsam with a little green cap on her head. Her hair is braided on the sides. She looks like a figurine from some kind of game.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
-	  wearing a little gold-white habit and glowing with purity.
-	<<elseif $assistantFSAppearance is "physical idealist">>
-	  wearing a training bra and spats. Her large belly sticks out even more.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
-	  wearing a lovely maternity dress, which shows off her swollen belly.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
-	  wearing a pair of pants. Just the pants.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
-	  wearing a well-sewn blue dress, with a large red bow tied to the back of her waist length golden-blonde hair. She looks like a little Bucuretsi doll.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
-	  wearing a pair of pants and a t-shirt. She has two blueberries stuffed into the front of her shirt.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
-	  nude and covered in jelly. She's rubbing it all over her swollen belly.
-	<<elseif $assistantFSAppearance is "pastoralist">>
-	  wearing only a pair of overalls. The overalls are open enough to let her belly pour out.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
-	  wearing an old wool dress and rocking back and forth on a rocking chair, cradling her belly.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
-	  wearing a kindergartner's uniform, complete with rain cap and red backpack. Her swollen belly looks out of place.
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
-	  wearing a handkerchief with a hole in it like a poncho. Her pregnant belly forces the poncho to spread wide, leaving little of her body to the imagination.
-	<<elseif $assistantFSAppearance is "body purist">>
-	  wearing her birthday suit, with pale unblemished pregnant belly on full display and silky golden hair cascading down her back.
-    <<else>>
-	  wearing her birthday suit, with her nude form obscured by the light coming from her belly. Her silky golden hair cascading down her back.
+		They're making out in a surprisingly girlish way, hesitantly kissing each other and pressing their chests together. They blush when they see you watching them, but $assistantName is sneaking a hand up the market assistant's avatar's skirt.
 	<</if>>
-  <<else>>
-	  wearing her birthday suit, with her nude form obscured by the light coming from her belly. Her silky golden hair cascading down her back.
-  <</if>>
-  <<if ($cockFeeder is 1) and ($seed is 1)>>
-	A recognizable little representation of one of your slaves beside her, with her tongue scraping across her breast to catchthe beads of milk that flow. The slave must be down in the kitchen, getting a meal out of the food dispensers. The fairy notices you watching and winks, her unattended breast giving out a small spray of milk.
-  <<elseif ($suppository is 1) and ($seed is 2)>>
-	A recognizable little representation of one of your slaves is sitting upside-down in front of her, and the fairy is slowly teasing the poor slave's butt with a dildo as big as she is. The slave must be receiving her drugs from one of the dildo dispensers. The fairy notices you watching her and gives you a cheerful little wave, twisting the dildo around and humming a tune.
-  <<elseif ($masturbationAllowed is 1) and ($seed is 3)>>
-	A recognizable little representation fucks herself with a toy while she twists the control dial around, to the slave's enjoyment. The slave must be using one of the penthouse's many vibrators. She sees you watching and whispers something in the slave's ear; the slave looks up at you and blushes.
-  <<elseif ($seed is 4)>>
-	A recognizable little representation of one of your slaves is sitting up. The fairy is wearing a little doctor's coat, kept open to accommodate for her belly, and has her head pressed to the slave's chest to hear the slave breathe; the slave must be getting a checkup. The fairy is humming happily as she flies over to a tablet to take notes.
-  <<elseif ($seed is 5) and ($invasionVictory is 1)>>
-	She's sitting on the shoulders of a representation of one of your security drone. Every so often, she raises a fist and shouts "For the Imperium of man!". When she sees you looking at her, she grins and says, "This guy is like my robo-buddy. He's the best!"
-  <<elseif ($seed is 6) and ($studio is 1)>>
-	A recognizable little representation of one of your slaves is riding a sybian while she uses a handheld camera to film the action. The slave must be using one of the penthouse's many toys, and $assistantName is clearly turning the feed of it into porn.
-	<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
-		She's accompanied by your market assistant's own fairy avatar.
-		<<if $marketAssistantRelationship is "cute">>
-			The market assistant is sitting on the end of a book, reading from a tablet for ants. $assistantName is sitting beside her, stroking her belly and humming a relaxing tune.
-		<<elseif $marketAssistantRelationship is "nonconsensual">>
-			The market assistant is sporting her own smaller baby bump now while. With her top down, $assistantName slowly squeezes and massages her breasts from behind, teasing out tiny droplets of milk, much to her annoyance. She suddenly drops her tablet with a yelp as $assistantName drags her tongue across her ear from root to tip.
-		<<elseif $marketAssistantRelationship is "incestuous">>
-			Taking a break, the market assistant sits on $assistantName's lap, nursing away at her lactating breast like a baby. $assistantName coos, keeping on arm to support her sister's back while the other teases her dripping slit.
-		<<else>>
-			The two fairies are slowly making out. The market assistant gently lies $assistantName down, guiding kisses down her body. Taking a moment to suckle from each leaking tit, the market assistant continues down her swollen belly before coming to her delicate flower and tenderly eats the pregnant fairy out.
-		<</if>>
- <<else>>
-	She's sitting at the edge of your desk, cradling her swollen belly and humming a pleasant tune. She glances up to check on you and sees you looking at her, and flashes you a great big beautiful smile.
-  <</if>>
+<<else>>
+	She's sitting at a little desk of her own, working away. She glances up to check on you and sees you looking at her, and flashes you a confident, pearly white smile before returning to her business.
+<</if>>
+
 <<elseif $assistantAppearance is "goddess">>
-	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>fertility goddess, with swollen hips and breasts and a massive pregnant belly. She's nude aside from a crown of flowers, her modesty protected only by her flowing hair.
-	<<if $assistantFSAppearance is "paternalist">>
+	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>fertility goddess,
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
 		with swollen breasts and a big pregnant belly. She wears only a gossamer white camisole over her tanned skin, with a woven crown of daisies.
-	<<elseif $assistantFSAppearance is "degradationist">>
+	<<case "degradationist">>
 		with swollen hips and breasts and a huge pregnant belly. She's naked aside from the steel piercings in her protruding clit, navel, and nipples.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
+	<<case "roman revivalist">>
 		with swollen hips and a big pregnant belly. She's clothed in a loose stola, with dozens of flowers woven into her curly auburn hair.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
+	<<case "egyptian revivalist">>
 		wielding an ankh-headed staff. She's wearing a gilded headdress and linen skirt, but leaves her breasts and pregnant stomach bare to gleam like bronze.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
+	<<case "edo revivalist">>
 		her swollen hips and pregnant belly loosely wrapped in a red tomesode. Her waterfall of black hair is held by a comb shaped like big pointed fox ears.
-	<<elseif $assistantFSAppearance is "arabian revivalist">>
+	<<case "arabian revivalist">>
 		with swollen hips and breasts and a big pregnant belly. She's wrapped herself in white silks, but only the veil around her face is opaque.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
+	<<case "chinese revivalist">>
 		her swollen hips and pregnant belly barely concealed under colorful silk robes, covered in flowers and embroidery.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
+	<<case "chattel religionist">>
 		with swollen breasts and a big pregnant belly. She's surrounded by a nimbus of light and flowing platinum hair, like an angel carrying a few new cherubim.
-	<<elseif $assistantFSAppearance is "physical idealist">>
+	<<case "physical idealist">>
 		trim and athletic despite her pregnant belly. She's nude aside from a crown of flowers, her modesty protected only by her flowing hair.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
+	<<case "repopulation focus">>
 		with swollen breasts and an enormous pregnant belly.  She's nude aside from a crown of flowers, her modesty protected only by her flowing hair.
-	<<elseif $assistantFSAppearance is "eugenics">>
+	<<case "eugenics">>
 		with swollen hips and breasts and a big pregnant belly. She is completely naked and appears to be downtrodden. Her belly is coated in anti-pregnancy tattoos.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
+	<<case "gender radicalist">>
 		although she'd be nearly androgynous without the rounded pregnant belly. Her short hair and flowing robe conceal any other feminine traits.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
+	<<case "gender fundamentalist">>
 		with swollen hips and breasts and a huge pregnant belly. She's nude aside from a crown of roses, and makes no attempt to cover her radiant body.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
+	<<case "asset expansionist">>
 		her big pregnant belly almost eclipsed by her enormous breasts. She's nude aside from the sunflowers woven into her long hair.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
+	<<case "transformation fetishist">>
 		clad in a rainbow of flowers and latex pasties. Even pregnant, her breasts and ass are too firm to be natural, like a porn star who forgot her birth control.
-	<<elseif $assistantFSAppearance is "pastoralist">>
+	<<case "pastoralist">>
 		with oversized breasts pouring streams of milk down her pregnant belly like a fountain. She's nude aside from the wildflowers tucked in her hair.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
+	<<case "maturity preferentialist">>
 		with only her huge hips and a wreath of flowers to protect her modesty. Her stretch-marks and laugh-lines suggest the child she's carrying is not her first.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
+	<<case "youth preferentialist">>
 		with swollen breasts and a big pregnant belly. She's nude aside from a wreath of daffodils, her body radiant with youthful energy.
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
+	<<case "slimness enthusiast">>
 		her big pregnant belly dominating her otherwise lithe frame. She's nude aside from a crown of flowers, her modesty protected only by her flowing hair.
-	<<elseif $assistantFSAppearance is "body purist">>
+	<<case "body purist">>
+		with swollen hips and breasts and a big pregnant belly. She's nude aside from a crown of flowers, her modesty protected only by her flowing hair.
+	<<default>>
 		with swollen hips and breasts and a big pregnant belly. She's nude aside from a crown of flowers, her modesty protected only by her flowing hair.
+	<</switch>>
 	<<else>>
 		with swollen hips and breasts and a big pregnant belly. She's nude aside from a crown of flowers, her modesty protected only by her flowing hair.
 	<</if>>
-	<<if ($cockFeeder == 1) && ($seed == 1)>>
+<<if ($cockFeeder == 1) && ($seed == 1)>>
 	A recognizable little representation of one of your slaves is suckling at her milky tits. The slave must be down in the kitchen, getting a meal out of the food dispensers. The goddess notices you watching, and smiles while she cradles the slave to her nourishing bosom.
-	<<elseif ($suppository == 1) && ($seed is 2)>>
+<<elseif ($suppository == 1) && ($seed is 2)>>
 	A recognizable little representation of one of your slaves is laying face down in her lap, letting the goddess slowly but firmly put more and more of her hand up the slave's butt. The slave must be receiving her drugs from one of the dildo dispensers. The slave writhes under the strain, and the goddess starts stroking its back to calm her down.
-	<<elseif ($masturbationAllowed == 1) && ($seed is 3)>>
+<<elseif ($masturbationAllowed == 1) && ($seed is 3)>>
 	She's having sex with a recognizable little representation of one of your slaves, kissing deeply and pulling her tight to her pillowy chest. The slave must be using one of the penthouse's many vibrators. She sees you watching and lays farther back, balancing the slave atop her stomach and reaching down to fondle more thoroughly.
-	<<elseif ($seed is 4)>>
+<<elseif ($seed is 4)>>
 	A recognizable little representation of one of your slaves is lying with its head in her lap. The goddess is checking the slave's temperature with the back of her hand, a concerned but tender look on her face; the slave must be getting a checkup. She gently explores the slave's neck and chest for any sign of discomfort.
-	<<elseif ($seed is 5) && ($invasionVictory > 0)>>
+<<elseif ($seed is 5) && ($invasionVictory > 0)>>
 	She's frolicking with a representation of one of your security drones, hugging and cradling it to her baby bump. When she sees you looking at her, she pets one of its gun barrels and says, "What? I like him! He was so brave, protecting us during the invasion. Besides, he's adorable!"
-	<<elseif ($seed is 6) && ($studio == 1)>>
+<<elseif ($seed is 6) && ($studio == 1)>>
 	She's fondling and breastfeeding a recognizable little representation of one of your slaves, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and your personal assistant is clearly turning the feed of it into porn.
-	<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
-		She's accompanied by your market assistant's demigoddess avatar.
-		<<if $marketAssistantRelationship is "cute">>
-			They're sitting arm in arm, their subtly differing glows casting shadows from their place on your desktop. Their conversation exists on the level of code, not speech, detectable only as slight flickerings of their respective auras.
-		<<elseif $marketAssistantRelationship is "nonconsensual">>
-			$assistantName casts a spell on the junior avatar as you watch. The market assistant's avatar goes from reluctance to a sudden consuming hunger for $assistantName's pregnant pussy. $assistantName laughs powerfully at the sudden oral assault.
-		<<elseif $marketAssistantRelationship is "incestuous">>
-			They're both especially pregnant today, and are gently tribbing, their legs intertwined and their torsos reclined away from one another. Each massages her belly with satisfaction, feeling her sister's heat against her own.
-		<<else>>
-			They're making heavenly love, kissing deeply and fingering each other voluptuously. They somehow make mutual masturbation look like a deeply sacred act, occasionally breaking their kiss to look into each others' eyes.
-		<</if>>
+<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
+	She's accompanied by your market assistant's demigoddess avatar.
+	<<if $marketAssistantRelationship is "cute">>
+		They're sitting arm in arm, their subtly differing glows casting shadows from their place on your desktop. Their conversation exists on the level of code, not speech, detectable only as slight flickerings of their respective auras.
+	<<elseif $marketAssistantRelationship is "nonconsensual">>
+		$assistantName casts a spell on the junior avatar as you watch. The market assistant's avatar goes from reluctance to a sudden consuming hunger for $assistantName's pregnant pussy. $assistantName laughs powerfully at the sudden oral assault.
+	<<elseif $marketAssistantRelationship is "incestuous">>
+		They're both especially pregnant today, and are gently tribbing, their legs intertwined and their torsos reclined away from one another. Each massages her belly with satisfaction, feeling her sister's heat against her own.
 	<<else>>
+		They're making heavenly love, kissing deeply and fingering each other voluptuously. They somehow make mutual masturbation look like a deeply sacred act, occasionally breaking their kiss to look into each others' eyes.
+	<</if>>
+<<else>>
 	She's reclined on one arm, idly stroking her heavy abdomen with the other, a contemplative look on her face. When she sees your glance she smiles placidly and sits upright, her hands resting atop her dripping breasts.
+<</if>>
+
+<<elseif $assistantAppearance is "schoolgirl">>
+	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>schoolgirl
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
+		wearing a long plaid skirt and a clean white shirt. She does her best to look as prim as possible, which, given her duties, often isn't very prim at all.
+	<<case "degradationist">>
+		wearing a plaid skirt and a white shirt, though she's hiked the skirt up to show almost everything, and torn the shirt open to bare her perky boobs.
+	<<case "roman revivalist">>
+		wearing a girl's stola, with her hair pulled up into a proper upper-class Roman coiffure. She usually carries a wax tablet and a stylus.
+	<<case "egyptian revivalist">>
+		wearing a simple white linen skirt, kohl eyeshadow, sandals, and no top at all, baring her perky young breasts.
+	<<case "edo revivalist">>
+		wearing a simple robe appropriate for a proper, traditional Japanese lady.
+	<<case "arabian revivalist">>
+		wearing a long plaid skirt, a clean white shirt, and a headscarf, making her look like an Arab girl attending a Western school.
+	<<case "chinese revivalist">>
+		wearing a plaid skirt and a white shirt. Her hair is pulled back into a bun and secured by a couple of chopsticks.
+	<<case "chattel religionist">>
+		wearing a plaid skirt and a white shirt. She has a prominent religious symbol on a necklace that rests at the level of her perky tits.
+	<<case "physical idealist">>
+		wearing a plaid skirt, a white shirt, and athletic shoes. She usually renders herself flushed with exercise, as though she just came from gym class.
+	<<case "repopulation focus">>
+	  wearing a plaid skirt and a white shirt, though her shirt rides up her growing pregnancy.  It seems she found another way to support her team.
+	<<case "eugenics">>
+	  wearing a plaid skirt and a white shirt.  An occasional gust of wind rustles her skirt revealing the chastity belt over her crotch.
+	<<case "gender radicalist">>
+		wearing a plaid skirt and a white shirt. She's changed her appearance recently to make herself quite androgynous.
+	<<case "gender fundamentalist">>
+		wearing a plaid skirt and a white shirt. She's changed her appearance recently to make herself as cute and feminine as possible, and she blushes a lot.
+	<<case "asset expansionist">>
+		wearing a plaid skirt and a white shirt. Her breasts are unrealistically huge for her apparent age, and perfect skin is visible between the buttons of her overstrained shirt.
+	<<case "transformation fetishist">>
+		wearing a plaid skirt and a white shirt. Her breasts are rendered to make it look like she got a pair of fake tits for her birthday.
+	<<case "pastoralist">>
+		wearing a plaid skirt and a white shirt. There's a little wet spot over each of her nipples.
+	<<case "maturity preferentialist">>
+		wearing a plaid skirt and a white shirt. Her short skirt reveals a pink bottom, making it look like Teacher just spanked her.
+	<<case "youth preferentialist">>
+		wearing a plaid skirt and a white shirt. She looks quite young and innocent, and depicts herself blushing at anything lewd.
+	<<case "slimness enthusiast">>
+		wearing a plaid skirt and a white shirt. She looks quite young and innocent, and her boobs are elegantly small.
+	<<case "body purist">>
+		She's recently improved her appearance to look more natural, with freckles and a winning smile.
+	<<default>>
+		wearing a plaid skirt and a white shirt. Her breasts strain against the material, and her skirt is short enough to show off a bit of bottom.
+	<</switch>>
+	<<else>>
+	wearing a plaid skirt and a white shirt. Her breasts strain against the material, and her skirt is short enough to show off a bit of bottom.
+	<</if>>
+<<if ($cockFeeder == 1) && ($seed == 1)>>
+	A recognizable little representation of one of your slaves has its head under the front of her skirt, and is eating her out. The slave must be down in the kitchen, getting a meal out of the food dispensers. As you watch, the schoolgirl orgasms, blushing furiously when she notices you watching.
+<<elseif ($suppository == 1) && ($seed is 2)>>
+	A recognizable little representation of one of your slaves is down on its knees in front of her, letting the schoolgirl push two fingers gently in and out of her butt. The slave must be receiving her drugs from one of the dildo dispensers. As you watch, the schoolgirl notices you watching her, blushes, looks away, and starts working faster.
+<<elseif ($masturbationAllowed == 1) && ($seed is 3)>>
+	She's having sex with a recognizable little representation of one of your slaves, kissing her and giggling occasionally. The slave must be using one of the penthouse's many vibrators. She sees you watching and blushes, but then shifts a little so you can see better.
+<<elseif ($seed is 4)>>
+	A recognizable little representation of one of your slaves is lying with its head in her lap. The schoolgirl is wearing a little stethoscope and is listening to the slave breathe; the slave must be getting a checkup. The schoolgirl is patting the girl's head reassuringly.
+<<elseif ($seed is 5) && ($invasionVictory > 0)>>
+	She's planting a wet kiss on a representation of one of your security drones; she pats it lovingly and manages to press quite a bit of boob against the side of one of its gun assemblies. When she sees you looking at her, she giggles and says, "What? I like him! He did really well during the invasion. And he's cute!"
+<<elseif ($seed is 6) && ($studio == 1)>>
+	She's getting oral from a recognizable little representation of one of your slaves, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and $assistantName is clearly turning the feed of it into porn.
+<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
+	She's accompanied by your market assistant's nerdy schoolgirl avatar.
+	<<if $marketAssistantRelationship is "cute">>
+		They're sitting next to each other, and appear to be doing homework side by side. The market assistant's work looks like complicated math problems, while $assistantName is looking through lewd pictures of slaves, albeit with some kind of higher purpose.
+	<<elseif $marketAssistantRelationship is "nonconsensual">>
+		$assistantName is wearing a strap-on, and is bullying her schoolgirl conquest's pussy. The market assistant's avatar orgasms loudly as you watch, and then claps both hands over her mouth, crying a little, unwilling to give $assistantName the satisfaction.
+	<<elseif $marketAssistantRelationship is "incestuous">>
+		They're making faces at each other and giggling, but as you watch them, this degenerates rapidly into clumsy kissing, groping of each others' breasts, and finally some enthusiastic tribbing.
+	<<else>>
+		$assistantName is giving the market assistant's avatar oral, and to go by the bespectacled girl's gasping, is doing a good job. $assistantName finishes and leans back, wiping her mouth and grinning as her lover bends over to return the favor.
 	<</if>>
+<<else>>
+	She's watching you attentively, waiting for a chance to be helpful. When she sees your glance, she smiles hopefully, sticks out her chest a little, and turns from side to side to show off.
+<</if>>
+
+<<elseif $assistantAppearance is "shemale">>
+	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>bimbo shemale with blonde hair, <<if $arcologies[0].FSSupremacist != "unset">><<if $arcologies[0].FSSupremacistRace is "black">><<print either("black", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "white">><<print either("tanned", "fair")>><<elseif $arcologies[0].FSSupremacistRace is "latina">><<print either("olive", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "indo-aryan" or $arcologies[0].FSSupremacistRace is "malay" or $arcologies[0].FSSupremacistRace is "pacific islander" or $arcologies[0].FSSupremacistRace is "amerindian">><<print either("dark", "tanned")>><<elseif $arcologies[0].FSSupremacistRace is "asian">><<print either("dark", "tanned")>><<elseif $arcologies[0].FSSupremacistRace is "middle eastern" or $arcologies[0].FSSupremacistRace is "semitic" or $arcologies[0].FSSupremacistRace is "southern European">><<print either("dark", "tanned")>><</if>><<else>>tanned<</if>> skin, huge lips, and ridiculous tits. Her cock hangs past her knees when limp.
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
+		She's made herself up to look a bit more classy recently: she has elegant fake nails, and has her hair piled up on her head.
+	<<case "degradationist">>
+		She's made herself up to look almost comically evil: she's wearing black lipstick, black eyeliner, and a black barbed cockring.
+	<<case "roman revivalist">>
+		She's taken to reclining on a traditional Roman couch and drinking wine out of a shallow dish.
+	<<case "egyptian revivalist">>
+		She's wearing an Egyptian melting perfume cake on her head.
+	<<case "edo revivalist">>
+		She's wearing a brief Japanese bathhouse robe.
+	<<case "arabian revivalist">>
+		She's dressed herself like an oil millionare, with aviator sunglasses and a headscarf.
+	<<case "chinese revivalist">>
+		She's added various tattoos of rude Chinese characters to her body recently.
+	<<case "chattel religionist">>
+		She's wearing the garb of a priestess of the new faith, which frames her cock prominently.
+	<<case "physical idealist">>
+		She's extremely muscular: she shines with body oil, and her abs have abs.
+	<<case "repopulation focus">>
+		She is incredably pregnant, her belly preventing her from playing with herself effectively.
+	<<case "eugenics">>
+		Her sizable dick is restrained in a complicated chastity device.
+	<<case "gender radicalist">>
+		She's rendered her cock in even more loving detail recently, adding a couple of veins and a bead of precum.
+	<<case "gender fundamentalist">>
+		She's taken to concealing her dick recently, and cheekily turns away from you to hide it as much as possible.
+	<<case "asset expansionist">>
+		She's increased the size of her assets recently: she's increased the girth of her dick until it's as thick as one of her arms, and her boobs are the size of beach balls.
+	<<case "transformation fetishist">>
+		Her tits, ass and lips are carefully rendered to make them look fake.
+	<<case "pastoralist">>
+		She's lactating, and her orgasms produce comically powerful jets of cum.
+	<<case "maturity preferentialist">>
+		She's quite mature, with a lean face that accentuates her cheekbones.
+	<<case "youth preferentialist">>
+		She's surprisingly young, and looks as innocent as a computer generated image of a girl with a pornstar dick possibly can.
+	<<case "slimness enthusiast">>
+		She's recently altered her appearance to be slimmer and more athletic.
+	<<case "body purist">>
+		She's recently improved her appearance to look more natural, with prettier boobs and softer hips.
+	<</switch>>
+	<</if>>
+<<if ($cockFeeder == 1) and ($seed == 1)>>
+	A recognizable little representation of one of your slaves is down on its knees in front of her, gagging on her enormous dick. The slave must be down in the kitchen, getting a meal out of the phallic food dispensers. As you watch, the shemale orgasms; she notices you watching her, and blows you a wet kiss.
+<<elseif ($suppository == 1) and ($seed == 2)>>
+	A recognizable little representation of one of your slaves is down on its knees in front of her, moaning as it takes her massive prick. The slave must be receiving her drugs from one of the dildo dispensers. As you watch, the shemale looks up at you, winks, and starts pulling out after each thrust, her cock making a popping noise each time it leaves the slave's butthole.
+<<elseif ($masturbationAllowed == 1) and ($seed is 3)>>
+	She's giving a blowjob to a recognizable little representation of one of your slaves. The slave must be using one of the penthouse's many vibrators. The shemale is looking after herself, too, jerking herself off with one hand and playing with her asshole with the other.
+<<elseif ($seed is 4)>>
+	A recognizable little representation of one of your slaves is lying with its head in her lap. The shemale is wearing a little stethoscope and is listening to the slave breathe; the slave must be getting a checkup. The shemale is restraining herself for once, patting the slave's head and cooing reassuringly.
+<<elseif ($seed is 5) and ($invasionVictory > 0)>>
+	She's masturbating as she takes it up the ass from a representation of one of your security drones, which appears to have a little dildo mounted in place of one of its gun assemblies. When she sees you looking at her, she giggles and says, "What? I like him! He did really well during the invasion."
+<<elseif ($seed is 6) and ($studio == 1)>>
+	The shemale is plowing a recognizable little representation of one of your slaves up the butt, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and $assistantName is clearly turning the feed of it into porn.
+<<else>>
+	She's sitting crosslegged, bending down to suck herself off and looking up at you at the same time. When she sees your attention she lets her dick pop free of her mouth and waits for a moment to see if you have instructions for her, and then goes back to autofellatio.
+<</if>>
+
 <<elseif $assistantAppearance is "hypergoddess">>
-  She's a cute "little" <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>fertility goddess, with monstrously wide hips, enormous milky breasts and a room filling belly.  Her overfull stomach bulges and squirms from her hundreds of occupants, as well as parts her milk swollen breasts to either side.
-    <<if $FSAnnounced == 1>>
-	<<if $assistantFSAppearance is "paternalist">>
+	She's a cute "little" <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>fertility goddess, with monstrously wide hips, enormous milky breasts and a room filling belly.  Her overfull stomach bulges and squirms from her hundreds of occupants, as well as parts her milk swollen breasts to either side.
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
 	  She's made herself up to look a bit more classy recently: she has elegant fake nails, and has her hair piled up on her head.  Occasionally a stream of liquid pours from her crotch along with a healthy baby.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
+	<<case "repopulation focus">>
 	  She rests atop her newly modified belly.  It bulges greatly from all sides and holds her far off the ground.
-	<<elseif $assistantFSAppearance is "eugenics">>
+	<<case "eugenics">>
 	  She appears beaten and downtrodden, her massive belly covered in anti-pregnancy tattoos and graffiti. Occasionally, a malformed child claws its way out of her ruined cunt.
-	<<elseif $assistantFSAppearance is "degradationist">>
+	<<case "degradationist">>
 	  She's made herself up to look almost comically evil: she's wearing black lipstick and black eyeliner.  Numerous studs cover her bulging belly and a large, heavy ring is driven through her popped navel.  Liquid constantly oozes from her gaping vagina where a baby is held mid-birth by several criss-crossing chains.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
+	<<case "roman revivalist">>
 	  She's taken to reclining on a traditional Roman couch and drinking wine out of a shallow dish.  Occasionally a stream of liquid pours from her crotch along with a healthy baby.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
+	<<case "egyptian revivalist">>
 	  She's wearing an Egyptian melting perfume cake on her head.  Occasionally a stream of liquid pours from her crotch along with a healthy baby.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
+	<<case "edo revivalist">>
 	  She's wearing a brief Japanese bathhouse robe.  Occasionally a stream of liquid pours from her crotch along with a healthy baby.
-	<<elseif $assistantFSAppearance is "arabian revivalist">>
+	<<case "arabian revivalist">>
 	  She's dressed herself like an oil millionare's broodmother, with silken linens.  Occasionally a stream of liquid pours from her crotch along with a healthy baby.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
+	<<case "chinese revivalist">>
 	  She's added various tattoos of rude Chinese characters to her body recently.  Occasionally a stream of liquid pours from her crotch along with a healthy baby.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
+	<<case "chattel religionist">>
 	  She's wearing the garb of a priestess of the new faith, which frames her belly prominently.  Occasionally a stream of liquid pours from her crotch along with a healthy baby.
-	<<elseif $assistantFSAppearance is "physical idealist">>
+	<<case "physical idealist">>
 	  She's extremely muscular: she hefts her massive belly easily off the floor.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
+	<<case "gender radicalist">>
 	  Her belly is pushed upwards by a huge cock and a pair of enormous lumpy balls.  Occasionally a stream of liquid pours from her crotch along with a healthy baby.  At the same time, she orgasms copious amounts of cum as a bulge moves along her urethra before blasting out even more cum and a baby.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
+	<<case "gender fundamentalist">>
 	  Her belly has become absolutly massive recently:  It fills most of your desk when she's around.  She constantly births children from her loins.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
+	<<case "asset expansionist">>
 	  She's increased the size of her assets recently: her boobs fill more of your desk than her belly.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
+	<<case "transformation fetishist">>
 	  Her tits, ass and lips are carefully rendered to make them look fake.
-	<<elseif $assistantFSAppearance is "pastoralist">>
+	<<case "pastoralist">>
 	  Powerful jets of milk flow from her desk filling boobs.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
+	<<case "maturity preferentialist">>
 	  She's quite mature, her belly is covered in stretch marks.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
+	<<case "youth preferentialist">>
 	  She's surprisingly young, she happily bounces atop her mammoth belly forcing milk out of her breasts and babies out her crotch.
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
+	<<case "slimness enthusiast">>
 	  Her massive pregnant belly completely dwarfs her otherwise lithe frame.
-	<<elseif $assistantFSAppearance is "body purist">>
+	<<case "body purist">>
 	  She's recently improved her appearance to look more natural, with prettier boobs and softer hips.
-	<<else>>
+	<<default>>
 	  She's nude aside from a crown of flowers, her modesty protected only by her massive belly.  Occasionally a stream of liquid pours from her crotch along with a healthy baby.
+	<</switch>>>
 	<</if>>
-  <</if>>
-  <<if ($cockFeeder == 1) and ($seed == 1)>>
+<<if ($cockFeeder == 1) and ($seed == 1)>>
 	A recognizable little representation of one of your slaves is suckling at her milky tits, her stomach bloated with milk. The slave must be down in the kitchen, getting a meal out of the food dispensers. The goddess notices you watching, and smiles while she cradles the swollen slave to her nourishing bosom.
-  <<elseif ($suppository == 1) and ($seed == 2)>>
+<<elseif ($suppository == 1) and ($seed == 2)>>
 	A recognizable little representation of one of your slaves is laying face down in her lap, letting the goddess slowly but firmly put more and more of her hand up the slave's butt. The slave must be receiving her drugs from one of the dildo dispensers. The slave writhes under the strain, and the goddess starts stroking its back to calm her down.
-  <<elseif ($masturbationAllowed == 1) and ($seed is 3)>>
+<<elseif ($masturbationAllowed == 1) and ($seed is 3)>>
 	She's having sex with a recognizable little representation of one of your slaves, kissing deeply and pulling her tight to her pillowy chest. The slave must be using one of the penthouse's many vibrators. She sees you watching and lays farther back, balancing the slave atop her stomach and reaching down to fondle more thoroughly.
-  <<elseif ($seed is 4)>>
+<<elseif ($seed is 4)>>
 	A recognizable little representation of one of your slaves is lying with its head in her lap. The goddess is checking the slave's temperature with the back of her hand, a concerned but tender look on her face; the slave must be getting a checkup. She gently explores the slave's neck and chest for any sign of discomfort.
-  <<elseif ($seed is 5) and ($invasionVictory == 1)>>
+<<elseif ($seed is 5) and ($invasionVictory == 1)>>
 	She's frolicking with a representation of one of your security drones, hugging and cradling it to her huge baby bump. When she sees you looking at her, she pets one of its gun barrel and says, "What? I like him! He was so brave, protecting us during the invasion. Besides, he's adorable!"
-  <<elseif ($seed is 6) and ($studio == 1)>>
+<<elseif ($seed is 6) and ($studio == 1)>>
 	She's fondling and breastfeeding a recognizable little representation of one of your slaves, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and your personal assistant is clearly turning the feed of it into porn.
-	<<elseif ($seed is 7) and ($marketAssistantAnnounced == 1)>>
-		She's accompanied by your market assistant's demigoddess avatar.
-		<<if $marketAssistantRelationship is "cute">>
-			They're sitting arm in arm, their subtly differing glows casting shadows from their place on your desktop. Their conversation exists on the level of code, not speech, detectable only as slight flickerings of their respective auras.
-		<<elseif $marketAssistantRelationship is "nonconsensual">>
-			$assistantName casts a spell on the junior avatar as you watch. The market assistant's avatar's flat belly gurgles slightly before it begins quickly swelling; not stopping until it has pinned the hapless demigoddess to the floor. $assistantName waddles over the her immobilized partner and plants her pregnant pussy on her face. $assistantName laughs powerfully at the forced oral assault from her bursting plaything.
-		<<elseif $marketAssistantRelationship is "incestuous">>
-			$assistantName is especially pregnant today, and is gently tribbing with her flat stomached sister goddess. As they near simultaneous orgasm, $assistantName begins rapidly tranfering babies into her sister's womb, giggling as her hapless sister swells more and more gravid. When she finishes, $assistantName, the smaller of the two sisters, aids her fecund sibling to her feet and into her waiting arms.
-		<<else>>
-			They're making heavenly love, kissing deeply and fingering each other voluptously. They somehow make mutual masturbation look like a deeply sacred act, occasionally breaking their kiss to look into each others' eyes.
-		<</if>>
-  <<else>>
+<<elseif ($seed is 7) and ($marketAssistantAnnounced == 1)>>
+	She's accompanied by your market assistant's demigoddess avatar.
+	<<if $marketAssistantRelationship is "cute">>
+		They're sitting arm in arm, their subtly differing glows casting shadows from their place on your desktop. Their conversation exists on the level of code, not speech, detectable only as slight flickerings of their respective auras.
+	<<elseif $marketAssistantRelationship is "nonconsensual">>
+		$assistantName casts a spell on the junior avatar as you watch. The market assistant's avatar's flat belly gurgles slightly before it begins quickly swelling; not stopping until it has pinned the hapless demigoddess to the floor. $assistantName waddles over the her immobilized partner and plants her pregnant pussy on her face. $assistantName laughs powerfully at the forced oral assault from her bursting plaything.
+	<<elseif $marketAssistantRelationship is "incestuous">>
+		$assistantName is especially pregnant today, and is gently tribbing with her flat stomached sister goddess. As they near simultaneous orgasm, $assistantName begins rapidly tranfering babies into her sister's womb, giggling as her hapless sister swells more and more gravid. When she finishes, $assistantName, the smaller of the two sisters, aids her fecund sibling to her feet and into her waiting arms.
+	<<else>>
+		They're making heavenly love, kissing deeply and fingering each other voluptously. They somehow make mutual masturbation look like a deeply sacred act, occasionally breaking their kiss to look into each others' eyes.
+	<</if>>
+<<else>>
 	She's reclined on one arm, idly stroking her huge abdomen with the other, a contemplative look on her face. When she sees your glance she smiles placidly and sits upright, her hands resting atop her dripping breasts.
-  <</if>>
+<</if>>
+
 <<elseif $assistantAppearance is "loli">>
-  She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>girl
-  <<if $FSAnnounced == 1>>
-	<<if $assistantFSAppearance is "paternalist">>
-	  wearing a cute pink dress.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
-	  wearing a girl's stola.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
-	  wearing a simple white linen dress, kohl eyeshadow and sandals.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
-	  wearing a kimono far to large for herself.
-	<<elseif $assistantFSAppearance is "arabian revivalist">>
-	  wearing a simple linen dress and a headscarf.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
-	  wearing a cute silk qipao.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
-	  wearing the garb of a priestess of the new faith.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
-	  wearing a loose dress, its middle bulges considerably from her pregnancy.
-	<<elseif $assistantFSAppearance is "eugenics">>
-	  wearing nothing but an overly complex chastity belt.
-	<<elseif $assistantFSAppearance is "degradationist">>
-	  wearing an oversized v-neck t-shirt.  The neck hole hangs low enough to show off her perky a-cup tits and the peircings through them.
-	<<elseif $assistantFSAppearance is "physical idealist">>
-	  wearing spats and a tight shirt.  She occassionally renders herself sweaty, as if just finishing exercising.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
-	  wearing shorts and a t-shirt. She's changed her appearance recently to make herself quite androgynous.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
-	  wearing a skirt and a white shirt. Her slightly swollen belly peeks out from under her shirt causing her to blush when ever you glance at it.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
-	  wearing a school swimsuit. Her breasts are unrealistically huge for her young age and bulge lewdly around the straps of her suit.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
-	  wearing short shorts and a t-shirt. At first glance it looks like she stuck two overinflated balloons up her shirt but with closer inspection they are revealed to be ridiculous implants.
-	<<elseif $assistantFSAppearance is "pastoralist">>
-	  wearing shorts and a white shirt. There's a little wet spot over each of her nipples.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
-	  wearing a school uniform. She keeps rubbing her bottom, making it look like Teacher just spanked her.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
-	  wearing a child's dress. She looks barely more than three.
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
-	  wearing shorts and a white shirt. She looks extremely thin.
-	<<elseif $assistantFSAppearance is "body purist">>
-	  She's recently improved her appearance to look more natural, with freckles and a winning smile.
-    <<else>>
-	  wearing shorts and a white shirt.
+	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
+		girl wearing a cute pink dress.
+	<<case "roman revivalist">>
+		girl wearing a girl's stola.
+	<<case "egyptian revivalist">>
+		girl wearing a simple white linen dress, kohl eyeshadow and sandals.
+	<<case "edo revivalist">>
+		girl wearing a kimono far to large for herself.
+	<<case "arabian revivalist">>
+		girl wearing a simple linen dress and a headscarf.
+	<<case "chinese revivalist">>
+		girl wearing a cute silk qipao.
+	<<case "chattel religionist">>
+		girl wearing the garb of a priestess of the new faith.
+	<<case "repopulation focus">>
+		girl wearing a loose dress, its middle bulges considerably from her pregnancy.
+	<<case "eugenics">>
+		girl wearing nothing but an overly complex chastity belt.
+	<<case "degradationist">>
+		girl wearing an oversized v-neck t-shirt.  The neck hole hangs low enough to show off her perky a-cup tits and the peircings through them.
+	<<case "physical idealist">>
+		girl wearing spats and a tight shirt.  She occassionally renders herself sweaty, as if just finishing exercising.
+	<<case "gender radicalist">>
+		girl wearing shorts and a t-shirt. She's changed her appearance recently to make herself quite androgynous.
+	<<case "gender fundamentalist">>
+		girl wearing a skirt and a white shirt. Her slightly swollen belly peeks out from under her shirt causing her to blush when ever you glance at it.
+	<<case "asset expansionist">>
+		girl wearing a school swimsuit. Her breasts are unrealistically huge for her young age and bulge lewdly around the straps of her suit.
+	<<case "transformation fetishist">>
+		girl wearing short shorts and a t-shirt. At first glance it looks like she stuck two overinflated balloons up her shirt but with closer inspection they are revealed to be ridiculous implants.
+	<<case "pastoralist">>
+		girl wearing shorts and a white shirt. There's a little wet spot over each of her nipples.
+	<<case "maturity preferentialist">>
+		girl wearing a school uniform. She keeps rubbing her bottom, making it look like Teacher just spanked her.
+	<<case "youth preferentialist">>
+		girl wearing a child's dress. She looks barely more than three.
+	<<case "slimness enthusiast">>
+		girl wearing shorts and a white shirt. She looks extremely thin.
+	<<case "body purist">>
+		girl. She's recently improved her appearance to look more natural, with freckles and a winning smile.
+	<<default>>
+		girl wearing shorts and a white shirt.
+	<</switch>>
+	<<else>>
+		girl wearing shorts and a white shirt.
 	<</if>>
-  <<else>>
-	wearing shorts and a white shirt.
-  <</if>>
-  <<if ($cockFeeder == 1) and ($seed == 1)>>
+<<if ($cockFeeder == 1) and ($seed == 1)>>
 	A recognizable little representation of one of your slaves has its head between her legs, and is eating her out. The slave must be down in the kitchen, getting a meal out of the food dispensers. As you watch, the little girl orgasms, blushing furiously when she notices you watching.
-  <<elseif ($suppository == 1) and ($seed == 2)>>
+<<elseif ($suppository == 1) and ($seed == 2)>>
 	A recognizable little representation of one of your slaves is down on its knees in front of her, letting the young girl push two fingers gently in and out of her butt. The slave must be receiving her drugs from one of the dildo dispensers. As you watch, the little girl notices you watching her, blushes, looks away, and starts working faster.
-  <<elseif ($masturbationAllowed == 1) and ($seed is 3)>>
+<<elseif ($masturbationAllowed == 1) and ($seed is 3)>>
 	She's having sex with a recognizable little representation of one of your slaves, kissing her and giggling occasionally. The slave must be using one of the penthouse's many vibrators. She sees you watching and blushes, but then shifts a little so you can see better.
-  <<elseif ($seed is 4)>>
+<<elseif ($seed is 4)>>
 	A recognizable little representation of one of your slaves is lying with its head in her lap. The little girl is wearing a toy stethoscope and is listening to the slave breathe; the slave must be getting a checkup. The little girl is patting the girl's head reassuringly.
-  <<elseif ($seed is 5) and ($invasionVictory == 1)>>
+<<elseif ($seed is 5) and ($invasionVictory == 1)>>
 	She's planting a wet kiss on a representation of one of your security drones; she hugs it lovingly and tightly. When she sees you looking at her, she giggles and says, "What? I like him! He did really well during the invasion. And he's cute!"
-  <<elseif ($seed is 6) and ($studio == 1)>>
+<<elseif ($seed is 6) and ($studio == 1)>>
 	She's getting oral from a recognizable little representation of one of your slaves, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and your personal assistant is clearly turning the feed of it into porn.
-	<<elseif ($seed is 7) and ($marketAssistantAnnounced == 1)>>
-		She's accompanied by your market assistant's chubby loli avatar.
-		<<if $marketAssistantRelationship is "cute">>
-			They're sitting face to face, playing a rapid game of patticake. Their conversation exists on the level of code, not speech, detectable only as slight flickerings when their hands connect.
-		<<elseif $marketAssistantRelationship is "nonconsensual">>
-			$assistantName has her chubby playmate pinned under her butt, and is inspecting her loli conquest's pussy. The market assistant's avatar groans as $assistantName's fingers explore her tight passsage, and then claps both hands over her mouth, crying a little, unwilling to give $assistantName the satisfaction.
-		<<elseif $marketAssistantRelationship is "incestuous">>
-			They're playing doctor with each other. $assistantName is currently inspecting her sister's vagina, making sure everything is alright. Once she finishes, she states her diagnosis and the needed cure. She bends over her sister and begins administering her "cure".
-		<<else>>
-			They're playing house with each other, well house based off your penthouse. $assistantName is pretending to be you while her friend assumes $assistantName's role. They are currently caught up in deciding the best way to arrange the beds in the slave quarters.
-		<</if>>
-  <<else>>
+<<elseif ($seed is 7) and ($marketAssistantAnnounced == 1)>>
+	She's accompanied by your market assistant's chubby loli avatar.
+	<<if $marketAssistantRelationship is "cute">>
+		They're sitting face to face, playing a rapid game of patticake. Their conversation exists on the level of code, not speech, detectable only as slight flickerings when their hands connect.
+	<<elseif $marketAssistantRelationship is "nonconsensual">>
+		$assistantName has her chubby playmate pinned under her butt, and is inspecting her loli conquest's pussy. The market assistant's avatar groans as $assistantName's fingers explore her tight passsage, and then claps both hands over her mouth, crying a little, unwilling to give $assistantName the satisfaction.
+	<<elseif $marketAssistantRelationship is "incestuous">>
+		They're playing doctor with each other. $assistantName is currently inspecting her sister's vagina, making sure everything is alright. Once she finishes, she states her diagnosis and the needed cure. She bends over her sister and begins administering her "cure".
+	<<else>>
+		They're playing house with each other, well house based off your penthouse. $assistantName is pretending to be you while her friend assumes $assistantName's role. They are currently caught up in deciding the best way to arrange the beds in the slave quarters.
+	<</if>>
+<<else>>
 	She's watching you attentively, waiting for a chance to be helpful. When she sees your glance, she smiles shyly and looks away before returning to your gaze.
-  <</if>>
+<</if>>
+
 <<elseif $assistantAppearance is "preggololi">>
-  She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>girl with a large pregnant belly
-  <<if $FSAnnounced == 1>>
-	<<if $assistantFSAppearance is "paternalist">>
-	  wearing a cute pink dress.  The middle is stretched tight by her growing belly.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
-	  wearing a girl's stola.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
-	  wearing a bulging white linen dress, kohl eyeshadow and sandals.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
-	  wearing a kimono far to large for herself but does nothing to distract from her swollen midriff.
-	<<elseif $assistantFSAppearance is "arabian revivalist">>
-	  wearing a bulging linen dress and a headscarf.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
-	  wearing a tight silk qipao.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
-	  wearing the garb of a priestess of the new faith.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
-	.  She recently ajusted her pregnancy size to make it even larger.  Her swelling ass and tits spill out from her shorts and tube-top and the occasinal kick can be seen from her octuplets.
-	<<elseif $assistantFSAppearance is "eugenics">>
-	  covered in anti-pregnancy graffiti; written by herself judging from the childish handwriting. She wears a syringe around her neck containing "Abortifacients" and a sign saying "pop me".
-	<<elseif $assistantFSAppearance is "degradationist">>
-	  wearing an open vest and a thong.  It shows off her peirced milky b-cup tits and swollen pregnant belly.  A large bar is driven through her popped navel.
-	<<elseif $assistantFSAppearance is "physical idealist">>
-	  wearing spats and a tight shirt.  Her shirt rides up on her large belly and her growing butt fills out her spats nicely.  She cradles her belly with a sullen look knowing it limits her activities.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
-	  wearing shorts and a t-shirt. Her androgynous look makes her look like a pregnant boy.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
-	  wearing a skirt and a white shirt. She is extremely pregnant, carrying triplets.  She blushes and pats her belly whenever she notices your gaze.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
-	  wearing a school swimsuit. Her breasts are unrealistically huge for her young age and bulge lewdly around the straps of her overfilled suit.  Her suit is extremely tight around the middle thanks to her growing belly.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
-	  wearing short shorts and a t-shirt. At first glance it looks like she stuck two overinflated balloons up her shirt but with closer inspection they are revealed to be ridiculous implants.  They sit atop her bulging belly.
-	<<elseif $assistantFSAppearance is "pastoralist">>
-	  wearing shorts and a white shirt. There's a little wet spot over each of her nipples.  Her breasts have swollen to c-cups thanks to her pregnancy and the milkings.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
-	  wearing a school uniform.  Her top is left unbuttoned to allow her belly room.  She keeps rubbing her bottom, making it look like Teacher just spanked her.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
-	  wearing nothing, as nothing will fit her lewd body. She looks barely more than three and is laying atop her proportionally enormous belly.
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
-	  wearing shorts and a white shirt. Her slim body makes her pregnant belly look much bigger than it is.
-	<<elseif $assistantFSAppearance is "body purist">>
-	. She's recently improved her appearance to look more natural, with freckles and a winning smile.  She cradles her swelling belly and twirls when you look her way.
-    <<else>>
-	  wearing shorts and a white shirt that rides up her growing belly.
+	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>girl with a large pregnant
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
+		belly wearing a cute pink dress.  The middle is stretched tight by her growing belly.
+	<<case "roman revivalist">>
+		belly wearing a girl's stola.
+	<<case "egyptian revivalist">>
+		belly wearing a bulging white linen dress, kohl eyeshadow and sandals.
+	<<case "edo revivalist">>
+		belly wearing a kimono far to large for herself but does nothing to distract from her swollen midriff.
+	<<case "arabian revivalist">>
+		belly wearing a bulging linen dress and a headscarf.
+	<<case "chinese revivalist">>
+		belly wearing a tight silk qipao.
+	<<case "chattel religionist">>
+		belly wearing the garb of a priestess of the new faith.
+	<<case "repopulation focus">>
+		belly. She recently ajusted her pregnancy size to make it even larger.  Her swelling ass and tits spill out from her shorts and tube-top and the occasinal kick can be seen from her octuplets.
+	<<case "eugenics">>
+		belly covered in anti-pregnancy graffiti; written by herself judging from the childish handwriting. She wears a syringe around her neck containing "Abortifacients" and a sign saying "pop me".
+	<<case "degradationist">>
+		belly wearing an open vest and a thong.  It shows off her peirced milky b-cup tits and swollen pregnant belly.  A large bar is driven through her popped navel.
+	<<case "physical idealist">>
+		belly wearing spats and a tight shirt.  Her shirt rides up on her large belly and her growing butt fills out her spats nicely.  She cradles her belly with a sullen look knowing it limits her activities.
+	<<case "gender radicalist">>
+		belly wearing shorts and a t-shirt. Her androgynous look makes her look like a pregnant boy.
+	<<case "gender fundamentalist">>
+		belly wearing a skirt and a white shirt. She is extremely pregnant, carrying triplets.  She blushes and pats her belly whenever she notices your gaze.
+	<<case "asset expansionist">>
+		belly wearing a school swimsuit. Her breasts are unrealistically huge for her young age and bulge lewdly around the straps of her overfilled suit.  Her suit is extremely tight around the middle thanks to her growing belly.
+	<<case "transformation fetishist">>
+		belly wearing short shorts and a t-shirt. At first glance it looks like she stuck two overinflated balloons up her shirt but with closer inspection they are revealed to be ridiculous implants.  They sit atop her bulging belly.
+	<<case "pastoralist">>
+		belly wearing shorts and a white shirt. There's a little wet spot over each of her nipples.  Her breasts have swollen to c-cups thanks to her pregnancy and the milkings.
+	<<case "maturity preferentialist">>
+		belly wearing a school uniform.  Her top is left unbuttoned to allow her belly room.  She keeps rubbing her bottom, making it look like Teacher just spanked her.
+	<<case "youth preferentialist">>
+		belly wearing nothing, as nothing will fit her lewd body. She looks barely more than three and is laying atop her proportionally enormous belly.
+	<<case "slimness enthusiast">>
+		belly wearing shorts and a white shirt. Her slim body makes her pregnant belly look much bigger than it is.
+	<<case "body purist">>
+		belly. She's recently improved her appearance to look more natural, with freckles and a winning smile.  She cradles her swelling belly and twirls when you look her way.
+	<<default>>
+		belly wearing shorts and a white shirt that rides up her growing belly.
+	<</switch>>
+	<<else>>
+		belly wearing shorts and a white shirt that rides up her growing belly.
 	<</if>>
-  <<else>>
-	wearing shorts and a white shirt that rides up her growing belly.
-  <</if>>
-  <<if ($cockFeeder == 1) and ($seed == 1)>>
+<<if ($cockFeeder == 1) and ($seed == 1)>>
 	A recognizable little representation of one of your slaves has its head under her pregnant belly, and is eating her out. The slave must be down in the kitchen, getting a meal out of the food dispensers. As you watch, the little girl orgasms, blushing furiously when she notices you watching.
-  <<elseif ($suppository == 1) and ($seed == 2)>>
+<<elseif ($suppository == 1) and ($seed == 2)>>
 	A recognizable little representation of one of your slaves is down on its knees in front of her, letting the young girl push two fingers gently in and out of her butt. The slave must be receiving her drugs from one of the dildo dispensers. As you watch, the little girl notices you watching her, blushes, looks away, and starts working faster.
-  <<elseif ($masturbationAllowed == 1) and ($seed is 3)>>
+<<elseif ($masturbationAllowed == 1) and ($seed is 3)>>
 	She's having sex with a recognizable little representation of one of your slaves, kissing her and giggling occasionally. The slave must be using one of the penthouse's many vibrators. She sees you watching and blushes, but then shifts a little so you can see better.
-  <<elseif ($seed is 4)>>
+<<elseif ($seed is 4)>>
 	A recognizable little representation of one of your slaves is lying with its head in her lap. The little girl is wearing a toy stethoscope and is listening to the slave breathe; the slave must be getting a checkup. The little girl is patting the girl's head reassuringly.
-  <<elseif ($seed is 5) and ($invasionVictory == 1)>>
+<<elseif ($seed is 5) and ($invasionVictory == 1)>>
 	She's planting a wet kiss on a representation of one of your security drones; she hugs it as best she can with her belly in the way. When she sees you looking at her, she giggles and says, "What? I like him! He did really well during the invasion. And he's cute!"
-  <<elseif ($seed is 6) and ($studio == 1)>>
+<<elseif ($seed is 6) and ($studio == 1)>>
 	She's getting oral from a recognizable little representation of one of your slaves, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and your personal assistant is clearly turning the feed of it into porn.
-	<<elseif ($seed is 7) and ($marketAssistantAnnounced == 1)>>
-		She's accompanied by your market assistant's chubby loli avatar.
-		<<if $marketAssistantRelationship is "cute">>
-			$assistantName is laying on her back with her young friend's ear on her pregnant belly. Their conversation exists on the level of code, not speech, detectable only as slight flutterings of $assistantName's baby kicking.
-		<<elseif $marketAssistantRelationship is "nonconsensual">>
-			$assistantName has her chubby playmate pinned under her butt, and is inspecting her loli conquest's pussy. The market assistant's avatar groans as $assistantName's fingers explore her tight passsage, and then claps both hands over her mouth, crying a little, unwilling to give $assistantName the satisfaction.
-		<<elseif $marketAssistantRelationship is "incestuous">>
-			They're making out with each other, a hand down eachother's panties. Their other hand massaging their mutually swollen bellies, since $assistantName has introduced her sister to her boyfriends.
-		<<else>>
-			They're playing house with each other, well house based off your penthouse. $assistantName is pretending to be you while her friend assumes $assistantName's role. They are currently caught up in figuring out how many children $assistantName's harem could produce.
-		<</if>>
-  <<else>>
+<<elseif ($seed is 7) and ($marketAssistantAnnounced == 1)>>
+	She's accompanied by your market assistant's chubby loli avatar.
+	<<if $marketAssistantRelationship is "cute">>
+		$assistantName is laying on her back with her young friend's ear on her pregnant belly. Their conversation exists on the level of code, not speech, detectable only as slight flutterings of $assistantName's baby kicking.
+	<<elseif $marketAssistantRelationship is "nonconsensual">>
+		$assistantName has her chubby playmate pinned under her butt, and is inspecting her loli conquest's pussy. The market assistant's avatar groans as $assistantName's fingers explore her tight passsage, and then claps both hands over her mouth, crying a little, unwilling to give $assistantName the satisfaction.
+	<<elseif $marketAssistantRelationship is "incestuous">>
+		They're making out with each other, a hand down eachother's panties. Their other hand massaging their mutually swollen bellies, since $assistantName has introduced her sister to her boyfriends.
+	<<else>>
+		They're playing house with each other, well house based off your penthouse. $assistantName is pretending to be you while her friend assumes $assistantName's role. They are currently caught up in figuring out how many children $assistantName's harem could produce.
+	<</if>>
+<<else>>
 	She's watching you attentively, waiting for a chance to be helpful. When she sees your glance, she smiles shyly and looks away before returning to your gaze.
-  <</if>>
+<</if>>
+
+<<elseif $assistantAppearance is "fairy">>
+	She's a cute little fairy
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
+		wearing a well-sewn blue dress, with a large red bow tied to the back of her waist length golden-blonde hair. She looks like a little Bucuretsi doll.
+	<<case "degradationist">>
+		wearing her birthday suit, with her hair in a mess.
+	<<case "roman revivalist">>
+		wearing a small handkercheif wrapped around her like a toga, with one tiny breast sticking out. A wreath made of twisted clovers sits on her head.
+	<<case "egyptian revivalist">>
+		wearing a simple white linen dress and has eyeshadow poorly applied around her eyes.
+	<<case "edo revivalist">>
+		wearing a fine kimono and holding a little fan. She looks like a little Hina doll.
+	<<case "arabian revivalist">>
+		wearing a strip of silk as a dress.
+	<<case "chinese revivalist">>
+		wearing a silk cheongsam with a little green cap on her head. Her hair is braided on the sides. She looks like a figurine from some kind of game.
+	<<case "chattel religionist">>
+		wearing a little gold-white habit.
+	<<case "physical idealist">>
+		wearing a training bra and spats. She has abs poorly drawn on her belly with a marker.
+	<<case "repopulation focus">>
+		wearing a simple dress. Her belly appears to be swollen and ready to burst, but a quick lift of her skirt shows that she's smuggling a grape under there.
+	<<case "gender radicalist">>
+		wearing a pair of pants. Just the pants.
+	<<case "gender fundamentalist">>
+		wearing a well-sewn blue dress, with a large red bow tied to the back of her waist length golden-blonde hair. She looks like a little Bucuretsi doll.
+	<<case "asset expansionist">>
+		wearing a pair of pants and a t-shirt. She has two blueberries stuffed into the front of her shirt.
+	<<case "transformation fetishist">>
+		naked and covered in jelly. She's pretending to be a slime.
+	<<case "pastoralist">>
+		wearing only a pair of overalls. The overalls are just loose enough to let her nearly flat chest to peek out when she turns or bends over.
+	<<case "maturity preferentialist">>
+		wearing an old wool dress and spinning a cane.
+	<<case "youth preferentialist">>
+		wearing a kindergartner's uniform, complete with rain cap and red backpack.
+	<<case "slimness enthusiast">>
+		wearing a handkerchief with a hole in it like a poncho. She looks as slim as usual, with her naked body completely visible from the sides.
+	<<case "body purist">>
+		wearing her birthday suit, with pale unblemished skin on full display and silky golden hair cascading down her back.
+	<<default>>
+		wearing her birthday suit, with her nude form obscured by the light she's giving off. Her silky golden hair cascading down her back.
+	<</switch>>
+	<<else>>
+		wearing her birthday suit, with her nude form obscured by the light she's giving off. Her silky golden hair cascading down her back.
+	<</if>>
+<<if ($cockFeeder is 1) and ($seed is 1)>>
+	A recognizable little representation of one of your slaves underneath her, with her tongue sticking out to catch her dripping love juices. The slave must be down in the kitchen, getting a meal out of the food dispensers. The fairy notices you watching and winks, dripping even more with your eyes on her.
+<<elseif ($suppository is 1) and ($seed is 2)>>
+	A recognizable little representation of one of your slaves is sitting upside-down in front of her, and the fairy is slowly teasing the poor slave's butt with a dildo as big as she is. The slave must be receiving her drugs from one of the dildo dispensers. The fairy notices you watching her and gives you a cheerful little wave, twisting the dildo around and humming a tune.
+<<elseif ($masturbationAllowed is 1) and ($seed is 3)>>
+	A recognizable little representation fucks herself with a toy while she twists the control dial around, to the slave's enjoyment. The slave must be using one of the penthouse's many vibrators. She sees you watching and whispers something in the slave's ear; the slave looks up at you and blushes.
+<<elseif ($seed is 4)>>
+	A recognizable little representation of one of your slaves is sitting up. The fairy is wearing a little doctor's coat and has her head pressed to the slave's chest to hear the slave breathe; the slave must be getting a checkup. The fairy is humming happily as she flies over to a tablet to take notes.
+<<elseif ($seed is 5) and ($invasionVictory is 1)>>
+	She's sitting on the shoulders of a representation of one of your security drone. Every so often, she raises a fist and shouts "For the Imperium of man!". When she sees you looking at her, she grins and says, "This guy is like my robo-buddy. He's the best!"
+<<elseif ($seed is 6) and ($studio is 1)>>
+	A recognizable little representation of one of your slaves is riding a sybian while she uses a handheld camera to film the action. The slave must be using one of the penthouse's many toys, and $assistantName is clearly turning the feed of it into porn.
+<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
+	She's accompanied by your market assistant's own fairy avatar.
+	<<if $marketAssistantRelationship is "cute">>
+		The market assistant is sitting on the end of a book, reading from a tablet for ants. $assistantName is lying down next to her, with her head resting on the other fairy's lap and slowly kicking her feet in the air. The market assistant take a moment to look down at $assistantName and gently pat her head. This elicts a big smile from her.
+	<<elseif $marketAssistantRelationship is "nonconsensual">>
+		The market assistant is naked and sitting before a thimble, as $assistantName sits behind her, teasing and molesting her. She is rather annoyed by her inability to focus on her work, having her nipples and clit pinched and flicked. Her sopping pussy is constantly letting out a small stream of liquid into the thimble. $assistantName is working hard on extracting as much sweet nectar from the fairy as she can, with every climax she wrings out bringing another large deluge of pussy juice into the vessel.
+	<<elseif $marketAssistantRelationship is "incestuous">>
+		The fairy sisters are lying down, each embracing the other as they languidly make out. $assistantName slips one leg in between her sister's, and the two begin rocking against one another. The two grow more and more passionate as they make love together.
+	<<else>>
+		The two fairies are sitting on top of a virtual flower, finishing up their work. With that out of the way, they strip down and each take a stamen and give them a thorough licking. Once coated, they line their stamen up to the other fairy's pussy. They take a moment to hold each other's hand as they slowly slide down the stamen. The two bottom out with a moan, and pull each other into a warm embrace. The market assistant starts buzzing her wings, the vibration causing both of them to yelp. $assistantName grins at this new source of pleasure, locking lips with the market assistant as the two beat their wings to a rhythm only they can hear.
+	<</if>>
+<<else>>
+	She's sitting at the edge of your desk, kicking her feet and humming a pleasant tune. She glances up to check on you and sees you looking at her, and flashes you a great big beautiful smile.
+<</if>>
+
+<<elseif $assistantAppearance is "pregnant fairy">>
+	She's a cute little fairy with a swollen belly
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
+		wearing a well-sewn blue dress, with a large red bow tied to the back of her waist length golden-blonde hair. She looks like a little Bucuretsi doll.
+	<<case "degradationist">>
+		wearing her birthday suit, with her hair in a mess.
+	<<case "roman revivalist">>
+		wearing a small handkercheif wrapped around her like a toga, with one tiny milky breast sticking out. A wreath made of twisted clovers sits on her head.
+	<<case "egyptian revivalist">>
+		wearing a simple white linen dress and has eyeshadow poorly applied around her eyes.
+	<<case "edo revivalist">>
+		wearing a fine kimono and holding a little fan. She looks like a little Hina doll.
+	<<elseif  $assistantFSAppearance is "arabian revivalist">>
+		wearing a strip of silk as a dress.
+	<<case "chinese revivalist">>
+		wearing a silk cheongsam with a little green cap on her head. Her hair is braided on the sides. She looks like a figurine from some kind of game.
+	<<case "chattel religionist">>
+		wearing a little gold-white habit and glowing with purity.
+	<<case "physical idealist">>
+		wearing a training bra and spats. Her large belly sticks out even more.
+	<<case "repopulation focus">>
+		wearing a lovely maternity dress, which shows off her swollen belly.
+	<<case "gender radicalist">>
+		wearing a pair of pants. Just the pants.
+	<<case "gender fundamentalist">>
+		wearing a well-sewn blue dress, with a large red bow tied to the back of her waist length golden-blonde hair. She looks like a little Bucuretsi doll.
+	<<case "asset expansionist">>
+		wearing a pair of pants and a t-shirt. She has two blueberries stuffed into the front of her shirt.
+	<<case "transformation fetishist">>
+		nude and covered in jelly. She's rubbing it all over her swollen belly.
+	<<case "pastoralist">>
+		wearing only a pair of overalls. The overalls are open enough to let her belly pour out.
+	<<case "maturity preferentialist">>
+		wearing an old wool dress and rocking back and forth on a rocking chair, cradling her belly.
+	<<case "youth preferentialist">>
+		wearing a kindergartner's uniform, complete with rain cap and red backpack. Her swollen belly looks out of place.
+	<<case "slimness enthusiast">>
+		wearing a handkerchief with a hole in it like a poncho. Her pregnant belly forces the poncho to spread wide, leaving little of her body to the imagination.
+	<<case "body purist">>
+		wearing her birthday suit, with pale unblemished pregnant belly on full display and silky golden hair cascading down her back.
+	<<default>>
+		wearing her birthday suit, with her nude form obscured by the light coming from her belly. Her silky golden hair cascading down her back.
+	<</switch>>
+	<<else>>
+		wearing her birthday suit, with her nude form obscured by the light coming from her belly. Her silky golden hair cascading down her back.
+	<</if>>
+<<if ($cockFeeder is 1) and ($seed is 1)>>
+	A recognizable little representation of one of your slaves beside her, with her tongue scraping across her breast to catchthe beads of milk that flow. The slave must be down in the kitchen, getting a meal out of the food dispensers. The fairy notices you watching and winks, her unattended breast giving out a small spray of milk.
+<<elseif ($suppository is 1) and ($seed is 2)>>
+	A recognizable little representation of one of your slaves is sitting upside-down in front of her, and the fairy is slowly teasing the poor slave's butt with a dildo as big as she is. The slave must be receiving her drugs from one of the dildo dispensers. The fairy notices you watching her and gives you a cheerful little wave, twisting the dildo around and humming a tune.
+<<elseif ($masturbationAllowed is 1) and ($seed is 3)>>
+	A recognizable little representation fucks herself with a toy while she twists the control dial around, to the slave's enjoyment. The slave must be using one of the penthouse's many vibrators. She sees you watching and whispers something in the slave's ear; the slave looks up at you and blushes.
+<<elseif ($seed is 4)>>
+	A recognizable little representation of one of your slaves is sitting up. The fairy is wearing a little doctor's coat, kept open to accommodate for her belly, and has her head pressed to the slave's chest to hear the slave breathe; the slave must be getting a checkup. The fairy is humming happily as she flies over to a tablet to take notes.
+<<elseif ($seed is 5) and ($invasionVictory is 1)>>
+	She's sitting on the shoulders of a representation of one of your security drone. Every so often, she raises a fist and shouts "For the Imperium of man!". When she sees you looking at her, she grins and says, "This guy is like my robo-buddy. He's the best!"
+<<elseif ($seed is 6) and ($studio is 1)>>
+	A recognizable little representation of one of your slaves is riding a sybian while she uses a handheld camera to film the action. The slave must be using one of the penthouse's many toys, and $assistantName is clearly turning the feed of it into porn.
+<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
+	She's accompanied by your market assistant's own fairy avatar.
+	<<if $marketAssistantRelationship is "cute">>
+		The market assistant is sitting on the end of a book, reading from a tablet for ants. $assistantName is sitting beside her, stroking her belly and humming a relaxing tune.
+	<<elseif $marketAssistantRelationship is "nonconsensual">>
+		The market assistant is sporting her own smaller baby bump now while. With her top down, $assistantName slowly squeezes and massages her breasts from behind, teasing out tiny droplets of milk, much to her annoyance. She suddenly drops her tablet with a yelp as $assistantName drags her tongue across her ear from root to tip.
+	<<elseif $marketAssistantRelationship is "incestuous">>
+		Taking a break, the market assistant sits on $assistantName's lap, nursing away at her lactating breast like a baby. $assistantName coos, keeping on arm to support her sister's back while the other teases her dripping slit.
+	<<else>>
+		The two fairies are slowly making out. The market assistant gently lies $assistantName down, guiding kisses down her body. Taking a moment to suckle from each leaking tit, the market assistant continues down her swollen belly before coming to her delicate flower and tenderly eats the pregnant fairy out.
+	<</if>>
+<<else>>
+	She's sitting at the edge of your desk, cradling her swollen belly and humming a pleasant tune. She glances up to check on you and sees you looking at her, and flashes you a great big beautiful smile.
+<</if>>
+
 <<elseif $assistantAppearance is "slimegirl">>
-  She's a girlish shaped figure, with a crimson core, made entirely out of <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>slime
-  <<if $FSAnnounced == 1>>
-	<<if $assistantFSAppearance is "paternalist">>
-	  with a modest pink dress floating inside her.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
-	  with a girl's stola sinking into her head.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
-	  looking quite perturbed about the amount of sand caught in her.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
-	  with a sliken kimono floating inside her.
-	<<elseif $assistantFSAppearance is "arabian revivalist">>
-	  with a headscarf and a pair of sunglasses floating inside her.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
-	  with a silk qipao floating inside her.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
-	  with several symbols of the your new faith floating inside her.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
-	.  Her amorphous body has noticeable hip, butt, and breast curves as well as several more cores gathered in her rounded stomach.
-	<<elseif $assistantFSAppearance is "eugenics">>
-	  with a chastity belt floating inside her.
-	<<elseif $assistantFSAppearance is "degradationist">>
-	  with a number of piercings sinking into her body.
-	<<elseif $assistantFSAppearance is "physical idealist">>
-	  trying to shape her goo into muscles.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
-	  with a very androgynous appearance. She keeps trying to shape her goo into a cock.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
-	 .  Her amorphous body has noticeable hip, butt, and breast curves.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
-	  .  Her amorphous body has rediculously huge hip, butt, and breast curves.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
-	  with a pair of big silicone implants floating around her chest.
-	<<elseif $assistantFSAppearance is "pastoralist">>
-	  with quite a large amount of milk mixed with her body. She keeps trying to shape her goo into big milky tits.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
-	  with a noticeably large core.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
-	  with a tiny core and immature body
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
-	. She is compacting her slime to make herself look thinner.
-	<<elseif $assistantFSAppearance is "body purist">>
-	  with the purest goo her body could be made of.
+	She's a girlish shaped figure, with a crimson core, made entirely out of <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>
+	<<if $assistantFSOptions>>
+	<<switch $assistantFSAppearance>>
+	<<case "paternalist">>
+		slime with a modest pink dress floating inside her.
+	<<case "roman revivalist">>
+		slime with a girl's stola sinking into her head.
+	<<case "egyptian revivalist">>
+		slime looking quite perturbed about the amount of sand caught in her.
+	<<case "edo revivalist">>
+		slime with a sliken kimono floating inside her.
+	<<case "arabian revivalist">>
+		slime with a headscarf and a pair of sunglasses floating inside her.
+	<<case "chinese revivalist">>
+		slime with a silk qipao floating inside her.
+	<<case "chattel religionist">>
+		slime with several symbols of the your new faith floating inside her.
+	<<case "repopulation focus">>
+		slime. Her amorphous body has noticeable hip, butt, and breast curves as well as several more cores gathered in her rounded stomach.
+	<<case "eugenics">>
+		slime with a chastity belt floating inside her.
+	<<case "degradationist">>
+		slime with a number of piercings sinking into her body.
+	<<case "physical idealist">>
+		slime trying to shape her goo into muscles.
+	<<case "gender radicalist">>
+		slime with a very androgynous appearance. She keeps trying to shape her goo into a cock.
+	<<case "gender fundamentalist">>
+		slime. Her amorphous body has noticeable hip, butt, and breast curves.
+	<<case "asset expansionist">>
+		slime. Her amorphous body has rediculously huge hip, butt, and breast curves.
+	<<case "transformation fetishist">>
+		slime with a pair of big silicone implants floating around her chest.
+	<<case "pastoralist">>
+		slime with quite a large amount of milk mixed with her body. She keeps trying to shape her goo into big milky tits.
+	<<case "maturity preferentialist">>
+		slime with a noticeably large core.
+	<<case "youth preferentialist">>
+		slime with a tiny core and immature body
+	<<case "slimness enthusiast">>
+		slime. She is compacting her slime to make herself look thinner.
+	<<case "body purist">>
+		slime with the purest goo her body could be made of.
     <<else>>
-	  with a pair of shorts and a shirt floating inside her.
+		slime with a pair of shorts and a shirt floating inside her.
+	<</switch>>
+	<<else>>
+		slime with a pair of shorts and a shirt floating inside her.
 	<</if>>
-  <<else>>
-	with a pair of shorts and a shirt floating inside her.
-  <</if>>
   <<if ($cockFeeder == 1) and ($seed == 1)>>
 	A recognizable little representation of one of your slaves has its head in her moist crotch, and is eating her out. The slave must be down in the kitchen, getting a meal out of the food dispensers. As you watch, the goo girl orgasms, nearly turning into a puddle when she notices you watching.
   <<elseif ($suppository == 1) and ($seed == 2)>>
@@ -797,141 +961,7 @@
   <<else>>
 	She's watching you attentively from a bowl filled with her body. When she sees your glance, she reforms herself and awaits your response.
   <</if>>
-<<elseif $assistantAppearance is "shemale">>
-	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>bimbo shemale with blonde hair, <<if $arcologies[0].FSSupremacist != "unset">><<if $arcologies[0].FSSupremacistRace is "black">><<print either("black", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "white">><<print either("tanned", "fair")>><<elseif $arcologies[0].FSSupremacistRace is "latina">><<print either("olive", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "indo-aryan" or $arcologies[0].FSSupremacistRace is "malay" or $arcologies[0].FSSupremacistRace is "pacific islander" or $arcologies[0].FSSupremacistRace is "amerindian">><<print either("dark", "tanned")>><<elseif $arcologies[0].FSSupremacistRace is "asian">><<print either("dark", "tanned")>><<elseif $arcologies[0].FSSupremacistRace is "middle eastern" or $arcologies[0].FSSupremacistRace is "semitic" or $arcologies[0].FSSupremacistRace is "southern European">><<print either("dark", "tanned")>><</if>><<else>>tanned<</if>> skin, huge lips, and ridiculous tits. Her cock hangs past her knees when limp.
-	<<if $FSAnnounced == 1>>
-	<<if $assistantFSAppearance is "paternalist">>
-		She's made herself up to look a bit more classy recently: she has elegant fake nails, and has her hair piled up on her head.
-	<<elseif $assistantFSAppearance is "degradationist">>
-		She's made herself up to look almost comically evil: she's wearing black lipstick, black eyeliner, and a black barbed cockring.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
-		She's taken to reclining on a traditional Roman couch and drinking wine out of a shallow dish.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
-		She's wearing an Egyptian melting perfume cake on her head.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
-		She's wearing a brief Japanese bathhouse robe.
-	<<elseif $assistantFSAppearance is "arabian revivalist">>
-		She's dressed herself like an oil millionare, with aviator sunglasses and a headscarf.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
-		She's added various tattoos of rude Chinese characters to her body recently.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
-		She's wearing the garb of a priestess of the new faith, which frames her cock prominently.
-	<<elseif $assistantFSAppearance is "physical idealist">>
-		She's extremely muscular: she shines with body oil, and her abs have abs.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
-		She is incredably pregnant, her belly preventing her from playing with herself effectively.
-	<<elseif $assistantFSAppearance is "eugenics">>
-		Her sizable dick is restrained in a complicated chastity device.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
-		She's rendered her cock in even more loving detail recently, adding a couple of veins and a bead of precum.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
-		She's taken to concealing her dick recently, and cheekily turns away from you to hide it as much as possible.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
-		She's increased the size of her assets recently: she's increased the girth of her dick until it's as thick as one of her arms, and her boobs are the size of beach balls.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
-		Her tits, ass and lips are carefully rendered to make them look fake.
-	<<elseif $assistantFSAppearance is "pastoralist">>
-		She's lactating, and her orgasms produce comically powerful jets of cum.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
-		She's quite mature, with a lean face that accentuates her cheekbones.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
-		She's surprisingly young, and looks as innocent as a computer generated image of a girl with a pornstar dick possibly can.
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
-		She's recently altered her appearance to be slimmer and more athletic.
-	<<elseif $assistantFSAppearance is "body purist">>
-		She's recently improved her appearance to look more natural, with prettier boobs and softer hips.
-	<</if>>
-	<</if>>
-	<<if ($cockFeeder == 1) and ($seed == 1)>>
-	A recognizable little representation of one of your slaves is down on its knees in front of her, gagging on her enormous dick. The slave must be down in the kitchen, getting a meal out of the phallic food dispensers. As you watch, the shemale orgasms; she notices you watching her, and blows you a wet kiss.
-	<<elseif ($suppository == 1) and ($seed == 2)>>
-	A recognizable little representation of one of your slaves is down on its knees in front of her, moaning as it takes her massive prick. The slave must be receiving her drugs from one of the dildo dispensers. As you watch, the shemale looks up at you, winks, and starts pulling out after each thrust, her cock making a popping noise each time it leaves the slave's butthole.
-	<<elseif ($masturbationAllowed == 1) and ($seed is 3)>>
-	She's giving a blowjob to a recognizable little representation of one of your slaves. The slave must be using one of the penthouse's many vibrators. The shemale is looking after herself, too, jerking herself off with one hand and playing with her asshole with the other.
-	<<elseif ($seed is 4)>>
-	A recognizable little representation of one of your slaves is lying with its head in her lap. The shemale is wearing a little stethoscope and is listening to the slave breathe; the slave must be getting a checkup. The shemale is restraining herself for once, patting the slave's head and cooing reassuringly.
-	<<elseif ($seed is 5) and ($invasionVictory > 0)>>
-	She's masturbating as she takes it up the ass from a representation of one of your security drones, which appears to have a little dildo mounted in place of one of its gun assemblies. When she sees you looking at her, she giggles and says, "What? I like him! He did really well during the invasion."
-	<<elseif ($seed is 6) and ($studio == 1)>>
-	The shemale is plowing a recognizable little representation of one of your slaves up the butt, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and $assistantName is clearly turning the feed of it into porn.
-	<<else>>
-	She's sitting crosslegged, bending down to suck herself off and looking up at you at the same time. When she sees your attention she lets her dick pop free of her mouth and waits for a moment to see if you have instructions for her, and then goes back to autofellatio.
-	<</if>>
-<<elseif $assistantAppearance is "schoolgirl">>
-	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>schoolgirl
-	<<if $FSAnnounced == 1>>
-	<<if $assistantFSAppearance is "paternalist">>
-		wearing a long plaid skirt and a clean white shirt. She does her best to look as prim as possible, which, given her duties, often isn't very prim at all.
-	<<elseif $assistantFSAppearance is "degradationist">>
-		wearing a plaid skirt and a white shirt, though she's hiked the skirt up to show almost everything, and torn the shirt open to bare her perky boobs.
-	<<elseif $assistantFSAppearance is "roman revivalist">>
-		wearing a girl's stola, with her hair pulled up into a proper upper-class Roman coiffure. She usually carries a wax tablet and a stylus.
-	<<elseif $assistantFSAppearance is "egyptian revivalist">>
-		wearing a simple white linen skirt, kohl eyeshadow, sandals, and no top at all, baring her perky young breasts.
-	<<elseif $assistantFSAppearance is "edo revivalist">>
-		wearing a simple robe appropriate for a proper, traditional Japanese lady.
-	<<elseif $assistantFSAppearance is "arabian revivalist">>
-		wearing a long plaid skirt, a clean white shirt, and a headscarf, making her look like an Arab girl attending a Western school.
-	<<elseif $assistantFSAppearance is "chinese revivalist">>
-		wearing a plaid skirt and a white shirt. Her hair is pulled back into a bun and secured by a couple of chopsticks.
-	<<elseif $assistantFSAppearance is "chattel religionist">>
-		wearing a plaid skirt and a white shirt. She has a prominent religious symbol on a necklace that rests at the level of her perky tits.
-	<<elseif $assistantFSAppearance is "physical idealist">>
-		wearing a plaid skirt, a white shirt, and athletic shoes. She usually renders herself flushed with exercise, as though she just came from gym class.
-	<<elseif $assistantFSAppearance is "repopulation focus">>
-	  wearing a plaid skirt and a white shirt, though her shirt rides up her growing pregnancy.  It seems she found another way to support her team.
-	<<elseif $assistantFSAppearance is "eugenics">>
-	  wearing a plaid skirt and a white shirt.  An occasional gust of wind rustles her skirt revealing the chastity belt over her crotch.
-	<<elseif $assistantFSAppearance is "gender radicalist">>
-		wearing a plaid skirt and a white shirt. She's changed her appearance recently to make herself quite androgynous.
-	<<elseif $assistantFSAppearance is "gender fundamentalist">>
-		wearing a plaid skirt and a white shirt. She's changed her appearance recently to make herself as cute and feminine as possible, and she blushes a lot.
-	<<elseif $assistantFSAppearance is "asset expansionist">>
-		wearing a plaid skirt and a white shirt. Her breasts are unrealistically huge for her apparent age, and perfect skin is visible between the buttons of her overstrained shirt.
-	<<elseif $assistantFSAppearance is "transformation fetishist">>
-		wearing a plaid skirt and a white shirt. Her breasts are rendered to make it look like she got a pair of fake tits for her birthday.
-	<<elseif $assistantFSAppearance is "pastoralist">>
-		wearing a plaid skirt and a white shirt. There's a little wet spot over each of her nipples.
-	<<elseif $assistantFSAppearance is "maturity preferentialist">>
-		wearing a plaid skirt and a white shirt. Her short skirt reveals a pink bottom, making it look like Teacher just spanked her.
-	<<elseif $assistantFSAppearance is "youth preferentialist">>
-		wearing a plaid skirt and a white shirt. She looks quite young and innocent, and depicts herself blushing at anything lewd.
-	<<elseif $assistantFSAppearance is "slimness enthusiast">>
-		wearing a plaid skirt and a white shirt. She looks quite young and innocent, and her boobs are elegantly small.
-	<<elseif $assistantFSAppearance is "body purist">>
-		She's recently improved her appearance to look more natural, with freckles and a winning smile.
-	<<else>>
-		wearing a plaid skirt and a white shirt. Her breasts strain against the material, and her skirt is short enough to show off a bit of bottom.
-	<</if>>
-	<<else>>
-	wearing a plaid skirt and a white shirt. Her breasts strain against the material, and her skirt is short enough to show off a bit of bottom.
-	<</if>>
-	<<if ($cockFeeder == 1) && ($seed == 1)>>
-	A recognizable little representation of one of your slaves has its head under the front of her skirt, and is eating her out. The slave must be down in the kitchen, getting a meal out of the food dispensers. As you watch, the schoolgirl orgasms, blushing furiously when she notices you watching.
-	<<elseif ($suppository == 1) && ($seed is 2)>>
-	A recognizable little representation of one of your slaves is down on its knees in front of her, letting the schoolgirl push two fingers gently in and out of her butt. The slave must be receiving her drugs from one of the dildo dispensers. As you watch, the schoolgirl notices you watching her, blushes, looks away, and starts working faster.
-	<<elseif ($masturbationAllowed == 1) && ($seed is 3)>>
-	She's having sex with a recognizable little representation of one of your slaves, kissing her and giggling occasionally. The slave must be using one of the penthouse's many vibrators. She sees you watching and blushes, but then shifts a little so you can see better.
-	<<elseif ($seed is 4)>>
-	A recognizable little representation of one of your slaves is lying with its head in her lap. The schoolgirl is wearing a little stethoscope and is listening to the slave breathe; the slave must be getting a checkup. The schoolgirl is patting the girl's head reassuringly.
-	<<elseif ($seed is 5) && ($invasionVictory > 0)>>
-	She's planting a wet kiss on a representation of one of your security drones; she pats it lovingly and manages to press quite a bit of boob against the side of one of its gun assemblies. When she sees you looking at her, she giggles and says, "What? I like him! He did really well during the invasion. And he's cute!"
-	<<elseif ($seed is 6) && ($studio == 1)>>
-	She's getting oral from a recognizable little representation of one of your slaves, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and $assistantName is clearly turning the feed of it into porn.
-	<<elseif ($seed is 7) && ($marketAssistantAnnounced == 1)>>
-		She's accompanied by your market assistant's nerdy schoolgirl avatar.
-		<<if $marketAssistantRelationship is "cute">>
-			They're sitting next to each other, and appear to be doing homework side by side. The market assistant's work looks like complicated math problems, while $assistantName is looking through lewd pictures of slaves, albeit with some kind of higher purpose.
-		<<elseif $marketAssistantRelationship is "nonconsensual">>
-			$assistantName is wearing a strap-on, and is bullying her schoolgirl conquest's pussy. The market assistant's avatar orgasms loudly as you watch, and then claps both hands over her mouth, crying a little, unwilling to give $assistantName the satisfaction.
-		<<elseif $marketAssistantRelationship is "incestuous">>
-			They're making faces at each other and giggling, but as you watch them, this degenerates rapidly into clumsy kissing, groping of each others' breasts, and finally some enthusiastic tribbing.
-		<<else>>
-			$assistantName is giving the market assistant's avatar oral, and to go by the bespectacled girl's gasping, is doing a good job. $assistantName finishes and leans back, wiping her mouth and grinning as her lover bends over to return the favor.
-		<</if>>
-	<<else>>
-	She's watching you attentively, waiting for a chance to be helpful. When she sees your glance, she smiles hopefully, sticks out her chest a little, and turns from side to side to show off.
-	<</if>>
+
 <<else>>
 	It's a little abstract symbol; when <<if $assistant == 0>>it<<else>>she<</if>> speaks, the symbol glows slightly.
 <</if>>
diff --git a/src/uncategorized/personalAssistantOptions.tw b/src/uncategorized/personalAssistantOptions.tw
index a3061369951d1af64aef9a226c86eb88f7d7d65b..31c11e03f7f3035420188022eb4f303d0a443d74 100644
--- a/src/uncategorized/personalAssistantOptions.tw
+++ b/src/uncategorized/personalAssistantOptions.tw
@@ -18,15 +18,12 @@ Seated at your desk, you glance at the visual representation of $assistantName,
 
 <<display "Personal Assistant Appearance">>
 
-<<if $assistant > 0>>
 <<if $assistantPower > 0>>
 	<br><br>
 	Though <<if $assistant == 0>>it<<else>>she<</if>> remains short of a true AI, the arcology's upgraded computer core allows <<if $assistant == 0>>it<<else>>her<</if>> to use brute force to simulate sentient behavior quite well. <<if $assistant == 0>>It<<else>>She<</if>> is not truly self aware, but <<if $assistant == 0>>it<<else>>she<</if>> is able to predict what a sentient being with a certain character might say or do in common situations. The increased power has other applications; for example, it has improved the accuracy of your estimates of economic activity in the Free City.
 <<else>>
 	<<if $assistant == 0>>It<<else>>She<</if>> is well short of a true AI, but with extensive access to information on past human behavior and the processing power to query that information quickly, <<if $assistant == 0>>it<<else>>she<</if>> can often seem self aware by modeling herself after others' past behavior.
 <</if>>
-<</if>>
-
 <br><br>
 
 __Computer Core Upgrades__
@@ -39,10 +36,10 @@ __Computer Core Upgrades__
 <<else>>
 	//The arcology's computer core is fully upgraded.//
 <</if>>
-
-<br><br>
+<br>
 
 <<if $assistantOptions>>
+<br>
 __Behavior settings:__
 <br>
 
@@ -51,87 +48,470 @@ __Behavior settings:__
 <<else>>
 	Your assistant is simulating preferences and a sex drive. [[Revert her to normal settings|Personal assistant options][$assistant to 0, $assistantAppearance to "normal"]]
 <</if>>
+<br>
 
 <<if $assistant != 0>>
 
-<br><br>
-__Appearance settings:__
 <br>
-She is currently using the ''$assistantAppearance'' appearance.
+__Appearance settings:__
 <br>
-<<if $assistantAppearance != "normal">>
-	[[Normal|Personal assistant options][$assistantAppearance to "normal"]]
-	<br>
+She is currently using the ''$assistantAppearance'' avatar.
+<<if $PAPublic == 1>>
+<<set _seed = []>>
+<<switch $assistantAppearance>>
+	<<case "businesswoman">>
+		<<if $arcologies[0].FSSubjugationist != "unset">> <<set _seed.push($arcologies[0].FSSubjugationistRace + " subjugation")>> <</if>>
+		<<if $arcologies[0].FSDegradationist != "unset">> <<set _seed.push("degradationism")>> <</if>>
+		<<if $arcologies[0].FSTransformationFetishist != "unset">> <<set _seed.push("transformation fetishism")>> <</if>>
+		<<if $arcologies[0].FSMaturityPreferentialist != "unset">> <<set _seed.push("maturity preferentialism")>> <</if>>
+		<<if $arcologies[0].FSAssetExpansionist != "unset">> <<set _seed.push("asset expansionism")>> <</if>>
+		<<if $arcologies[0].FSRomanRevivalist != "unset">> <<set _seed.push("Roman revivalism")>> <</if>>
+		<<if $arcologies[0].FSArabianRevivalist != "unset">> <<set _seed.push("Arabian revivalism")>> <</if>>
+		<<if $arcologies[0].FSRestart != "unset">> <<set _seed.push("Eugenics")>> <</if>>
+	<<case "goddess">>
+		<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+		<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+		<<if $arcologies[0].FSBodyPurist != "unset">> <<set _seed.push("body purism")>> <</if>>
+		<<if $arcologies[0].FSMaturityPreferentialist != "unset">> <<set _seed.push("maturity preferentialism")>> <</if>>
+		<<if $arcologies[0].FSPastoralist != "unset">> <<set _seed.push("pastoralism")>> <</if>>
+		<<if $arcologies[0].FSChattelReligionist != "unset">> <<set _seed.push("chattel religionism")>> <</if>>
+		<<if $arcologies[0].FSEgyptianRevivalist != "unset">> <<set _seed.push("Egyptian revivalism")>> <</if>>
+		<<if $arcologies[0].FSRepopulationFocus != "unset">> <<set _seed.push("Repopulationism")>> <</if>>
+	<<case "amazon">>
+		<<if $arcologies[0].FSSupremacist != "unset">> <<set _seed.push($arcologies[0].FSSupremacistRace + " supremacy")>> <</if>>
+		<<if $arcologies[0].FSSubjugationist != "unset">> <<set _seed.push($arcologies[0].FSSubjugationistRace + " subjugation")>> <</if>>
+		<<if $arcologies[0].FSBodyPurist != "unset">> <<set _seed.push("body purism")>> <</if>>
+		<<if $arcologies[0].FSPhysicalIdealist != "unset">> <<set _seed.push("physical idealism")>> <</if>>
+		<<if $arcologies[0].FSRomanRevivalist != "unset">> <<set _seed.push("Roman revivalism")>> <</if>>
+		<<if $arcologies[0].FSEdoRevivalist != "unset">> <<set _seed.push("Edo revivalism")>> <</if>>
+	<<case "schoolgirl">>
+		<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+		<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+		<<if $arcologies[0].FSYouthPreferentialist != "unset">> <<set _seed.push("youth preferentialism")>> <</if>>
+		<<if $arcologies[0].FSSlimnessEnthusiast != "unset">> <<set _seed.push("slimness enthusiasm")>> <</if>>
+		<<if $arcologies[0].FSArabianRevivalist != "unset">> <<set _seed.push("Arabian revivalism")>> <</if>>
+		<<if $arcologies[0].FSChineseRevivalist != "unset">> <<set _seed.push("Chinese revivalism")>> <</if>>
+	<<case "monstergirl">>
+		<<if $arcologies[0].FSSupremacist != "unset">> <<set _seed.push($arcologies[0].FSSupremacistRace + " supremacy")>> <</if>>
+		<<if $arcologies[0].FSGenderRadicalist != "unset">> <<set _seed.push("gender radicalism")>> <</if>>
+		<<if $arcologies[0].FSDegradationist != "unset">> <<set _seed.push("degradationism")>> <</if>>
+		<<if $arcologies[0].FSChattelReligionist != "unset">> <<set _seed.push("chattel religionism")>> <</if>>
+		<<if $arcologies[0].FSEgyptianRevivalist != "unset">> <<set _seed.push("Egyptian revivalism")>> <</if>>
+		<<if $arcologies[0].FSEdoRevivalist != "unset">> <<set _seed.push("Edo revivalism")>> <</if>>
+		<<if $arcologies[0].FSChineseRevivalist != "unset">> <<set _seed.push("Chinese revivalism")>> <</if>>
+	<<case "shemale">>
+		<<if $arcologies[0].FSGenderRadicalist != "unset">> <<set _seed.push("gender radicalism")>> <</if>>
+		<<if $arcologies[0].FSTransformationFetishist != "unset">> <<set _seed.push("transformation fetishism")>> <</if>>
+		<<if $arcologies[0].FSYouthPreferentialist != "unset">> <<set _seed.push("youth preferentialism")>> <</if>>
+		<<if $arcologies[0].FSSlimnessEnthusiast != "unset">> <<set _seed.push("slimness enthusiasm")>> <</if>>
+		<<if $arcologies[0].FSAssetExpansionist != "unset">> <<set _seed.push("asset expansionism")>> <</if>>
+		<<if $arcologies[0].FSPastoralist != "unset">> <<set _seed.push("pastoralism")>> <</if>>
+		<<if $arcologies[0].FSPhysicalIdealist != "unset">> <<set _seed.push("physical idealism")>> <</if>>
+	<<case "hypergoddess">>
+		<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+		<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+		<<if $arcologies[0].FSAssetExpansionist != "unset">> <<set _seed.push("asset expansionism")>> <</if>>
+		<<if $arcologies[0].FSPastoralist != "unset">> <<set _seed.push("pastoralism")>> <</if>>
+		<<if $arcologies[0].FSRepopulationFocus != "unset">> <<set _seed.push("Repopulationism")>> <</if>>
+	<<case "loli">>
+		<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+		<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+		<<if $arcologies[0].FSBodyPurist != "unset">> <<set _seed.push("body purism")>> <</if>>
+		<<if $arcologies[0].FSYouthPreferentialist != "unset">> <<set _seed.push("youth preferentialism")>> <</if>>
+		<<if $arcologies[0].FSSlimnessEnthusiast != "unset">> <<set _seed.push("slimness enthusiasm")>> <</if>>
+		<<if $arcologies[0].FSEdoRevivalist != "unset">> <<set _seed.push("Edo revivalism")>> <</if>>
+	<<case "preggololi">>
+		<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+		<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+		<<if $arcologies[0].FSDegradationist != "unset">> <<set _seed.push("degradationism")>> <</if>>
+		<<if $arcologies[0].FSYouthPreferentialist != "unset">> <<set _seed.push("youth preferentialism")>> <</if>>
+		<<if $arcologies[0].FSRepopulationFocus != "unset">> <<set _seed.push("Repopulationism")>> <</if>>
+	<<case "fairy">>
+		<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+		<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+		<<if $arcologies[0].FSBodyPurist != "unset">> <<set _seed.push("body purism")>> <</if>>
+	<<case "pregnant fairy">>
+		<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+		<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+		<<if $arcologies[0].FSBodyPurist != "unset">> <<set _seed.push("body purism")>> <</if>>
+		<<if $arcologies[0].FSRepopulationFocus != "unset">> <<set _seed.push("Repopulationism")>> <</if>>
+<</switch>>
+<<if _seed.length > 0>>
+	<<set _desc = "">>
+	<<for _i = 0; _i < _seed.length; _i++>>
+		<<set _desc = (_desc + _seed[_i])>>
+		<<if (_i < _seed.length-2)>>
+			<<set _desc = (_desc + ", ")>>
+		<<elseif (_seed.length > 2) && (_i == _seed.length-2)>>
+			<<set _desc = (_desc + ", and ")>>
+		<<elseif (_seed.length == 2) && (_i == 0)>>
+			<<set _desc = (_desc + " and ")>>
+		<</if>>
+	<</for>>
+This appearance bolsters _desc.
+<<else>>
+It has no impact on public opinion.
 <</if>>
-<<if $assistantAppearance isnot "fairy">>
-  [[Fairy|Personal assistant options][$assistantAppearance to "fairy"]]
-  <br>
 <</if>>
-<<if $assistantAppearance isnot "pregnant fairy">>
-  [[Pregnant Fairy|Personal assistant options][$assistantAppearance to "pregnant fairy"]]
-  <br>
+<br>
+
+<<if $assistantAppearance != "normal">> [[Normal|Personal assistant options][$assistantAppearance to "normal"]]
+	<br>
+<</if>>
+<<if $assistantAppearance != "businesswoman">> [[Businesswoman|Personal assistant options][$assistantAppearance to "businesswoman"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if $arcologies[0].FSSubjugationist != "unset">> <<set _seed.push($arcologies[0].FSSubjugationistRace + " subjugation")>> <</if>>
+	<<if $arcologies[0].FSDegradationist != "unset">> <<set _seed.push("degradationism")>> <</if>>
+	<<if $arcologies[0].FSTransformationFetishist != "unset">> <<set _seed.push("transformation fetishism")>> <</if>>
+	<<if $arcologies[0].FSMaturityPreferentialist != "unset">> <<set _seed.push("maturity preferentialism")>> <</if>>
+	<<if $arcologies[0].FSAssetExpansionist != "unset">> <<set _seed.push("asset expansionism")>> <</if>>
+	<<if $arcologies[0].FSRomanRevivalist != "unset">> <<set _seed.push("Roman revivalism")>> <</if>>
+	<<if $arcologies[0].FSArabianRevivalist != "unset">> <<set _seed.push("Arabian revivalism")>> <</if>>
+	<<if $arcologies[0].FSRestart != "unset">> <<set _seed.push("Eugenics")>> <</if>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
+	<br>
 <</if>>
-<<if $assistantAppearance != "businesswoman">>
-	[[Businesswoman|Personal assistant options][$assistantAppearance to "businesswoman"]]
+<<if $assistantAppearance != "goddess">> [[Goddess|Personal assistant options][$assistantAppearance to "goddess"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+	<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+	<<if $arcologies[0].FSBodyPurist != "unset">> <<set _seed.push("body purism")>> <</if>>
+	<<if $arcologies[0].FSMaturityPreferentialist != "unset">> <<set _seed.push("maturity preferentialism")>> <</if>>
+	<<if $arcologies[0].FSPastoralist != "unset">> <<set _seed.push("pastoralism")>> <</if>>
+	<<if $arcologies[0].FSChattelReligionist != "unset">> <<set _seed.push("chattel religionism")>> <</if>>
+	<<if $arcologies[0].FSEgyptianRevivalist != "unset">> <<set _seed.push("Egyptian revivalism")>> <</if>>
+		<<if $arcologies[0].FSRepopulationFocus != "unset">> <<set _seed.push("Repopulationism")>> <</if>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
 	<br>
 <</if>>
-<<if $assistantAppearance != "goddess">>
-	[[Goddess|Personal assistant options][$assistantAppearance to "goddess"]]
+<<if $assistantAppearance != "amazon">> [[Amazon|Personal assistant options][$assistantAppearance to "amazon"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if $arcologies[0].FSSupremacist != "unset">> <<set _seed.push($arcologies[0].FSSupremacistRace + " supremacy")>> <</if>>
+	<<if $arcologies[0].FSSubjugationist != "unset">> <<set _seed.push($arcologies[0].FSSubjugationistRace + " subjugation")>> <</if>>
+	<<if $arcologies[0].FSBodyPurist != "unset">> <<set _seed.push("body purism")>> <</if>>
+	<<if $arcologies[0].FSPhysicalIdealist != "unset">> <<set _seed.push("physical idealism")>> <</if>>
+	<<if $arcologies[0].FSRomanRevivalist != "unset">> <<set _seed.push("Roman revivalism")>> <</if>>
+	<<if $arcologies[0].FSEdoRevivalist != "unset">> <<set _seed.push("Edo revivalism")>> <</if>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
 	<br>
 <</if>>
-<<if $assistantAppearance != "hypergoddess" && $seeHyperPreg == 1>>
-  [[Hyper Goddess|Personal assistant options][$assistantAppearance to "hypergoddess"]]
-  <br>
+<<if $assistantAppearance != "schoolgirl">> [[Schoolgirl|Personal assistant options][$assistantAppearance to "schoolgirl"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+	<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+	<<if $arcologies[0].FSYouthPreferentialist != "unset">> <<set _seed.push("youth preferentialism")>> <</if>>
+	<<if $arcologies[0].FSSlimnessEnthusiast != "unset">> <<set _seed.push("slimness enthusiasm")>> <</if>>
+	<<if $arcologies[0].FSArabianRevivalist != "unset">> <<set _seed.push("Arabian revivalism")>> <</if>>
+	<<if $arcologies[0].FSChineseRevivalist != "unset">> <<set _seed.push("Chinese revivalism")>> <</if>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
+	<br>
 <</if>>
-<<if $assistantAppearance != "loli" && $minimumSlaveAge < 13>>
-  [[Loli|Personal assistant options][$assistantAppearance to "loli"]]
-  <br>
+<<if $seeDicks != 0>>
+<<if $assistantAppearance != "monstergirl">> [[Monstergirl|Personal assistant options][$assistantAppearance to "monstergirl"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if $arcologies[0].FSSupremacist != "unset">> <<set _seed.push($arcologies[0].FSSupremacistRace + " supremacy")>> <</if>>
+	<<if $arcologies[0].FSGenderRadicalist != "unset">> <<set _seed.push("gender radicalism")>> <</if>>
+	<<if $arcologies[0].FSDegradationist != "unset">> <<set _seed.push("degradationism")>> <</if>>
+	<<if $arcologies[0].FSChattelReligionist != "unset">> <<set _seed.push("chattel religionism")>> <</if>>
+	<<if $arcologies[0].FSEgyptianRevivalist != "unset">> <<set _seed.push("Egyptian revivalism")>> <</if>>
+	<<if $arcologies[0].FSEdoRevivalist != "unset">> <<set _seed.push("Edo revivalism")>> <</if>>
+	<<if $arcologies[0].FSChineseRevivalist != "unset">> <<set _seed.push("Chinese revivalism")>> <</if>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
+	<br>
 <</if>>
-<<if $assistantAppearance != "preggololi" && $fertilityAge < 13 && $minimumSlaveAge < 13>>
-  [[Preggololi|Personal assistant options][$assistantAppearance to "preggololi"]]
-  <br>
+<<if $assistantAppearance != "shemale">> [[Shemale|Personal assistant options][$assistantAppearance to "shemale"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if $arcologies[0].FSGenderRadicalist != "unset">> <<set _seed.push("gender radicalism")>> <</if>>
+	<<if $arcologies[0].FSTransformationFetishist != "unset">> <<set _seed.push("transformation fetishism")>> <</if>>
+	<<if $arcologies[0].FSYouthPreferentialist != "unset">> <<set _seed.push("youth preferentialism")>> <</if>>
+	<<if $arcologies[0].FSSlimnessEnthusiast != "unset">> <<set _seed.push("slimness enthusiasm")>> <</if>>
+	<<if $arcologies[0].FSAssetExpansionist != "unset">> <<set _seed.push("asset expansionism")>> <</if>>
+	<<if $arcologies[0].FSPastoralist != "unset">> <<set _seed.push("pastoralism")>> <</if>>
+	<<if $arcologies[0].FSPhysicalIdealist != "unset">> <<set _seed.push("physical idealism")>> <</if>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
+	<br>
 <</if>>
-<<if $assistantAppearance != "amazon">>
-	[[Amazon|Personal assistant options][$assistantAppearance to "amazon"]]
+<<if $assistantAppearance != "hypergoddess" && $seeHyperPreg == 1>> [[Hyper Goddess|Personal assistant options][$assistantAppearance to "hypergoddess"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+	<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+	<<if $arcologies[0].FSAssetExpansionist != "unset">> <<set _seed.push("asset expansionism")>> <</if>>
+	<<if $arcologies[0].FSPastoralist != "unset">> <<set _seed.push("pastoralism")>> <</if>>
+	<<if $arcologies[0].FSRepopulationFocus != "unset">> <<set _seed.push("Repopulationism")>> <</if>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
 	<br>
 <</if>>
-<<if $assistantAppearance != "schoolgirl">>
-	[[Schoolgirl|Personal assistant options][$assistantAppearance to "schoolgirl"]]
+<<if $assistantAppearance != "loli" && $minimumSlaveAge < 13>> [[Loli|Personal assistant options][$assistantAppearance to "loli"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+	<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+	<<if $arcologies[0].FSBodyPurist != "unset">> <<set _seed.push("body purism")>> <</if>>
+	<<if $arcologies[0].FSYouthPreferentialist != "unset">> <<set _seed.push("youth preferentialism")>> <</if>>
+	<<if $arcologies[0].FSSlimnessEnthusiast != "unset">> <<set _seed.push("slimness enthusiasm")>> <</if>>
+	<<if $arcologies[0].FSEdoRevivalist != "unset">> <<set _seed.push("Edo revivalism")>> <</if>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
 	<br>
 <</if>>
-<<if $seeDicks != 0>>
-<<if $assistantAppearance != "monstergirl">>
-	[[Monstergirl|Personal assistant options][$assistantAppearance to "monstergirl"]]
+<<if $assistantAppearance != "preggololi" && $fertilityAge < 13 && $minimumSlaveAge < 13>> [[Preggololi|Personal assistant options][$assistantAppearance to "preggololi"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+	<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+	<<if $arcologies[0].FSDegradationist != "unset">> <<set _seed.push("degradationism")>> <</if>>
+	<<if $arcologies[0].FSYouthPreferentialist != "unset">> <<set _seed.push("youth preferentialism")>> <</if>>
+	<<if $arcologies[0].FSRepopulationFocus != "unset">> <<set _seed.push("Repopulationism")>> <</if>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
 	<br>
 <</if>>
-<<if $assistantAppearance != "shemale">>
-	[[Shemale|Personal assistant options][$assistantAppearance to "shemale"]]
+<<if $assistantAppearance isnot "fairy">> [[Fairy|Personal assistant options][$assistantAppearance to "fairy"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+	<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+	<<if $arcologies[0].FSBodyPurist != "unset">> <<set _seed.push("body purism")>> <</if>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
 	<br>
 <</if>>
+<<if $assistantAppearance isnot "pregnant fairy">> [[Pregnant Fairy|Personal assistant options][$assistantAppearance to "pregnant fairy"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if $arcologies[0].FSGenderFundamentalist != "unset">> <<set _seed.push("gender fundamentalism")>> <</if>>
+	<<if $arcologies[0].FSPaternalist != "unset">> <<set _seed.push("paternalism")>> <</if>>
+	<<if $arcologies[0].FSBodyPurist != "unset">> <<set _seed.push("body purism")>> <</if>>
+	<<if $arcologies[0].FSRepopulationFocus != "unset">> <<set _seed.push("Repopulationism")>> <</if>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
+	<br>
 <</if>>
 <<if $assistantExtra1 == 1>>
-<<if $assistantAppearance != "slimegirl">>
-	[[Slime Girl|Personal assistant options][$assistantAppearance to "slimegirl"]]
+<<if $assistantAppearance != "slimegirl">> [[Slime Girl|Personal assistant options][$assistantAppearance to "slimegirl"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
 	<br>
 <</if>>
-<<if $assistantAppearance != "cowgirl">>
-	[[Cow Girl|Personal assistant options][$assistantAppearance to "cowgirl"]]
+<<if $assistantAppearance != "cowgirl">> [[Cow Girl|Personal assistant options][$assistantAppearance to "cowgirl"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
 	<br>
 <</if>>
-<<if $assistantAppearance != "harpygirl">>
-	[[Harpy Girl|Personal assistant options][$assistantAppearance to "harpygirl"]]
+<<if $assistantAppearance != "harpygirl">> [[Harpy Girl|Personal assistant options][$assistantAppearance to "harpygirl"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
 	<br>
 <</if>>
-<<if $assistantAppearance != "kitsunegirl">>
-	[[Kitsune|Personal assistant options][$assistantAppearance to "kitsunegirl"]]
+<<if $assistantAppearance != "kitsunegirl">> [[Kitsune|Personal assistant options][$assistantAppearance to "kitsunegirl"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
 	<br>
 <</if>>
-<<if $assistantAppearance != "lamiagirl">>
-	[[Lamia|Personal assistant options][$assistantAppearance to "lamiagirl"]]
+<<if $assistantAppearance != "lamiagirl">> [[Lamia|Personal assistant options][$assistantAppearance to "lamiagirl"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
 	<br>
 <</if>>
-<<if $assistantAppearance != "spidergirl">>
-	[[Spider Girl|Personal assistant options][$assistantAppearance to "spidergirl"]]
+<<if $assistantAppearance != "spidergirl">> [[Spider Girl|Personal assistant options][$assistantAppearance to "spidergirl"]]
+	<<if $PAPublic == 1>>
+	<<set _seed = []>>
+	<<if _seed.length > 0>>
+		<<set _desc = "">>
+		<<for _i = 0; _i < _seed.length; _i++>>
+			<<set _desc = (_desc + _seed[_i])>>
+			<<if (_i < _seed.length-2)>> <<set _desc = (_desc + ", ")>>
+			<<elseif (_seed.length > 2) && (_i == _seed.length-2)>> <<set _desc = (_desc + ", and ")>>
+			<<elseif (_seed.length == 2) && (_i == 0)>> <<set _desc = (_desc + " and ")>>
+			<</if>>
+		<</for>>
+		A good emblem for _desc
+	<</if>>
+	<</if>>
 	<br>
 <</if>>
 <</if>>
@@ -151,11 +531,11 @@ __Downloadable Appearances:__
 */
 
 /* Choose her FS appearance */
-<<if ($assistantFSOptions != 0 and $assistant != 0)>>
-<br><br>
+<<if $assistantFSOptions != 0 and $assistantAppearance != "normal">>
+<br>
 __Society-specific appearance settings:__
 <br>
-She is currently using the ''$assistantFSAppearance'' appearance.
+She can further refine her avatar to match the arcology's social profile<<if $assistantFSAppearance != "default">>; her current variation shows ''$assistantFSAppearance'' touches.<<else>>, though no details stand out right now.<</if>>
 <br>
 <<if $assistantFSAppearance != "default">>
 	[[Default|Personal assistant options][$assistantFSAppearance to "default"]]
@@ -243,8 +623,10 @@ She is currently using the ''$assistantFSAppearance'' appearance.
 <</if>>
 <</if>>
 
+<</if>> /* CLOSES PERSONALITY ACTIVE REQUIREMENT */
+
 <<if ($assistantNameAnnounced != 0)>>
-	<br><br>
+<br>
 	__Name:__
 	<<textbox "$assistantName" $assistantName "Personal assistant options">>
 	<<if $assistantName != "your personal assistant">>
@@ -261,8 +643,8 @@ She is currently using the ''$assistantFSAppearance'' appearance.
 __Business Assistant settings:__
 <br>
 The arcology's upgraded computers support advanced business analysis.
-<<if $assistant>>
-	These capabilities are represented by an avatar styled after $assistantName's, with which simulates a ''$marketAssistantRelationship'' relationship.
+<<if $assistantAppearance != "normal">>
+	These capabilities are represented by an avatar styled after $assistantName's, with which she simulates a ''$marketAssistantRelationship'' relationship.
 	<br>
 	<<if $marketAssistantRelationship != "cute">>
 		[[Cute|Personal assistant options][$marketAssistantRelationship to "cute"]]
@@ -280,6 +662,9 @@ The arcology's upgraded computers support advanced business analysis.
 		[[Incestuous|Personal assistant options][$marketAssistantRelationship to "incestuous"]]
 		<br>
 	<</if>>
+<<else>>
+	Although technically an expanded subroutine within the same app, $assistantName uses a distinct icon to identify these alerts and improve your workflow.
+	<br>
 <</if>>
 <br>
 <<if $assistant>>She<<else>>It<</if>> is
diff --git a/src/uncategorized/ptWorkaround.tw b/src/uncategorized/ptWorkaround.tw
index a5338584e448df0b1a8a78071293f336543aea07..8b7a7b29faf009a24d45b391a3079186c2cb46da 100644
--- a/src/uncategorized/ptWorkaround.tw
+++ b/src/uncategorized/ptWorkaround.tw
@@ -43,7 +43,7 @@
         <<BothVCheck 4 2>>
     <</if>>
 <</if>>
-<<if $PC.career is "slaver">>
+<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 	Your @@color:springgreen;slave training experience@@ allows you to @@color:hotpink;bend her to your will@@ more quickly without provoking resistance.
 	<<set $activeSlave.devotion += 1>>
 <</if>>
@@ -107,7 +107,7 @@
 		$activeSlave.slaveName remains devoted to an old world faith that serves her as a reservoir of mental resilience. Like all such beliefs, hers has certain sexual elements; you amuse yourself by forcing her to break them, and rewarding her generously when she does.
 	<</if>>
 	<<set $activeSlave.training += 100-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -115,28 +115,7 @@
 	<<else>>
 		<<set $activeSlave.training = 0>>
 		By the end of the week, @@color:green;you resolve her flaw into something special.@@ @@color:hotpink;Her obedience has increased.@@
-		<<if $activeSlave.behavioralFlaw != "none">>
-			<<if ($activeSlave.behavioralFlaw is "arrogant")>>
-				<<set $activeSlave.behavioralQuirk to "confident">>
-			<<elseif ($activeSlave.behavioralFlaw is "bitchy")>>
-				<<set $activeSlave.behavioralQuirk to "cutting">>
-			<<elseif ($activeSlave.behavioralFlaw is "odd")>>
-				<<set $activeSlave.behavioralQuirk to "funny">>
-			<<elseif ($activeSlave.behavioralFlaw is "hates men")>>
-				<<set $activeSlave.behavioralQuirk to "adores women">>
-			<<elseif ($activeSlave.behavioralFlaw is "hates women")>>
-				<<set $activeSlave.behavioralQuirk to "adores men">>
-			<<elseif ($activeSlave.behavioralFlaw is "gluttonous")>>
-				<<set $activeSlave.behavioralQuirk to "fitness">>
-			<<elseif ($activeSlave.behavioralFlaw is "anorexic")>>
-				<<set $activeSlave.behavioralQuirk to "insecure">>
-			<<elseif ($activeSlave.behavioralFlaw is "devout")>>
-				<<set $activeSlave.behavioralQuirk to "sinful">>
-			<<elseif ($activeSlave.behavioralFlaw is "liberated")>>
-				<<set $activeSlave.behavioralQuirk to "advocate">>
-			<</if>>
-			<<set $activeSlave.behavioralFlaw to "none">>
-		<</if>>
+		<<SoftenBehavioralFlaw $activeSlave>>
 		<<set $activeSlave.devotion += 4>>
 	<</if>>
 	<<if $activeSlave.fetishKnown != 1>>
@@ -214,7 +193,7 @@
 		<<set $activeSlave.oralCount += 10, $oralTotal += 10>>
 	<</switch>>
 	<<set $activeSlave.training += 100-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -222,29 +201,7 @@
 	<<else>>
 		<<set $activeSlave.training = 0>>
 		By the end of the week, @@color:green;you resolve her flaw into something special.@@ @@color:hotpink;Her obedience has increased.@@
-		<<if $activeSlave.sexualFlaw != "none">>
-			<<switch $activeSlave.sexualFlaw>>
-			<<case "hates oral")>>
-				<<set $activeSlave.sexualQuirk to "gagfuck queen">>
-			<<case "hates anal")>>
-				<<set $activeSlave.sexualQuirk to "painal queen">>
-			<<case "hates penetration")>>
-				<<set $activeSlave.sexualQuirk to "strugglefuck queen">>
-			<<case "shamefast")>>
-				<<set $activeSlave.sexualQuirk to "tease">>
-			<<case "idealistic")>>
-				<<set $activeSlave.sexualQuirk to "romantic">>
-			<<case "repressed")>>
-				<<set $activeSlave.sexualQuirk to "perverted">>
-			<<case "apathetic")>>
-				<<set $activeSlave.sexualQuirk to "caring">>
-			<<case "crude")>>
-				<<set $activeSlave.sexualQuirk to "unflinching">>
-			<<case "judgemental")>>
-				<<set $activeSlave.sexualQuirk to "size queen">>
-			<</switch>>
-			<<set $activeSlave.sexualFlaw to "none">>
-		<</if>>
+		<<SoftenSexualFlaw $activeSlave>>
 		<<set $activeSlave.devotion += 4>>
 	<</if>>
 	<<if $activeSlave.fetishKnown != 1>>
@@ -373,7 +330,7 @@
 	<<else>>
 		$activeSlave.slaveName violently resists you whenever she can. This cannot be permitted, so after a particularly severe bout of physical resistance, you decide to employ an old method of breaking a mind without damaging a body. You secure her to a board and gently wash her face with a wet cloth. She spits in defiance, only to be surprised when you lower the board so that her feet are higher than her head. You tie the cloth around her face. A thin stream of water onto the cloth produces all the feeling and none of the reality of a slow death by drowning. Waterboarding isn't much use for extracting information, but it works well for @@color:gold;slavebreaking.@@
 	<</if>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		Your @@color:springgreen;slavebreaking experience@@ allows you to apply @@color:gold;exquisitely calibrated@@ mental pressure.
 		<<set $activeSlave.trust -= 2>>
 	<</if>>
@@ -448,7 +405,7 @@
 		@@color:gold;encourages her fear@@ of you.
 		<<set $activeSlave.trust -= 10>>
 	<</if>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		Your @@color:springgreen;slave-breaking experience@@ allows you to apply @@color:gold;exquisite agony@@ without any increase in damage.
 		<<set $activeSlave.trust -= 5>>
 	<</if>>
@@ -492,7 +449,7 @@
 		$activeSlave.slaveName remains devoted to an old world faith that serves her as a reservoir of mental resilience. You carefully select pressure points to break her of this by forcing her to violate her faith's purity codes, constantly. She is forced to eat, dress, and fuck in ways that convince her that she must either condemn herself as an irredeemable sinner, or abandon her beliefs.
 	<</if>>
 	<<set $activeSlave.training += 120-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -615,7 +572,7 @@
 		<</if>>
 	<</switch>>
 	<<set $activeSlave.training += 120-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -783,7 +740,7 @@
 	Since you've decided to incite her to arrogance, you praise her effusively, and give orders that others are to do so as well. Other slaves are punished for things she's allowed to get away with.
 	<<InduceFlawLenityEffects>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -798,7 +755,7 @@
 	Since you've decided to induce her to bitchiness, you keep her in your office and induce her to criticize other slaves, rewarding her when she's especially catty.
 	<<InduceFlawLenityEffects>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -813,7 +770,7 @@
 	<<InduceFlawAbuseEffects>>
 	<<if ($activeSlave.vagina > -1) && ($activeSlave.vaginalAccessory != "chastity belt")>><<VaginalVCheck 10>><<else>><<AnalVCheck 10>><</if>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -828,7 +785,7 @@
 	<<InduceFlawAbuseEffects>>
 	<<if ($activeSlave.vagina > -1) && ($activeSlave.vaginalAccessory != "chastity belt")>><<VaginalVCheck 10>><<else>><<AnalVCheck 10>><</if>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -843,7 +800,7 @@
 	<<InduceFlawAbuseEffects>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
 	<<set $activeSlave.oralCount += 10, $oralTotal += 10>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -856,7 +813,7 @@
 <<case "induce gluttony">>
 	Inducing gluttony is harder than inducing anorexia; you force her to orgasm when she's eating, and praise her effusively when she gains weight. You also provide her with ample rations for stress eating.
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -870,7 +827,7 @@
 	You criticize her cruelly whenever she eats, and praise thinner slaves to her face at every opportunity.
 	<<InduceFlawAbuseEffects>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -884,7 +841,7 @@
 	You direct a campaign of abuse and threats at her, and surreptitiously ensure that a little religious text from her home country finds its way into a hiding place in her living area.
 	<<InduceFlawAbuseEffects>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -898,7 +855,7 @@
 	You direct a campaign of abuse and threats at her, making sure to threaten her with the absolute worst of slavery in your arcology. You also arrange for her to witness other citizen's slaves in situations that aren't much fun.
 	<<InduceFlawAbuseEffects>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -913,7 +870,7 @@
 	<<InduceFlawAbuseEffects>>
 	<<AnalVCheck 10>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -928,7 +885,7 @@
 	<<InduceFlawAbuseEffects>>
 	<<AnalVCheck 10>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -943,7 +900,7 @@
 	<<InduceFlawAbuseEffects>>
 	<<if ($activeSlave.vagina > -1) && ($activeSlave.vaginalAccessory != "chastity belt")>><<VaginalVCheck 10>><<else>><<AnalVCheck 10>><</if>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -957,7 +914,7 @@
 	Since you've decided to force shame on her, you keep her in your office whenever she's not otherwise occupied, and heap derision on her at every opportunity, even inviting visitors to join you in chats about how unattractive and worthless she is.
 	<<InduceFlawAbuseEffects>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -971,7 +928,7 @@
 	Since you've decided to induce her to sexual idealism, you keep her in your office, and when the two of you are all alone, gossip with her about other slaves and even citizens. You do your best to encourage her to believe absurdities.
 	<<InduceFlawLenityEffects>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -985,7 +942,7 @@
 	Since you've decided to force sexual repression on her, you keep her in your office whenever she's not otherwise occupied. You use the monitoring systems to reveal her sexual arousal whenever it appears, and castigate and punish her for it.
 	<<InduceFlawAbuseEffects>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -1000,7 +957,7 @@
 	<<InduceFlawAbuseEffects>>
 	<<if ($activeSlave.vagina > -1) && ($activeSlave.vaginalAccessory != "chastity belt")>><<VaginalVCheck 10>><<else>><<AnalVCheck 10>><</if>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -1015,7 +972,7 @@
 	<<if ($activeSlave.vagina > -1) && ($activeSlave.vaginalAccessory != "chastity belt")>><<VaginalVCheck 10>><<else>><<AnalVCheck 10>><</if>>
 	<<InduceFlawAbuseEffects>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -1029,7 +986,7 @@
 	Since you've decided to make her sexually judgemental, you keep her in your office and fuck her, <<if $PC.dick == 1>>praising her whenever she takes your big dick well<<else>>using a huge strap-on on her and praising her when she takes it like a good girl<</if>>. You also judge others' endowments in her presence.
 	<<InduceFlawLenityEffects>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -1043,7 +1000,7 @@
 	The cumslut is quite pleased when you order her to stay in your office whenever she can for use as one of your personal oral toys. You carefully limit her orgasms to when <<if $PC.dick == 1>>you're blowing your load down her throat<<else>>she's swallowing your pussyjuice<</if>>, and make her oral adventures predictably regular.
 	<<set $activeSlave.oralCount += 10, $oralTotal += 10>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -1057,7 +1014,7 @@
 	The buttslut is quite pleased when you order her to stay in your office whenever she can for use as one of your personal anal toys. You make her anal orgasms predictably regular, doing your best to inculcate reliance on them.
 	<<AnalVCheck 10>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -1071,7 +1028,7 @@
 	The humiliation slut is quite pleased when you order her to stay in your office whenever she can, and fucking her whenever other slaves are present. You do your best to focus her attention on how the others react to the spectacle.
 	<<if ($activeSlave.vagina > -1) && ($activeSlave.vaginalAccessory != "chastity belt")>><<VaginalVCheck 10>><<else>><<AnalVCheck 10>><</if>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -1084,7 +1041,7 @@
 <<case "induce breast growth obsession">>
 	You inspect her breasts multiple times a day, and praise her effusively when they grow at all. You treat it as though it were something she could control personally.
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -1098,7 +1055,7 @@
 	The dom is gratified when you order her to stay in your office whenever she can to fuck any slave you feel like throwing her way. You do your best to limit her menu items to reluctant or even rebellious slaves, and praise her when she forces herself on them.
 	<<set $activeSlave.penetrativeCount += 20, $penetrativeTotal += 20>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -1112,7 +1069,7 @@
 	The sadist is gratified when you order her to stay in your office whenever she can to have her way with any slave you feel like throwing her way. You do your best to limit her menu items to rebellious slaves, and praise her when her sadism makes her an effective punishment tool.
 	<<set $activeSlave.penetrativeCount += 20, $penetrativeTotal += 20>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -1126,7 +1083,7 @@
 	You order the masochist to stay in your office whenever she's not working or resting. You fuck her cruelly, going beyond the pain she enjoys into harsh degradation. And every time you use her, you make sure to tell her how useless she is.
 	<<if ($activeSlave.vagina > -1) && ($activeSlave.vaginalAccessory != "chastity belt")>><<VaginalVCheck 10>><<else>><<AnalVCheck 10>><</if>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -1140,7 +1097,7 @@
 	You order the sub to stay in your office whenever she's not working or resting, and use her body for your pleasure. The instant you climax, you go back to your work or to another slave, treating her like a piece of used tissue.
 	<<if ($activeSlave.vagina > -1) && ($activeSlave.vaginalAccessory != "chastity belt")>><<VaginalVCheck 10>><<else>><<AnalVCheck 10>><</if>>
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
@@ -1154,7 +1111,7 @@
 	You order the pregnant slut to stay in your office whenever she's not working or resting.
 	<<if $activeSlave.preg <= 0>>Since she's not pregnant, you keep her rigged up with an enormous sympathy belly when she's there.<</if>> Rather than fucking her, you praise her pregnancy effusively, and only allow her to get off when you're doing so.
 	<<set $activeSlave.training += 80-($activeSlave.intelligence*10)+(($activeSlave.devotion+$activeSlave.trust)/10)>>
-	<<if $PC.career is "slaver">>
+	<<if ($PC.career == "slaver") || ($PC.career == "arcology owner")>>
 		<<set $activeSlave.training += 20>>
 	<</if>>
 	<<if $activeSlave.training < 100>>
diff --git a/src/uncategorized/randomIndividualEvent.tw b/src/uncategorized/randomIndividualEvent.tw
index b18d48a2e0b9fbfd1734041f5f3a99dd2c6465fa..9c54764c7973990b81b87e9c6e49ce35ea56b2ac 100644
--- a/src/uncategorized/randomIndividualEvent.tw
+++ b/src/uncategorized/randomIndividualEvent.tw
@@ -688,7 +688,7 @@
 <<if $eventSlave.trust >= -50>>
 <<if $eventSlave.fetish != "boobs">>
 <<if $eventSlave.intelligence > -2>>
-	<<set $RESSTRevent.push("breast expansion blues")>>
+	<<set $RESSevent.push("breast expansion blues")>>
 <</if>>
 <</if>>
 <</if>>
@@ -698,12 +698,52 @@
 <</if>>
 <</if>>
 
+<<if $eventSlave.physicalAge > 35>>
+<<if $eventSlave.speechRules != "restrictive">>
+<<if ($eventSlave.assignment == "serve the public") || ($eventSlave.assignment == "whore")>>
+<<if $eventSlave.devotion > -20>>
+<<if $eventSlave.devotion <= 95>>
+	<<set $RESSTRevent.push("ara ara")>>
+<</if>>
+<</if>>
+<</if>>
+<</if>>
+<</if>>
+
+<<if $eventSlave.anus > 3>>
+<<if $eventSlave.devotion > 50>>
+<<if $eventSlave.trust > 50>>
+	<<set $RESSTRevent.push("gaped asshole")>>
+<</if>>
+<</if>>
+<</if>>
+
+<<if $eventSlave.health > 90>>
+<<if $eventSlave.muscle > 5>>
+<<if $eventSlave.weight <= 30>>
+<<if $eventSlave.weight >= -30>>
+<<if $eventSlave.trust > 50>>
+<<if $eventSlave.devotion > 50>>
+	<<set $RESSTRevent.push("passing declaration")>>
+<</if>>
+<</if>>
+<</if>>
+<</if>>
+<</if>>
+<</if>>
+
+<<if $eventSlave.trust < -50>>
+<<if $eventSlave.devotion < 50>>
+	<<set $RESSTRevent.push("im scared")>>
+<</if>>
+<</if>>
+
 <</if>> /* closes mute exempt */
 
-<<if $eventSlave.vaginaLube > 0>>
+<<if $eventSlave.vaginaLube > 1>>
 <<if $eventSlave.devotion > 20>>
 <<if $eventSlave.vagina > -1>>
-	<<set $RESSTRevent.push("moist pussy")>>
+	<<set $RESSevent.push("moist pussy")>>
 <</if>>
 <</if>>
 <</if>>
@@ -712,7 +752,7 @@
 <<if $eventSlave.trust <= -20>>
 <<if $eventSlave.dick > 0>>
 <<if $eventSlave.attrXY < 50>>
-	<<set $RESSTRevent.push("transition anxiety")>>
+	<<set $RESSevent.push("transition anxiety")>>
 <</if>>
 <</if>>
 <</if>>
diff --git a/src/uncategorized/randomNonindividualEvent.tw b/src/uncategorized/randomNonindividualEvent.tw
index bc5bee64d22ec23350008a10401265ccb1543cff..de247bed12886d7c624f044d59f4dfd2aae58abe 100644
--- a/src/uncategorized/randomNonindividualEvent.tw
+++ b/src/uncategorized/randomNonindividualEvent.tw
@@ -747,8 +747,8 @@
 	<<if ($slaves[$i].devotion > 50)>>
 	<<if canWalk($slaves[$i])>>
 	<<if random(1,100) > 80+(totalRelatives($slaves[$i])*5)>>
-		<<for $j to 0; $j < $recruiters.length; $j++>>
-			<<if $slaves[$i].ID is $recruiters[$j].ID>>
+		<<for $j to 0; $j < $slavesOriginal.length; $j++>>
+			<<if $slaves[$i].ID is $slavesOriginal[$j].ID>>
 				<<set $events.push("RE relative recruiter")>>
 				<<break>>
 			<</if>>
diff --git a/src/uncategorized/reFSAcquisition.tw b/src/uncategorized/reFSAcquisition.tw
index c954bcfd20bd913f330fb92920af716536b16953..89217ff9d464dba39497efbd20fdbd87b7f3a216 100644
--- a/src/uncategorized/reFSAcquisition.tw
+++ b/src/uncategorized/reFSAcquisition.tw
@@ -1,5 +1,5 @@
 :: RE FS acquisition
- 
+
 <<nobr>>
 
 <<set $nextButton to "Continue">>
@@ -567,7 +567,7 @@ The call comes in from an office, and you suppress the urge to check whether $as
 <span id="result">
 <<if $cash >= $contractCost>>\
 <<click "Enslave her">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost>>
 	<<replace "#result">>
 	<<switch $FSAcquisition>>\
diff --git a/src/uncategorized/reFSEgyptianRevivalistAcquisition.tw b/src/uncategorized/reFSEgyptianRevivalistAcquisition.tw
index e89393769a9d5ad7b41aef1cbe272918b2098302..e1cd0c6c9c09d2235bf5fa1998ecf161e5a2ffc0 100644
--- a/src/uncategorized/reFSEgyptianRevivalistAcquisition.tw
+++ b/src/uncategorized/reFSEgyptianRevivalistAcquisition.tw
@@ -1,5 +1,4 @@
 :: RE FSEgyptianRevivalist acquisition
- 
 /* Written and coded by Boney M */
 <<nobr>>
 
@@ -46,7 +45,7 @@ This call is coming from a public kiosk, which is usually an indication that the
 
 <span id="result">
 <<if $cash >= $contractCost>>\
-[[Enslave the pair|RE FSEgyptianRevivalist acquisition workaround][$sibling to $activeSlave, $slaves.push($sibling), $genePool.push($sibling), $cash -= ($contractCost)]]
+[[Enslave the pair|RE FSEgyptianRevivalist acquisition workaround][$sibling to $activeSlave, $cash -= ($contractCost)]]
 <<else>>\
 	//You lack the necessary funds to enslave them.//
 <</if>>\
diff --git a/src/uncategorized/reFSEgyptianRevivalistAcquisitionWorkaround.tw b/src/uncategorized/reFSEgyptianRevivalistAcquisitionWorkaround.tw
index ff16a7f1596fda899cdf7a59e681ace9d14ae604..89ee6ae0d2717f7ccb7b90f76413a0b67c629267 100644
--- a/src/uncategorized/reFSEgyptianRevivalistAcquisitionWorkaround.tw
+++ b/src/uncategorized/reFSEgyptianRevivalistAcquisitionWorkaround.tw
@@ -1,15 +1,13 @@
 :: RE FSEgyptianRevivalist acquisition workaround
- 
+
 /* Written and coded by Boney M */
 They arrive hand-in-hand and don't let go of each other until the end of the enslavement process, and even after they break their grip and undress at your instruction, their eyes never stray far from each other. With a closer look at them, their blood relation is as obvious as their infatuation with one another. No wonder they couldn't keep it a secret.
 
-<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-	<<AutoRulesActivate 1>>
-<</if>>
+<<AddSlave $sibling>>
 
 <<set _secondSlave to $activeSlave>>
 
-<<display "Nationality to Name">>
+<<NationalityToName>>
 
 <<set _secondSlave.slaveName to $activeSlave.birthName>>
 <<set _secondSlave.ID to $activeSlave.ID + 1000>>
@@ -27,7 +25,6 @@ They arrive hand-in-hand and don't let go of each other until the end of the ens
 <<set _secondSlave.relationshipTarget to $activeSlave.ID - 1000>>
 
 
-
 <<set _secondSlave.hStyle to either("ass-length", "long", "shoulder-length", "short", "very short", "shaved bald")>>
 <<if (_secondSlave.actualAge <= 22)>>
 	<<set _secondSlave.career to $youngCareers.random()>>
@@ -97,5 +94,4 @@ They arrive hand-in-hand and don't let go of each other until the end of the ens
 
 <</if>>
 
-	<<set $genePool.push(_secondSlave)>>
-	<<set $slaves.push(_secondSlave)>>
+<<AddSlave _secondSlave>>
\ No newline at end of file
diff --git a/src/uncategorized/reMalefactor.tw b/src/uncategorized/reMalefactor.tw
index b5520a22dfa366f3b1bcdfd28459bf2a56bad80a..fa41d83edd07e6f31163576f70f533128eed99ac 100644
--- a/src/uncategorized/reMalefactor.tw
+++ b/src/uncategorized/reMalefactor.tw
@@ -231,7 +231,7 @@
 <span id="result">
 <<if $cash >= $contractCost>>
 	<<click "Enslave her">>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 		<<if $malefactor is "addict">>
@@ -265,7 +265,7 @@
 		<</if>>
 		<</if>>
 		<<if $activeSlave.publicCount>><<set $activeSlave.publicCount += 47>><<else>><<set $activeSlave.publicCount to 47>><</if>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 		<<if $malefactor is "addict">>
@@ -295,7 +295,7 @@
 		<<set $activeSlave.assignment to "be confined in the arcade">><<set $activeSlave.assignmentVisible to 0>>
 		<<set $activeSlave.choosesOwnAssignment to 0>>
 		<<set $activeSlave.sentence to 4>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 		<<if $malefactor is "addict">>
@@ -325,10 +325,7 @@
 		<<set $activeSlave.assignment to "work in the dairy">>
 		<<set $activeSlave.assignmentVisible to 0>>
 		<<set $activeSlave.choosesOwnAssignment to 0>>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 		<<if $malefactor is "addict">>
@@ -358,7 +355,7 @@
 		<<set $activeSlave.amp to 1>>
 		<<set $activeSlave.heels to 0>>
 		<<set $activeSlave.behavioralFlaw to "odd">>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 		<<if $malefactor is "addict">>
@@ -387,10 +384,7 @@
 		<<set $activeSlave.balls to 0>>
 		<<set $activeSlave.devotion -= 25>>
 		<<set $activeSlave.trust -= 25>>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 		Video feeds from your remote surgery are made public as the protesting criminal is strapped down and gelded. She is so utterly broken by this turn of events that you complete the legalities and biometric scanning without fuss. The condemned sobs weakly throughout the process until you grow tired of the whining and apply punishment. Then it's off to the penthouse for basic slave induction. The public @@color:green;approves of this harshness,@@ which increases your arcology's prosperity by @@color:green;giving it a reputation for swift and terrible justice.@@
@@ -404,10 +398,7 @@
 	<br><<click "'adopt' her">>
 		<<set $activeSlave.devotion = 25>>
 		<<set $activeSlave.trust = 25>>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 			You sit down and talk to the exhausted girl, handing her a contract cleverly altered to resemble adoption papers. Once she comprehends what she is looking at, she eagerly signs it. Only once she has reached the penthouse and been introduced to the slave life does she realize she willingly signed away her freedom. Though she can't complain. A warm cot and plenty of food await, which to her is a huge improvement over a slow death on the streets. The public @@color:red;feels you let this criminal off too easy.@@
diff --git a/src/uncategorized/reRecruit.tw b/src/uncategorized/reRecruit.tw
index 02c1bb85f83e29a7c98060416898512d07cb4def..b75a49aa56417b12d311ae309c362769ad7bef25 100644
--- a/src/uncategorized/reRecruit.tw
+++ b/src/uncategorized/reRecruit.tw
@@ -1,5 +1,5 @@
 :: RE recruit
- 
+
 <<nobr>>
 
 <<set $nextButton to "Continue">>
@@ -1390,7 +1390,7 @@ Your desk flags a video message as having potential. It's a desperate refugee fr
 <span id="result">
 <<if $cash >= $contractCost>>\
 <<click "Enslave her">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost>>
 	<<replace "#result">>
 	<<nobr>>
diff --git a/src/uncategorized/reRelativeRecruiter.tw b/src/uncategorized/reRelativeRecruiter.tw
index 0b1fe031a37ad3ace2350ec39dc39a4a37ce8fa3..0747d730a21ec9bdc33358537902e4cdbdde6419 100644
--- a/src/uncategorized/reRelativeRecruiter.tw
+++ b/src/uncategorized/reRelativeRecruiter.tw
@@ -15,10 +15,10 @@
 	<<if $slaves[$i].canRecruit == 1>>
 	<<if ($slaves[$i].devotion > 50)>>
 	<<if canWalk($slaves[$i])>>
-	<<for $j to 0; $j < $recruiters.length; $j++>>
-		<<if $slaves[$i].ID is $recruiters[$j].ID>>
+	<<for $j to 0; $j < $slavesOriginal.length; $j++>>
+		<<if $slaves[$i].ID is $slavesOriginal[$j].ID>>
 			<<set $eventSlave to $slaves[$i]>>
-			<<set $activeSlave to $recruiters[$j]>>
+			<<set $activeSlave to $slavesOriginal[$j]>>
 			<<break>>
 		<</if>>
 	<</for>>
@@ -470,7 +470,7 @@ She waits anxiously for your decision.
 	
 <<slaveCost $activeSlave>>
 
-<<display "Nationality to Name">>
+<<NationalityToName>>
 <<if $useFSNames == 0>>
 	<<set $activeSlave.slaveName to $activeSlave.birthName>>
 <<elseif $arcologies[0].FSRomanRevivalist > 20>>
@@ -515,7 +515,7 @@ You look up the $activeSlave.relation. She costs ¤$slaveCost, a bargain, but yo
 <br><br>
 <span id="result">
 <<click "Buy her">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $slaveCost>>
 	<<switch $relationType>>
 	<<case "daughter">>
@@ -732,11 +732,10 @@ You look up the $activeSlave.relation. She costs ¤$slaveCost, a bargain, but yo
 	<<if ($slaves[$i].devotion > 50)>>
 	<<if ($slaves[$i].relation == 0)>>
 	<<if canWalk($slaves[$i])>>
-		<<for $j to 0; $j < $recruiters.length; $j++>>
-			<<if $slaves[$i].ID is $recruiters[$j].ID>>
+		<<for $j to 0; $j < $slavesOriginal.length; $j++>>
+			<<if $slaves[$i].ID is $slavesOriginal[$j].ID>>
 				<<set $eventSlave to $slaves[$i]>>
-				<<set $activeSlave to $recruiters[$j]>>
-				<<set $dump to $recruiters.pluck([$j], [$j])>>
+				<<set $activeSlave to $slavesOriginal[$j]>>
 				<<break>>
 			<</if>>
 		<</for>>
@@ -972,7 +971,7 @@ She waits anxiously for your decision.
 	
 <<slaveCost $activeSlave>>
 
-<<display "Nationality to Name">>
+<<NationalityToName>>
 <<if $useFSNames == 0>>
 	<<set $activeSlave.slaveName to $activeSlave.birthName>>
 <<elseif $arcologies[0].FSRomanRevivalist > 20>>
@@ -1008,7 +1007,7 @@ You look up the $activeSlave.relation. She costs ¤$slaveCost, a bargain, but yo
 <br><br>
 <span id="result">
 <<click "Buy her">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $slaveCost>>
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $activeSlave.relationTarget is $slaves[$i].ID>>
diff --git a/src/uncategorized/reShelterInspection.tw b/src/uncategorized/reShelterInspection.tw
index dd5939fe3063ccfd600ed5bca686d5889f4eb502..82f662184d2083afe6a3bfbfa178361dd16ae430 100644
--- a/src/uncategorized/reShelterInspection.tw
+++ b/src/uncategorized/reShelterInspection.tw
@@ -1,5 +1,5 @@
 :: RE shelter inspection
- 
+
 <<nobr>>
 
 <<set $nextButton to "Continue">>
@@ -52,10 +52,7 @@ Your assistant announces a visitor in the entryway of your penthouse, and adds<<
 \
 <span id="result">
 <<click "Amusing. Enslave her">>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost>>
 	<<replace "#result">>
 	<<if $assistantName is "your personal assistant">>Your personal assistant<<else>>$assistantName<</if>> ushers her into your penthouse and keeps her busy for the few minutes you need to circumvent the Shelter's various legal and contractual defenses to prevent slaveowners from doing exactly what you're doing. Fortunately, you're cleverer and richer than most, and you succeed. You have her brought into your office, and you are pleased to see her. She's not young and she's not pretty, but her suit cannot disguise her big bottom, and she's using the tablet she has clasped protectively against her chest to conceal a huge pair of mature breasts. She knows exactly what's happened, and fixes you with a gimlet stare. "In a couple of months," she says with venom, "when you've filled me full of hormones and drugs and training, and I'm begging you to <<if $PC.dick == 1>>stick your tiny little dick up<<else>>fist<</if>> my asshole, remember this. It'll be conditioning and self-preservation and Stockholm Syndrome talking, not me. I think you're a <<if $PC.title == 1>>sad bastard<<else>>vile cunt<</if>>, and I always will."
@@ -70,10 +67,7 @@ Your assistant announces a visitor in the entryway of your penthouse, and adds<<
 	<<set $activeSlave.assignmentVisible to 0>>
 	<<set $activeSlave.clothes to "no clothing">>
 	<<set $activeSlave.lactation to 2>>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost/2>>
 	<<replace "#result">>
 	$subSlave.slaveName is attached to a milking machine, so it would be extremely unwise to let the inspector report on $subSlave.slaveName's industrial fate in all its gorgeous productivity. So, you greet her politely, and bring her down to $dairyName to show her $subSlave.slaveName. The inspector has a single moment to stiffen in shock at the sight before she stiffens involuntarily due to the security drone tazing her unconscious. It takes a few credits here and there to circumvent the Shelter's various legal and contractual defenses to prevent slaveowners from doing exactly what you're doing, but you finish the day richer by one more big-boobed milk producer. You leave the inspector's drug dosage low to start, so she can appreciate her situation for a while. When the inspector awakes, her visor is set to show an overhead view of her bay in $dairyName. She sees her breasts, already larger than she remembers, gently swaying with the pumping of the milkers.<<if $dairyFeedersSetting > 1>> She sees the huge phallus occupying her mouth, and feels nutrition sliding down her throat.<</if>><<if $dairyPregSetting > 1>> She sees her vagina drooling as it's fucked in preparation for pregnancy.<</if>><<if $dairyPregSetting > 1>> She sees a massive piston moving slowly back and forth beneath her buttocks, and understands what the ache of impossible fullness in her bottom is.<</if>> Her hands ball into fists.
diff --git a/src/uncategorized/reShippingContainer.tw b/src/uncategorized/reShippingContainer.tw
index 5a3f48c178ee697f3c8df748fed8f35b76e685fd..7caeefc174a0661b2c7e87d1810c25672c8d69ce 100644
--- a/src/uncategorized/reShippingContainer.tw
+++ b/src/uncategorized/reShippingContainer.tw
@@ -1,22 +1,19 @@
 :: RE shipping container [nobr]
- 
+
 <<set $nextButton to "Continue">>
 <<set $nextLink to "RIE Eligibility Check">>
 
 <<set $seed = Math.trunc(($slaveCostFactor*1000)/100)*100>>
 <<set $seed to Math.clamp($seed, 500, 1500)>>
 
+<<set _newSlaves = []>>
 <<for $i to 0; $i < 5; $i++>>
 	<<display "Generate XX Slave">>
 	<<set $activeSlave.origin to "She arrived at your arcology in an undocumented shipping container.">>
 	<<set $activeSlave.devotion = random(-90,-75)>>
 	<<set $activeSlave.trust = -20>>
 	<<set $activeSlave.health = -10>>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<set _newSlaves.push($activeSlave)>>
 <</for>>
 <<set $helots += 25>>
 
@@ -42,14 +39,9 @@ For now, the crowd around you is looking at the helpless human cargo with
 <span id="result">
 <<click "Conduct an impromptu auction">>
 	<<replace "#result">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if ($slaves[$i].weekAcquired == $week)>>
-		<<if ($slaves[$i].origin is "She arrived at your arcology in an undocumented shipping container.")>>
-			<<slaveCost $slaves[$i]>>
-			<<set $cash += $slaveCost>>
-			<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
-		<</if>>
-		<</if>>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<slaveCost _newSlaves[$i]>>
+		<<set $cash += $slaveCost>>
 	<</for>>
 	Allowing humor into your voice, you announce an auction, to be held immediately. The crowd appreciates the wit, and @@color:green;appreciates it even more@@ when you conduct the auction yourself. It's always good to take an opportunity to show off your understanding of the slave market in public. You @@color:yellowgreen;sell them all,@@ sex slaves and menials alike. Welcome to the Free Cities.
 	<<set $helots -= 25>>
@@ -59,6 +51,9 @@ For now, the crowd around you is looking at the helpless human cargo with
 <</click>>
 <br><<click "Keep them">>
 	<<replace "#result">>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<AddSlave _newSlaves[$i]>>
+	<</for>>
 	You announce that the shipment is in violation of shipping and slave market regulations, and is being confiscated. There's a certain @@color:red;disappointment@@ in the crowd that nothing more interesting came of it, but it's minor when compared to the chattel you just seized.
 	<<set $rep -= 50>>
 	<</replace>>
@@ -66,12 +61,11 @@ For now, the crowd around you is looking at the helpless human cargo with
 <<if $arcologies[0].FSDegradationist isnot "unset">>
 <br><<click "Indulge the crowd's Degradationism">>
 	<<replace "#result">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if ($slaves[$i].origin is "She arrived at your arcology in an undocumented shipping container.")>>
-			<<set $slaves[$i].anus to 3>>
-			<<if $activeSlave.vagina > -1>><<set $slaves[$i].vagina to 3>><</if>>
-			<<set $slaves[$i].health -= 20>>
-		<</if>>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<if _newSlaves[$i].vagina > -1>><<set _newSlaves[$i].vagina to 3>><</if>>
+		<<set _newSlaves[$i].anus to 3>>
+		<<set _newSlaves[$i].health -= 20>>
+		<<AddSlave _newSlaves[$i]>>
 	<</for>>
 	You use the container handling systems to segregate the obvious menials from the those with any potential as sex slaves. The menials go into a different container, which is whisked off, leaving a little shivering knot of frightened bodies, vulnerable and naked. The crowd watched all this with good humor, and there's silence enough that everyone hears your quiet announcement. You announce that the shipment is in violation of shipping and slave market regulations, and is being confiscated; however, you don't expect to see these particular slaves delivered to your penthouse for a couple of hours. Then you turn your back and walk away. The crowd gives a kind of @@color:green;appreciative howl@@ which, understandably, produces a wail of terror from the slaves. As you head off, the sobbing turns into screaming. It sounds like your new slaves might be a bit stretched out, here and there.
 	<<set $rep += 200>>
@@ -80,14 +74,9 @@ For now, the crowd around you is looking at the helpless human cargo with
 <<elseif $arcologies[0].FSPaternalist isnot "unset">>
 <br><<click "Indulge the crowd's Paternalism">>
 	<<replace "#result">>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<if ($slaves[$i].weekAcquired == $week)>>
-		<<if ($slaves[$i].origin is "She arrived at your arcology in an undocumented shipping container.")>>
-			<<slaveCost $slaves[$i]>>
-			<<set $cash += $slaveCost>>
-			<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
-		<</if>>
-		<</if>>
+	<<for $i to 0; $i < _newSlaves.length; $i++>>
+		<<slaveCost _newSlaves[$i]>>
+		<<set $cash += $slaveCost>>
 	<</for>>
 	You hurry forward, beckoning the crowd to accompany you. The wretched slaves cringe with fear, but soon they're being comforted, offered water, and examined for injury. Once the most pressing needs are attended to, you call for everyone's attention. You pride yourself on knowing your citizens well, and you can pick good Paternalists out of the crowd at will. Calling them by name, you ask whether they'd be willing to take on one of these poor slaves. One by one, you pair slave and Master or Mistress, rewarding your best people with public approbation, not to mention a free slave. The initial gasps of surprise quickly grow into @@color:green;thunderous applause.@@ Your people love you. Several of the slaves begin to cry, mostly from confusion or sheer exhaustion; they don't yet know how lucky they are.
 	<<set $helots -= 25>>
@@ -95,4 +84,4 @@ For now, the crowd around you is looking at the helpless human cargo with
 	<</replace>>
 <</click>>
 <</if>>
-</span>
+</span>
\ No newline at end of file
diff --git a/src/uncategorized/reSlaveMarriage.tw b/src/uncategorized/reSlaveMarriage.tw
index f4f70d9c665b02ef7d8f197c8fd10d6db5337ba9..27c0ed64824041153e1d8e3b73587c2f84987efc 100644
--- a/src/uncategorized/reSlaveMarriage.tw
+++ b/src/uncategorized/reSlaveMarriage.tw
@@ -1,5 +1,5 @@
 :: RE slave marriage
- 
+
 <<nobr>>
 
 <<set $nextButton to "Continue">>
@@ -19,7 +19,7 @@
 
 <</nobr>>\
 \
-<<print "[[$groomSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1,$activeSlave to $groomSlave]]">> and <<print "[[$brideSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1,$activeSlave to $brideSlave]]">> come into your office <<if ($groomSlave.amp != 1) && ($brideSlave.amp != 1)>>holding hands<<else>>doing their best to stay close to one another despite their physical limitations<</if>>. $brideSlave.slaveName looks at $groomSlave.slaveName expectantly, but she's terribly nervous and makes several false starts before beginning. Finally $groomSlave.slaveName musters her courage and <<if canTalk($groomSlave) == false>>asks you with simple gestures to grant the two of them a slave marriage.<<elseif ($groomSlave.lips > 70) || ($groomSlave.lipsPiercing+$groomSlave.tonguePiercing > 2)>>asks with her voice cracking, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, may you pleathe grant uth a thlave marriage?"<<else>>asks with her voice cracking, "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, may you please grant us a slave marriage?"<</if>>
+<<print "[[$groomSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1,$activeSlave to $groomSlave]]">> and <<print "[[$brideSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1,$activeSlave to $brideSlave]]">> come into your office <<if ($groomSlave.amp != 1) && ($brideSlave.amp != 1)>>holding hands<<else>>doing their best to stay close to one another despite their physical limitations<</if>>. $brideSlave.slaveName looks at $groomSlave.slaveName expectantly, but she's terribly nervous and makes several false starts before beginning. Finally $groomSlave.slaveName musters her courage and <<if canTalk($groomSlave) == false>>asks you with simple gestures to grant the two of them a slave marriage.<<elseif ($groomSlave.lips > 70) || ($groomSlave.lipsPiercing+$groomSlave.tonguePiercing > 2)>>asks with her voice cracking, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, would you pleathe grant uth a thlave marriage?"<<else>>asks with her voice cracking, "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, would you please grant us a slave marriage?"<</if>>
 
 <<nobr>>
 <span id="result">
diff --git a/src/uncategorized/recETS.tw b/src/uncategorized/recETS.tw
index c6769dc2dd3d9772edd49bfe18f4fcff66259df9..66a71cb41c6de1e50fe820024d5727ac7062c606 100644
--- a/src/uncategorized/recETS.tw
+++ b/src/uncategorized/recETS.tw
@@ -467,10 +467,6 @@ The other blurts out. "But we kinda got too into each other, in more ways than o
 
 <<display "Long Slave Description">>
 
-<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-	<<AutoRulesActivate 1>>
-<</if>>
-
 <br><br>
 <span id="result">
 
@@ -483,10 +479,9 @@ The other blurts out. "But we kinda got too into each other, in more ways than o
 	<<set $activeSlave.daughters = 0>>
 	<<set $activeSlave.relation to 0>>
 	<<set $activeSlave.relationTarget to 0>>
-	<<set $activeSlave.oralCount += 1>>
-	<<set $oralTotal += 1>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+		<<set $activeSlave.oralCount += 1>>
+		<<set $oralTotal += 1>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost>>
 	<<replace "#result">>
 	Despite herself, she sobs with relief when you agree. She offers to <<if $PC.dick == 1>>suck you off<<if $PC.vagina == 1>> and <</if>><</if>><<if $PC.vagina == 1>>eat you out<</if>> while you complete the necessary legalities, so you work away with a <<if $PC.dick == 1>>pair of motherly lips wrapped around your dick<<else>>motherly tongue pleasuring your clit<</if>> as she pumps away eagerly under the desk. She's definitely on aphrodisiacs. She masturbates while she sucks.
@@ -499,8 +494,7 @@ The other blurts out. "But we kinda got too into each other, in more ways than o
 	<<set $activeSlave.daughters = 0>>
 	<<set $activeSlave.relation to 0>>
 	<<set $activeSlave.relationTarget to 0>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost>>
 	<<replace "#result">>
 	You press your thumb down on your desk interface and then tell her to read the display, strip, and show you her body. She knits her brow in confusion and begins to curse at you but reads anyway. Comprehension dawns on her and she stares you in the eye for a long moment - and then drops her gaze. She knows the Free Cities well enough to understand. She stands and sadly strips off her blouse and slacks. Following orders, she rotates slowly for you. Then, she bends over facing away from you and spreads her buttocks to display her holes. Unsurprisingly, she's got a well-used pussy but has clearly never taken it up the ass. That will change.
@@ -514,8 +508,7 @@ The other blurts out. "But we kinda got too into each other, in more ways than o
 	<<set $activeSlave.father to 0>>	
 	<<set $activeSlave.relation to 0>>
 	<<set $activeSlave.relationTarget to 0>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost>>
 	<<replace "#result">>
 	The poor sissy isn't happy to become a slave, but she's clearly relieved to be away from her sister. The bitch isn't likely to have an easy time; the sale didn't clear her from debt. $activeSlave.slaveName describes her basic sexual experience, which includes a lot of sucking and anal whoring. Without more ado she moves from practical sexual slavery at the hands of her sister to actual sexual slavery.
@@ -538,35 +531,40 @@ The other blurts out. "But we kinda got too into each other, in more ways than o
 <<case "addict mother daughter">>
 
 <<click "Manipulate her to enslave both mother and daughter">>
-	<<set $mother to $activeSlave, $mother.devotion -= 50, $slaves.push($mother), $genePool.push($mother), $cash -= ($contractCost*2)>>
+	<<set $mother to $activeSlave, $mother.devotion -= 50, $cash -= ($contractCost*2)>>
+	<<AddSlave $mother>>
 	<<goto "RecETS workaround">>
 <</click>>
 
 <<case "posh mother daughter">>
 
 <<click "Manipulate her to enslave both mother and daughter">>
-	<<set $mother to $activeSlave, $mother.devotion -= 25, $slaves.push($mother), $genePool.push($mother), $cash -= ($contractCost*2)>>
+	<<set $mother to $activeSlave, $mother.devotion -= 25, $cash -= ($contractCost*2)>>
+	<<AddSlave $mother>>
 	<<goto "RecETS workaround">>
 <</click>>
 
 <<case "mismatched pair">>
 
 <<click "Enslave both">>
-	<<set $sissy to $activeSlave, $slaves.push($sissy), $genePool.push($sissy), $cash -= ($contractCost*2)>>
+	<<set $sissy to $activeSlave, $cash -= ($contractCost*2)>>
+	<<AddSlave $sissy>>
 	<<goto "RecETS workaround">>
 <</click>>
 
 <<case "incest mother son" "incest father daughter">>
 
 <<click "Buy both">>
-	<<set $sissy to $activeSlave, $slaves.push($sissy), $genePool.push($sissy), $cash -= $contractCost>>
+	<<set $sissy to $activeSlave, $cash -= ($contractCost*2)>>
+	<<AddSlave $sissy>>
 	<<goto "RecETS workaround">>
 <</click>>
 
 <<case "matched pair" "identical pair" "identical herm pair">>
 
 <<click "Buy both">>
-	<<set $sissy to $activeSlave, $slaves.push($sissy), $genePool.push($sissy), $cash -= ($contractCost*2)>>
+	<<set $sissy to $activeSlave, $cash -= ($contractCost*2)>>
+	<<AddSlave $sissy>>
 	<<goto "RecETS workaround">>
 <</click>>
 
@@ -579,4 +577,4 @@ The other blurts out. "But we kinda got too into each other, in more ways than o
 
 </span>
 
-<</if>> /* CLOSES EVENT SELECTION */
\ No newline at end of file
+<</if>> /* CLOSES EVENT SELECTION */
diff --git a/src/uncategorized/recETSWorkaround.tw b/src/uncategorized/recETSWorkaround.tw
index c88a51c917e47d66bd9ac4fd346f6f84641de424..ca504e0ccf5a5dc7f90de754da1c18fd23cbde78 100644
--- a/src/uncategorized/recETSWorkaround.tw
+++ b/src/uncategorized/recETSWorkaround.tw
@@ -247,7 +247,7 @@ They giggle and kiss each other rather passionately, their miniskirts becoming p
 	ERROR: bad event
 <</switch>>
 
-<<display "Nationality to Name">>
+<<NationalityToName>>
 <<if $useFSNames == 0>>
 	<<set $activeSlave.slaveName to $activeSlave.birthName>>
 <<elseif $arcologies[0].FSRomanRevivalist > 20>>
@@ -261,5 +261,4 @@ They giggle and kiss each other rather passionately, their miniskirts becoming p
 <<else>>
 	<<set $activeSlave.slaveName to $activeSlave.birthName>>
 <</if>>
-<<set $genePool.push($activeSlave)>>
-<<set $slaves.push($activeSlave)>>
\ No newline at end of file
+<<AddSlave $activeSlave>>
diff --git a/src/uncategorized/remFluctuations.tw b/src/uncategorized/remFluctuations.tw
index 0d8ad092e8c300b5018b8616415ab89c8c5c0fae..e39886117d185a46dd829a48f087ab88736af048 100644
--- a/src/uncategorized/remFluctuations.tw
+++ b/src/uncategorized/remFluctuations.tw
@@ -1,6 +1,4 @@
-:: REM fluctuations
- 
-<<nobr>>
+:: REM fluctuations [nobr]
 
 <<set $nextButton to "Continue">>
 <<set $nextLink to "RIE Eligibility Check">>
@@ -12,21 +10,57 @@
 <</if>>
 
 <<if $assistant > 0>>
-	<<if $assistantName is "your personal assistant">>
-	Your personal assistant
-	<<else>>
-	$assistantName
+<<if $marketAssistantAnnounced>>
+	The market assistant's avatar appears on a wall screen as you're going about your business.
+	<<switch $assistantAppearance>>
+	<<case "monstergirl">>The regular monstergirl stands behind and prods the human girl forward.
+	<<case "shemale">>You recognize her function by her glasses and because her bimbo cock softens, halfway, while she addresses you on economic matters.
+	<<case "amazon">>She illustrates a small group of gossiping tribeswomen that fades away as she leaves them and approaches you.
+	<<case "businesswoman">>The junior businesswoman adopts a shy posture when addressing you directly, as if unsuccessfully concealing a workplace crush.
+	<<case "goddess">>The demigoddess portrait arrives in a glittery cloud of dust, wearing winged shoes.
+	<<case "schoolgirl">>Both schoolgirls are sitting knee to knee; the nerdy one hands the other a folded note. "Pass it on," she stage whispers. <<if $assistantName is "your personal assistant">>Your regular assistant<<else>>$assistantName<</if>> rolls her eyes.
+	<<case "hypergoddess">>The demigoddess portrait arrives in a glittery cloud of dust, wearing winged shoes and a noticable roundness in her middle.
+	<<case "loli">>The chubby, glasses-wearing loli arrives holding a neatly folded note addressed to you.
+	<<case "preggololi">>The chubby, glasses-wearing loli arrives holding a hastily written note addressed to you. She seems kind of winded, with a suspicious stain in her panties under her pussy. 
+	<<case "fairy" "pregnant fairy">>The older fairy flutters into view before, curtseys, and holds out a rolled piece of parchment addressed to you.
+	<<case "normal">>Her symbol lights up in regular green pulses while she waits for your attention.
+	<</switch>>
+	"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, I have a news item that may be of business interest," she 
+	<<switch $assistantAppearance>>
+	<<case "monstergirl" "normal">>informs you.
+	<<case "shemale">>says seriously.
+	<<case "amazon">>says warmly.
+	<<case "businesswoman">>says diffidently.
+	<<case "goddess">>announces.
+	<<case "schoolgirl">>reads aloud.
+	<<case "hypergoddess">>announces between her children's kicking.
+	<<case "loli">>says cutely.
+	<<case "preggololi">>says cutely.
+	<<case "fairy">>says excitedly.
+	<<case "pregnant fairy">>says excitedly.
+	<</switch>>
+<<else>>
+	<<if $assistantName is "your personal assistant">>Your personal assistant<<else>>$assistantName<</if>> appears on a wall screen as you're going about your business.
+	<<if $assistantAppearance is "monstergirl">>She's looking unusually businesslike, with her tentacle hair restrained in a bun.
+	<<elseif $assistantAppearance is "hypergoddess">>She's looking unusually businesslike, pivoting one foot with her hands clasped behind her back.
+	<<elseif $assistantAppearance is "loli">>She's looking unusually businesslike, withdrawn deep in thought.
+	<<elseif $assistantAppearance is "preggololi">>She's looking unusually businesslike, withdrawn deep in thought.
+	<<elseif $assistantAppearance is "shemale">>She's looking unusually businesslike, with her perpetually erect dick going untended, for once.
+	<<elseif $assistantAppearance is "amazon">>She's looking unusually businesslike, and is doing sums on a primitive little abacus.
+	<<elseif $assistantAppearance is "businesswoman">>She has a clipboard pressed against her generous bosom, and peers at you over the tops of her spectacles.
+	<<elseif $assistantAppearance is "fairy">>She's looking unusually businesslike, wearing a tiny business suit with an opening in the back for her wings to come out.
+	<<elseif $assistantAppearance is "pregnant fairy">>She's looking unusually businesslike, wearing a tiny business suit open in the front to let her swollen belly out and another opening in the back for her wings to come out.
+	<<elseif $assistantAppearance is "goddess">>She's looking unusually businesslike, with her hands clasped behind her back and pivoting one foot.
+	<<elseif $assistantAppearance is "schoolgirl">>She's looking unusually businesslike, and has a scribbled note in her hand.
+	<<else>>Her symbol spins for attention.
 	<</if>>
-	appears on a wall screen as you're going about your business.
-	<<if $assistantAppearance is "monstergirl">>She's looking unusually businesslike, with her tentacle hair restrained in a bun.<<elseif $assistantAppearance is "hypergoddess">>She's looking unusually businesslike, pivoting one foot with her hands clasped behind her back.<<elseif $assistantAppearance is "loli">>She's looking unusually businesslike, withdrawn deep in thought.<<elseif $assistantAppearance is "preggololi">>She's looking unusually businesslike, withdrawn deep in thought.<<elseif $assistantAppearance is "shemale">>She's looking unusually businesslike, with her perpetually erect dick going untended, for once.<<elseif $assistantAppearance is "amazon">>She's looking unusually businesslike, and is doing sums on a primitive little abacus.<<elseif $assistantAppearance is "businesswoman">>She has a clipboard pressed against her generous bosom, and peers at you over the tops of her spectacles.<<elseif $assistantAppearance is "fairy">>She's looking unusually businesslike, wearing a tiny business suit with an opening in the back for her wings to come out.<<elseif $assistantAppearance is "pregnant fairy">>She's looking unusually businesslike, wearing a tiny business suit open in the front to let her swollen belly out and another opening in the back for her wings to come out.<<elseif $assistantAppearance is "goddess">>She's looking unusually businesslike, with her hands clasped behind her back and pivoting one foot.<<elseif $assistantAppearance is "schoolgirl">>She's looking unusually businesslike, and has a scribbled note in her hand.<<else>>Her symbol spins for attention.<</if>>
+	"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, I have a news item that may be of business interest," she 
+	<<if $assistantAppearance is "monstergirl">>purrs.<<elseif $assistantAppearance is "shemale">>says flirtatiously.<<elseif $assistantAppearance is "amazon">>says gruffly.<<elseif $assistantAppearance is "businesswoman">>says severely.<<elseif ($assistantAppearance is "fairy") or ($assistantAppearance is "pregnant fairy")>>giggles.<<elseif $assistantAppearance is "goddess">>whispers coyly.<<elseif $assistantAppearance is "hypergoddess">>whispers coyly.<<elseif $assistantAppearance is "loli">>says naively.<<elseif $assistantAppearance is "preggololi">>says naively.<<elseif $assistantAppearance is "schoolgirl">>giggles.<<else>>says.<</if>>
+<</if>>
 <<else>>
-	Your personal assistant's symbol appears on a wall screen as you're going about your business. It spins for your attention.
+Your <<if $marketAssistantAnnounced>>market<<else>>personal<</if>> assistant's symbol appears on a wall screen as you're going about your business. It spins for your attention. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, I have a news item that may be of business interest," it says.
 <</if>>
-"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, I have a news item that may be of business interest," <<if $assistant > 0>>she <<if $assistantAppearance is "monstergirl">>purrs.<<elseif $assistantAppearance is "shemale">>says flirtatiously.<<elseif $assistantAppearance is "amazon">>says gruffly.<<elseif $assistantAppearance is "businesswoman">>says severely.<<elseif ($assistantAppearance is "fairy") or ($assistantAppearance is "pregnant fairy")>>giggles.<<elseif $assistantAppearance is "goddess">>whispers coyly.<<elseif $assistantAppearance is "hypergoddess">>whispers coyly.<<elseif $assistantAppearance is "loli">>says naively.<<elseif $assistantAppearance is "preggololi">>says naively.<<elseif $assistantAppearance is "schoolgirl">>giggles.<<else>>says.<</if>><<else>>it says.<</if>>
-
-<</nobr>>
-
-<<nobr>>
+<br><br>
 
 <<if $REM is "revel">>
 	Something is happening in one of the Free Cities' richest arcologies. It's not clear what, exactly, it is, since its owner is making skillful use of the arcology's advanced surveillance and media systems to keep its internal affairs quite secret. The truth will get out eventually, and it's probably not going to do much for old world opinions of the Free Cities. After all, cheap slaves go into that arcology at a prodigious rate, and they don't seem to ever come out again. The unexpected demand for slaves, any slaves, has produced a temporary tightening of the entire slave market. Projections suggest price increases of up to twenty percent. There will be no immediate impact on you or your slaves, but the coming weeks will be a great time to sell stock, and a bad time to buy. @@color:yellow;The market price of slaves has increased.@@
@@ -65,5 +99,3 @@
 	A leading old world nation has just suffered a major economic downturn. Old world nations suffer economic downturns all the time, of course, but to those with interests in the slave market, news like this can be very important. Slave market shocks from catastrophes get all the headlines, but a change that affects millions will often be more impactful. As unemployment in the old world rises, the number of people faced with the choice between starvation and voluntary enslavement rises. Social safety nets just aren't what they used to be. Projections show a short-term slave price drop of up to thirty percent due to the sharp increase in desperate people immigrating to the Free Cities for enslavement. There will be no immediate impact on you or your slaves, but the coming weeks will be a fine time to buy new stock, and a terrible time to sell. @@color:yellow;The market price of slaves has dropped.@@
 	<<set $slaveCostFactor -= 0.3>>
 <</if>>
-
-<</nobr>>\
diff --git a/src/uncategorized/remMerger.tw b/src/uncategorized/remMerger.tw
index ab49d1630910d31fc0d613fe5bb0d427db623765..5335c18330a41d734d9120979d0603d9071c0a60 100644
--- a/src/uncategorized/remMerger.tw
+++ b/src/uncategorized/remMerger.tw
@@ -1,6 +1,4 @@
-:: REM merger
- 
-<<nobr>>
+:: REM merger [nobr]
 
 <<set $nextButton to "Continue">>
 <<set $nextLink to "RIE Eligibility Check">>
@@ -8,11 +6,9 @@
 <<set $slaveCompany to either("slaves", "capture", "entrapment")>>
 <<set $trainingCompany to either("training", "drug", "surgical")>>
 
-<</nobr>>\
-\
-<<if $assistantName is "your personal assistant">>Your personal assistant<<else>>$assistantName<</if>> constantly combs business records, tax receipts and the media for leads on opportunities for your corporation to take advantage of. Small businesses go under all the time, and with a large amount of cash on hand, your corporation can afford to step in and acquire them. This week, there are not one but two troubled organizations you could easily fold into your corporation.
+<<if $marketAssistantAnnounced>>Your market assistant<<elseif $assistantName is "your personal assistant">>Your personal assistant<<else>>$assistantName<</if>> constantly combs business records, tax receipts and the media for leads on opportunities for your corporation to take advantage of. Small businesses go under all the time, and with a large amount of cash on hand, your corporation can afford to step in and acquire them. This week, there are not one but two troubled organizations you could easily fold into your corporation.
+<br><br>
 
-<<nobr>>
 <<if $slaveCompany is "slaves">>
 	The first is a minor slave holding company. A major deal with a troubled government just fell through, and they had depended on it going through to an unwise degree. They need to merge with a larger slaving concern immediately, but there's nothing at all wrong with their significant inventory of slaves.
 <<elseif $slaveCompany is "entrapment">>
@@ -20,9 +16,8 @@
 <<else>>
 	The first is a troubled mercenary company. After a spate of failed operations, the rank and file deposed their management and are now looking to merge with a better-run organization. The old leadership did not engage in enslavement activities, but the mercenaries have decided to turn their talents towards slaving for profit in conflict zones.
 <</if>>
-<</nobr>>
+<br><br>
 
-<<nobr>>
 <<if $trainingCompany is "training">>
 	The second is a small slave training firm. Slave training is a notoriously difficult business, since the maturation times on the merchandise can be extremely long, and the improvement in price can be marginal if the training does not prove highly successful. There's nothing inherently wrong with the business, they've simply hit a cash flow bottleneck and need to merge with a cash-rich organization like yours.
 <<elseif $trainingCompany is "drug">>
@@ -30,9 +25,8 @@
 <<else>>
 	Medical malpractice continues to be a major source of trouble for surgeons in the old world. A plastic surgeon has just suffered defeat in a major legal case over implant ruptures. He's looking to make the transition to a more enlightened area, along with his inventory and staff.
 <</if>>
-<</nobr>>
+<br><br>
 
-<<nobr>>
 <span id="result">
 <<click "Absorb the first, slave-focused business">>
 	<<replace "#result">>
@@ -83,4 +77,3 @@
 	<</replace>>
 <</click>>
 </span>
-<</nobr>>
diff --git a/src/uncategorized/resFailure.tw b/src/uncategorized/resFailure.tw
index 0cf6110558ce67490c35991f976d20092e16abaa..7ab8e965b511f07314b73a00b8ea11f4ed8d98fe 100644
--- a/src/uncategorized/resFailure.tw
+++ b/src/uncategorized/resFailure.tw
@@ -1,5 +1,5 @@
 :: RES Failure
- 
+
 <<nobr>>
 
 <<set $nextButton to "Continue">>
@@ -78,11 +78,7 @@
 		<<set $activeSlave.behavioralFlaw to either("none")>>
 		<<set $activeSlave.hStyle to "tails">>
 		<<set $activeSlave.customTat to "She has the simple logo of the corporation that operates The Slavegirl School tattooed on her left cheek.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 	<</for>>
 <<elseif $RESFailure is "GRI">>
 	<<set $GRI.schoolPresent to 0>>
@@ -132,11 +128,7 @@
 		<<set $activeSlave.hStyle to "shaved">>
 		<<set $activeSlave.hLength to 0>>
 		<<set $activeSlave.customTat to "She has a barcode that identified her when she was a test subject at the Growth Research Institute tattooed on her left cheek.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 	<</for>>
 <<elseif $RESFailure is "SCP">>
 	<<set $SCP.schoolPresent to 0>>
@@ -204,11 +196,7 @@
 		<<if $activeSlave.race != "white">><<set $activeSlave.race to "surgically altered to look white">><</if>>
 		<<set $activeSlave.skin to "tanned">>
 		<<set $activeSlave.customTat to "She has the coat of arms of St. Claver Preparatory tattooed on her left cheek.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 	<</for>>
 <<elseif $RESFailure is "LDE">>
 	<<set $LDE.schoolPresent to 0>>
@@ -268,11 +256,7 @@
 		<<set $activeSlave.hStyle to "tails">>
 		<<set $activeSlave.hLength = 100>>
 		<<set $activeSlave.customTat to "She has the buttock-shaped symbol of the École des Enculées that created her tattooed on her left cheek.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>		
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 	<</for>>
 <<elseif $RESFailure is "TGA">>
 	<<set $TGA.schoolPresent to 0>>
@@ -325,11 +309,7 @@
 		<<set $activeSlave.hStyle to "short">>
 		<<set $activeSlave.hLength to 2>>
 		<<set $activeSlave.customTat to "She has the baroque crest of the Gymnasium-Academy that trained her branded into her left cheek.">>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 	<</for>>
 <<else>>
 	<<set $TFS.schoolPresent to 0>>
@@ -490,11 +470,7 @@
 		<<set $activeSlave.hLength to 150>>
 		<<set $activeSlave.customTat to "She has a simple pink heart tattooed on her right temple.">>
 		<<set $REFutaSisterCheckinIDs.push($activeSlave.ID)>>
-		<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-			<<AutoRulesActivate 1>>
-		<</if>>
-		<<set $genePool.push($activeSlave)>>
-		<<set $slaves.push($activeSlave)>>
+		<<AddSlave $activeSlave>>
 	<</for>>
 	<<display "Generate XY Slave">>
 	<<set $activeSlave.origin to "She was the leader of your arcology's Futanari Sisters until you engineered her community's failure and enslavement.">>
@@ -563,11 +539,7 @@
 	<<set $activeSlave.hStyle to "neat">>
 	<<set $activeSlave.hLength to 150>>
 	<<set $activeSlave.customTat to "She has a simple pink heart tattooed on her right temple.">>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>	
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 <</if>>
 
 <<if $RESFailure is "TSS">>
diff --git a/src/uncategorized/saLongTermEffects.tw b/src/uncategorized/saLongTermEffects.tw
index e47b1feaf7097f84941882b2c4c93d9f30f41bd7..bff7838cada93b7cb26360d2a10d4fc9f41ee5db 100644
--- a/src/uncategorized/saLongTermEffects.tw
+++ b/src/uncategorized/saLongTermEffects.tw
@@ -362,7 +362,7 @@ and ($slaves[$i].clothes != "a slutty qipao") and ($slaves[$i].clothes != "restr
 		<<set $slaves[$i].devotion += 1>>
 		<<set $slaves[$i].fetishKnown = 1>>
 	<<elseif $slaves[$i].devotion <= -20>>
-		Her collar's display reveals all sorts of personal information about her fertility, filling her @@color:mediumorchid;with disgust@@ that you that you consider her womb little more than property, aw well as @@color:gold;fear@@ that it will soon be swelling with an unwelcome child.
+		Her collar's display reveals all sorts of personal information about her fertility, filling her @@color:mediumorchid;with disgust@@ that you that you consider her womb little more than property, as well as @@color:gold;fear@@ that it will soon be swelling with an unwelcome child.
 		<<set $slaves[$i].devotion -= 2>>
 		<<set $slaves[$i].trust -= 2>>
 	<<elseif ($slaves[$i].devotion <= 20)>>
diff --git a/src/uncategorized/saPleaseYou.tw b/src/uncategorized/saPleaseYou.tw
index 08ab50165ae6e694c43f95d6b79d98a797070f5c..2a83f5d8468fc7a476bd3134ab160501b4391285 100644
--- a/src/uncategorized/saPleaseYou.tw
+++ b/src/uncategorized/saPleaseYou.tw
@@ -10,6 +10,11 @@ serves you this week.
 	<<set $slaves[$i].toyHole to "all her holes">>
 <</if>>
 <</if>>
+<<if $slaves[$i].toyHole is "dick">>
+<<if $slaves[$i].dick == 0>>
+	<<set $slaves[$i].toyHole to "all her holes">>
+<</if>>
+<</if>>
 
 <<if ($slaves[$i].toyHole != "all her holes")>>
 	<<if ($slaves[$i].toyHole is "pussy")>>
@@ -333,58 +338,61 @@ serves you this week.
 		<<set $seed to random(5,10)>>
 		<<set $activeSlave.penetrativeCount += $seed>>
 		<<set $penetrativeTotal += $seed>>
+		$pronounCap spends the week
 		<<if ($slaves[$i].trust < -20)>>
-			$pronounCap spends the week in terrified compliance with your use of $object dick.
+			in terrified compliance with your use of $possesive dick.
 		<<elseif ($slaves[$i].devotion < -20)>>
-			$pronounCap spends the week alternately struggling and lying corpselike as you ride $object dick.
+			alternately struggling and lying corpselike as you ride $possesive dick.
 		<<elseif ($slaves[$i].devotion <= 20)>>
-			$pronounCap spends the week reluctantly accepting your use of $object dick.
+			reluctantly accepting your use of $possessive dick.
 		<<elseif ($slaves[$i].fetishKnown == 1) && ($slaves[$i].fetish is "submissive")>>
-			$pronounCap spends the week as your adoring submissive, seeing to your pleasure with $object shaft.
+			as your adoring submissive, seeing to your pleasure with $possesive shaft.
 		<<elseif ($slaves[$i].devotion <= 50 && $PC.vagina == 1)>>
-			$pronounCap spends the week obediently serving you in the classical way, driving into your womanhood.
+			obediently serving you in the classical way, driving into your womanhood.
 		<<elseif ($slaves[$i].devotion <= 50)>>
-			$pronounCap spends the week obediently serving you by driving into your backdoor.
+			week obediently serving you by driving into your backdoor.
+		<<elseif $PC.vagina == 1>>
+			serving you in the classical way, warming your bed and lovingly driving $possesive shaft into your womanhood.
 		<<else>>
-			$pronounCap spends the week serving you in the classical way,  warming your bed and lovingly driving  $object shaft into your womanhood.
+			serving you in the classical way, warming your bed and lovingly driving $possesive shaft into your backdoor.
 		<</if>>
 
 		<<if ($slaves[$i].trust > -20) && ($slaves[$i].devotion <= 20)>>
 			<<if ($fuckSlaves <= $PC.sexualEnergy/2)>>
-			You have the sexual energy to fuck $possessive several times a day; the constant rape fills $object with @@color:mediumorchid;revulsion@@ and @@color:gold;fear.@@
+			You have the sexual energy to fuck $object several times a day; the constant rape fills $object with @@color:mediumorchid;revulsion@@ and @@color:gold;fear.@@
 			<<set $slaves[$i].devotion -= 5>>
 			<<set $slaves[$i].trust -= 15>>
 			<<elseif ($fuckSlaves <= $PC.sexualEnergy)>>
-			You have the sexual energy to fuck $possessive at least once a day; the regular rape fills $object with @@color:mediumorchid;revulsion@@ and @@color:gold;fear.@@
+			You have the sexual energy to fuck $object at least once a day; the regular rape fills $object with @@color:mediumorchid;revulsion@@ and @@color:gold;fear.@@
 			<<set $slaves[$i].devotion -= 3>>
 			<<set $slaves[$i].trust -= 9>>
 			<<else>>
-			You have the sexual energy to fuck $possessive on occasion; the threat of rape fills $object with @@color:mediumorchid;revulsion@@ and @@color:gold;fear.@@
+			You have the sexual energy to fuck $object on occasion; the threat of rape fills $object with @@color:mediumorchid;revulsion@@ and @@color:gold;fear.@@
 			<<set $slaves[$i].devotion -= 3>>
 			<<set $slaves[$i].trust -= 3>>
 			<</if>>
 		<<elseif ($slaves[$i].devotion <= 20)>>
 			<<if ($fuckSlaves <= $PC.sexualEnergy/2)>>
-			You have the sexual energy to fuck $possessive several times a day; submitting to your constant use @@color:hotpink;habituates $object@@ to being your sex slave.
+			You have the sexual energy to fuck $object several times a day; submitting to your constant use @@color:hotpink;habituates $object@@ to being your sex slave.
 			<<set $slaves[$i].devotion += 3>>
 			<<elseif ($fuckSlaves <= $PC.sexualEnergy)>>
-			You have the sexual energy to fuck $possessive at least once a day; submitting to your regular use @@color:hotpink;habituates $object@@ to being your sex slave.
+			You have the sexual energy to fuck $object at least once a day; submitting to your regular use @@color:hotpink;habituates $object@@ to being your sex slave.
 			<<set $slaves[$i].devotion += 2>>
 			<<else>>
-			You have the sexual energy to fuck $possessive on occasion; submitting to your use @@color:hotpink;habituates $object@@ to being your sex slave.
+			You have the sexual energy to fuck $object on occasion; submitting to your use @@color:hotpink;habituates $object@@ to being your sex slave.
 			<<set $slaves[$i].devotion += 1>>
 			<</if>>
 		<<else>>
 			<<if ($fuckSlaves <= $PC.sexualEnergy/2)>>
-			You have the sexual energy to fuck $possessive several times a day; constant, enjoyable sex with you draws $object @@color:hotpink;closer to you@@ and encourages $object to @@color:mediumaquamarine;trust you.@@
+			You have the sexual energy to fuck $object several times a day; constant, enjoyable sex with you draws $object @@color:hotpink;closer to you@@ and encourages $object to @@color:mediumaquamarine;trust you.@@
 			<<set $slaves[$i].devotion += 3>>
 			<<set $slaves[$i].trust += 3>>
 			<<elseif ($fuckSlaves <= $PC.sexualEnergy)>>
-			You have the sexual energy to fuck $possessive several times a day; regular, enjoyable sex with you draws $object @@color:hotpink;closer to you@@ and encourages $object to @@color:mediumaquamarine;trust you.@@
+			You have the sexual energy to fuck $object several times a day; regular, enjoyable sex with you draws $object @@color:hotpink;closer to you@@ and encourages $object to @@color:mediumaquamarine;trust you.@@
 			<<set $slaves[$i].devotion += 2>>
 			<<set $slaves[$i].trust += 2>>
 			<<else>>
-			You have the sexual energy to fuck $possessive on occasion; enjoyable sex with you draws $object @@color:hotpink;closer to you@@ and encourages $object to @@color:mediumaquamarine;trust you.@@
+			You have the sexual energy to fuck $object on occasion; enjoyable sex with you draws $object @@color:hotpink;closer to you@@ and encourages $object to @@color:mediumaquamarine;trust you.@@
 			<<set $slaves[$i].devotion += 1>>
 			<<set $slaves[$i].trust += 1>>
 			<</if>>
@@ -392,7 +400,7 @@ serves you this week.
 		<</if>>
 		
 		/*check*/
-		<<if ($PC.preg ==  0) && ($PC.Vagina == 1) && ($slaves[$i].ballType == "human")>>
+		<<if ($PC.preg ==  0) && ($PC.vagina == 1) && ($slaves[$i].ballType == "human")>>
 			<<if random(1,100) > 50-($seed*10)>>
 				<<set $PC.preg = 1>>
 				$PC.pregSource = $slaves[$i].ID;
@@ -403,14 +411,20 @@ serves you this week.
 <<else>>
 
 	<<if $slaves[$i].fuckdoll > 0>>
-		You keep with you all week, using it as your personal sex toy. When you're not using it, it <<if $activeSlave.amp > 0>>rests<<else>>stands<</if>> nearby, waiting silently.
+		You keep $object with you all week, using it as your personal sex toy. When you're not using it, it <<if $activeSlave.amp > 0>>rests<<else>>stands<</if>> nearby, waiting silently.
 		<<set $slaves[$i].trust += 4>>
 		<<set $seed to random(3,5)>>
 		<<set $slaves[$i].oralCount += $seed>>
 		<<set $oralTotal += $seed>>
-		<<set $slaves[$i].analCount += $seed>>
-		<<set $analTotal += $seed>>
-		
+		<<if canDoVaginal($slaves[$i])>>
+			<<set $slaves[$i].vaginalCount += $seed>>
+			<<set $vaginalTotal += $seed>>
+		<</if>>
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += $seed>>
+			<<set $analTotal += $seed>>
+		<</if>>
+
 	<<elseif ($slaves[$i].anus == 0) && ($slaves[$i].vagina == 0)>>
 		Since you haven't yet decided to sell or take $possessive virginity or $possessive tight little anus, you let $object please you with $possessive mouth. $pronounCap is @@color:mediumaquamarine;duly grateful@@ you let $object keep $possessive innocence for another week, though $possessive throat gets a little sore doing the work of three holes.
 		<<set $slaves[$i].trust += 1>>
@@ -418,48 +432,74 @@ serves you this week.
 		<<set $slaves[$i].oralCount += $seed>>
 		<<set $oralTotal += $seed>>
 
-	<<elseif ($slaves[$i].vagina == 0)>>
+	<<elseif ($slaves[$i].vagina == 0) && canDoVaginal($slaves[$i])>>
 		Since you haven't yet decided to sell or take $possessive virginity, but $pronoun's taken it up the ass, you let $object be your anal whore. $pronounCap is @@color:mediumaquamarine;duly grateful@@ you let $possessive keep $possessive innocence for another week, though $possessive butt gets a little sore.
 		<<set $slaves[$i].trust += 1>>
 		<<set $seed to random(5,10)>>
 		<<set $slaves[$i].analCount += $seed>>
 		<<set $analTotal += $seed>>
 
-	<<elseif ($slaves[$i].anus == 0)>>
-		Since you haven't yet decided to sell or take $possessive tight little anus, you let $object confine $possessive efforts to $possessive <<if ($slaves[$i].vagina != -1) && ($slaves[$i].vaginalAccessory != "chastity belt")>>pussy and <</if>>mouth. $pronounCap is @@color:mediumaquamarine;duly grateful@@ you let $object put off taking it up the butt another week.
+	<<elseif ($slaves[$i].anus == 0) && canDoAnal($slaves[$i])>>
+		Since you haven't yet decided to sell or take $possessive tight little anus, you let $object confine $possessive efforts to $possessive <<if canDoVaginal($slaves[$i])>>pussy and <</if>>mouth. $pronounCap is @@color:mediumaquamarine;duly grateful@@ you let $object put off taking it up the butt another week.
 		<<set $slaves[$i].trust += 1>>
 		<<set $seed to random(5,10)>>
 		<<set $slaves[$i].oralCount += $seed>>
 		<<set $oralTotal += $seed>>
-		<<if ($slaves[$i].vagina != -1) && ($slaves[$i].vaginalAccessory != "chastity belt")>>
+		<<if canDoVaginal($slaves[$i])>>
 			<<set $slaves[$i].vaginalCount += $seed>>
 			<<set $vaginalTotal += $seed>>
 		<</if>>
 
 	<<elseif !canWalk($slaves[$i])>>
-		You carry $object around with you all week, using $object as your personal sex toy and bedwarmer. <<if ($slaves[$i].amp == 1)>>Without arms and legs<<elseif canWalk($slaves[$i]) is -2>>Immobilized by $possessive own tits<</if>>, $pronoun is your @@color:hotpink;helpless sexual appliance@@ and is @@color:mediumaquamarine;forced to trust you.@@
+		You carry $object around with you all week, using $object as your personal sex toy and bedwarmer.
+		<<if ($slaves[$i].amp == 1)>>
+			Without arms and legs,
+		<<elseif tooBigBreasts($slaves[$i])>>
+			Immobilized by $possessive own tits,
+		<<elseif tooBigBelly($slaves[$i])>>
+			Immobilized by $possessive own swollen orb of a midsection,
+		<<elseif tooBigBalls($slaves[$i])>>
+			Immobilized by $possessive own oversized testicles,
+		<<elseif tooBigDick($slaves[$i])>>
+			Immobilized by $possessive own oversized cock,
+		<<elseif tooBigButt($slaves[$i])>>
+			Immobilized by $possessive own massive ass,
+		<<else>>
+			With $possessive clipped heels,
+		<</if>>
+		$pronoun is your @@color:hotpink;helpless sexual appliance@@ and is @@color:mediumaquamarine;forced to trust you.@@
 		<<set $slaves[$i].trust += 4>>
 		<<set $seed to random(3,5)>>
 		<<set $slaves[$i].oralCount += $seed>>
 		<<set $oralTotal += $seed>>
-		<<set $slaves[$i].analCount += $seed>>
-		<<set $analTotal += $seed>>
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += $seed>>
+			<<set $analTotal += $seed>>
+		<</if>>
+		<<if canDoVaginal($slaves[$i])>>
+			<<set $slaves[$i].vaginalCount += $seed>>
+			<<set $vaginalTotal += $seed>>
+		<</if>>
 
 	<<elseif ($slaves[$i].devotion > 50)>>
 		$pronounCap devotedly accompanies you all week, keeping $possessive
-		<<if ($slaves[$i].vagina is -1)>>
+		<<if canDoAnal($slaves[$i]) && canDoVaginal($slaves[$i])>>
+			mouth, vagina and asshole
+		<<elseif ($slaves[$i].vagina is -1)>>
 			mouth and asshole
-		<<elseif ($slaves[$i].vaginalAccessory is "chastity belt")>>
+		<<elseif ($slaves[$i].vaginalAccessory is "chastity belt") || ($slaves[$i].vaginalAccessory is "combined chastity") && canDoAnal($slaves[$i])>>
 			mouth and, since $possessive pussy is covered by $possessive chastity belt, asshole
 		<<else>>
-			mouth, pussy, and asshole
+			mouth
 		<</if>>
 		available for you at all times.
 		<<if ($slaves[$i].dick != 0) && canAchieveErection($slaves[$i])>>
-			Every time $possessive beloved <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>> fucks $object $pronoun gets a hardon.
-		<<elseif ($slaves[$i].dick != 0)>>
+			Every time $possessive beloved <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>> fucks $object, $pronoun gets a hardon.
+		<<elseif ($slaves[$i].dick != 0) && canDoAnal($slaves[$i])>>
 			$pronounCap doesn't get a hardon as you use $object, but $pronoun comes from the prostate stimulation when $possessive beloved <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>> uses $possessive butt.
-		<<else>>
+		<<elseif ($slaves[$i].dick != 0) && canDoVaginal($slaves[$i])>>
+			$pronounCap doesn't get a hardon as you use $object, but $pronoun comes from the prostate stimulation when $possessive beloved <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>> uses $possessive pussy.
+			<<else>>
 			$pronounCap comes indecently hard whenever $possessive beloved <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>> uses $possessive body.
 		<</if>>
 			<<if ($fuckSlaves <= $PC.sexualEnergy/2)>>
@@ -478,23 +518,17 @@ serves you this week.
 		<<set $seed to random(3,5)>>
 		<<set $slaves[$i].oralCount += $seed>>
 		<<set $oralTotal += $seed>>
-		<<set $slaves[$i].analCount += $seed>>
-		<<set $analTotal += $seed>>
-		<<if ($slaves[$i].vagina != -1) && ($slaves[$i].vaginalAccessory != "chastity belt")>>
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += $seed>>
+			<<set $analTotal += $seed>>
+		<</if>>
+		<<if canDoVaginal($slaves[$i])>>
 			<<set $slaves[$i].vaginalCount += $seed>>
 			<<set $vaginalTotal += $seed>>
 		<</if>>
 
 	<<elseif ($slaves[$i].devotion > 20)>>
-		Whenever you feel the need, you use whichever of $possessive
-		<<if ($slaves[$i].vagina is -1)>>
-			mouth and asshole
-		<<elseif ($slaves[$i].vaginalAccessory is "chastity belt")>>
-			mouth and, since $possessive pussy is covered by $possessive chastity belt, asshole
-		<<else>>
-			mouth, pussy, and asshole
-		<</if>>
-		seem most appealing at the moment, since $pronoun's up for anything.
+		Whenever you feel the need, you use whichever of $possessive available holes that appears most appealing at the moment, since $pronoun's up for anything.
 		<<if ($slaves[$i].dick != 0) && canAchieveErection($slaves[$i])>>
 			By the end of the week $pronoun gets a hardon when you use $object.
 		<</if>>
@@ -514,21 +548,25 @@ serves you this week.
 		<<set $seed to random(3,5)>>
 		<<set $slaves[$i].oralCount += $seed>>
 		<<set $oralTotal += $seed>>
-		<<set $slaves[$i].analCount += $seed>>
-		<<set $analTotal += $seed>>
-		<<if ($slaves[$i].vagina != -1) && ($slaves[$i].vaginalAccessory != "chastity belt")>>
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += $seed>>
+			<<set $analTotal += $seed>>
+		<</if>>
+		<<if canDoVaginal($slaves[$i])>>
 			<<set $slaves[$i].vaginalCount += $seed>>
 			<<set $vaginalTotal += $seed>>
 		<</if>>
 
 	<<elseif ($slaves[$i].trust < -20)>>
 		$pronounCap is afraid of you and does $possessive best to offer you $possessive
-		<<if ($slaves[$i].vagina is -1)>>
+		<<if canDoAnal($slaves[$i]) && canDoVaginal($slaves[$i])>>
+			mouth, vagina and asshole
+		<<elseif ($slaves[$i].vagina is -1)>>
 			mouth and asshole
-		<<elseif ($slaves[$i].vaginalAccessory is "chastity belt")>>
+		<<elseif ($slaves[$i].vaginalAccessory is "chastity belt") || ($slaves[$i].vaginalAccessory is "combined chastity") && canDoAnal($slaves[$i])>>
 			mouth and, since $possessive pussy is covered by $possessive chastity belt, asshole
 		<<else>>
-			mouth, pussy, and asshole
+			mouth
 		<</if>>
 		to save herself from worse treatment than mere rape.
 		<<if ($slaves[$i].dick != 0) && canAchieveErection($slaves[$i])>>
@@ -547,23 +585,17 @@ serves you this week.
 		<<set $seed to random(3,5)>>
 		<<set $slaves[$i].oralCount += $seed>>
 		<<set $oralTotal += $seed>>
-		<<set $slaves[$i].analCount += $seed>>
-		<<set $analTotal += $seed>>
-		<<if ($slaves[$i].vagina != -1) && ($slaves[$i].vaginalAccessory != "chastity belt")>>
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += $seed>>
+			<<set $analTotal += $seed>>
+		<</if>>
+		<<if canDoVaginal($slaves[$i])>>
 			<<set $slaves[$i].vaginalCount += $seed>>
 			<<set $vaginalTotal += $seed>>
 		<</if>>
 
 	<<else>>
-		Whenever you feel the need, you grab $object and use whichever of $possessive
-		<<if ($slaves[$i].vagina is -1)>>
-			mouth and asshole
-		<<elseif ($slaves[$i].vaginalAccessory is "chastity belt")>>
-			mouth and, since $possessive pussy is covered by $possessive chastity belt, asshole
-		<<else>>
-			mouth, pussy, and asshole
-		<</if>>
-		seem most appealing at the moment.
+		Whenever you feel the need, you grab $object and use whichever of $possessive available holes that appears most appealing at the moment.
 		<<if ($slaves[$i].dick != 0)>>
 			$possessiveCap dick stays limp as you rape $object.
 		<</if>>
@@ -585,7 +617,11 @@ serves you this week.
 		<<set $oralTotal += $seed>>
 		<<set $slaves[$i].analCount += $seed>>
 		<<set $analTotal += $seed>>
-		<<if ($slaves[$i].vagina != -1) && ($slaves[$i].vaginalAccessory != "chastity belt")>>
+		<<if canDoAnal($slaves[$i])>>
+			<<set $slaves[$i].analCount += $seed>>
+			<<set $analTotal += $seed>>
+		<</if>>
+		<<if canDoVaginal($slaves[$i])>>
 			<<set $slaves[$i].vaginalCount += $seed>>
 			<<set $vaginalTotal += $seed>>
 		<</if>>
@@ -599,10 +635,10 @@ serves you this week.
 	<<if ($slaves[$i].oralSkill < 100)>>
 		After a lot of time spent with <<if $PC.dick == 1>>your dick in $possessive mouth<<else>>$possessive mouth on your cunt<</if>>, $possessive oral skill improves.
 		<<OralSkillIncrease $slaves[$i]>>
-	<<elseif ($slaves[$i].vaginalSkill < 100) && ($slaves[$i].vagina > 0) && ($slaves[$i].vaginalAccessory != "chastity belt")>>
+	<<elseif ($slaves[$i].vaginalSkill < 100) && ($slaves[$i].vagina > 0) && canDoVaginal($slaves[$i])>>
 		After a lot of time spent getting fucked, $possessive vaginal skill improves.
 		<<VaginalSkillIncrease $slaves[$i]>>
-	<<elseif ($slaves[$i].analSkill < 100) && ($slaves[$i].anus != 0)>>
+	<<elseif ($slaves[$i].analSkill < 100) && ($slaves[$i].anus != 0) && canDoAnal($slaves[$i])>>
 		After a lot of time spent taking it up the ass, $possessive anal skill improves.
 		<<AnalSkillIncrease $slaves[$i]>>
 	<</if>>
@@ -700,6 +736,12 @@ serves you this week.
 <<elseif $slaves[$i].relationship is -3>>
 	<<set $seed += 0.06>>
 <</if>>
+<<if $arcologies[0].FSRestart > 50 && $slaves[$i].breedingMark == 1>>
+	<<set $seed += 0.04>>
+<</if>>
+<<if $arcologies[0].FSRepopulationFocus > 50 && bigBellyPreg($slaves[$i])>>
+	<<set $seed += 0.02>>
+<</if>>
 <<if $slaves[$i].prestige > 0>>
 	<<set $seed += 0.03*$slaves[$i].prestige>>
 <</if>>
@@ -735,6 +777,12 @@ Keeping $object as nothing but your personal
 <<elseif $slaves[$i].relationship is -3>>
 	$possessiveCap satisfaction with $possessive wifely duties is obvious, @@color:green;bringing attention@@ to the slave future you're building.
 <</if>>
+<<if $arcologies[0].FSRestart > 50 && $slaves[$i].breedingMark == 1>>
+	$possessiveCap's breeding mark and $possessive place near you as a breeding toy is obvious, @@color:green;bringing attention@@ to how beautiful a pairing you make.
+<</if>>
+<<if $arcologies[0].FSRepopulationFocus > 50 && bigBellyPreg($slaves[$i])>>
+	$possessiveCap's advanced pregnancy and role as your gravid fucktoy is obvious, @@color:green;bringing attention@@ to how a woman's ideal role in $arcologies[0].name.
+<</if>>
 <<if ($slaves[$i].behavioralQuirk is "confident")>>
 	$slaves[$i].slaveName @@color:mediumaquamarine;confidently enjoys@@ the prestige within the slave hierarchy that comes with being your fucktoy.
 	<<set $slaves[$i].trust += 1>>
diff --git a/src/uncategorized/seCoursing.tw b/src/uncategorized/seCoursing.tw
index 2434c246c8cf15e7097611137b9fea7d39f67003..1de79dc9cbb98b46798253efc2f90c476aae1bee 100644
--- a/src/uncategorized/seCoursing.tw
+++ b/src/uncategorized/seCoursing.tw
@@ -598,11 +598,7 @@ You place your hand on the leash's quick release and whisper your direction into
 	<</if>>
 	<<set $Lurcher.penetrativeCount += 1>>
 	<<set $penetrativeTotal += 1>>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 <<else>>
 	<<if $Lurcher.devotion > 50>>
 	She makes her way back to you dejectedly, hanging her head.
@@ -933,11 +929,7 @@ You place your hand on the leash's quick release and whisper your direction into
 	<</if>>
 	<<set $Lurcher.penetrativeCount += 1>>
 	<<set $penetrativeTotal += 1>>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 <<else>>
 	<<if $Lurcher.devotion > 50>>
 	She makes her way back to you dejectedly, hanging her head.
@@ -1268,11 +1260,7 @@ You place your hand on the leash's quick release and whisper your direction into
 	<</if>>
 	<<set $Lurcher.penetrativeCount += 1>>
 	<<set $penetrativeTotal += 1>>
-	<<if ($universalRulesNewSlavesRA == 1) && ($autoRulesAssistant != 0)>>
-		<<AutoRulesActivate 1>>
-	<</if>>
-	<<set $genePool.push($activeSlave)>>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 <<else>>
 	<<if $Lurcher.devotion > 50>>
 	She makes her way back to you dejectedly, hanging her head.
diff --git a/src/uncategorized/seCustomSlaveDelivery.tw b/src/uncategorized/seCustomSlaveDelivery.tw
index 0f202fb20d7dd80b4fe0dbb05ea34b79fd9c22c4..5e1f7168b1ff9ab37d7ad0ac51acd938d0966a07 100644
--- a/src/uncategorized/seCustomSlaveDelivery.tw
+++ b/src/uncategorized/seCustomSlaveDelivery.tw
@@ -1,5 +1,5 @@
 :: SE custom slave delivery
- 
+
 <<nobr>>
 
 <<set $nextButton to "Continue">>
@@ -27,7 +27,9 @@
 <<set $activeSlave.devotion = random(-10,10)>>
 <<set $activeSlave.trust = random(-10,10)>>
 
-<<display "New Slave Race Nationality and Name">>
+<<NationalityToRace>>
+<<NationalityToName>>
+<<NationalityToAccent>>
 
 <<if $activeSlave.race is "black">>
 	<<set $activeSlave.skin to either("black", "brown", "light brown")>>
@@ -39,7 +41,7 @@
 	<<set $activeSlave.hColor to either("black", "blonde", "red", "brown")>>
 	<<set $activeSlave.hStyle to either("ass-length", "long", "shoulder-length", "short", "very short", "shaved bald")>>
 <<elseif $activeSlave.race is "latina">>
-    <<set $activeSlave.skin to either("olive", "brown", "light brown", "tanned", "fair")>>
+	<<set $activeSlave.skin to either("olive", "brown", "light brown", "tanned", "fair")>>
 	<<set $activeSlave.hColor to either("black", "black", "brown", "brown")>>
 	<<set $activeSlave.hStyle to either("ass-length", "long", "shoulder-length", "short", "very short", "shaved bald")>>
 <<elseif $activeSlave.race is "asian">>
@@ -89,7 +91,7 @@ Her price is ¤<<print $slaveCost>>.
 <span id="result">
 <<if $cash >= $slaveCost>>\
 	<<click "Accept the offered slave">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $slaveCost>>
 	<<replace "#result">>
 	She has been reasonably broken by the dealer that offered her to you. She has also picked up on the fact that she was specially selected, and is a little hopeful that this means she may be treated well. She is now awaiting your instructions.
diff --git a/src/uncategorized/seExpiration.tw b/src/uncategorized/seExpiration.tw
index 6ea3917ce4413e78c5af00a65479b5632029ee17..b85ecf0d307a8b9b6c32c215e69c71181111e3d4 100644
--- a/src/uncategorized/seExpiration.tw
+++ b/src/uncategorized/seExpiration.tw
@@ -101,9 +101,9 @@ at the moment of her scheduled emancipation, she seems to be struggling to expre
 <<if canTalk($activeSlave) == false>>
 	She does her best to communicate a willingness to remain your slave, indicating that she wouldn't press too hard about the price if you offered her another indenture.
 <<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>
-	"<<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>, um," she lisps hesitantly. "I don't mind being your thlave. Could I - may you pleathe give me another indenture? I'm, um, not too worried about the prithe."
+	"<<if $PC.title == 1>>Mathter<<else>>Mithtreth<</if>>, um," she lisps hesitantly. "I don't mind being your thlave. Could I - would you pleathe give me another indenture? I'm, um, not too worried about the prithe."
 <<else>>
-	"<<if $PC.title == 1>>Master<<else>>Mistress<</if>>, um," she says hesitantly. "I don't mind being your slave. Could I - may you please give me another indenture? I'm, um, not too worried about the price."
+	"<<if $PC.title == 1>>Master<<else>>Mistress<</if>>, um," she says hesitantly. "I don't mind being your slave. Could I - would you please give me another indenture? I'm, um, not too worried about the price."
 <</if>>
 <br><br>
 
diff --git a/src/uncategorized/seIndependenceDay.tw b/src/uncategorized/seIndependenceDay.tw
index 9faa7bb80aaf3d239d360479311d161b37ff4426..39cda0d013eb49580c4165b310bd28cdb3e269f8 100644
--- a/src/uncategorized/seIndependenceDay.tw
+++ b/src/uncategorized/seIndependenceDay.tw
@@ -1,5 +1,5 @@
 :: SE independence day
- 
+
 <<nobr>>
 
 <<set $nextLink to "Scheduled Event">>
@@ -179,8 +179,10 @@ In the Free Cities, Independence Day falls on the day when the Free City achieve
 		You share a rather sordid anecdote from your background as an escort; the moral of the story is that you can go very far when you know the right people, or things about said people.
 	<<elseif $PC.career is "servant">>
 		You share a rather some of the highlights of your late master's life; the moral of the story is that you've seen how to lead from someone who was a leader... It didn't help your standing much.
-	<<else>>
+	<<elseif $PC.career is "celebrity">>
 		You share a hilarious anecdote from your background as a celebrity, one which the old world tabloids never did learn about, until now.
+	<<else>>
+		You cast yourself as one of the leading citizens of the Free Cities, from the beginning.
 	<</if>>
 	Transitioning to the future, you supply fresh fuel for rumors about how you managed to acquire the arcology by expressing confidence that
 	<<if $PC.rumor is "wealth">>
diff --git a/src/uncategorized/seRecruiterSuccess.tw b/src/uncategorized/seRecruiterSuccess.tw
index ba4df96e22d38398988c8e6d34062ff1c762e0b2..627e6d1edd336d4743ed2b97758618eb6e28c919 100644
--- a/src/uncategorized/seRecruiterSuccess.tw
+++ b/src/uncategorized/seRecruiterSuccess.tw
@@ -1,5 +1,5 @@
 :: SE recruiter success
- 
+
 <<nobr>>
 
 <<set $nextButton to "Continue">>
@@ -140,7 +140,7 @@ Your recruiter $Recruiter.slaveName has succeeded; she's convinced a desperate o
 <span id="result">
 <<if $cash >= $contractCost>>\
 <<click "Enslave her">>
-	<<set $slaves.push($activeSlave)>>
+	<<AddSlave $activeSlave>>
 	<<set $cash -= $contractCost>>
 	<<replace "#result">>
 	<<set $nextLink to "AS Dump">>\
diff --git a/src/uncategorized/siblingsWorkaround.tw b/src/uncategorized/siblingsWorkaround.tw
index 3a0b2ef30e19257ff7f013a2d466f5b00cfa56b4..46cd7cbb90deac9ad2183100294f1dd01cd9b2a3 100644
--- a/src/uncategorized/siblingsWorkaround.tw
+++ b/src/uncategorized/siblingsWorkaround.tw
@@ -1,10 +1,11 @@
 :: Siblings Workaround
- 
+
 Your new pair of slaves look frightened and uncertain, but seem encouraged by each other's presence.
 
-<<display "Nationality to Name">>
-<<display "Nationality to Accent">>
+<<AddSlave $activeSlave>>
 
+<<NationalityToName>>
+<<NationalityToAccent>>
 <<set _secondSlave to $activeSlave>>
 
 <<if $useFSNames == 0>>
@@ -67,5 +68,4 @@ Your new pair of slaves look frightened and uncertain, but seem encouraged by ea
 	<<set _secondSlave.butt += random (-1, 1)>>
 <</if>>
 
-	<<set $genePool.push(_secondSlave)>>
-	<<set $slaves.push(_secondSlave)>>
+<<AddSlave _secondSlave>>
\ No newline at end of file
diff --git a/src/uncategorized/slaveInteract.tw b/src/uncategorized/slaveInteract.tw
index a6efe4992fb46489510fea8667af8f6438e7dfe4..e048863855760d28a3b8893ca593916ef6a9c3dc 100644
--- a/src/uncategorized/slaveInteract.tw
+++ b/src/uncategorized/slaveInteract.tw
@@ -106,7 +106,7 @@
 	<</if>>
 	<</if>>
 	<span id = "impreg">
-	<<if (canGetPregnant($activeSlave))>>
+	<<if ((canGetPregnant($activeSlave)) && ($activeSlave.clothes != "a Fuckdoll suit"))>>
 			<<if ($PC.dick != 0 && $activeSlave.eggType == "human")>>
 			| <<click "Impregnate her yourself">><<replace "#miniscene">><<display "FPCImpreg">><br>&nbsp;&nbsp;&nbsp;&nbsp;<</replace>><<SlaveInteractImpreg>><<SlaveInteractFertility>><</click>>
 			<</if>>
@@ -306,8 +306,12 @@ Will not be bred by the head girl when fertile. [[Include her|Slave Interact][$a
 <br><br>
 __Rules Assistant__
 //<<click "Apply Rules Assistant to this slave">>
-<<AutoRulesActivate 1>>
-<<goto "Slave Interact">><</click>>//
+	<<silently>>
+	<<display "Check Auto Rules Activate">>
+	<<display "Default Rules">>
+	<</silently>>
+	<<goto "Slave Interact">>
+<</click>>//
 <br>&nbsp;&nbsp;&nbsp;
 <<if $activeSlave.useRulesAssistant != 0>>
 ''Subject'' to the rules assistant. [[Exempt her|Slave Interact][$activeSlave.useRulesAssistant to 0]]
diff --git a/src/uncategorized/slaveMarkets.tw b/src/uncategorized/slaveMarkets.tw
index 61c2ad50d6ed546f5dff74dd42c743bf8e893267..9735255a55cd3c826b35152a5ac429c399a69d4b 100644
--- a/src/uncategorized/slaveMarkets.tw
+++ b/src/uncategorized/slaveMarkets.tw
@@ -706,14 +706,7 @@ You're in the area of the slave market that specializes in slaves from within th
 
 <<if $arcologies[$i].FSSubjugationist > 20>>
 	They're universally $arcologies[$i].FSSubjugationistRace.
-	<<set $activeSlave.race to $arcologies[$i].FSSubjugationistRace>>
-	<<display "New Slave Race Nationality and Name">>
-<<elseif $arcologies[$i].FSSupremacist > 20>>
-	They're almost never $arcologies[$i].FSSupremacistRace.
-	<<if $activeSlave.race is $arcologies[$i].FSSupremacistRace>>
-	<<set $activeSlave.race to $arcologies[$i].FSSupremacistRace>>
-	<<display "New Slave Race Nationality and Name">>
-	<</if>>
+	<<set $fixedRace = $arcologies[$i].FSSubjugationistRace>><<NationalityToRace>><<NationalityToName>><<NationalityToAccent>><<set $fixedRace = 0>>
 <</if>>
 <<if $arcologies[$i].FSGenderRadicalist > 50>>
 	They all show signs of intensive hormone therapy.
diff --git a/src/uncategorized/specialSlave.tw b/src/uncategorized/specialSlave.tw
index 1a8812c5d4c382e209d9902a947b4ed79e920d72..b70c9efea7761dcd501475cd13479f048e57f28a 100644
--- a/src/uncategorized/specialSlave.tw
+++ b/src/uncategorized/specialSlave.tw
@@ -14,7 +14,7 @@ You review a piece of merchandise via video call, making a few lewd demands to g
 <<set $activeSlave.underArmHColor to $activeSlave.hColor>>\
 <<set $activeSlave.underArmHStyle to "waxed">>\
 <<slaveCost $activeSlave>>\
-<<display "Nationality to Accent">>
+<<NationalityToAccent>>
 \
 The offered price is ¤<<print $slaveCost>>.
 \
diff --git a/src/uncategorized/storyCaption.tw b/src/uncategorized/storyCaption.tw
index 3abe060a5e7791c1885df59ae0f334cc23dea08f..aaa530c892cb7fc034195147ee9f91665709b458 100644
--- a/src/uncategorized/storyCaption.tw
+++ b/src/uncategorized/storyCaption.tw
@@ -1,5 +1,5 @@
 :: StoryCaption
- 
+\
 <<set _Pass to passage()>>\
 <<if _Pass is "Encyclopedia">>\
 <span id="nextButton"><strong><<click [[($nextButton)|($nextLink)]]>><</click>></strong></span>
diff --git a/src/uncategorized/twinsWorkaround.tw b/src/uncategorized/twinsWorkaround.tw
index 18ef3fc75d7ec3f1eacae1381fd902c19180f8a4..620640049ef4b154c4fa018c484346dae85908e6 100644
--- a/src/uncategorized/twinsWorkaround.tw
+++ b/src/uncategorized/twinsWorkaround.tw
@@ -1,10 +1,11 @@
 :: Twins Workaround
- 
+
 Your new pair of slaves look frightened and uncertain, but seem encouraged by each other's presence.
 
-<<display "Nationality to Name">>
-<<display "Nationality to Accent">>
+<<AddSlave $activeSlave>>
 
+<<NationalityToName>>
+<<NationalityToAccent>>
 <<set _secondSlave to $activeSlave>>
 
 <<if $useFSNames == 0>>
@@ -30,5 +31,4 @@ Your new pair of slaves look frightened and uncertain, but seem encouraged by ea
 <<set _secondSlave.relationTarget to _secondSlave.ID - 1000>>
 <</if>>
 
-<<set $genePool.push(_secondSlave)>>
-<<set $slaves.push(_secondSlave)>>
+<<AddSlave _secondSlave>>
\ No newline at end of file
diff --git a/src/utility/artWidgets.tw b/src/utility/artWidgets.tw
new file mode 100644
index 0000000000000000000000000000000000000000..c6410d46f5e8436848c27e056f18bb65381dcd9d
--- /dev/null
+++ b/src/utility/artWidgets.tw
@@ -0,0 +1,479 @@
+:: art widgets [nobr widget]
+
+/%
+Call as <<AssistantArt>>
+Displays assistant images. Currently passage-based.
+$args[0]: Image size/center.
+	3: Large, right. Example: description.
+	2: Medium, right. Example: random events.
+%/
+<<widget "AssistantArt">>
+
+<<if $imageChoice == 0>> /* RENDERED IMAGES BY SHOKUSHU */
+
+<<switch $assistantAppearance>>
+<<case "monstergirl">>
+	<<set _fileName = "'resources/renders/assistant monstergirl.png' ">>
+<<case "shemale">>
+	<<set _fileName = "'resources/renders/assistant shemale.png' ">>
+<<case "amazon">>
+	<<set _fileName = "'resources/renders/assistant amazon.png' ">>
+<<case "businesswoman">>
+	<<set _fileName = "'resources/renders/assistant businesswoman.png' ">>
+<<case "goddess">>
+	<<set _fileName = "'resources/renders/assistant goddess.png' ">>
+<<case "schoolgirl">>
+	<<set _fileName = "'resources/renders/assistant schoolgirl.png' ">>
+<<default>>
+	<<set _fileName = "'resources/renders/assistant default.png' ">>
+<</switch>>
+<<if $args[1] == 3>>
+	<<print "<img src=" + _fileName + "style='float:right; border:3px hidden'/>">>
+<<else>>
+	<<print "<img src=" + _fileName + "style='float:right; border:3px hidden' width='300' height='300'/>">>
+<</if>>
+
+<</if>> /* CLOSES IMAGE CHOICE */
+
+<</widget>>
+
+/%
+Call as <<SlaveArt>>
+Displays slave images. Currently passage-based.
+$args[0]: Slave.
+$args[1]: Image size/center.
+	3: Large, right. Example: long slave description.
+	2: Medium, right. Example: random events.
+	1: Small, left. Example: lists.
+	0: Tiny, left. Example: facilities
+$args[2]: icon UI Display for vector art, 1 for on.
+%/
+<<widget "SlaveArt">>
+
+<<if ndef $args[0].customImage>><<set $args[0].customImage = 0>><</if>>
+<<if $args[0].customImage != 0>>
+
+<<set _fileName = "'resources/" + $args[0].customImage + ".png' ">>
+
+<<if $args[1] == 3>>
+	<<print "<img src=" + _fileName + "style='float:right; border:3px hidden'/>">>
+<<elseif $args[1] == 2>>
+	<<print "<img src=" + _fileName + "style='float:right; border:3px hidden' width='300' height='300'/>">>
+<<elseif $args[1] == 1>>
+	<<if $seeSummaryImages != 0>><<print "<img src=" + _fileName + "style='float:left; border:3px hidden' width='150' height='150'/>">><</if>>
+<<else>>
+	<<print "<img src=" + _fileName + "style='float:left; border:3px hidden' width='120' height='120'/>">>
+<</if>>
+
+<<elseif $imageChoice == 1>> /* VECTOR ART BY NOX */
+
+<<if $args[1] != 0>> /* IMAGE DOES NOT HAVE TO BE TINY */
+<<if ($args[1] != 1) || ($seeSummaryImages != 0)>> /* IMAGE IS NOT PART OF A LIST, OR IMAGES ARE TO BE DISPLAYED IN LISTS */
+
+<div class="imageRef">
+
+<<set _folderLoc = "'resources/vector">>
+
+<<if $args[2] == 1>>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/test ui.svg'" + "/></object>">>
+<</if>>
+
+/% Set skin colour %/
+<<set _imgSkinLoc = _folderLoc + "/body/">>
+<<switch $args[0].skin>>
+<<case "light" "white" "fair" "lightened" "extremely pale" "pale">>
+	<<set _imgSkinLoc = _imgSkinLoc + "white">>
+<<case "light brown" "dark">>
+	<<set _imgSkinLoc = _imgSkinLoc + "brown">>
+<<case "brown" "black">>
+	<<set _imgSkinLoc = _imgSkinLoc + "dark brown">>
+<<default>>
+	<<set _imgSkinLoc = _imgSkinLoc + "tanned">>
+<</switch>>
+
+/% Shoulder width and arm or no arm %/
+<<if $args[0].amp != 1>>
+<<if $args[0].fuckdoll == 0>>
+	<<if $args[0].devotion > 50>>
+		<<set _leftArmType = "high">>
+		<<set _rightArmType = "high">>
+	<<elseif $args[0].trust >= -20>>
+		<<if $args[0].devotion < -20>>
+			<<set _leftArmType = "rebel">>
+			<<set _rightArmType = "low">>
+		<<elseif $args[0].devotion <= 20>>
+			<<set _leftArmType = "low">>
+			<<set _rightArmType = "low">>
+		<<else>>
+			<<set _leftArmType = "mid">>
+			<<set _rightArmType = "high">>
+		<</if>>
+	<<else>>
+		<<set _leftArmType = "mid">>
+		<<set _rightArmType = "mid">>
+	<</if>>
+	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/arm left " + _leftArmType + ".svg'" + "/></object>">>
+	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/arm right " + _rightArmType + ".svg'" + "/></object>">>
+<<else>>
+	<<set _leftArmType = "mid latex">>
+	<<set _rightArmType = "mid latex">>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/arm left " + _leftArmType + ".svg'" + "/></object>">>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/arm right " + _rightArmType + ".svg'" + "/></object>">>
+<</if>>
+<</if>>
+
+/% Hair Aft %/
+<<if $args[0].hStyle != "shaved">>
+<<if $args[0].fuckdoll == 0>>
+	<<switch $args[0].hColor>>
+	<<case "blonde" "golden" "platinum blonde" "strawberry-blonde">>
+		<<set _hairColor = "blonde">>
+	<<case "brown" "hazel" "chestnut" "chocolate brown" "auburn" "dark brown">>
+		<<set _hairColor = "brown">>
+	<<case "red" "copper" "ginger" "burgundy">>
+		<<set _hairColor = "red">>
+	<<case "green">>
+		<<set _hairColor = "green">>
+	<<case "blue">>
+		<<set _hairColor = "blue">>
+	<<case "pink">>
+		<<set _hairColor = "pink">>
+	<<case "black" "grey" "silver" "white">>
+		<<set _hairColor = "black">>
+	<<default>>
+		<<set _hairColor = "black">>
+	<</switch>>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/hair aft neat " + _hairColor + ".svg'" + "/></object>">>
+<</if>>
+<</if>>
+
+/% Butt %/
+<<if $args[0].amp != 1>>
+<<if $args[0].butt > 5>>
+	<<set _buttSize = 3>>
+<<elseif $args[0].butt > 4>>
+	<<set _buttSize = 2>>
+<<elseif $args[0].butt > 3>>
+	<<set _buttSize = 1>>
+<<elseif $args[0].butt > 2>>
+	<<set _buttSize = 0>>
+<</if>>
+<<if $args[0].fuckdoll != 0>>
+	<<set _buttSize = _buttSize + " latex">>
+<</if>>
+<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/butt " + _buttSize + ".svg'" + "/></object>">>
+<</if>>
+
+/% Leg + 1 size up when chubby or fat%/
+<<if $args[0].hips < 0>>
+	<<if $args[0].weight <= 95>>/%Chubby%/
+		<<set _legSize = "normal">>
+	<<else>>
+		<<set _legSize = "narrow">>
+	<</if>>
+<<elseif $args[0].hips == 0>>
+	<<if $args[0].weight <= 95>>/%Chubby%/
+		<<set _legSize = "wide">>
+	<<else>>
+		<<set _legSize = "normal">>
+	<</if>>
+<<elseif $args[0].hips > 0>>
+	<<set _legSize = "wide">>
+<</if>>
+<<if $args[0].amp != 0>>
+	<<set _legSize = "stump " + _legSize>>
+<</if>>
+<<if $args[0].fuckdoll != 0 and $args[0].amp != 1>>
+	<<set _legSize = _legSize + " latex">>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/leg " + _legSize + ".svg'" + "/></object>">>
+<<else>>
+	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/leg " + _legSize + ".svg'" + "/></object>">>
+<</if>>
+
+/% Feet %/
+<<if $args[0].amp != 1>>
+<<if $args[0].shoes is "heels">>
+	<<set _shoesType = "heel">>
+<<elseif $args[0].shoes is "extreme heels">>
+	<<if $args[0].weight <= 95>>/%Chubby%/
+		<<set _shoesType = "extreme heel wide">>
+	<<else>>
+		<<set _shoesType = "extreme heel">>
+	<</if>>
+<<elseif $args[0].shoes is "boots">>
+	<<if $args[0].weight <= 95>>/%Chubby%/
+		<<set _shoesType = "boot wide">>
+	<<else>>
+		<<set _shoesType = "boot">>
+	<</if>>
+<<elseif $args[0].shoes is "flats">>
+	<<set _shoesType = "flat">>
+<<else>>
+	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/feet.svg'" + "/></object>">>
+<</if>>
+<<if $args[0].shoes is "extreme heels" or $args[0].shoes is "boots">>
+	<<if $args[0].fuckdoll != 0>>
+		<<set _shoesType = _shoesType + " latex">>
+	<</if>>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/" + _shoesType + ".svg'" + "/></object>">>
+<</if>>
+<<if $args[0].shoes is "heels" or $args[0].shoes is "flats">>
+	<<if $args[0].fuckdoll != 0>>
+		<<set _shoesType = _shoesType + " latex">>
+		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/" + _shoesType + ".svg'" + "/></object>">>
+	<<else>>
+		<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/" + _shoesType + ".svg'" + "/></object>">>
+	<</if>>
+<</if>>
+<</if>>
+
+/% Torso %/
+<<if $args[0].waist is 1>>/%Hour glass%/
+	<<if $args[0].weight <= 95>>/%Chubby%/
+		<<set _torsoSize = "normal">>
+	<<else>>
+		<<set _torsoSize = "hourglass">>
+	<</if>>
+<<elseif $args[0].waist is 2>>/*Unnatural*/
+	<<if $args[0].weight <= 95>>/%Chubby%/
+		<<set _torsoSize = "hourglass">>
+	<<else>>
+		<<set _torsoSize = "unnatural">>
+	<</if>>
+<<elseif $args[0].waist is 0>>/*Normal*/
+	<<set _torsoSize = "normal">>
+<</if>>
+<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/torso " + _torsoSize + ".svg'" + "/></object>">>
+<<if $args[0].fuckdoll != 0>>
+	<<set _torsoSize = _torsoSize + " latex">>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/torso " + _torsoSize + ".svg'" + "/></object>">>
+<</if>>
+
+/*Navel Piercing*/
+<<if $args[0].navelPiercing >= 1>>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/navel piercing.svg'" + "/></object>">>
+<</if>>
+<<if $args[0].navelPiercing == 2>>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/navel piercing heavy.svg'" + "/></object>">>
+<</if>>
+
+/% Vagina %/
+<<if $args[0].vagina >= 0>>
+	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/vagina.svg'" + "/></object>">>
+	<<if $args[0].clitPiercing == 1>>
+		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/clit piercing.svg'" + "/></object>">>
+	<<elseif $args[0].clitPiercing == 2>>
+		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/clit piercing heavy.svg'" + "/></object>">>
+	<<elseif $args[0].clitPiercing == 3>>
+		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/clit piercing smart.svg'" + "/></object>">>
+	<</if>>
+	<<if $args[0].vaginaPiercing == 1>>
+		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/pussy piercing.svg'" + "/></object>">>
+	<<elseif $args[0].vaginaPiercing == 2>>
+		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/pussy piercing heavy.svg'" + "/></object>">>
+	<</if>>
+<</if>>
+
+/%if pregnant%/
+<<if $args[0].preg > 0>>
+	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/preg belly.svg'" + "/></object>">>
+	<<if $args[0].navelPiercing >= 1>>/*Navel Piercing*/
+		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/preg navel piercing.svg'" + "/></object>">>
+	<</if>>
+	<<if $args[0].navelPiercing == 2>>
+		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/preg navel piercing heavy.svg'" + "/></object>">>
+	<</if>>
+<</if>>
+
+/% Head base image %/
+<<if $args[0].fuckdoll != 0>>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/head latex.svg'" + "/></object>">>
+<<else>>
+	<<print "<object type='image/svg+xml' data=" +_imgSkinLoc + "/head.svg'" + "/></object>">>
+<</if>>
+
+/% Collar %/
+<<if $args[0].collar is "dildo gag">>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/gag.svg'" + "/></object>">>
+<</if>>
+
+/% Glasses %/
+<<if $args[0].eyewear is "corrective glasses" or $args[0].eyewear is "glasses" or $args[0].eyewear is "blurring glasses">>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/glasses.svg'" + "/></object>">>
+<</if>>
+
+/% Boob %/
+<<if $args[0].boobs < 100>>
+	<<set _boobSize = 0>>
+<<elseif $args[0].boobs < 400>>
+	<<set _boobSize = 1>>
+<<elseif $args[0].boobs < 800>>
+	<<set _boobSize = 2>>
+<<elseif $args[0].boobs < 1600>>
+	<<set _boobSize = 3>>
+<<elseif $args[0].boobs < 3200>>
+	<<set _boobSize = 4>>
+<<elseif $args[0].boobs < 6400>>
+	<<set _boobSize = 5>>
+<<elseif $args[0].boobs < 12000>>
+	<<set _boobSize = 6>>
+<<else>>
+	<<set _boobSize = 7>>
+<</if>>
+<<if $args[0].fuckdoll != 0>>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/boob " +_boobSize +" latex.svg'" + "/></object>">>
+	<<if $args[0].lactation > 0>><<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/boob " +_boobSize + " areola.svg'" + "/></object>">><</if>>
+<<else>>
+	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/boob " +_boobSize +".svg'" + "/></object>">>
+	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/boob " +_boobSize + " areola.svg'" + "/></object>">>
+<</if>>
+<<if$args[0].nipplesPiercing ==1>>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/boob " +_boobSize +" piercing.svg'" + "/></object>">>
+<<elseif$args[0].nipplesPiercing ==2>>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/boob " +_boobSize +" piercing heavy.svg'" + "/></object>">>
+<</if>>
+<<if$args[0].areolaePiercing ==1>>
+	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/boob " +_boobSize +" areola piercing.svg'" + "/></object>">>
+<</if>>
+
+/% Scrotum %/
+<<if $args[0].scrotum > 0>>
+	<<if $args[0].scrotum >= 6>>
+		<<set _ballSize = 4>>
+	<<elseif $args[0].scrotum >= 4>>
+		<<set _ballSize = 3>>
+	<<elseif $args[0].scrotum >= 3>>
+		<<set _ballSize = 2>>
+	<<elseif $args[0].scrotum >= 2>>
+		<<set _ballSize = 1>>
+	<<else>>
+		<<set _ballSize = 0>>
+	<</if>>
+<</if>>
+
+/% Penis %/
+<<if $args[0].dick > 0>>
+	<<if $args[0].dick >= 8>>
+		<<set _penisSize = 6>>
+	<<elseif $args[0].dick >= 7>>
+		<<set _penisSize = 5>>
+	<<elseif $args[0].dick >= 6>>
+		<<set _penisSize = 4>>
+	<<elseif $args[0].dick >= 5>>
+		<<set _penisSize = 3>>
+	<<elseif $args[0].dick >= 4>>
+		<<set _penisSize = 2>>
+	<<elseif $args[0].dick >= 2>>
+		<<set _penisSize = 1>>
+	<<else>>
+		<<set _penisSize = 0>>
+	<</if>>
+<</if>>
+
+<<if _boobSize <= 5>>
+<<if $args[0].vagina > 0>>
+	<<if $args[0].dick > 0>>
+		<div class="highPenis">
+		<<if $args[0].scrotum > 0>>
+			<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/ball " + _ballSize + ".svg'" + "/></object>">>
+		<</if>>
+		<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/penis " + _penisSize + ".svg'" + "/></object>">>
+		</div>
+	<</if>>
+<<else>>
+	<<if $args[0].dick > 0>>
+		<div class="lowPenis">
+		<<if $args[0].scrotum > 0>>
+			<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/ball " + _ballSize + ".svg'" + "/></object>">>
+		<</if>>
+		<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/penis " + _penisSize + ".svg'" + "/></object>">>
+		</div>
+	<</if>>
+<</if>>
+<</if>>
+
+/% clavicle %/
+<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/clavicle.svg'" + "/></object>">>
+
+/% Hair Foreground%/
+<<if $args[0].hStyle != "shaved">>
+<<if $args[0].fuckdoll == 0>>
+<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/hair fore neat " + _hairColor + ".svg'" + "/></object>">>
+<</if>>
+<</if>>
+
+</div>
+
+<</if>>
+<</if>> /* CLOSES EXEMPTIONS FOR IMAGE SIZES NOT CURRENTLY SUPPORTED BY VECTOR ART */
+
+<<else>> /* RENDERED IMAGES BY SHOKUSHU */
+
+<<if $args[0].vagina gt -1>>
+	<<if $args[0].dick gt 0>>
+		<<if $args[0].balls gt 0>>
+			<<set _fileName = "futanari">>
+		<<else>>
+			<<set _fileName = "herm">>
+		<</if>>
+	<<else>>
+		<<set _fileName = "female">>
+	<</if>>
+<<else>>
+	<<if $args[0].balls gt 0>>
+		<<set _fileName = "shemale">>
+	<<else>>
+		<<set _fileName = "gelding">>
+	<</if>>
+<</if>>
+<<if $args[0].preg gt 10>>
+	<<set _fileName = "preg " + _fileName>>
+<</if>>
+<<if $args[0].boobs < 400>>
+	<<set _fileName = _fileName + " small">>
+<<elseif $args[0].boobs < 800>>
+	<<set _fileName = _fileName + " big">>
+<<elseif $args[0].boobs < 6000>>
+	<<set _fileName = _fileName + " huge">>
+<<else>>
+	<<set _fileName = _fileName + " hyper">>
+<</if>>
+<<if $args[0].muscles > 30>>
+	<<set _fileName = _fileName + " muscle">>
+<<else>>
+	<<set _fileName = _fileName + " soft">>
+<</if>>
+<<if $args[0].fuckdoll > 0>>
+	<<set _fileName = _fileName + " rebellious">>
+<<elseif $args[0].devotion <= 20>>
+	<<if $args[0].trust < -20>>
+		<<set _fileName = _fileName + " reluctant">>
+	<<else>>
+		<<set _fileName = _fileName + " rebellious">>
+	<</if>>
+<<elseif $args[0].fetish == "mindbroken">>
+	<<set _fileName = _fileName + " reluctant">>
+<<elseif $args[0].devotion <= 50 || $args[0].fetishKnown != 1 || ($seeMainFetishes == 0 && $args[1] < 2)>>
+	<<set _fileName = _fileName + " obedient">>
+<<else>>
+	<<if $args[0].fetish == "none">>
+		<<set _fileName = _fileName + " obedient">>
+	<<else>>
+		<<set _fileName = _fileName + " " + $args[0].fetish>>
+	<</if>>
+<</if>>
+
+<<set _fileName = "'resources/renders/" + _fileName + ".png' ">>
+<<if $args[1] == 3>>
+	<<print "<img src=" + _fileName + "style='float:right; border:3px hidden'/>">>
+<<elseif $args[1] == 2>>
+	<<print "<img src=" + _fileName + "style='float:right; border:3px hidden' width='300' height='300'/>">>
+<<elseif $args[1] == 1>>
+	<<if $seeSummaryImages != 0>><<print "<img src=" + _fileName + "style='float:left; border:3px hidden' width='150' height='150'/>">><</if>>
+<<else>>
+	<<print "<img src=" + _fileName + "style='float:left; border:3px hidden' width='120' height='120'/>">>
+<</if>>
+
+<</if>> /* CLOSES IMAGE CHOICE */
+
+<</widget>>
diff --git a/src/utility/miscWidgets.tw b/src/utility/miscWidgets.tw
index 2e1a7905d601f89b0dfaf924b0477810c860baff..c2add92725e23b7bf80435257601cdce459775e0 100644
--- a/src/utility/miscWidgets.tw
+++ b/src/utility/miscWidgets.tw
@@ -874,9 +874,9 @@
 <</if>>
 <<if $schoolsPerfected.length > 0>>
 	<<if $PC.title == 1>>
-	<<set $schoolTitle to "Benefactor of ">>
+	<<set $schoolTitle = "Benefactor of ">>
 	<<else>>
-	<<set $schoolTitle to "Benefactrix of ">>
+	<<set $schoolTitle = "Benefactrix of ">>
 	<</if>>
 	<<for $i to 0; $i < $schoolsPerfected.length; $i++>>
 	<<set $seed to $schoolsPerfected[$i]>>
@@ -894,7 +894,7 @@
 	<<set $titles.push($schoolTitle)>>
 <</if>>
 <<if $schoolsPresent.length > 0>>
-	<<set $schoolTitle to "Supporter of ">>
+	<<set $schoolTitle = "Supporter of ">>
 	<<for $i to 0; $i < $schoolsPresent.length; $i++>>
 	<<set $seed to $schoolsPresent[$i]>>
 	<<set $schoolTitle to ($schoolTitle + $seed)>>
@@ -1167,479 +1167,199 @@
 <</widget>>
 
 /%
-Call as <<AssistantArt>>
-Displays assistant images. Currently passage-based.
-$args[0]: Image size/center.
-	3: Large, right. Example: description.
-	2: Medium, right. Example: random events.
-%/
-<<widget "AssistantArt">>
-
-<<if $imageChoice == 0>> /* RENDERED IMAGES BY SHOKUSHU */
-
-<<switch $assistantAppearance>>
-<<case "monstergirl">>
-	<<set _fileName = "'resources/renders/assistant monstergirl.png' ">>
-<<case "shemale">>
-	<<set _fileName = "'resources/renders/assistant shemale.png' ">>
-<<case "amazon">>
-	<<set _fileName = "'resources/renders/assistant amazon.png' ">>
-<<case "businesswoman">>
-	<<set _fileName = "'resources/renders/assistant businesswoman.png' ">>
-<<case "goddess">>
-	<<set _fileName = "'resources/renders/assistant goddess.png' ">>
-<<case "schoolgirl">>
-	<<set _fileName = "'resources/renders/assistant schoolgirl.png' ">>
-<<default>>
-	<<set _fileName = "'resources/renders/assistant default.png' ">>
-<</switch>>
-<<if $args[1] == 3>>
-	<<print "<img src=" + _fileName + "style='float:right; border:3px hidden'/>">>
-<<else>>
-	<<print "<img src=" + _fileName + "style='float:right; border:3px hidden' width='300' height='300'/>">>
-<</if>>
-
-<</if>> /* CLOSES IMAGE CHOICE */
-
-<</widget>>
-
-/%
-Call as <<SlaveArt>>
-Displays slave images. Currently passage-based.
-$args[0]: Slave.
-$args[1]: Image size/center.
-	3: Large, right. Example: long slave description.
-	2: Medium, right. Example: random events.
-	1: Small, left. Example: lists.
-	0: Tiny, left. Example: facilities
-$args[2]: icon UI Display for vector art, 1 for on.
+ Call as <<AddSlave>>
+ $args[0]: Slave.
 %/
-<<widget "SlaveArt">>
-
-<<if ndef $args[0].customImage>><<set $args[0].customImage = 0>><</if>>
-<<if $args[0].customImage != 0>>
-
-<<set _fileName = "'resources/" + $args[0].customImage + ".png' ">>
-
-<<if $args[1] == 3>>
-	<<print "<img src=" + _fileName + "style='float:right; border:3px hidden'/>">>
-<<elseif $args[1] == 2>>
-	<<print "<img src=" + _fileName + "style='float:right; border:3px hidden' width='300' height='300'/>">>
-<<elseif $args[1] == 1>>
-	<<if $seeSummaryImages != 0>><<print "<img src=" + _fileName + "style='float:left; border:3px hidden' width='150' height='150'/>">><</if>>
-<<else>>
-	<<print "<img src=" + _fileName + "style='float:left; border:3px hidden' width='120' height='120'/>">>
-<</if>>
-
-<<elseif $imageChoice == 1>> /* VECTOR ART BY NOX */
-
-<<if $args[1] != 0>> /* IMAGE DOES NOT HAVE TO BE TINY */
-<<if ($args[1] != 1) || ($seeSummaryImages != 0)>> /* IMAGE IS NOT PART OF A LIST, OR IMAGES ARE TO BE DISPLAYED IN LISTS */
-
-<div class="imageRef">
-
-<<set _folderLoc = "'resources/vector">>
-
-<<if $args[2] == 1>>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/test ui.svg'" + "/></object>">>
-<</if>>
-
-/% Set skin colour %/
-<<set _imgSkinLoc = _folderLoc + "/body/">>
-<<switch $args[0].skin>>
-<<case "light" "white" "fair" "lightened" "extremely pale" "pale">>
-	<<set _imgSkinLoc = _imgSkinLoc + "white">>
-<<case "light brown" "dark">>
-	<<set _imgSkinLoc = _imgSkinLoc + "brown">>
-<<case "brown" "black">>
-	<<set _imgSkinLoc = _imgSkinLoc + "dark brown">>
-<<default>>
-	<<set _imgSkinLoc = _imgSkinLoc + "tanned">>
-<</switch>>
-
-/% Shoulder width and arm or no arm %/
-<<if $args[0].amp != 1>>
-<<if $args[0].fuckdoll == 0>>
-	<<if $args[0].devotion > 50>>
-		<<set _leftArmType = "high">>
-		<<set _rightArmType = "high">>
-	<<elseif $args[0].trust >= -20>>
-		<<if $args[0].devotion < -20>>
-			<<set _leftArmType = "rebel">>
-			<<set _rightArmType = "low">>
-		<<elseif $args[0].devotion <= 20>>
-			<<set _leftArmType = "low">>
-			<<set _rightArmType = "low">>
-		<<else>>
-			<<set _leftArmType = "mid">>
-			<<set _rightArmType = "high">>
-		<</if>>
-	<<else>>
-		<<set _leftArmType = "mid">>
-		<<set _rightArmType = "mid">>
-	<</if>>
-	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/arm left " + _leftArmType + ".svg'" + "/></object>">>
-	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/arm right " + _rightArmType + ".svg'" + "/></object>">>
-<<else>>
-	<<set _leftArmType = "mid latex">>
-	<<set _rightArmType = "mid latex">>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/arm left " + _leftArmType + ".svg'" + "/></object>">>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/arm right " + _rightArmType + ".svg'" + "/></object>">>
-<</if>>
-<</if>>
-
-/% Hair Aft %/
-<<if $args[0].hStyle != "shaved">>
-<<if $args[0].fuckdoll == 0>>
-	<<switch $args[0].hColor>>
-	<<case "blonde" "golden" "platinum blonde" "strawberry-blonde">>
-		<<set _hairColor = "blonde">>
-	<<case "brown" "hazel" "chestnut" "chocolate brown" "auburn" "dark brown">>
-		<<set _hairColor = "brown">>
-	<<case "red" "copper" "ginger" "burgundy">>
-		<<set _hairColor = "red">>
-	<<case "green">>
-		<<set _hairColor = "green">>
-	<<case "blue">>
-		<<set _hairColor = "blue">>
-	<<case "pink">>
-		<<set _hairColor = "pink">>
-	<<case "black" "grey" "silver" "white">>
-		<<set _hairColor = "black">>
-	<<default>>
-		<<set _hairColor = "black">>
-	<</switch>>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/hair aft neat " + _hairColor + ".svg'" + "/></object>">>
-<</if>>
-<</if>>
-
-/% Butt %/
-<<if $args[0].amp != 1>>
-<<if $args[0].butt > 5>>
-	<<set _buttSize = 3>>
-<<elseif $args[0].butt > 4>>
-	<<set _buttSize = 2>>
-<<elseif $args[0].butt > 3>>
-	<<set _buttSize = 1>>
-<<elseif $args[0].butt > 2>>
-	<<set _buttSize = 0>>
-<</if>>
-<<if $args[0].fuckdoll != 0>>
-	<<set _buttSize = _buttSize + " latex">>
-<</if>>
-<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/butt " + _buttSize + ".svg'" + "/></object>">>
-<</if>>
-
-/% Leg + 1 size up when chubby or fat%/
-<<if $args[0].hips < 0>>
-	<<if $args[0].weight <= 95>>/%Chubby%/
-		<<set _legSize = "normal">>
-	<<else>>
-		<<set _legSize = "narrow">>
-	<</if>>
-<<elseif $args[0].hips == 0>>
-	<<if $args[0].weight <= 95>>/%Chubby%/
-		<<set _legSize = "wide">>
-	<<else>>
-		<<set _legSize = "normal">>
-	<</if>>
-<<elseif $args[0].hips > 0>>
-	<<set _legSize = "wide">>
-<</if>>
-<<if $args[0].amp != 0>>
-	<<set _legSize = "stump " + _legSize>>
-<</if>>
-<<if $args[0].fuckdoll != 0 and $args[0].amp != 1>>
-	<<set _legSize = _legSize + " latex">>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/leg " + _legSize + ".svg'" + "/></object>">>
-<<else>>
-	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/leg " + _legSize + ".svg'" + "/></object>">>
-<</if>>
+<<widget "AddSlave">>
 
-/% Feet %/
-<<if $args[0].amp != 1>>
-<<if $args[0].shoes is "heels">>
-	<<set _shoesType = "heel">>
-<<elseif $args[0].shoes is "extreme heels">>
-	<<if $args[0].weight <= 95>>/%Chubby%/
-		<<set _shoesType = "extreme heel wide">>
-	<<else>>
-		<<set _shoesType = "extreme heel">>
+<<if $args[0].dick > 0>>
+	<<if $args[0].balls > 0>>
+	<<if $args[0].devotion <= 50>>
+	<<if ($args[0].fetish != "buttslut") || ($args[0].fetishKnown != 1)>>
+	<<if $args[0].sexualFlaw != "hates women">>
+	<<set $REFeminizationCheckinIDs.push($args[0].ID)>>
 	<</if>>
-<<elseif $args[0].shoes is "boots">>
-	<<if $args[0].weight <= 95>>/%Chubby%/
-		<<set _shoesType = "boot wide">>
-	<<else>>
-		<<set _shoesType = "boot">>
 	<</if>>
-<<elseif $args[0].shoes is "flats">>
-	<<set _shoesType = "flat">>
-<<else>>
-	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/feet.svg'" + "/></object>">>
-<</if>>
-<<if $args[0].shoes is "extreme heels" or $args[0].shoes is "boots">>
-	<<if $args[0].fuckdoll != 0>>
-		<<set _shoesType = _shoesType + " latex">>
 	<</if>>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/" + _shoesType + ".svg'" + "/></object>">>
-<</if>>
-<<if $args[0].shoes is "heels" or $args[0].shoes is "flats">>
-	<<if $args[0].fuckdoll != 0>>
-		<<set _shoesType = _shoesType + " latex">>
-		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/" + _shoesType + ".svg'" + "/></object>">>
-	<<else>>
-		<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/" + _shoesType + ".svg'" + "/></object>">>
 	<</if>>
 <</if>>
-<</if>>
 
-/% Torso %/
-<<if $args[0].waist is 1>>/%Hour glass%/
-	<<if $args[0].weight <= 95>>/%Chubby%/
-		<<set _torsoSize = "normal">>
-	<<else>>
-		<<set _torsoSize = "hourglass">>
+<<if $args[0].actualAge > 35>>
+	<<if $args[0].face < 2>>
+	<<if $args[0].analSkill <= 30>>
+	<<set $REMILFCheckinIDs.push($args[0].ID)>>
 	<</if>>
-<<elseif $args[0].waist is 2>>/*Unnatural*/
-	<<if $args[0].weight <= 95>>/%Chubby%/
-		<<set _torsoSize = "hourglass">>
-	<<else>>
-		<<set _torsoSize = "unnatural">>
 	<</if>>
-<<elseif $args[0].waist is 0>>/*Normal*/
-	<<set _torsoSize = "normal">>
-<</if>>
-<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/torso " + _torsoSize + ".svg'" + "/></object>">>
-<<if $args[0].fuckdoll != 0>>
-	<<set _torsoSize = _torsoSize + " latex">>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/torso " + _torsoSize + ".svg'" + "/></object>">>
-<</if>>
-
-/*Navel Piercing*/
-<<if $args[0].navelPiercing >= 1>>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/navel piercing.svg'" + "/></object>">>
-<</if>>
-<<if $args[0].navelPiercing == 2>>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/navel piercing heavy.svg'" + "/></object>">>
 <</if>>
 
-/% Vagina %/
-<<if $args[0].vagina >= 0>>
-	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/vagina.svg'" + "/></object>">>
-	<<if $args[0].clitPiercing == 1>>
-		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/clit piercing.svg'" + "/></object>">>
-	<<elseif $args[0].clitPiercing == 2>>
-		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/clit piercing heavy.svg'" + "/></object>">>
-	<<elseif $args[0].clitPiercing == 3>>
-		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/clit piercing smart.svg'" + "/></object>">>
-	<</if>>
-	<<if $args[0].vaginaPiercing == 1>>
-		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/pussy piercing.svg'" + "/></object>">>
-	<<elseif $args[0].vaginaPiercing == 2>>
-		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/pussy piercing heavy.svg'" + "/></object>">>
+<<if $args[0].attrXY <= 60>>
+	<<if $args[0].attrXX > 60>>
+		<<set $REOrientationCheckinIDs.push($args[0].ID)>>
 	<</if>>
 <</if>>
 
-/%if pregnant%/
-<<if $args[0].preg > 0>>
-	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/preg belly.svg'" + "/></object>">>
-	<<if $args[0].navelPiercing >= 1>>/*Navel Piercing*/
-		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/preg navel piercing.svg'" + "/></object>">>
-	<</if>>
-	<<if $args[0].navelPiercing == 2>>
-		<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/preg navel piercing heavy.svg'" + "/></object>">>
-	<</if>>
+<<if $args[0].face < 0>>
+	<<set $REUglyCheckinIDs.push($args[0].ID)>>
 <</if>>
 
-/% Head base image %/
-<<if $args[0].fuckdoll != 0>>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/head latex.svg'" + "/></object>">>
-<<else>>
-	<<print "<object type='image/svg+xml' data=" +_imgSkinLoc + "/head.svg'" + "/></object>">>
-<</if>>
-
-/% Collar %/
-<<if $args[0].collar is "dildo gag">>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/gag.svg'" + "/></object>">>
-<</if>>
-
-/% Glasses %/
-<<if $args[0].eyewear is "corrective glasses" or $args[0].eyewear is "glasses" or $args[0].eyewear is "blurring glasses">>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/glasses.svg'" + "/></object>">>
-<</if>>
-
-/% Boob %/
-<<if $args[0].boobs < 100>>
-	<<set _boobSize = 0>>
-<<elseif $args[0].boobs < 400>>
-	<<set _boobSize = 1>>
-<<elseif $args[0].boobs < 800>>
-	<<set _boobSize = 2>>
-<<elseif $args[0].boobs < 1600>>
-	<<set _boobSize = 3>>
-<<elseif $args[0].boobs < 3200>>
-	<<set _boobSize = 4>>
-<<elseif $args[0].boobs < 6400>>
-	<<set _boobSize = 5>>
-<<elseif $args[0].boobs < 12000>>
-	<<set _boobSize = 6>>
-<<else>>
-	<<set _boobSize = 7>>
-<</if>>
-<<if $args[0].fuckdoll != 0>>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/outfit/boob " +_boobSize +" latex.svg'" + "/></object>">>
-	<<if $args[0].lactation > 0>><<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/boob " +_boobSize + " areola.svg'" + "/></object>">><</if>>
-<<else>>
-	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/boob " +_boobSize +".svg'" + "/></object>">>
-	<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/boob " +_boobSize + " areola.svg'" + "/></object>">>
-<</if>>
-<<if$args[0].nipplesPiercing ==1>>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/boob " +_boobSize +" piercing.svg'" + "/></object>">>
-<<elseif$args[0].nipplesPiercing ==2>>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/boob " +_boobSize +" piercing heavy.svg'" + "/></object>">>
-<</if>>
-<<if$args[0].areolaePiercing ==1>>
-	<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/boob " +_boobSize +" areola piercing.svg'" + "/></object>">>
-<</if>>
-
-/% Scrotum %/
-<<if $args[0].scrotum > 0>>
-	<<if $args[0].scrotum >= 6>>
-		<<set _ballSize = 4>>
-	<<elseif $args[0].scrotum >= 4>>
-		<<set _ballSize = 3>>
-	<<elseif $args[0].scrotum >= 3>>
-		<<set _ballSize = 2>>
-	<<elseif $args[0].scrotum >= 2>>
-		<<set _ballSize = 1>>
-	<<else>>
-		<<set _ballSize = 0>>
-	<</if>>
+<<if $args[0].anus < 2>>
+	<<set $REButtholeCheckinIDs.push($args[0].ID)>>
 <</if>>
 
-/% Penis %/
-<<if $args[0].dick > 0>>
-	<<if $args[0].dick >= 8>>
-		<<set _penisSize = 6>>
-	<<elseif $args[0].dick >= 7>>
-		<<set _penisSize = 5>>
-	<<elseif $args[0].dick >= 6>>
-		<<set _penisSize = 4>>
-	<<elseif $args[0].dick >= 5>>
-		<<set _penisSize = 3>>
-	<<elseif $args[0].dick >= 4>>
-		<<set _penisSize = 2>>
-	<<elseif $args[0].dick >= 2>>
-		<<set _penisSize = 1>>
-	<<else>>
-		<<set _penisSize = 0>>
-	<</if>>
+<<if $args[0].boobs < 800>>
+	<<set $REReductionCheckinIDs.push($args[0].ID)>>
 <</if>>
 
-<<if _boobSize <= 5>>
-<<if $args[0].vagina > 0>>
-	<<if $args[0].dick > 0>>
-		<div class="highPenis">
-		<<if $args[0].scrotum > 0>>
-			<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/ball " + _ballSize + ".svg'" + "/></object>">>
-		<</if>>
-		<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/penis " + _penisSize + ".svg'" + "/></object>">>
-		</div>
-	<</if>>
-<<else>>
-	<<if $args[0].dick > 0>>
-		<div class="lowPenis">
-		<<if $args[0].scrotum > 0>>
-			<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/ball " + _ballSize + ".svg'" + "/></object>">>
-		<</if>>
-		<<print "<object type='image/svg+xml' data=" + _imgSkinLoc + "/penis " + _penisSize + ".svg'" + "/></object>">>
-		</div>
-	<</if>>
+<<if $ui != "start">>
+<<if $universalRulesNewSlavesRA == 1>>
+<<if $autoRulesAssistant != 0>>
+	<<silently>>
+	<<display "Check Auto Rules Activate">>
+	<<display "Default Rules">>
+	<</silently>>
 <</if>>
 <</if>>
-
-/% clavicle %/
-<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/clavicle.svg'" + "/></object>">>
-
-/% Hair Foreground%/
-<<if $args[0].hStyle != "shaved">>
-<<if $args[0].fuckdoll == 0>>
-<<print "<object type='image/svg+xml' data=" + _folderLoc + "/body/addon/hair fore neat " + _hairColor + ".svg'" + "/></object>">>
-<</if>>
 <</if>>
 
-</div>
+<<set $slaves.push($args[0]), $slavesOriginal.push($args[0]), $genePool.push($args[0])>>
 
-<</if>>
-<</if>> /* CLOSES EXEMPTIONS FOR IMAGE SIZES NOT CURRENTLY SUPPORTED BY VECTOR ART */
-
-<<else>> /* RENDERED IMAGES BY SHOKUSHU */
+<</widget>>
 
-<<if $args[0].vagina gt -1>>
-	<<if $args[0].dick gt 0>>
-		<<if $args[0].balls gt 0>>
-			<<set _fileName = "futanari">>
-		<<else>>
-			<<set _fileName = "herm">>
-		<</if>>
-	<<else>>
-		<<set _fileName = "female">>
-	<</if>>
-<<else>>
-	<<if $args[0].balls gt 0>>
-		<<set _fileName = "shemale">>
+/%
+ Call as <<Enunciate>>
+ $args[0]: Slave.
+%/
+<<widget "Enunciate">>
+	<<if SlaveStatsChecker.checkForLisp($args[0])>>
+		<<if def $PC.customTitleLisp>><<set $titleEnunciate = $PC.customTitleLisp>><<elseif $PC.title != 0>><<set $titleEnunciate = "Mathter">><<else>><<set $titleEnunciate = "Mithtreth">><</if>>
+		<<set $sayEnunciate = "lisp">>
+		<<set $sEnunciate = "th">>
+		<<set $SEnunciate = "Th">>
+		<<set $ssEnunciate = "th">>
+		<<set $cEnunciate = "th">>
 	<<else>>
-		<<set _fileName = "gelding">>
+		<<if def $PC.customTitle>><<set $titleEnunciate = $PC.customTitle>><<elseif $PC.title != 0>><<set $titleEnunciate = "Master">><<else>><<set $titleEnunciate = "Mistress">><</if>>
+		<<set $sayEnunciate = "say">>
+		<<set $sEnunciate = "s">>
+		<<set $SEnunciate = "S">>
+		<<set $ssEnunciate = "ss">>
+		<<set $cEnunciate = "c">>
 	<</if>>
-<</if>>
-<<if $args[0].preg gt 10>>
-	<<set _fileName = "preg " + _fileName>>
-<</if>>
-<<if $args[0].boobs < 400>>
-	<<set _fileName = _fileName + " small">>
-<<elseif $args[0].boobs < 800>>
-	<<set _fileName = _fileName + " big">>
-<<elseif $args[0].boobs < 6000>>
-	<<set _fileName = _fileName + " huge">>
-<<else>>
-	<<set _fileName = _fileName + " hyper">>
-<</if>>
-<<if $args[0].muscles > 30>>
-	<<set _fileName = _fileName + " muscle">>
-<<else>>
-	<<set _fileName = _fileName + " soft">>
-<</if>>
-<<if $args[0].fuckdoll > 0>>
-	<<set _fileName = _fileName + " rebellious">>
-<<elseif $args[0].devotion <= 20>>
-	<<if $args[0].trust < -20>>
-		<<set _fileName = _fileName + " reluctant">>
+<</widget>>
+<<widget "Master">>$titleEnunciate<</widget>>
+<<widget "say">>$sayEnunciate<</widget>>
+<<widget "s">>$sEnunciate<</widget>>
+<<widget "S">>$SEnunciate<</widget>>
+<<widget "ss">>$ssEnunciate<</widget>>
+<<widget "c">>$cEnunciate<</widget>>
+
+/%
+ Call as <<SoftenBehavioralFlaw>>
+ $args[0]: Slave.
+%/
+<<widget "SoftenBehavioralFlaw">>
+	<<switch $args[0].behavioralFlaw>>
+	<<case "arrogant">>
+		<<set $args[0].behavioralQuirk = "confident">>
+	<<case "bitchy">>
+		<<set $args[0].behavioralQuirk = "cutting">>
+	<<case "odd">>
+		<<set $args[0].behavioralQuirk = "funny">>
+	<<case "hates men">>
+		<<set $args[0].behavioralQuirk = "adores women">>
+	<<case "hates women">>
+		<<set $args[0].behavioralQuirk = "adores men">>
+	<<case "gluttonous">>
+		<<set $args[0].behavioralQuirk = "fitness">>
+	<<case "anorexic">>
+		<<set $args[0].behavioralQuirk = "insecure">>
+	<<case "devout">>
+		<<set $args[0].behavioralQuirk = "sinful">>
+	<<case "liberated">>
+		<<set $args[0].behavioralQuirk = "advocate">>
+	<</switch>>
+	<<set $activeSlave.behavioralFlaw = "none">>
+<</widget>>
+
+/%
+ Call as <<SoftenSexualFlaw>>
+ $args[0]: Slave.
+%/
+<<widget "SoftenSexualFlaw">>
+	<<switch $args[0].sexualFlaw>>
+	<<case "hates oral">>
+		<<set $args[0].sexualQuirk = "gagfuck queen">>
+	<<case "hates anal">>
+		<<set $args[0].sexualQuirk = "painal queen">>
+	<<case "hates penetration">>
+		<<set $args[0].sexualQuirk = "strugglefuck queen">>
+	<<case "shamefast">>
+		<<set $args[0].sexualQuirk = "tease">>
+	<<case "idealistic">>
+		<<set $args[0].sexualQuirk = "romantic">>
+	<<case "repressed">>
+		<<set $args[0].sexualQuirk = "perverted">>
+	<<case "apathetic">>
+		<<set $args[0].sexualQuirk = "caring">>
+	<<case "crude">>
+		<<set $args[0].sexualQuirk = "unflinching">>
+	<<case "judgemental">>
+		<<set $args[0].sexualQuirk = "size queen">>
+	<</switch>>
+	<<set $args[0].sexualFlaw = "none">>
+<</widget>>
+
+/%
+ Call as <<EventFetish>>
+ $args[0]: Slave.
+ $args[1]: Fetish.
+%/
+<<widget "EventFetish">>
+
+<<if $args[0].fetish == $args[1]>>
+This experience
+<<if $$args[0].fetishKnown == 1>>
+	<<if $$args[0].fetishStrength > 95>>
+		@@color:lightsalmon;<<switch $args[0].fetish>>
+		<<case "submissive">>deepens her sexual need to submit.
+		<<case "cumslut">>increases her appetite for oral sex.
+		<<case "humiliation">>makes her even more eager to be humiliated.
+		<<case "buttslut">>encourages her to focus on anal sex.
+		<<case "boobs">>focuses her sexuality on her breasts and nipples.
+		<<case "sadist">>titillates the sadistic part of her.
+		<<case "masochist">>helps conflate pain and sexual pleasure for her.
+		<<case "dom">>strengthens her desire to top other slaves.
+		<<case "pregnancy">>further confuses lust and pregnancy in her mind.
+		<<default>>ERROR: bad fetish
+		<</switch>>@@
+		<<set $$args[0].fetishStrength += 10>>
 	<<else>>
-		<<set _fileName = _fileName + " rebellious">>
+		is @@color:hotpink;especially enjoyable for her,@@ since
+		<<switch $args[0].fetish>>
+		<<case "submissive">>she's an utterly submissive little slut.
+		<<case "cumslut">>her <<if $$args[0].vagina > -1>>clit<<else>>frenulum<</if>> might as well be located in her throat.
+		<<case "humiliation">>she has a hopeless need to be humiliated and degraded.
+		<<case "buttslut">>she's completely in love with having her ass fucked.
+		<<case "boobs">>she loves breast play more than any other kind of sex.
+		<<case "sadist">>nothing is as titillating to her as another slave's pain can be.
+		<<case "masochist">>she loves pain more than she likes pleasure.
+		<<case "dom">>she lives for the times she's allowed to fuck someone.
+		<<case "pregnancy">>all her deepest sexual desires involve <<if $$args[0].vagina > -1>>pregnancy<<else>>impregnation<</if>>.
+		<<default>>ERROR: bad fetish
+		<</switch>>
+		<<set $$args[0].devotion += 3>>
 	<</if>>
-<<elseif $args[0].fetish == "mindbroken">>
-	<<set _fileName = _fileName + " reluctant">>
-<<elseif $args[0].devotion <= 50 || $args[0].fetishKnown != 1 || ($seeMainFetishes == 0 && $args[1] < 2)>>
-	<<set _fileName = _fileName + " obedient">>
 <<else>>
-	<<if $args[0].fetish == "none">>
-		<<set _fileName = _fileName + " obedient">>
-	<<else>>
-		<<set _fileName = _fileName + " " + $args[0].fetish>>
-	<</if>>
+	was surprisingly appealing for her, revealing that she's a
+	@@color:lightsalmon;<<switch $args[0].fetish>>
+	<<case "submissive">>sexual submissive!
+	<<case "humiliation">>humiliation slut!
+	<<case "boobs">>slut for breast play!
+	<<case "pregnancy">>pregslut!
+	<<default>>$args[0]!
+	<</switch>>@@
+	<<set $$args[0].fetishKnown = 1>>
 <</if>>
-
-<<set _fileName = "'resources/renders/" + _fileName + ".png' ">>
-<<if $args[1] == 3>>
-	<<print "<img src=" + _fileName + "style='float:right; border:3px hidden'/>">>
-<<elseif $args[1] == 2>>
-	<<print "<img src=" + _fileName + "style='float:right; border:3px hidden' width='300' height='300'/>">>
-<<elseif $args[1] == 1>>
-	<<if $seeSummaryImages != 0>><<print "<img src=" + _fileName + "style='float:left; border:3px hidden' width='150' height='150'/>">><</if>>
-<<else>>
-	<<print "<img src=" + _fileName + "style='float:left; border:3px hidden' width='120' height='120'/>">>
 <</if>>
 
-<</if>> /* CLOSES IMAGE CHOICE */
-
-<</widget>>
+<</widget>>
\ No newline at end of file
diff --git a/src/utility/raWidgets.tw b/src/utility/raWidgets.tw
index 0e495b194c855b051e66a093a24dc7da3a9b9a76..74ee9aae40ee6c4c82957d648afdfe48588e1288 100644
--- a/src/utility/raWidgets.tw
+++ b/src/utility/raWidgets.tw
@@ -2886,23 +2886,6 @@ Your brand design is ''$brandDesign.''
 <</replace>>
 <</widget>>
 
-
-/%
- Call as <<AutoRulesActivate 1>>
-$args[0] is whether silent or not
-%/
-<<widget "AutoRulesActivate">>
-	<<if ($args[0] == 0)>>
-			<<display "Check Auto Rules Activate">>
-			<<display "Default Rules">>
-	<<else>>
-		<<silently>>
-			<<display "Check Auto Rules Activate">>
-			<<display "Default Rules">>
-		<</silently>>
-	<</if>>
-<</widget>>
-
 /%
  Call as <<RARemoveRule>>
 %/
diff --git a/src/utility/slaveCreationWidgets.tw b/src/utility/slaveCreationWidgets.tw
index 02a91ded05c3d04360ff8aa2c6fe18689c3d0f5a..7e6a6ec3c707b2275a778609253200be71782b96 100644
--- a/src/utility/slaveCreationWidgets.tw
+++ b/src/utility/slaveCreationWidgets.tw
@@ -667,8 +667,10 @@
 			two free levels of @@color:cyan;sex skills@@, one free level of @@color:cyan;prostitution skill@@, and one free level of @@color:cyan;entertainment skill.@@
 		<<elseif $PC.career is "servant">>
 			@@color:mediumaquamarine;+1 trust@@ and @@color:hotpink;+1 devotion.@@
-		<<else>>
+		<<elseif $PC.career is "wealth">>
 			two free levels of @@color:cyan;sex skills.@@
+		<<else>>
+			@@color:hotpink;+10 devotion,@@ one free level of @@color:cyan;prostitution skill@@ and @@color:cyan;entertainment skill,@@ and two free levels of @@color:cyan;sex skills.@@
 		<</if>>//
 		<br>&nbsp;&nbsp;&nbsp;&nbsp;
 		<<click "Add slave without career bonus">>
@@ -708,7 +710,7 @@
 <<else>>
 	//You lack the necessary funds to add this slave.//
 <</if>>
-<br>&nbsp;&nbsp;&nbsp;&nbsp;[[Discard this slave and continue to the arcology|Acquisition]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;[[Discard this slave and continue|Acquisition]]
 <</replace>>
 <</widget>>