diff --git a/src/SecExp/attackHandler.tw b/src/SecExp/attackHandler.tw
index dfe6b3fbca85389bca20a3143c16c5617ee70db8..9c02a1249c832c5fb31c35ef31ec39eec8098de1 100644
--- a/src/SecExp/attackHandler.tw
+++ b/src/SecExp/attackHandler.tw
@@ -328,23 +328,20 @@
 		<<set _SFMod -= 0.2>>
 		<<set _enemyMod += 0.2>>
 		<<set $woundType = random(1,10)>>
-		<<for _i = 0; _i < $slaves.length; _i++>>
-			<<if $slaves[_i].ID == $Bodyguard.ID>>
-				<<if $woundType == 1>>
-					<<set $slaves[_i].voice = 0>>
-				<<elseif $woundType == 2>>
-					<<set $slaves[_i].eyes = -2>>
-				<<elseif $woundType == 3>>
-					<<set $slaves[_i].amp = 1>>
-				<<elseif $woundType >= 4>>
-					<<if $slaves[_i].health >= -60>>
-						<<set $slaves[_i].health -= 30>>
-					<<else>>
-						<<set $slaves[_i].health = -90>>
-					<</if>>
-				<</if>>
+		<<set _i = $slaveIndices[$Bodyguard.ID]>>
+		<<if $woundType == 1>>
+			<<set $slaves[_i].voice = 0>>
+		<<elseif $woundType == 2>>
+			<<set $slaves[_i].eyes = -2>>
+		<<elseif $woundType == 3>>
+			<<set $slaves[_i].amp = 1>>
+		<<elseif $woundType >= 4>>
+			<<if $slaves[_i].health >= -60>>
+				<<set $slaves[_i].health -= 30>>
+			<<else>>
+				<<set $slaves[_i].health = -90>>
 			<</if>>
-		<</for>>
+		<</if>>
 	<</if>>
 	/* 60% chance of getting combat skill if not already have it */
 	<<if $Bodyguard.combatSkill == 0 && random(1,100) <= 60>>
@@ -451,23 +448,20 @@
 		<<set _SFMod -= 0.2>>
 		<<set _enemyMod += 0.2>>
 		<<set $woundType = random(1,10)>>
-		<<for _i = 0; _i < $slaves.length; _i++>>
-			<<if $slaves[_i].ID == $HeadGirl.ID>>
-				<<if $woundType == 1>>
-					<<set $slaves[_i].voice = 0>>
-				<<elseif $woundType == 2>>
-					<<set $slaves[_i].eyes = -2>>
-				<<elseif $woundType == 3>>
-					<<set $slaves[_i].amp = 1>>
-				<<elseif $woundType >= 4>>
-					<<if $slaves[_i].health >= -60>>
-						<<set $slaves[_i].health -= 30>>
-					<<else>>
-						<<set $slaves[_i].health = -90>>
-					<</if>>
-				<</if>>
+		<<set _i = $slaveIndices[$HeadGirl.ID]>>
+		<<if $woundType == 1>>
+			<<set $slaves[_i].voice = 0>>
+		<<elseif $woundType == 2>>
+			<<set $slaves[_i].eyes = -2>>
+		<<elseif $woundType == 3>>
+			<<set $slaves[_i].amp = 1>>
+		<<elseif $woundType >= 4>>
+			<<if $slaves[_i].health >= -60>>
+				<<set $slaves[_i].health -= 30>>
+			<<else>>
+				<<set $slaves[_i].health = -90>>
 			<</if>>
-		<</for>>
+		<</if>>
 	<</if>>
 	/* 60% chance of getting combat skill if not already have it */
 	<<if $HeadGirl.combatSkill == 0 && random(1,100) <= 60>>
diff --git a/src/SecExp/attackReport.tw b/src/SecExp/attackReport.tw
index bf4e3dd7f49f7a67237aa7d516a6be05e857c5f5..7b020a39e32957568c20bfd7b9fee094075d3679 100644
--- a/src/SecExp/attackReport.tw
+++ b/src/SecExp/attackReport.tw
@@ -969,21 +969,19 @@
 					<<set $slaveVictories[_i].victories++>>
 					<<set _found = 1>>
 					<<if $slaveVictories[_i].victories >= 10>>
-						<<for _j = 0; _j < $slaves.length; _j++>>
-							<<if $slaves[_j].ID == $Bodyguard.ID && $slaves[_j].prestige < 3>>
-								<<set $slaves[_j].prestige++>>
-								<<if $slaves[_j].prestige == 1>>
-									<<set $slaves[_j].prestigeDesc = "She is well known for being a great commander.">>
-								<<elseif $slaves[_j].prestige == 2>>
-									<<set $slaves[_j].prestigeDesc = "She is famous for being an incredible commander.">>
-								<<elseif $slaves[_j].prestige == 3>>
-									<<set $slaves[_j].prestigeDesc = "She is known as a legendary commander all over the world.">>
-								<</if>>
-								<<set $slaveVictories[_i].victories = 0>>
-								<<set $slaveIncreasedPrestige = 1>>
-								<<break>>
+						<<if $Bodyguard.prestige < 3>>
+							<<set _j = $slaveIndices[$Bodyguard.ID]>>
+							<<set $slaves[_j].prestige++>>
+							<<if $slaves[_j].prestige == 1>>
+								<<set $slaves[_j].prestigeDesc = "She is well known for being a great commander.">>
+							<<elseif $slaves[_j].prestige == 2>>
+								<<set $slaves[_j].prestigeDesc = "She is famous for being an incredible commander.">>
+							<<elseif $slaves[_j].prestige == 3>>
+								<<set $slaves[_j].prestigeDesc = "She is known as a legendary commander all over the world.">>
 							<</if>>
-						<</for>>
+							<<set $slaveVictories[_i].victories = 0>>
+							<<set $slaveIncreasedPrestige = 1>>
+						<</if>>
 					<</if>>
 					<<break>>
 				<</if>>
@@ -1117,21 +1115,19 @@
 					<<set $slaveVictories[_i].victories++>>
 					<<set _found = 1>>
 					<<if $slaveVictories[_i].victories >= 10>>
-						<<for _j = 0; _j < $slaves.length; _j++>>
-							<<if $slaves[_j].ID == $HeadGirl.ID && $slaves[_j].prestige < 3>>
-								<<set $slaves[_j].prestige++>>
-								<<if $slaves[_j].prestige == 1>>
-									<<set $slaves[_j].prestigeDesc = "She is well known for being a great commander.">>
-								<<elseif $slaves[_j].prestige == 2>>
-									<<set $slaves[_j].prestigeDesc = "She is famous for being an incredible commander.">>
-								<<elseif $slaves[_j].prestige == 3>>
-									<<set $slaves[_j].prestigeDesc = "She is known as a legendary commander all over the world.">>
-								<</if>>
-								<<set $slaveVictories[_i].victories = 0>>
-								<<set $slaveIncreasedPrestige = 1>>
-								<<break>>
+						<<if $HeadGirl.prestige < 3>>
+							<<set _j = $slaveIndices[$HeadGirl.ID]>>
+							<<set $slaves[_j].prestige++>>
+							<<if $slaves[_j].prestige == 1>>
+								<<set $slaves[_j].prestigeDesc = "She is well known for being a great commander.">>
+							<<elseif $slaves[_j].prestige == 2>>
+								<<set $slaves[_j].prestigeDesc = "She is famous for being an incredible commander.">>
+							<<elseif $slaves[_j].prestige == 3>>
+								<<set $slaves[_j].prestigeDesc = "She is known as a legendary commander all over the world.">>
 							<</if>>
-						<</for>>
+							<<set $slaveVictories[_i].victories = 0>>
+							<<set $slaveIncreasedPrestige = 1>>
+						<</if>>
 					<</if>>
 					<<break>>
 				<</if>>
diff --git a/src/events/intro/initNationalities.tw b/src/events/intro/initNationalities.tw
index 66ed0805d4ccadcb45ca39025a4c4ec35ce5d288..979443cd5dc5fbfbd70b398caf2542b7eb61d154 100644
--- a/src/events/intro/initNationalities.tw
+++ b/src/events/intro/initNationalities.tw
@@ -86,6 +86,176 @@
 
 <<set $activeSlave = 0>>
 
+/* SET STARTING CONDITIONS */
+
+<<set $minimumSlaveCost = 3000>>
+<<set $enduringRep = $rep>>
+
+<<set $arcologies = []>>
+<<set $leaders = []>>
+
+<<set _seed = ["east", "north", "northeast", "northwest", "south", "southeast", "southwest", "west"]>>
+<<set _govtypes = ["a committee", "a corporation", "an individual", "an oligarchy", "direct democracy", "elected officials"]>>
+	
+<<set $neighboringArcologies = Math.clamp($neighboringArcologies, 0, 8)>>
+<<for $i = 0; $i <= $neighboringArcologies; $i++>>
+	<<set $activeArcology = {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, 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", FSAztecRevivalist: "unset", FSEgyptianRevivalist: "unset", FSEdoRevivalist: "unset", FSArabianRevivalist: "unset", FSChineseRevivalist: "unset", FSNull: "unset", embargo: 1, embargoTarget: -1, influenceTarget: -1, influenceBonus: 0, CyberEconomic: 1, CyberEconomicTarget: -1, CyberReputation: 1, CyberReputationTarget: -1, rival: 0, FSRestart: "unset", FSRepopulationFocus: "unset", FSHedonisticDecadence: "unset", FSCummunism: "unset", FSIncestFetishist: "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, FSHedonisticDecadenceResearch: 0, FSHedonisticDecadenceDietResearch: 0, FSCummunismResearch: 0, FSIncestFetishistResearch: 0}>>
+	<<if $i == 0>>
+		<<set $activeArcology.direction = 0>>
+		<<set $activeArcology.name = "Arcology X-4">>
+		<<set $activeArcology.FSSupremacistDecoration = 20, $activeArcology.FSSubjugationistDecoration = 20, $activeArcology.FSGenderRadicalistDecoration = 20, $activeArcology.FSGenderFundamentalistDecoration = 20, $activeArcology.FSPaternalistDecoration = 20, $activeArcology.FSDegradationistDecoration = 20, $activeArcology.FSBodyPuristDecoration = 20, $activeArcology.FSTransformationFetishistDecoration = 20, $activeArcology.FSYouthPreferentialistDecoration = 20, $activeArcology.FSMaturityPreferentialistDecoration = 20, $activeArcology.FSSlimnessEnthusiastDecoration = 20, $activeArcology.FSAssetExpansionistDecoration = 20, $activeArcology.FSPastoralistDecoration = 20, $activeArcology.FSPhysicalIdealistDecoration = 20, $activeArcology.FSChattelReligionistDecoration = 20, $activeArcology.FSRomanRevivalistDecoration = 20, $activeArcology.FSAztecRevivalistDecoration = 20, $activeArcology.FSEgyptianRevivalistDecoration = 20, $activeArcology.FSEdoRevivalistDecoration = 20, $activeArcology.FSArabianRevivalistDecoration = 20, $activeArcology.FSChineseRevivalistDecoration = 20, $activeArcology.FSRepopulationFocusDecoration = 20, $activeArcology.FSRestartDecoration = 20, $activeArcology.FSHedonisticDecadenceDecoration = 20, $activeArcology.FSCummunismDecoration = 20, $activeArcology.FSIncestFetishistDecoration = 20>>
+		<<if $targetArcology.type != "New">>
+			<<set $FSAnnounced = 1>>
+			<<set $FSGotRepCredits = 1>>
+			<<set $activeArcology.name = $targetArcology.name, $activeArcology.prosperity = $targetArcology.prosperity, $ACitizens += $targetArcology.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 "AztecRevivalist">>
+				<<set $activeArcology.FSAztecRevivalist = $targetArcology.FSProgress, $activeArcology.FSAztecRevivalistDecoration = _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>>
+			<<case "HedonisticDecadence">>
+				<<set $activeArcology.FSHedonisticDecadence = $targetArcology.FSProgress, $activeArcology.FSHedonisticDecadenceDecoration = _decoration>>
+			<<default>>
+				<<set $activeArcology.FSNull = 20>>
+			<</switch>>
+			<<if $PC.rumor == "social engineering">>
+				<<set $FSGotRepCredits += 1>>
+			<</if>>
+		<</if>>
+	<<else>>
+		<<if $i < 4>> /* X-4 is reserved for player's arcology, so X-1 is available */
+			<<set $activeArcology.name = $activeArcology.name+($i)>>
+		<<else>>
+			<<set $activeArcology.name = $activeArcology.name+($i+1)>>
+		<</if>>
+		<<set $activeArcology.direction = _seed.pluck()>>
+		<<set $activeArcology.government = _govtypes.random()>>
+		<<set $activeArcology.prosperity += random(-20,20)>>
+		<<set $activeArcology.ownership += random(-10,0)>>
+		<<set $activeArcology.minority += random(-5,5)>>
+	<</if>>
+	<<set $arcologies.push($activeArcology)>>
+<</for>>
+
+<<set $arcologies[0].FSSupremacistLawME = 0>>
+<<set $arcologies[0].FSSupremacistSMR = 0>>
+<<set $arcologies[0].FSSubjugationistLawME = 0>>
+<<set $arcologies[0].FSSubjugationistSMR = 0>>
+<<set $arcologies[0].FSGenderRadicalistLawFuta = 0>>
+<<set $arcologies[0].FSGenderRadicalistLawBeauty = 0>>
+<<set $arcologies[0].FSGenderFundamentalistLawBimbo = 0>>
+<<set $arcologies[0].FSGenderFundamentalistSMR = 0>>
+<<set $arcologies[0].FSGenderFundamentalistLawBeauty = 0>>
+<<set $arcologies[0].FSPaternalistLaw = 0>>
+<<set $arcologies[0].FSPaternalistSMR = 0>>
+<<set $arcologies[0].FSDegradationistLaw = 0>>
+<<set $arcologies[0].FSDegradationistSMR = 0>>
+<<set $arcologies[0].FSBodyPuristLaw = 0>>
+<<set $arcologies[0].FSBodyPuristSMR = 0>>
+<<set $arcologies[0].FSTransformationFetishistLaw = 0>>
+<<set $arcologies[0].FSTransformationFetishistSMR = 0>>
+<<set $arcologies[0].FSYouthPreferentialistLaw = 0>>
+<<set $arcologies[0].FSYouthPreferentialistSMR = 0>>
+<<set $arcologies[0].FSMaturityPreferentialistLaw = 0>>
+<<set $arcologies[0].FSMaturityPreferentialistSMR = 0>>
+<<set $arcologies[0].FSSlimnessEnthusiastSMR = 0>>
+<<set $arcologies[0].FSSlimnessEnthusiastLaw = 0>>
+<<set $arcologies[0].FSAssetExpansionistSMR = 0>>
+<<set $arcologies[0].FSPastoralistLaw = 0>>
+<<set $arcologies[0].FSPastoralistSMR = 0>>
+<<set $arcologies[0].FSPhysicalIdealistSMR = 0>>
+<<set $arcologies[0].FSPhysicalIdealistLaw = 0>>
+<<set $arcologies[0].FSPhysicalIdealistStrongFat = 0>>
+<<set $arcologies[0].FSChattelReligionistLaw = 0>>
+<<set $arcologies[0].FSChattelReligionistSMR = 0>>
+<<set $arcologies[0].FSChattelReligionistCreed = 0>>
+<<set $arcologies[0].FSRomanRevivalistLaw = 0>>
+<<set $arcologies[0].FSRomanRevivalistSMR = 0>>
+<<set $arcologies[0].FSAztecRevivalistLaw = 0>>
+<<set $arcologies[0].FSAztecRevivalistSMR = 0>>
+<<set $arcologies[0].FSEgyptianRevivalistLaw = 0>>
+<<set $arcologies[0].FSEgyptianRevivalistSMR = 0>>
+<<set $arcologies[0].FSEdoRevivalistLaw = 0>>
+<<set $arcologies[0].FSEdoRevivalistSMR = 0>>
+<<set $arcologies[0].FSArabianRevivalistLaw = 0>>
+<<set $arcologies[0].FSArabianRevivalistSMR = 0>>
+<<set $arcologies[0].FSChineseRevivalistLaw = 0>>
+<<set $arcologies[0].FSChineseRevivalistSMR = 0>>
+<<set $arcologies[0].FSRepopulationFocusLaw = 0>>
+<<set $arcologies[0].FSRepopulationFocusSMR = 0>>
+<<set $arcologies[0].FSRestartLaw = 0>>
+<<set $arcologies[0].FSRestartSMR = 0>>
+<<set $arcologies[0].FSHedonisticDecadenceLaw = 0>>
+<<set $arcologies[0].FSHedonisticDecadenceLaw2 = 0>>
+<<set $arcologies[0].FSHedonisticDecadenceStrongFat = 0>>
+<<set $arcologies[0].FSHedonisticDecadenceSMR = 0>>
+
+<<set $arcologies[0].FSGenderRadicalistResearch = 0>>
+<<set $arcologies[0].FSGenderFundamentalistResearch = 0>>
+<<set $arcologies[0].FSPaternalistResearch = 0>>
+<<set $arcologies[0].FSDegradationistResearch = 0>>
+<<set $arcologies[0].FSBodyPuristResearch = 0>>
+<<set $arcologies[0].FSTransformationFetishistResearch = 0>>
+<<set $arcologies[0].FSYouthPreferentialistResearch = 0>>
+<<set $arcologies[0].FSMaturityPreferentialistResearch = 0>>
+<<set $arcologies[0].FSSlimnessEnthusiastResearch = 0>>
+<<set $arcologies[0].FSAssetExpansionistResearch = 0>>
+<<set $arcologies[0].FSPastoralistResearch = 0>>
+<<set $arcologies[0].FSPhysicalIdealistResearch = 0>>
+<<set $arcologies[0].FSRepopulationFocusResearch = 0>>
+<<set $arcologies[0].FSRestartResearch = 0>>
+<<set $arcologies[0].FSRestartResearchPassed = 0>>
+<<set $arcologies[0].FSHedonisticDecadenceResearch = 0>>
+<<set $arcologies[0].FSHedonisticDecadenceDietResearch = 0>>
+<<set $arcologies[0].FSCummunismResearch = 0>>
+<<set $arcologies[0].FSIncestFetishistResearch = 0>>
+
+<<set $arcologies[0].FSEgyptianRevivalistIncestPolicy = 0>>
+<<set $arcologies[0].FSEgyptianRevivalistInterest = 0>>
+
 /*Nationalities Setup*/
 
 <<unset $nationalitiescheck>> /* Removes unique nationalities array to avoid var bloat */
@@ -587,175 +757,5 @@
 <</if>>
 <</if>>
 
-/* SET STARTING CONDITIONS */
-
-<<set $minimumSlaveCost = 3000>>
-<<set $enduringRep = $rep>>
-
-<<set $arcologies = []>>
-<<set $leaders = []>>
-
-<<set _seed = ["east", "north", "northeast", "northwest", "south", "southeast", "southwest", "west"]>>
-<<set _govtypes = ["a committee", "a corporation", "an individual", "an oligarchy", "direct democracy", "elected officials"]>>
-	
-<<set $neighboringArcologies = Math.clamp($neighboringArcologies, 0, 8)>>
-<<for $i = 0; $i <= $neighboringArcologies; $i++>>
-	<<set $activeArcology = {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, 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", FSAztecRevivalist: "unset", FSEgyptianRevivalist: "unset", FSEdoRevivalist: "unset", FSArabianRevivalist: "unset", FSChineseRevivalist: "unset", FSNull: "unset", embargo: 1, embargoTarget: -1, influenceTarget: -1, influenceBonus: 0, CyberEconomic: 1, CyberEconomicTarget: -1, CyberReputation: 1, CyberReputationTarget: -1, rival: 0, FSRestart: "unset", FSRepopulationFocus: "unset", FSHedonisticDecadence: "unset", FSCummunism: "unset", FSIncestFetishist: "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, FSHedonisticDecadenceResearch: 0, FSHedonisticDecadenceDietResearch: 0, FSCummunismResearch: 0, FSIncestFetishistResearch: 0}>>
-	<<if $i == 0>>
-		<<set $activeArcology.direction = 0>>
-		<<set $activeArcology.name = "Arcology X-4">>
-		<<set $activeArcology.FSSupremacistDecoration = 20, $activeArcology.FSSubjugationistDecoration = 20, $activeArcology.FSGenderRadicalistDecoration = 20, $activeArcology.FSGenderFundamentalistDecoration = 20, $activeArcology.FSPaternalistDecoration = 20, $activeArcology.FSDegradationistDecoration = 20, $activeArcology.FSBodyPuristDecoration = 20, $activeArcology.FSTransformationFetishistDecoration = 20, $activeArcology.FSYouthPreferentialistDecoration = 20, $activeArcology.FSMaturityPreferentialistDecoration = 20, $activeArcology.FSSlimnessEnthusiastDecoration = 20, $activeArcology.FSAssetExpansionistDecoration = 20, $activeArcology.FSPastoralistDecoration = 20, $activeArcology.FSPhysicalIdealistDecoration = 20, $activeArcology.FSChattelReligionistDecoration = 20, $activeArcology.FSRomanRevivalistDecoration = 20, $activeArcology.FSAztecRevivalistDecoration = 20, $activeArcology.FSEgyptianRevivalistDecoration = 20, $activeArcology.FSEdoRevivalistDecoration = 20, $activeArcology.FSArabianRevivalistDecoration = 20, $activeArcology.FSChineseRevivalistDecoration = 20, $activeArcology.FSRepopulationFocusDecoration = 20, $activeArcology.FSRestartDecoration = 20, $activeArcology.FSHedonisticDecadenceDecoration = 20, $activeArcology.FSCummunismDecoration = 20, $activeArcology.FSIncestFetishistDecoration = 20>>
-		<<if $targetArcology.type != "New">>
-			<<set $FSAnnounced = 1>>
-			<<set $FSGotRepCredits = 1>>
-			<<set $activeArcology.name = $targetArcology.name, $activeArcology.prosperity = $targetArcology.prosperity, $ACitizens += $targetArcology.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 "AztecRevivalist">>
-				<<set $activeArcology.FSAztecRevivalist = $targetArcology.FSProgress, $activeArcology.FSAztecRevivalistDecoration = _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>>
-			<<case "HedonisticDecadence">>
-				<<set $activeArcology.FSHedonisticDecadence = $targetArcology.FSProgress, $activeArcology.FSHedonisticDecadenceDecoration = _decoration>>
-			<<default>>
-				<<set $activeArcology.FSNull = 20>>
-			<</switch>>
-			<<if $PC.rumor == "social engineering">>
-				<<set $FSGotRepCredits += 1>>
-			<</if>>
-		<</if>>
-	<<else>>
-		<<if $i < 4>> /* X-4 is reserved for player's arcology, so X-1 is available */
-			<<set $activeArcology.name = $activeArcology.name+($i)>>
-		<<else>>
-			<<set $activeArcology.name = $activeArcology.name+($i+1)>>
-		<</if>>
-		<<set $activeArcology.direction = _seed.pluck()>>
-		<<set $activeArcology.government = _govtypes.random()>>
-		<<set $activeArcology.prosperity += random(-20,20)>>
-		<<set $activeArcology.ownership += random(-10,0)>>
-		<<set $activeArcology.minority += random(-5,5)>>
-	<</if>>
-	<<set $arcologies.push($activeArcology)>>
-<</for>>
-
-<<set $arcologies[0].FSSupremacistLawME = 0>>
-<<set $arcologies[0].FSSupremacistSMR = 0>>
-<<set $arcologies[0].FSSubjugationistLawME = 0>>
-<<set $arcologies[0].FSSubjugationistSMR = 0>>
-<<set $arcologies[0].FSGenderRadicalistLawFuta = 0>>
-<<set $arcologies[0].FSGenderRadicalistLawBeauty = 0>>
-<<set $arcologies[0].FSGenderFundamentalistLawBimbo = 0>>
-<<set $arcologies[0].FSGenderFundamentalistSMR = 0>>
-<<set $arcologies[0].FSGenderFundamentalistLawBeauty = 0>>
-<<set $arcologies[0].FSPaternalistLaw = 0>>
-<<set $arcologies[0].FSPaternalistSMR = 0>>
-<<set $arcologies[0].FSDegradationistLaw = 0>>
-<<set $arcologies[0].FSDegradationistSMR = 0>>
-<<set $arcologies[0].FSBodyPuristLaw = 0>>
-<<set $arcologies[0].FSBodyPuristSMR = 0>>
-<<set $arcologies[0].FSTransformationFetishistLaw = 0>>
-<<set $arcologies[0].FSTransformationFetishistSMR = 0>>
-<<set $arcologies[0].FSYouthPreferentialistLaw = 0>>
-<<set $arcologies[0].FSYouthPreferentialistSMR = 0>>
-<<set $arcologies[0].FSMaturityPreferentialistLaw = 0>>
-<<set $arcologies[0].FSMaturityPreferentialistSMR = 0>>
-<<set $arcologies[0].FSSlimnessEnthusiastSMR = 0>>
-<<set $arcologies[0].FSSlimnessEnthusiastLaw = 0>>
-<<set $arcologies[0].FSAssetExpansionistSMR = 0>>
-<<set $arcologies[0].FSPastoralistLaw = 0>>
-<<set $arcologies[0].FSPastoralistSMR = 0>>
-<<set $arcologies[0].FSPhysicalIdealistSMR = 0>>
-<<set $arcologies[0].FSPhysicalIdealistLaw = 0>>
-<<set $arcologies[0].FSPhysicalIdealistStrongFat = 0>>
-<<set $arcologies[0].FSChattelReligionistLaw = 0>>
-<<set $arcologies[0].FSChattelReligionistSMR = 0>>
-<<set $arcologies[0].FSChattelReligionistCreed = 0>>
-<<set $arcologies[0].FSRomanRevivalistLaw = 0>>
-<<set $arcologies[0].FSRomanRevivalistSMR = 0>>
-<<set $arcologies[0].FSAztecRevivalistLaw = 0>>
-<<set $arcologies[0].FSAztecRevivalistSMR = 0>>
-<<set $arcologies[0].FSEgyptianRevivalistLaw = 0>>
-<<set $arcologies[0].FSEgyptianRevivalistSMR = 0>>
-<<set $arcologies[0].FSEdoRevivalistLaw = 0>>
-<<set $arcologies[0].FSEdoRevivalistSMR = 0>>
-<<set $arcologies[0].FSArabianRevivalistLaw = 0>>
-<<set $arcologies[0].FSArabianRevivalistSMR = 0>>
-<<set $arcologies[0].FSChineseRevivalistLaw = 0>>
-<<set $arcologies[0].FSChineseRevivalistSMR = 0>>
-<<set $arcologies[0].FSRepopulationFocusLaw = 0>>
-<<set $arcologies[0].FSRepopulationFocusSMR = 0>>
-<<set $arcologies[0].FSRestartLaw = 0>>
-<<set $arcologies[0].FSRestartSMR = 0>>
-<<set $arcologies[0].FSHedonisticDecadenceLaw = 0>>
-<<set $arcologies[0].FSHedonisticDecadenceLaw2 = 0>>
-<<set $arcologies[0].FSHedonisticDecadenceStrongFat = 0>>
-<<set $arcologies[0].FSHedonisticDecadenceSMR = 0>>
-
-<<set $arcologies[0].FSGenderRadicalistResearch = 0>>
-<<set $arcologies[0].FSGenderFundamentalistResearch = 0>>
-<<set $arcologies[0].FSPaternalistResearch = 0>>
-<<set $arcologies[0].FSDegradationistResearch = 0>>
-<<set $arcologies[0].FSBodyPuristResearch = 0>>
-<<set $arcologies[0].FSTransformationFetishistResearch = 0>>
-<<set $arcologies[0].FSYouthPreferentialistResearch = 0>>
-<<set $arcologies[0].FSMaturityPreferentialistResearch = 0>>
-<<set $arcologies[0].FSSlimnessEnthusiastResearch = 0>>
-<<set $arcologies[0].FSAssetExpansionistResearch = 0>>
-<<set $arcologies[0].FSPastoralistResearch = 0>>
-<<set $arcologies[0].FSPhysicalIdealistResearch = 0>>
-<<set $arcologies[0].FSRepopulationFocusResearch = 0>>
-<<set $arcologies[0].FSRestartResearch = 0>>
-<<set $arcologies[0].FSRestartResearchPassed = 0>>
-<<set $arcologies[0].FSHedonisticDecadenceResearch = 0>>
-<<set $arcologies[0].FSHedonisticDecadenceDietResearch = 0>>
-<<set $arcologies[0].FSCummunismResearch = 0>>
-<<set $arcologies[0].FSIncestFetishistResearch = 0>>
-
-<<set $arcologies[0].FSEgyptianRevivalistIncestPolicy = 0>>
-<<set $arcologies[0].FSEgyptianRevivalistInterest = 0>>
-
 <<set $showStartingGirlsExplanation = 1>>
 <<goto "Starting Girls">>
diff --git a/src/npc/databases/cheatmodeDatabase.tw b/src/npc/databases/cheatmodeDatabase.tw
index 8c1b6f564be7b08679d10e796ef97d2bb2691b32..133a0a20310b6b7a33eaa17554de491f7572361b 100644
--- a/src/npc/databases/cheatmodeDatabase.tw
+++ b/src/npc/databases/cheatmodeDatabase.tw
@@ -5,36 +5,30 @@
 <<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.ovaryAge = 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 = -55, _HS.boobs = 1000, _HS.boobsImplant = 600, _HS.areolae = 1, _HS.butt = 4, _HS.buttImplant = 2, _HS.face = 55, _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.">>
 <<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.ovaryAge = 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 = -55, _HS.boobs = 1200, _HS.boobsImplant = 1000, _HS.areolae = 2, _HS.butt = 5, _HS.buttImplant = 3, _HS.face = 15, _HS.faceImplant = 65, _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.", _HS.pubertyXY = 1>>
 <<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.ovaryAge = 19, _HS.health = 10, _HS.devotion = 12, _HS.height = 175, _HS.race = "black", _HS.pubicHColor = "black", _HS.skin = "brown", _HS.hStyle = "long", _HS.pubicHStyle = "waxed", _HS.waist = -55, _HS.boobs = 1600, _HS.boobsImplant = 600, _HS.nipplesPiercing = 1, _HS.areolae = 1, _HS.butt = 6, _HS.buttImplant = 2, _HS.face = 55, _HS.faceImplant = 15, _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>>
 <<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 = "brown", _HS.hLength = 0, _HS.hStyle = "shaved bald", _HS.pubicHStyle = "waxed", _HS.waist = -100, _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 = 15, _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>>
 <<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 = -55, _HS.boobs = 600, _HS.butt = 3, _HS.face = 15, _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>>
 <<AddSlave _HS>>
 <<set $Bodyguard = 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.ovaryAge = 36, _HS.health = 20, _HS.devotion = 12, _HS.muscles = 50, _HS.height = 190, _HS.race = "black", _HS.hColor = "black", _HS.pubicHColor = "black", _HS.skin = "brown", _HS.hLength = 0, _HS.hStyle = "shaved bald", _HS.pubicHStyle = "waxed", _HS.waist = -55, _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 = 15, _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.">>
 <<AddSlave _HS>>
-<<set _dump = $heroSlaves.pluck(0)>>
 //and _HS.slaveName.//
diff --git a/src/pregmod/csec.tw b/src/pregmod/csec.tw
index 6bd40a6e9449aea498b21bbf3d8b4d3723ff332b..6693efeaeb53ae632bdd0ac867fc9f3d45a66ca1 100644
--- a/src/pregmod/csec.tw
+++ b/src/pregmod/csec.tw
@@ -4,7 +4,7 @@
 
 <<ClearSummaryCache $activeSlave>>
 
-<<set _getFather = $slaves.find(function(s) { return s.ID == $activeSlave.pregSource; })>>
+<<set _getFather = getSlave($activeSlave.pregSource)>>
 <<if def _getFather>>
 	<<set $daddy = _getFather.slaveName>>
 <</if>>
@@ -25,8 +25,8 @@
 <<set $birthsTotal += _curBabies>>
 
 <<if $activeSlave.pregSource > 0>>
-	<<set _babyDaddy = $slaves.findIndex(function(s) { return s.ID == $activeSlave.pregSource; })>>
-	<<if $daddy != -1>>
+	<<set _babyDaddy = $slaveIndices[$activeSlave.pregSource]>>
+	<<if def _babyDaddy>>
 		<<set $slaves[_babyDaddy].slavesFathered += _curBabies>>
 	<</if>>
 <<elseif $activeSlave.pregSource == -1>>
@@ -74,7 +74,7 @@ Performing a cesarean section is trivial for the remote surgery to carry out. $a
 		the Societal Elites'
 	<<elseif $activeSlave.pregSource == 0>>
 		some man's
-	<<elseif $activeSlave.ID == $daddy.ID>>
+	<<elseif $activeSlave.ID == $activeSlave.pregSource>>
 		her own
 	<<else>>
 		$daddy's
diff --git a/src/pregmod/fDick.tw b/src/pregmod/fDick.tw
index d9556287077681fce2ad15f92969ed3da152dba9..098a4d7568a88ed5713b3515876e26b489c86dd4 100644
--- a/src/pregmod/fDick.tw
+++ b/src/pregmod/fDick.tw
@@ -262,6 +262,5 @@
 <</if>>
 
 <<if passage() !== "Slave Interact">>
-	<<set _i = $slaves.findIndex(function(s) { return s.ID == $activeSlave.ID; })>>
-	<<set $slaves[_i] = $activeSlave>>
+	<<set $slaves[$slaveIndices[$activeSlave.ID]] = $activeSlave>>
 <</if>>
diff --git a/src/pregmod/widgets/playerDescriptionWidgets.tw b/src/pregmod/widgets/playerDescriptionWidgets.tw
index 6f30441a12d218dabcb9c69140df956b44b206ae..600114d736752a47ca0c43d0348507a3d4c608e4 100644
--- a/src/pregmod/widgets/playerDescriptionWidgets.tw
+++ b/src/pregmod/widgets/playerDescriptionWidgets.tw
@@ -343,7 +343,7 @@
 			<<elseif $PC.preg == 22>>
 				Something startling happened this week; while enjoying a slave, your belly button popped out!
 			<<elseif $PC.preg == 8 && $PC.pregSource > 0>>
-				<<set _babyDaddy = $slaves.findIndex(function(s) { return s.ID == $PC.pregSource; })>>
+				<<set _babyDaddy = $slaveIndices[$PC.pregSource]>>
 				<<set $slaves[_babyDaddy].PCKnockedUp++>>
 				Rumors spread among your slaves that your middle is swollen with $slaves[_babyDaddy].slaveName's child. They're not wrong, though <<if $slaves[_babyDaddy].devotion > 20>>$slaves[_babyDaddy].slaveName is broken enough to not try and use it against you. In fact, it might even draw her closer to you<<else>>you'd have liked it to have kept that from $slaves[_babyDaddy].slaveName, lest the rebellious bitch uses it to remain defiant<</if>>.
 			<</if>>
@@ -406,7 +406,7 @@
 			<<elseif $PC.preg == 22>>
 				Something startling happened this week; while enjoying a slave, your belly button popped out!
 			<<elseif $PC.preg == 8 && $PC.pregSource > 0>>
-				<<set _babyDaddy = $slaves.findIndex(function(s) { return s.ID == $PC.pregSource; })>>
+				<<set _babyDaddy = $slaveIndices[$PC.pregSource]>>
 				<<set $slaves[_babyDaddy].PCKnockedUp++>>
 				Rumors spread among your slaves that your middle is swollen with $slaves[_babyDaddy].slaveName's child. They're not wrong, though <<if $slaves[_babyDaddy].devotion > 20>>$slaves[_babyDaddy].slaveName is broken enough to not try and use it against you. In fact, it might even draw her closer to you<<else>>you'd have liked it to have kept that from $slaves[_babyDaddy].slaveName, lest the rebellious bitch uses it to remain defiant<</if>>.
 			<</if>>
@@ -469,7 +469,7 @@
 			<<elseif $PC.preg == 22>>
 				Something startling happened this week; while enjoying a slave, your belly button popped out!
 			<<elseif $PC.preg == 8 && $PC.pregSource > 0>>
-				<<set _babyDaddy = $slaves.findIndex(function(s) { return s.ID == $PC.pregSource; })>>
+				<<set _babyDaddy = $slaveIndices[$PC.pregSource]>>
 				<<set $slaves[_babyDaddy].PCKnockedUp++>>
 				Rumors spread among your slaves that your middle is swollen with $slaves[_babyDaddy].slaveName's child. They're not wrong, though <<if $slaves[_babyDaddy].devotion > 20>>$slaves[_babyDaddy].slaveName is broken enough to not try and use it against you. In fact, it might even draw her closer to you<<else>>you'd have liked it to have kept that from $slaves[_babyDaddy].slaveName, lest the rebellious bitch uses it to remain defiant<</if>>.
 			<</if>>
diff --git a/src/pregmod/widgets/pregmodBirthWidgets.tw b/src/pregmod/widgets/pregmodBirthWidgets.tw
index d5490483892ee00a58342aebf687f463d13b796b..0e0702d4b4656d94cbbabae42e718c72c32c6f02 100644
--- a/src/pregmod/widgets/pregmodBirthWidgets.tw
+++ b/src/pregmod/widgets/pregmodBirthWidgets.tw
@@ -50,7 +50,7 @@
 	<</if>>
 
 <<case "be a subordinate slave">>
-	<<set _tempSub = $slaves.find(function(s) { return $slaves[$i].subTarget == s.ID; })>>
+	<<set _tempSub = getSlave($slaves[$i].subTarget)>>
 	<<if $slaves[$i].fetish == "mindbroken">>
 		<<if $slaves[$i].subTarget == 0>>
 			<<if (random(1,20) > $suddenBirth)>>
@@ -81,7 +81,7 @@
 			<</if>>
 		<<else>>
 			<<if (random(1,20) > $suddenBirth)>>
-				She taken by _tempSub.slaveName to a private room so that she may watch. Reluctantly, she begins to push out <<if $slaves[$i].birthsTotal == 0>>her first<<else>>this week's<</if>> baby, fully aware of _tempSub.slaveName's <<if $tempSub.fetish == "pregnancy">>hungry gaze<<else>>amused gaze<</if>>. Her child is promptly taken and _tempSub.slaveName eagerly descends upon her exhausted and still very gravid body.
+				She taken by _tempSub.slaveName to a private room so that she may watch. Reluctantly, she begins to push out <<if $slaves[$i].birthsTotal == 0>>her first<<else>>this week's<</if>> baby, fully aware of _tempSub.slaveName's <<if _tempSub.fetish == "pregnancy">>hungry gaze<<else>>amused gaze<</if>>. Her child is promptly taken and _tempSub.slaveName eagerly descends upon her exhausted and still very gravid body.
 				<<set $humiliation = 1>>
 			<<else>>
 				While servicing _tempSub.slaveName, $slaves[$i].slaveName's water breaks, causing her to immediately try to break off. Her dom eagerly watches her gravid sub's ordeal.
@@ -1189,18 +1189,14 @@
 	<</if>>
   
 <<case "be a subordinate slave">>
-	<<for $k = 0; $k < $slaves.length; $k++>>
-		<<if $slaves[$i].subTarget == $slaves[$k].ID>>
-			<<set $tempSub = $slaves[$k]>>
-		<</if>>
-	<</for>>
+	<<set _tempSub = getSlave($slaves[$i].subTarget)>>
 	<<if $slaves[$i].fetish == "mindbroken">>
 		<<if $slaves[$i].subTarget == 0>>
 		While servicing your other slaves, $slaves[$i].slaveName's body begins to birth another of her brood, though it does nothing to deter her from her task.
 		<<ClothingBirth>>
 		No sooner than her baby is born, a cock is shoved into her gaping pussy as she draws her child to her breast.
 		<<else>>
-		While servicing $tempSub.slaveName, $slaves[$i].slaveName's body begins to birth another of her brood, though it does nothing to deter her from her task.
+		While servicing _tempSub.slaveName, $slaves[$i].slaveName's body begins to birth another of her brood, though it does nothing to deter her from her task.
 		<<ClothingBirth>>
 		No sooner than her baby is born does she go back to pleasuring her dom.
 		<</if>>
@@ -1211,10 +1207,10 @@
 		<<ClothingBirth>>
 		Since she is too pregnant to collect her child, it is done for her. Her exhausted form is slumped onto her huge belly as another slave helps themselves to her vulnerable body.
 		<<else>>
-		While servicing $tempSub.slaveName, $slaves[$i].slaveName's body begins to birth another of her brood, causing her to immediately try to break off.  Her dom eagerly watches her pregnant sub's ordeal.
+		While servicing _tempSub.slaveName, $slaves[$i].slaveName's body begins to birth another of her brood, causing her to immediately try to break off.  Her dom eagerly watches her pregnant sub's ordeal.
 		<<set $humiliation = 1>>
 		<<ClothingBirth>>
-		$tempSub.slaveName collects the newborn child to be sent off before returning and planting her crotch directly over her exhausted sub's face.
+		_tempSub.slaveName collects the newborn child to be sent off before returning and planting her crotch directly over her exhausted sub's face.
 		<</if>>
 	<</if>>
   
diff --git a/src/pregmod/widgets/pregmodWidgets.tw b/src/pregmod/widgets/pregmodWidgets.tw
index c94ae90389f479fb9e263e08f7399c5b82beef0f..b376d857fb47d386dcd7fbe720f3e4fe57a66ba4 100644
--- a/src/pregmod/widgets/pregmodWidgets.tw
+++ b/src/pregmod/widgets/pregmodWidgets.tw
@@ -1147,696 +1147,6 @@ extremely pale -5
 <<set $args[0].slaveName = $args[0].birthName>>
 <</widget>>
 
-<<widget "seBirthToIncubator">>
-<<set _dispositionId = _.uniqueId('babyDisposition-')>>
-
-<<if $csec == 1>>
-
-<<set _getFather = $slaves.find(function(s) { return s.ID == $slaves[$i].pregSource; })>>
-<<if def _getFather>>
-	<<set $daddy = _getFather.slaveName>>
-<<else>>
-	<<set $daddy = "some former slave">>
-<</if>>
-
-<br>
-<br>
-$pronounCap was given @@.orange;a cesarean section@@ due to health concerns. From $possessive womb,
-<<if $slaves[$i].pregType <= 1>>
-	a single baby,
-<<elseif $slaves[$i].pregType >= 40>>
-	a massive brood of $slaves[$i].pregType babies,
-<<elseif $slaves[$i].pregType >= 20>>
-	a brood of $slaves[$i].pregType babies,
-<<elseif $slaves[$i].pregType >= 10>>
-	a squirming pile of $slaves[$i].pregType babies,
-<<elseif $slaves[$i].pregType == 9>>
-	nonuplets,
-<<elseif $slaves[$i].pregType == 8>>
-	octuplets,
-<<elseif $slaves[$i].pregType == 7>>
-	septuplets,
-<<elseif $slaves[$i].pregType == 6>>
-	sextuplets,
-<<elseif $slaves[$i].pregType == 5>>
-	quintuplets,
-<<elseif $slaves[$i].pregType == 4>>
-	quadruplets,
-<<elseif $slaves[$i].pregType == 3>>
-	triplets,
-<<else>>
-	twins,
-<</if>>
-created by
-<<if $slaves[$i].pregSource == -1>>
-	your magnificent dick,
-<<elseif $slaves[$i].pregSource == -2>>
-	your arcology's eager citizens,
-<<elseif $slaves[$i].pregSource == -3>>
-	the Societal Elite,
-<<elseif $slaves[$i].pregSource == 0>>
-	an unknown father,
-<<elseif $slaves[$i].ID == $daddy.ID>>
-	$possessive own curiosity over if $pronoun could fuck <<print $possessive>>self,
-<<else>>
-	$daddy's virile cock and balls,
-<</if>>
-entered the world.
-
-<<if $arcologies[0].FSRestart != "unset">>
-	<<if $slaves[$i].breedingMark == 1 && $slaves[$i].pregSource == -1>>
-		<br><br>
-		The Societal Elite @@.green;are pleased@@ at the new additions to their class.
-		<<set $failedElite -= 2*$slaves[$i].pregType>>
-	<<else>>
-		<br><br>
-		The Societal Elite @@.red;are disappointed@@ that you would allow subhuman filth to dirty society under your watch. Society @@.red;frowns@@ on the unwelcome addition of more subhumans into the world.
-		<<set $failedElite += 5*$slaves[$i].pregType>>
-		<<set $rep -= 10*$slaves[$i].pregType>>
-	<</if>>
-<</if>>
-
-<br><br>
-Since $possessive <<if $slaves[$i].mpreg == 1>>ass<<else>>vagina<</if>> was spared from childbirth, @@.lime;it retained its tightness.@@
-
-<<set $slaves[$i].births += $slaves[$i].pregType>>
-<<set $slaves[$i].birthsTotal += $slaves[$i].pregType>>
-<<set $birthsTotal += $slaves[$i].pregType>>
-<<if $slaves[$i].pregSource > 0>>
-	<<set _babyDaddy = $slaves.findIndex(function(s) { return s.ID == $slaves[$i].pregSource; })>>
-	<<set $slaves[_babyDaddy].slavesFathered += $slaves[$i].pregType>>
-<<elseif $slaves[$i].pregSource == -1>>
-	<<set $PC.slavesFathered += $slaves[$i].pregType>>
-<</if>>
-
-<<set $mom = $slaves[$i]>>
-
-<br><br>
-Of $possessive $slaves[$i].pregType child<<if $slaves[$i].pregType > 1>>ren<</if>>; $slaves[$i].reservedChildren <<if $slaves[$i].reservedChildren > 1>>were<<else>>was<</if>> taken to $incubatorName.
-<<for _k = $slaves[$i].reservedChildren; _k != 0; _k-->>
-	<<include "Generate Child">>
-	<<include "Incubator Workaround">>
-	<<set $slaves[$i].pregType-->>
-<</for>>
-
-<<if $slaves[$i].fetish != "mindbroken" && $slaves[$i].fuckdoll == 0>>
-	<br>
-	<<if $slaves[$i].pregSource == -1>>
-		<<if $slaves[$i].devotion < 20 && ($week-$slaves[$i].weekAcquired >= $slaves[$i].weekAcquired)>>
-			<br>
-			$pronounCap @@.mediumorchid;despises@@ you for using $possessive body to bear your children.
-			<<set $slaves[$i].devotion -= 10>>
-		<<elseif $slaves[$i].devotion > 50>>
-			<br>
-			<<print $pronounCap>>'s @@.hotpink;so proud@@ to have successfully carried children for you.
-			<<set $slaves[$i].devotion += 3>>
-		<</if>>
-	<</if>>
-	<br>
-	<<if $slaves[$i].pregType > 0>>
-	<<span _dispositionId>>
-	<<if  $arcologies[0].FSRestart != "unset" && $slaves[$i].breedingMark == 1 && $slaves[$i].pregSource == -1>>
-		<<set _lostBabies = 1>>
-		As for the rest; the Societal Elite collected them to be raised into upstanding members of the new society.
-	<<elseif $Cash4Babies == 1>>
-		<<set _lostBabies = 1>>
-		<<set _babyCost = random(-12,12)>>
-		<<if ($slaves[$i].relationship == -3)>>
-			As for the rest; you make sure $possessive children are cared for, since $pronoun is your wife. $slaves[$i].slaveName is @@.hotpink;touched@@ by this @@.mediumaquamarine;act of kindness.@@
-			<<set $slaves[$i].trust += 3, $slaves[$i].devotion += 3>>
-			<<set _lostBabies = 0>>
-		<<elseif ($slaves[$i].assignment == "serve in the master suite" || $slaves[$i].assignment == "be your Concubine")>>
-			As for the rest; $possessive children are guaranteed to be treated well despite the laws you've passed since $pronoun is a member of your harem. $slaves[$i].slaveName is @@.hotpink;touched@@ by this @@.mediumaquamarine;act of kindness.@@
-			<<set $slaves[$i].trust += 3, $slaves[$i].devotion += 3>>
-			<<set _lostBabies = 0>>
-		<<else>>
-			As for the rest;
-			<<if $slaves[$i].broodmother == 2>>
-				$possessive babies sold for a total of @@.yellowgreen;<<print cashFormat(12*(50+_babyCost))>>.@@
-				<<set $cash += 12*(50+_babyCost)>>
-			<<elseif $slaves[$i].broodmother == 1>>
-				$possessive babies sold for a total of @@.yellowgreen;<<print cashFormat((50+_babyCost))>>.@@
-				<<set $cash += (50+_babyCost)>>
-			<<else>>
-				$possessive babies sold for a total of @@.yellowgreen;<<print cashFormat($slaves[$i].pregType*(50+_babyCost))>>.@@
-				<<set $cash += $slaves[$i].pregType*(50+_babyCost)>>
-			<</if>>
-		<</if>>
-	<</if>>
-	<<if _lostBabies != 1>>
-		<<set $slaveOrphanageTotal += $slaves[$i].pregType>>
-		Unless you provide otherwise, the remaining child<<if $slaves[$i].pregType > 1>>ren<</if>> will be remanded to one of $arcologies[0].name's slave orphanages. $slaves[$i].slaveName
-		<<if $slaves[$i].devotion > 95>>
-			worships you so completely that $pronoun will not resent this.
-		<<elseif $slaves[$i].devotion > 50>>
-			is devoted to you, but $pronoun will @@.mediumorchid;struggle to accept this.@@
-			<<set $slaves[$i].devotion -= 2>>
-		<<elseif $slaves[$i].devotion > 20>>
-			has accepted being a sex slave, but $pronoun will @@.mediumorchid;resent this intensely.@@
-			<<set $slaves[$i].devotion -= 3>>
-		<<else>>
-			will of course @@.mediumorchid;hate you for this.@@
-			<<set $slaves[$i].devotion -= 4>>
-		<</if>>
-		<<capture $i, _dispositionId>>
-		<<if $arcologies[0].FSRepopulationFocus > 40>>
-			<<link 'Send them to a breeder school'>>
-				<<replace `"#" + _dispositionId`>>
-					The remaining child<<if $slaves[$i].pregType > 1>>ren are<<else>> is<</if>> sent to one of $arcologies[0].name's future minded schools, to be administered fertility and virility treatments as well as be brought up to take pride in reproduction. $slaves[$i].slaveName
-					<<if $slaves[$i].devotion > 95>>
-						loves you already, but <<print $pronoun>>'ll @@.hotpink;love you even more@@ for this. $pronounCap can't wait to see $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>> proudly furthering your cause.
-						<<set $slaves[$i].devotion += 4>>
-					<<elseif $slaves[$i].devotion > 50>>
-						heard about these and will be @@.hotpink;happy that $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>> will have a purpose in your society other than slavery.@@ $pronounCap will miss $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but $pronoun expected that.
-						<<set $slaves[$i].devotion += 4>>
-					<<elseif $slaves[$i].devotion > 20>>
-						will naturally miss $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but will is broken enough to hope that $possessive offspring will have a better life, or at least an enjoyable one.
-					<<else>>
-						will of course @@.mediumorchid;hate you for this.@@ The mere thought of $possessive $fertilityAge year old daughter<<if $slaves[$i].pregType > 1>>s<</if>> swollen with life, and proud of it, fills $object with @@.gold;disdain.@@
-						<<set $slaves[$i].devotion -= 4, $slaves[$i].trust -= 4>>
-					<</if>>
-					<<set $breederOrphanageTotal +=$slaves[$i].pregType, $slaveOrphanageTotal -= $slaves[$i].pregType>>
-				<</replace>>
-			<</link>>
-			//Will cost a onetime <<print cashFormat(50)>>// |
-		<</if>>
-		<<link 'Send them to a citizen school'>>
-			<<replace `"#" + _dispositionId`>>
-				The remaining child<<if $slaves[$i].pregType > 1>>ren are<<else>> is<</if>> sent to one of $arcologies[0].name's citizen schools, to be brought up coequal with the arcology's other young people. $slaves[$i].slaveName
-				<<if $slaves[$i].devotion > 95>>
-					loves you already, but <<print $pronoun>>'ll @@.hotpink;love you even more@@ for this.
-				<<elseif $slaves[$i].devotion > 50>>
-					knows about these and will be @@.hotpink;overjoyed.@@ $pronounCap will miss $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but $pronoun expected that.
-				<<elseif $slaves[$i].devotion > 20>>
-					will naturally miss $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but will @@.hotpink;take comfort@@ in the hope that $possessive offspring will have a better life.
-				<<else>>
-					will naturally retain some resentment over being separated from $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but this should be balanced by hope that $possessive offspring will have a better life.
-				<</if>>
-				<<set $slaves[$i].devotion += 4, $citizenOrphanageTotal +=$slaves[$i].pregType, $slaveOrphanageTotal -= $slaves[$i].pregType>>
-			<</replace>>
-		<</link>>
-		//Will cost <<print cashFormat(100)>> weekly//
-		| <<link 'Have them raised privately'>>
-			<<replace `"#" + _dispositionId`>>
-				The child<<if $slaves[$i].pregType > 1>>ren are<<else>> is<</if>> sent to be privately raised, to be brought up as a future high class citizen. $slaves[$i].slaveName
-				<<if $slaves[$i].devotion > 95>>
-					will @@.hotpink;worship you utterly@@ for this.
-				<<elseif $slaves[$i].devotion > 50>>
-					understands that this is the best possible outcome for the offspring of slave, and will be @@.hotpink;overjoyed.@@
-				<<elseif $slaves[$i].devotion > 20>>
-					will miss $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but will be @@.hotpink;very grateful,@@ since <<print $pronoun>>'ll understand this is the best possible outcome for a slave mother.
-				<<else>>
-					will resent being separated from $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but @@.hotpink;should understand and be grateful@@ that this is the best possible outcome here.
-				<</if>>
-				The remaining child<<if $slaves[$i].pregType > 1>>ren<</if>> will be raised privately, with expert care and tutoring, an expensive proposition.
-				<<set $slaves[$i].devotion += 6, $privateOrphanageTotal += $slaves[$i].pregType, $slaveOrphanageTotal -= $slaves[$i].pregType>>
-			<</replace>>
-		<</link>>
-		//Will cost <<print cashFormat(500)>> weekly//
-		<</capture>>
-	<</if>>
-	<</span>>
-	<</if>>
-<<elseif $Cash4Babies == 1>>
-	<<set _babyCost = random(-12,12)>>
-	As for the rest;
-	<<if $slaves[$i].broodmother == 2>>
-		$possessive babies sold for a total of @@.yellowgreen;<<print cashFormat(12*(50+_babyCost))>>.@@
-		<<set $cash += 12*(50+_babyCost)>>
-	<<elseif $slaves[$i].broodmother == 1>>
-		$possessive babies sold for a total of @@.yellowgreen;<<print cashFormat((50+_babyCost))>>.@@
-		<<set $cash += (50+_babyCost)>>
-	<<else>>
-		$possessive babies sold for a total of @@.yellowgreen;<<print cashFormat($slaves[$i].pregType*(50+_babyCost))>>.@@
-		<<set $cash += $slaves[$i].pregType*(50+_babyCost)>>
-	<</if>>
-<</if>>
-
-<<set _tmp = lastPregRule($slaves[$i], $defaultRules)>>
-<<if ($slaves[$i].assignmentVisible == 0) && (_tmp != null)>>
-	<<set $slaves[$i].preg = -1>>
-<<else>>
-	<<set $slaves[$i].preg = 0>>
-<</if>>
-<<set $slaves[$i].pregType = 0>>
-<<set $slaves[$i].pregSource = 0>>
-<<set $slaves[$i].pregKnown = 0>>
-<<set $slaves[$i].pregWeek = -4>>
-<<SetBellySize $slaves[$i]>>
-<<set $reservedChildren -= $slaves[$i].reservedChildren>>
-<<set $slaves[$i].reservedChildren = 0>>
-<<set $csec = 0>>
-
-<<else>> /* normal birth */
-
-<<set _getFather = $slaves.find(function(s) { return s.ID == $slaves[$i].pregSource; })>>
-<<if def _getFather>>
-	<<set $daddy = _getFather.slaveName>>
-<</if>>
-
-<<if $humiliation == 1>>
-	<br><br>
-	Giving birth in such a manner was completely humiliating,
-	<<if $slaves[$i].fetish == "humiliation">>
-		and a complete turn on to $object. $possessiveCap humiliation fetish @@.lightcoral;strengthens@@ as $pronoun eagerly fantasizes about giving birth in public again.
-		<<set $slaves[$i].fetishStrength += 4>>
-	<<elseif $slaves[$i].fetish == "none" || $slaves[$i].fetishStrength <= 60>>
-		and a curious experience to $object. <<if random(1,5) == 1>>@@.lightcoral;$possessiveCap has developed a humiliation fetish.@@<<set $slaves[$i].fetish = "humiliation">><<else>>$pronounCap hopes to never repeat it.<</if>>
-	<<elseif $slaves[$i].devotion <= 20>>
-		and completely devastating to $possessive image of herself. The experience @@.hotpink;habituates $object@@ to cruelties of slavery.
-		<<set $slaves[$i].devotion += 5>>
-	<<else>>
-		and $pronoun hopes to never undergo it again.
-	<</if>>
-<</if>>
-
-<br>
-<br>
-$pronounCap @@.orange;gave birth@@<<if $slaves[$i].broodmother > 1>> but $possessive overfilled womb barely lost any size. $possessiveCap body gave life <<elseif $slaves[$i].broodmother > 0>> but $possessive stomach barely shrank at all. $possessiveCap body gave life <</if>>
-<<if $slaves[$i].broodmother == 2>>
-	to nearly a dozen babies throughout the week.
-<<elseif $slaves[$i].broodmother == 1>>
-	to a single baby this week,
-<<elseif $slaves[$i].pregType <= 1>>
-	to a single baby,
-<<elseif $slaves[$i].pregType >= 40>>
-	to a massive brood of $slaves[$i].pregType babies,
-<<elseif $slaves[$i].pregType >= 20>>
-	to a brood of $slaves[$i].pregType babies,
-<<elseif $slaves[$i].pregType >= 10>>
-	to a squirming pile of $slaves[$i].pregType babies,
-<<elseif $slaves[$i].pregType == 9>>
-	to nonuplets,
-<<elseif $slaves[$i].pregType == 8>>
-	to octuplets,
-<<elseif $slaves[$i].pregType == 7>>
-	to septuplets,
-<<elseif $slaves[$i].pregType == 6>>
-	to sextuplets,
-<<elseif $slaves[$i].pregType == 5>>
-	to quintuplets,
-<<elseif $slaves[$i].pregType == 4>>
-	to quadruplets,
-<<elseif $slaves[$i].pregType == 3>>
-	to triplets,
-<<else>>
-	to twins,
-<</if>>
-created by
-<<if $slaves[$i].pregSource == -1>>
-	your magnificent dick.
-<<elseif $slaves[$i].pregSource == -2>>
-	your arcology's eager citizens.
-<<elseif $slaves[$i].pregSource == -3>>
-	the Societal Elite.
-<<elseif $slaves[$i].pregSource == 0>>
-	an unknown father.
-<<elseif $slaves[$i].ID == $daddy.ID>>
-	$possessive own curiosity over if $pronoun could fuck <<print $possessive>>self.
-<<else>>
-	$daddy's virile cock and balls.
-<</if>>
-<<if $slaves[$i].pregType >= 80>>
-	After an entire day of labor and birth, $possessive belly sags heavily.
-<<elseif $slaves[$i].pregType >= 40>>
-	After half a day of labor and birth, $possessive belly sags emptily.
-<<elseif $slaves[$i].pregType >= 20>>
-	After several hours of labor and birth, $possessive belly sags softly.
-<</if>>
-
-<<if $arcologies[0].FSRestart != "unset">>
-<<if $slaves[$i].breedingMark == 1 && $slaves[$i].pregSource == -1>>
-<br><br>
-	The Societal Elite @@.green;are pleased@@ at the new additions to their class.
-	<<set $failedElite -= 2*$slaves[$i].pregType>>
-<<else>>
-<br>
-<br>
-	The Societal Elite @@.red;are disappointed@@ that you would allow subhuman filth to be born under your watch. Society @@.red;frowns@@ on the birth of more subhumans into the world.
-	<<set $failedElite += 5*$slaves[$i].pregType>>
-	<<set $rep -= 10*$slaves[$i].pregType>>
-<</if>>
-<</if>>
-
-<<if ($slaves[$i].vagina == 0) || ($slaves[$i].mpreg == 1 && $slaves[$i].anus == 0)>>
-<<if $slaves[$i].fetish != "mindbroken">>
-<br>
-<br>
-<<if ($slaves[$i].fetish == "masochist")>>
-	Since $pronoun was a virgin, giving birth was a @@.red;terribly painful@@ experience.<<if $slaves[$i].fetishKnown == 0>>$pronounCap seems to have orgasmed several times during the experience, $pronoun appears to @@.lightcoral;really like pain@@.<<else>> However, due to $possessive masochistic streak, $pronoun @@.hotpink;greatly enjoyed@@ said experience<</if>>.
-	<<set $slaves[$i].health -= 10>>
-	<<set $slaves[$i].devotion += 2>>
-	<<set $slaves[$i].fetishKnown = 1>>
-<<else>>
-	Since $pronoun was a virgin, giving birth was a @@.red;terribly painful@@ experience. $pronounCap @@.mediumorchid;despises@@ you for taking $possessive virginity in such a @@.gold;horrifying@@ way.
-	<<set $slaves[$i].health -= 40>>
-	<<set $slaves[$i].devotion -= 25.0>>
-	<<set $slaves[$i].trust -= 25.0>>
-<</if>>
-<</if>>
-<</if>>
-
-<br>
-<<if $slaves[$i].birthsTotal == 0>>
-	<br>
-	$possessiveCap inexperience @@.red;complicated $possessive first birth@@.
-<</if>>
-<<if $slaves[$i].mpreg == 1>>
-	<<if $slaves[$i].anus < 2>>
-		<br>
-		$possessiveCap tight ass @@.red;hindered $possessive baby's birth@@.
-	<</if>>
-<<else>>
-	<<if $slaves[$i].vagina < 2>>
-		<br>
-		$possessiveCap tight vagina @@.red;hindered $possessive baby's birth@@.
-	<</if>>
-	<<if $slaves[$i].vaginaLube == 0>>
-		<br>
-		$possessiveCap dry vagina made pushing $possessive child out @@.red;painful@@.
-	<</if>>
-<</if>>
-<<if $slaves[$i].hips < 0>>
-	<br>
-	$possessiveCap narrow hips made birth @@.red;troublesome@@.
-<</if>>
-<<if $slaves[$i].weight < -95>>
-	<br>
-	$possessiveCap very thin body @@.red;was nearly incapable of birthing $possessive child@@.
-<<elseif $slaves[$i].weight <= -30>>
-	<br>
-	$possessiveCap thin body was @@.red;ill-suited $possessive childbirth@@.
-<</if>>
-<<if $slaves[$i].health < -20>>
-	<br>
-	$possessiveCap poor health made laboring @@.red;exhausting@@.
-<</if>>
-<<if $slaves[$i].physicalAge < 6>>
-	<br>
-	$possessiveCap very young body was @@.red;not designed to be able pass a baby@@.
-<<elseif $slaves[$i].physicalAge < 9>>
-	<br>
-	$possessiveCap young body had @@.red;a lot of trouble@@ birthing $possessive baby.
-<<elseif $slaves[$i].physicalAge < 13>>
-	<br>
-	$possessiveCap young body had @@.red;trouble birthing@@ $possessive baby.
-<</if>>
-<<if $slaves[$i].tired > 0>>
-	<br>
-	$pronounCap was so tired, $pronoun @@.red;lacked the energy to effectively push@@.
-<</if>>
-<<if $slaves[$i].muscles < -95>>
-	<br>
-	$pronounCap tried and tried but $possessive frail body @@.red;could not push $possessive child out@@.
-<<elseif $slaves[$i].muscles < -30>>
-	<br>
-	$possessiveCap very weak body @@.red;barely managed to push@@ out $possessive child.
-<<elseif $slaves[$i].muscles < -5>>
-	<br>
-	$possessiveCap weak body @@.red;struggled to push@@ out $possessive child.
-<</if>>
-<<if $slaves[$i].preg > 50>>
-	<br>
-	$possessiveCap's child had extra time to grow @@.red;greatly complicating childbirth@@.
-<</if>>
-<<if (($slaves[$i].vagina >= 2 || $slaves[$i].vaginaLube > 0) && $slaves[$i].mpreg == 1) || $slaves[$i].births > 0 || $slaves[$i].hips > 0 || (setup.nurseCareers.includes($slaves[$i].career) && $slaves[$i].fetish != "mindbroken" && $slaves[$i].muscles >= -95) || $slaves[$i].intelligenceImplant > 0>>
-<br>However:
-<<if $slaves[$i].mpreg == 1>>
-	<<if $slaves[$i].anus >= 2>>
-		<br>
-		$possessiveCap @@.green;loose ass@@ made birthing $possessive child easier.
-	<</if>>
-<<else>>
-	<<if $slaves[$i].vagina >= 2>>
-		<br>
-		$possessiveCap @@.green;loose vagina@@ made birthing $possessive child easier.
-	<</if>>
-	<<if $slaves[$i].vaginaLube > 0>>
-		<br>
-		$possessiveCap @@.green;moist vagina@@ hastened $possessive child's birth.
-	<</if>>
-<</if>>
-<<if $slaves[$i].birthsTotal > 0>>
-	<br>
-	$pronounCap has @@.green;given birth before@@, so $pronoun knows just what to do.
-<</if>>
-<<if $slaves[$i].hips > 0>>
-	<br>
-	$possessiveCap @@.green;wide hips@@ greatly aided childbirth.
-<</if>>
-<<if setup.nurseCareers.includes($slaves[$i].career) && $slaves[$i].fetish != "mindbroken" && $slaves[$i].muscles >= -95>>
-	<br>
-	Thanks to $possessive @@.green;previous career@@, childbirth went smoothly.
-<</if>>
-<<if $slaves[$i].intelligenceImplant > 0>>
-	<br>
-	$pronounCap was @@.green;taught how to handle birth@@ in class.
-<</if>>
-<</if>>
-
-<br><br>
-<<if $slaves[$i].assignment != "work in the dairy" && $slaves[$i].broodmother == 0 && $csec == 0>>
-	All in all,
-	<<if $birthDamage > 15>>
-		childbirth was @@.red;horrifically difficult for $object and nearly claimed $possessive life@@.
-	<<elseif $birthDamage > 10>>
-		childbirth was extremely difficult for $object and @@.red;greatly damaged $possessive health@@.
-	<<elseif $birthDamage > 5>>
-		childbirth was difficult for $object and @@.red;damaged $possessive health@@.
-	<<elseif $birthDamage > 0>>
-		childbirth was painful for $object, though not abnormally so, and @@.red;damaged $possessive health@@.
-	<<else>>
-		childbirth was @@.green;no problem@@ for $object.
-	<</if>>
-	<<if $birthDamage > 0>>
-		<<set $slaves[$i].health -= Math.round(($birthDamage/2)*10)>>
-	<</if>>
-<</if>>
-
-<br>
-<br>
-<<if $slaves[$i].mpreg == 1>>
-	<<if ($slaves[$i].anus < 0)>> /* you somehow got a pregnant slave with no vagina catch */
-		Childbirth has @@.lime;has torn $object a gaping anus.@@
-	<<elseif ($slaves[$i].anus == 0)>> /* please stop selling me pregnant virgins, neighbor gender fundamentalist arcology */
-		Childbirth has @@.lime;ruined $possessive virgin ass.@@
-	<<elseif ($slaves[$i].anus == 1)>>
-		Childbirth has @@.lime;greatly stretched out $possessive ass.@@
-	<<elseif ($slaves[$i].anus == 2)>>
-		Childbirth has @@.lime;stretched out $possessive ass.@@
-	<<elseif ($slaves[$i].anus == 3)>>
-		$possessiveCap ass was loose enough to not be stretched by childbirth.
-	<<elseif ($slaves[$i].anus < 10)>>
-		Childbirth stood no chance of stretching $possessive gaping ass.
-	<<elseif ($slaves[$i].anus == 10)>>
-		$possessiveCap child could barely stretch $possessive cavernous ass.
-	<<else>>
-		Childbirth has @@.lime;stretched out $possessive ass.@@
-	<</if>>
-<<else>>
-	<<if ($slaves[$i].vagina < 0)>> /* you somehow got a pregnant slave with no vagina catch */
-		Childbirth has @@.lime;has torn $object a gaping vagina.@@
-	<<elseif ($slaves[$i].vagina == 0)>> /* please stop selling me pregnant virgins, neighbor gender fundamentalist arcology */
-		Childbirth has @@.lime;ruined $possessive virgin vagina.@@
-	<<elseif ($slaves[$i].vagina == 1)>>
-		Childbirth has @@.lime;greatly stretched out $possessive vagina.@@
-	<<elseif ($slaves[$i].vagina == 2)>>
-		Childbirth has @@.lime;stretched out $possessive vagina.@@
-	<<elseif ($slaves[$i].vagina == 3)>>
-		$possessiveCap vagina was loose enough to not be stretched by childbirth.
-	<<elseif ($slaves[$i].vagina < 10)>>
-		Childbirth stood no chance of stretching $possessive gaping vagina.
-	<<elseif ($slaves[$i].vagina == 10)>>
-		$possessiveCap child could barely stretch $possessive cavernous vagina.
-	<<else>>
-		Childbirth has @@.lime;stretched out $possessive vagina.@@
-	<</if>>
-<</if>>
-
-<<set $slaves[$i].births += $slaves[$i].pregType>>
-<<set $slaves[$i].birthsTotal += $slaves[$i].pregType>>
-<<set $birthsTotal += $slaves[$i].pregType>>
-<<if $slaves[$i].pregSource > 0>>
-	<<set _babyDaddy = $slaves.findIndex(function(s) { return s.ID == $slaves[$i].pregSource; })>>
-	<<if _babyDaddy != -1>>
-		<<set $slaves[_babyDaddy].slavesFathered += $slaves[$i].pregType>>
-	<</if>>
-<<elseif $slaves[$i].pregSource == -1>>
-	<<set $PC.slavesFathered += $slaves[$i].pregType>>
-<</if>>
-
-<<set $mom = $slaves[$i]>>
-
-<br><br>
-Of $possessive $slaves[$i].pregType child<<if $slaves[$i].pregType > 1>>ren<</if>>; $slaves[$i].reservedChildren <<if $slaves[$i].reservedChildren > 1>>were<<else>>was<</if>> taken to $incubatorName.
-<<for _k = $slaves[$i].reservedChildren; _k != 0; _k-->>
-	<<include "Generate Child">>
-	<<include "Incubator Workaround">>
-	<<set $slaves[$i].pregType-->>
-<</for>>
-<<set _count = $slaves[$i].pregType>>
-
-<<if $slaves[$i].fetish != "mindbroken" && $slaves[$i].fuckdoll == 0>>
-	<br>
-	<<if $slaves[$i].pregSource == -1>>
-	<<if $slaves[$i].devotion < 20 && ($week-$slaves[$i].weekAcquired >= $slaves[$i].weekAcquired)>>
-		<br>
-		$pronounCap @@.mediumorchid;despises@@ you for using $possessive body to bear your children.
-		<<set $slaves[$i].devotion -= 10>>
-	<<elseif $slaves[$i].devotion > 50>>
-		<br>
-		<<print $pronounCap>>'s @@.hotpink;so proud@@ to have successfully carried children for you.
-		<<set $slaves[$i].devotion += 3>>
-	<</if>>
-	<</if>>
-	<br>
-	<<if $slaves[$i].pregType > 0>>
-	<<span _dispositionId>>
-	<<if  $arcologies[0].FSRestart != "unset" && $slaves[$i].breedingMark == 1 && $slaves[$i].pregSource == -1>>
-		<<set _lostBabies = 1>>
-		As for the rest; the Societal Elite collected them to be raised into upstanding members of the new society.
-	<<elseif $Cash4Babies == 1>>
-		<<set _lostBabies = 1>>
-		<<set _babyCost = random(-12,12)>>
-		<<if ($slaves[$i].relationship == -3)>>
-			As for the rest; you make sure $possessive children are cared for, since $pronoun is your wife. $slaves[$i].slaveName is @@.hotpink;touched@@ by this @@.mediumaquamarine;act of kindness.@@
-			<<set $slaves[$i].trust += 3, $slaves[$i].devotion += 3>>
-			<<set _lostBabies = 0>>
-		<<elseif ($slaves[$i].assignment == "serve in the master suite" || $slaves[$i].assignment == "be your Concubine")>>
-			As for the rest; $possessive children are guaranteed to be treated well despite the laws you've passed since $pronoun is a member of your harem. $slaves[$i].slaveName is @@.hotpink;touched@@ by this @@.mediumaquamarine;act of kindness.@@
-			<<set $slaves[$i].trust += 3, $slaves[$i].devotion += 3>>
-			<<set _lostBabies = 0>>
-		<<else>>
-			As for the rest;
-			<<if $slaves[$i].broodmother == 2>>
-				$possessive babies sold for a total of @@.yellowgreen;<<print cashFormat(12*(50+_babyCost))>>.@@
-				<<set $cash += 12*(50+_babyCost)>>
-			<<elseif $slaves[$i].broodmother == 1>>
-				$possessive babies sold for a total of @@.yellowgreen;<<print cashFormat((50+_babyCost))>>.@@
-				<<set $cash += (50+_babyCost)>>
-			<<else>>
-				$possessive babies sold for a total of @@.yellowgreen;<<print cashFormat($slaves[$i].pregType*(50+_babyCost))>>.@@
-				<<set $cash += $slaves[$i].pregType*(50+_babyCost)>>
-			<</if>>
-		<</if>>
-	<</if>>
-	<<if _lostBabies != 1>>
-		<<set $slaveOrphanageTotal += $slaves[$i].pregType>>
-		Unless you provide otherwise, the remaining child<<if $slaves[$i].pregType > 1>>ren<</if>> will be remanded to one of $arcologies[0].name's slave orphanages. $slaves[$i].slaveName
-		<<if $slaves[$i].devotion > 95>>
-			worships you so completely that $pronoun will not resent this.
-		<<elseif $slaves[$i].devotion > 50>>
-			is devoted to you, but $pronoun will @@.mediumorchid;struggle to accept this.@@
-			<<set $slaves[$i].devotion -= 2>>
-		<<elseif $slaves[$i].devotion > 20>>
-			has accepted being a sex slave, but $pronoun will @@.mediumorchid;resent this intensely.@@
-			<<set $slaves[$i].devotion -= 3>>
-		<<else>>
-			will of course @@.mediumorchid;hate you for this.@@
-			<<set $slaves[$i].devotion -= 4>>
-		<</if>>
-		<<capture $i, _dispositionId, _count>>
-		<<if $arcologies[0].FSRepopulationFocus > 40>>
-			<<link 'Send them to a breeder school'>>
-				<<replace `"#" + _dispositionId`>>
-					The remaining child<<if $slaves[$i].pregType > 1>>ren are<<else>> is<</if>> sent to one of $arcologies[0].name's future minded schools, to be administered fertility and virility treatments as well as be brought up to take pride in reproduction. $slaves[$i].slaveName
-					<<if $slaves[$i].devotion > 95>>
-						loves you already, but <<print $pronoun>>'ll @@.hotpink;love you even more@@ for this. $pronounCap can't wait to see $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>> proudly furthering your cause.
-						<<set $slaves[$i].devotion += 4>>
-					<<elseif $slaves[$i].devotion > 50>>
-						heard about these and will be @@.hotpink;happy that $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>> will have a purpose in your society other than slavery.@@ $pronounCap will miss $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but $pronoun expected that.
-						<<set $slaves[$i].devotion += 4>>
-					<<elseif $slaves[$i].devotion > 20>>
-						will naturally miss $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but will is broken enough to hope that $possessive offspring will have a better life, or at least an enjoyable one.
-					<<else>>
-						will of course @@.mediumorchid;hate you for this.@@ The mere thought of $possessive $fertilityAge year old daughter<<if $slaves[$i].pregType > 1>>s<</if>> swollen with life, and proud of it, fills $object with @@.gold;disdain.@@
-						<<set $slaves[$i].devotion -= 4, $slaves[$i].trust -= 4>>
-					<</if>>
-					<<set $breederOrphanageTotal +=$slaves[$i].pregType, $slaveOrphanageTotal -= $slaves[$i].pregType>>
-				<</replace>>
-			<</link>>
-			//Will cost a onetime <<print cashFormat(50)>>// |
-		<</if>>
-		<<link 'Send them to a citizen school'>>
-			<<replace `"#" + _dispositionId`>>
-				The remaining child<<if $slaves[$i].pregType > 1>>ren are<<else>> is<</if>> sent to one of $arcologies[0].name's citizen schools, to be brought up coequal with the arcology's other young people. $slaves[$i].slaveName
-				<<if $slaves[$i].devotion > 95>>
-					loves you already, but <<print $pronoun>>'ll @@.hotpink;love you even more@@ for this.
-				<<elseif $slaves[$i].devotion > 50>>
-					knows about these and will be @@.hotpink;overjoyed.@@ $pronounCap will miss $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but $pronoun expected that.
-				<<elseif $slaves[$i].devotion > 20>>
-					will naturally miss $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but will @@.hotpink;take comfort@@ in the hope that $possessive offspring will have a better life.
-				<<else>>
-					will naturally retain some resentment over being separated from $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but this should be balanced by hope that $possessive offspring will have a better life.
-				<</if>>
-				<<set $slaves[$i].devotion += 4, $citizenOrphanageTotal +=$slaves[$i].pregType, $slaveOrphanageTotal -= $slaves[$i].pregType>>
-			<</replace>>
-		<</link>>
-		//Will cost <<print cashFormat(100)>> weekly//
-		| <<link 'Have them raised privately'>>
-			<<replace `"#" + _dispositionId`>>
-				The child<<if $slaves[$i].pregType > 1>>ren are<<else>> is<</if>> sent to be privately raised, to be brought up as a future high class citizen. $slaves[$i].slaveName
-				<<if $slaves[$i].devotion > 95>>
-					will @@.hotpink;worship you utterly@@ for this.
-				<<elseif $slaves[$i].devotion > 50>>
-					understands that this is the best possible outcome for the offspring of slave, and will be @@.hotpink;overjoyed.@@
-				<<elseif $slaves[$i].devotion > 20>>
-					will miss $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but will be @@.hotpink;very grateful,@@ since <<print $pronoun>>'ll understand this is the best possible outcome for a slave mother.
-				<<else>>
-					will resent being separated from $possessive child<<if $slaves[$i].pregType > 1>>ren<</if>>, but @@.hotpink;should understand and be grateful@@ that this is the best possible outcome here.
-				<</if>>
-				The remaining child<<if $slaves[$i].pregType > 1>>ren<</if>> will be raised privately, with expert care and tutoring, an expensive proposition.
-				<<set $slaves[$i].devotion += 6, $privateOrphanageTotal += $slaves[$i].pregType, $slaveOrphanageTotal -= $slaves[$i].pregType>>
-			<</replace>>
-		<</link>>
-		//Will cost <<print cashFormat(500)>> weekly//
-		<</capture>>
-	<</if>>
-	<</span>>
-	<</if>>
-<<elseif $Cash4Babies == 1 && $slaves[$i].pregType > 0>>
-	<<set _babyCost = random(-12,12)>>
-	As for the rest;
-	<<if $slaves[$i].broodmother == 2>>
-		$possessive babies sold for a total of @@.yellowgreen;<<print cashFormat(12*(50+_babyCost))>>.@@
-		<<set $cash += 12*(50+_babyCost)>>
-	<<elseif $slaves[$i].broodmother == 1>>
-		$possessive babies sold for a total of @@.yellowgreen;<<print cashFormat((50+_babyCost))>>.@@
-		<<set $cash += (50+_babyCost)>>
-	<<else>>
-		$possessive babies sold for a total of @@.yellowgreen;<<print cashFormat($slaves[$i].pregType*(50+_babyCost))>>.@@
-		<<set $cash += $slaves[$i].pregType*(50+_babyCost)>>
-	<</if>>
-<</if>>
-
-<<set _tmp = lastPregRule($slaves[$i], $defaultRules)>>
-<<if ($slaves[$i].assignmentVisible == 0) && (_tmp != null)>>
-	<<set $slaves[$i].preg = -1>>
-<<else>>
-	<<set $slaves[$i].preg = 0>>
-<</if>>
-<<set $slaves[$i].pregType = 0>>
-<<set $slaves[$i].pregSource = 0>>
-<<set $slaves[$i].pregKnown = 0>>
-<<set $slaves[$i].pregWeek = -4>>
-<<SetBellySize $slaves[$i]>>
-<<set $reservedChildren -= $slaves[$i].reservedChildren>>
-<<set $slaves[$i].reservedChildren = 0>>
-<<if $slaves[$i].mpreg == 1>>
-	<<if $slaves[$i].anus < 3>>
-		<<set $slaves[$i].anus = 3>>
-	<</if>>
-<<else>>
-	<<if $slaves[$i].vagina < 3>>
-		<<set $slaves[$i].vagina = 3>>
-	<</if>>
-<</if>>
-
-<</if>> /* closes c-section */
-<<set $mom = 0>>
-
-<</widget>>
-
 <<widget "AgePCEffects">>
 <<switch $PC.actualAge>>
 /* <<case 3>> */
diff --git a/src/pregmod/widgets/seBirthWidgets.tw b/src/pregmod/widgets/seBirthWidgets.tw
index 1bc12098863413dac2b4828d06d47a0f6f7ab640..40ff82fb19ec3513d5e127aa41a71655329e5fcd 100644
--- a/src/pregmod/widgets/seBirthWidgets.tw
+++ b/src/pregmod/widgets/seBirthWidgets.tw
@@ -421,7 +421,7 @@ This decriptions can be expanded with more outcomes later. But it's not practica
 			the Societal Elite<<if $csec == 1>>, entered the world<</if>>.
 		<<elseif $slaves[$i].pregSource == 0>>
 			an unknown father<<if $csec == 1>>, entered the world<</if>>.
-		<<elseif $slaves[$i].ID == $daddy.ID>>
+		<<elseif $slaves[$i].ID == $slaves[$i].pregSource>>
 			$possessive own curiosity over if $pronoun could fuck <<print $possessive>>self<<if $csec == 1>>, entered the world<</if>>.
 		<<else>>
 			$daddy's virile cock and balls<<if $csec == 1>>, entered the world<</if>>.