diff --git a/src/events/intro/introSummary.tw b/src/events/intro/introSummary.tw
index 4f922f75e94fe1c5f01b6c9a63ee30d90defee61..3b0667a94c35ad4c9d070eaca144ca858641472b 100644
--- a/src/events/intro/introSummary.tw
+++ b/src/events/intro/introSummary.tw
@@ -14,6 +14,8 @@ You may review your settings before clicking "Continue" to begin.
 <<set $retirementAge = Math.clamp($retirementAge, 25, 120)>>
 <<set $fertilityAge = variableAsNumber($fertilityAge, 13, 3, 18)>>
 <<set $potencyAge = variableAsNumber($potencyAge, 13, 3, 18)>>
+<<set $PC.mother = Number($PC.mother)>>
+<<set $PC.father = Number($PC.father)>>
 
 __''World Settings''__
 
diff --git a/src/init/storyInit.tw b/src/init/storyInit.tw
index 84b4b69e4f821009807141c56fcd5e3c15b9b5e0..97e7b4a2ebcbbcb9d8222979bc134202626065ec 100644
--- a/src/init/storyInit.tw
+++ b/src/init/storyInit.tw
@@ -1287,6 +1287,7 @@ FertilityAge($fertilityAge)
 <<set $activeSlaveOneTimeMaxAge to 999>>
 <<set $AgePenalty to 1>>
 <<set $precociousPuberty to 0>>
+<<set $targetAge = $minimumSlaveAge>>
 
 /% Begin mod section: toggle whether slaves lisp. %/
 <<set $disableLisping to 0>>
diff --git a/src/pregmod/generateChild.tw b/src/pregmod/generateChild.tw
index 4b8595277a9420e64d8d8bda133ae097515a542b..02f0b4c20c9eafb9c1532345a88f461f35d1d6b4 100644
--- a/src/pregmod/generateChild.tw
+++ b/src/pregmod/generateChild.tw
@@ -306,6 +306,47 @@
 	<<set $activeSlave.scrotom = 1>>
 <</if>>
 
+/* Int and facial attractiveness changes to bolster eugenics and add negatives for excessive inbreeding */
+<<if $activeSlave.mother == -1 && $PC.pregSource == -1>>
+	<<set $activeSlave.face = either(2,2,2,3)>>
+	<<set $activeSlave.intelligence = either(2,2,2,2,3,3)>>
+<<elseif $activeSlave.mother == -1>>
+	<<if $activeSlave.face < 2>>
+		<<set $activeSlave.face++>>
+	<</if>>
+	<<if $activeSlave.intelligence < 2>>
+		<<set $activeSlave.intelligence++>>
+	<</if>>
+<<elseif $activeSlave.father == -1 && $mom > 0>>
+	<<if $mom.breedingMark == 1>>
+		<<set $activeSlave.face = either(2,2,2,3)>>
+		<<set $activeSlave.intelligence = either(2,2,2,2,3,3)>>
+	<<else>>
+		<<if $activeSlave.face < 2>>
+			<<set $activeSlave.face++>>
+		<</if>>
+		<<if $activeSlave.intelligence < 2>>
+			<<set $activeSlave.intelligence++>>
+		<</if>>
+	<</if>>
+<<elseif $activeSlave.father == -1>>
+	<<if $activeSlave.face < 2>>
+		<<set $activeSlave.face++>>
+	<</if>>
+	<<if $activeSlave.intelligence < 2>>
+		<<set $activeSlave.intelligence++>>
+	<</if>>
+<<else>>
+	<<set $activeSlave.face to random($mergeDad.face, $mergeMom.face)>>
+	<<if $activeSlave.face > -3 && random(1,100) < 90>>
+		<<set $activeSlave.face-->>
+	<</if>>
+	<<set $activeSlave.intelligence to random($mergeDad.intelligence, $mergeMom.intelligence)>>
+	<<if $activeSlave.intelligence > -3 && random(1,100) < 90>>
+		<<set $activeSlave.intelligence-->>
+	<</if>>
+<</if>>
+
 <<set $activeSlave.corsetPiercing = 0>>
 <<set $activeSlave.boobsImplant = 0>>
 <<set $activeSlave.boobsImplantType = 0>>
diff --git a/src/pregmod/incubator.tw b/src/pregmod/incubator.tw
index b94c9e47d409e3aea6eb6af1fc0573afb3d0d805..bbb546e6e53e37ca253afc710801040c3537931f 100644
--- a/src/pregmod/incubator.tw
+++ b/src/pregmod/incubator.tw
@@ -4,6 +4,7 @@
 <<set $nextButton to "Back to Main">>
 <<set $nextLink to "Main">>
 <<set $returnTo to "Incubator">>
+<<set $targetAge to Math.clamp($targetAge, $minimumSlaveAge, 18)>>
 
 <<if $tanks == 0>>
 	<<set $tanks = [0]>>
@@ -39,17 +40,26 @@ $incubatorNameCaps is a clean, cold hall designed to be lined with tanks and the
 <</if>>
 [[Add another incubation tank|Incubator][$cash -= Math.trunc(60000*$upgradeMultiplierArcology), $incubator += 1, $tanks.push(0)]] //Costs ¤<<print Math.trunc(60000*$upgradeMultiplierArcology)>> and will increase upkeep costs//
 
+<br>
+Target age for release: <<textbox "$targetAge" $targetAge "Incubator">> [[Minimum Legal Age|Incubator][$targetAge to $minimumSlaveAge]] | [[Average Age of Fertility|Incubator][$targetAge to $fertilityAge]] | [[Average Age of Potency|Incubator][$targetAge to $potencyAge]] | [[Legal Adulthood|Incubator][$targetAge to 18]]
+//Setting will not be applied to tanks in use.//
+
 <br>
 <<if $incubatorUpgradeSpeed == 4>>
 	It has been upgraded with perfected growth accelerants; children grow at the rate of 1 week to 1 year.
+	<<set _speed = 12>>
 <<elseif $incubatorUpgradeSpeed == 3>>
 	It has been upgraded with advanced experimental growth accelerants; children grow at the rate of 3 weeks to 1 year. [[Fund speculative research into maximizing growth rate|Incubator][$cash -= Math.trunc(500000*$upgradeMultiplierArcology), $incubatorUpgradeSpeed to 4]] //Costs ¤<<print Math.trunc(500000*$upgradeMultiplierArcology)>> and will increase upkeep costs//
+	<<set _speed = 9>>
 <<elseif $incubatorUpgradeSpeed == 2>>
 	It has been upgraded with advanced growth accelerants; children grow at the rate of 6 weeks to 1 year. [[Fund research into increasing growth rate even further|Incubator][$cash -= Math.trunc(75000*$upgradeMultiplierArcology), $incubatorUpgradeSpeed to 3]] //Costs ¤<<print Math.trunc(75000*$upgradeMultiplierArcology)>> and will increase upkeep costs//
+	<<set _speed = 6>>
 <<elseif $incubatorUpgradeSpeed == 1>>
 	It has been upgraded with growth accelerants; children grow at the rate of 9 weeks to 1 year. [[Further upgrade the incubators with specialized stem cells to speed growth|Incubator][$cash -= Math.trunc(30000*$upgradeMultiplierArcology), $incubatorUpgradeSpeed to 2]] //Costs ¤<<print Math.trunc(30000*$upgradeMultiplierArcology)>> and will increase upkeep costs//
+	<<set _speed = 6>>
 <<else>>
 	The incubation tanks are basic; children grow at the rate of 12 weeks to 1 year. [[Upgrade the incubators with growth accelerating drugs|Incubator][$cash -= Math.trunc(30000*$upgradeMultiplierArcology), $incubatorUpgradeSpeed to 1]] //Costs ¤<<print Math.trunc(30000*$upgradeMultiplierArcology)>> and will increase upkeep costs//
+	<<set _speed = 1>>
 <</if>>
 
 <br>
@@ -77,7 +87,7 @@ $incubatorNameCaps is a clean, cold hall designed to be lined with tanks and the
 	<<if $tanks[$i] == 0>>
 		<br><br>Tank #<<print $i + 1>> is currently empty.
 	<<else>>
-		<br><br>Tank #<<print $i + 1>> is currently accelerating <<print $tanks[$i].slaveName>>'s growth. She will be ready for release in $tanks[$i].growth weeks.
+		<br><br>Tank #<<print $i + 1>> is currently accelerating <<print $tanks[$i].slaveName>>'s growth. She will be ready for release in about Math.round($tanks[$i].growth/_speed) weeks.
 		<<if $incubatorUpgradeWeight == 1>>
 			<br>
 			<<if $incubatorWeightSetting == 1>>
@@ -108,6 +118,53 @@ $incubatorNameCaps is a clean, cold hall designed to be lined with tanks and the
 				Reproduction management systems are offline; she will undergo normal puberty.
 			<</if>>
 		<</if>>
+		<br>
+		Choose a name for her. <<textbox "$tanks[$i].birthName" $tanks[$i].birthName "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].birthName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
+						<<break>>
+					<<elseif $slaves[_j].relationship == -4>>
+						| [[Permit your wife to name her daughter|Incubator][$tanks[$i].birthName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
+						<<break>>
+					<<elseif $slaves[_j].ID == $Bodyguard.ID>>
+						| [[Permit your bodyguard to name her daughter|Incubator][$tanks[$i].birthName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
+						<<break>>
+					<<elseif $slaves[_j].ID == $HeadGirl.ID>>
+						| [[Permit your headgirl to name her daughter|Incubator][$tanks[$i].birthName = <<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].birthName = <<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].birthName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
+						<<break>>
+					<<elseif $slaves[_j].relationship == -4>>
+						| [[Permit your wife to name her daughter|Incubator][$tanks[$i].birthName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
+						<<break>>
+					<<elseif $slaves[_j].ID == $Bodyguard.ID>>
+						| [[Permit your bodyguard to name her daughter|Incubator][$tanks[$i].birthName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
+						<<break>>
+					<<elseif $slaves[_j].ID == $HeadGirl.ID>>
+						| [[Permit your headgirl to name her daughter|Incubator][$tanks[$i].birthName = <<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].birthName = <<ParentNames $slaves[_j], $tanks[$i]>>]]
+						<<break>>
+					<</if>>
+				<</if>>
+			<</for>>
+		<</if>>
+		<<set $tanks[$i].slaveName = $tanks[$i].birthName>>
 	<</if>>
 <</for>>
 
diff --git a/src/pregmod/incubatorReport.tw b/src/pregmod/incubatorReport.tw
index b37b26652e0cbc0a2cbcd93cc1ad4612c43c8431..6d46cf2006f938803301c91d501378057b880cb5 100644
--- a/src/pregmod/incubatorReport.tw
+++ b/src/pregmod/incubatorReport.tw
@@ -1 +1,16 @@
-/*:: Incubator Report [nobr]*/
\ No newline at end of file
+:: Incubator Report [nobr]
+
+''Incubator Report''<hr style="margin:0">
+
+<<set $incubatorSlaves to 0>>
+
+<<for $i to 0; $i < $tanks.length; $i++>>
+<<if $tanks[$i] > 0>>
+	<<set $incubatorSlaves += 1>>
+<</if>>
+<</for>>
+
+<<if $incubatorSlaves == 0>>
+	''$incubatorNameCaps is empty.''
+<</if>>
+<br><br>
diff --git a/src/pregmod/incubatorWorkaround.tw b/src/pregmod/incubatorWorkaround.tw
index d01fce13c233af4bfab99430e7a9b8f11fc48f8f..7e5b0794bc529cb363005be962ced351d66b40b6 100644
--- a/src/pregmod/incubatorWorkaround.tw
+++ b/src/pregmod/incubatorWorkaround.tw
@@ -1,24 +1,10 @@
 :: Incubator Workaround
 
-/*
-<<if $incubatorUpgradeSpeed == 4>>
-	<<set _speed = 1>>
-<<elseif $incubatorUpgradeSpeed == 3>>
-	<<set _speed = 3>>
-<<elseif $incubatorUpgradeSpeed == 2>>
-	<<set _speed = 6>>
-<<elseif $incubatorUpgradeSpeed == 1>>
-	<<set _speed = 9>>
-<<else>>
-	<<set _speed = 12>>
-<</if>>
-*/
-
 <<for _i to 0; _i < $tanks.length; _i++>>
 	<<if $tanks[_i] == 0>>
 		<<set $tanks[_i] = $activeSlave>>
-		/*<<set $tanks[_i].growth = ($minimumSlaveAge*52)>>*/
 		<<set $incubatorSlaves++>>
+		<<set $tanks[_i].growth = ($targetAge*52)>>
 		<<break>>
 	<</if>>
 <</for>>
diff --git a/src/pregmod/pregmodWidgets.tw b/src/pregmod/pregmodWidgets.tw
index cf7b8f241e9b43792065ac2feed5b07fb071a667..5e6a50e61baabbb52da7c680ab007c25ca4af5c8 100644
--- a/src/pregmod/pregmodWidgets.tw
+++ b/src/pregmod/pregmodWidgets.tw
@@ -879,6 +879,213 @@ extremely pale -5
 
 <</widget>>
 
+<<widget "ParentNames">>
+
+<<switch $args[0].nationality>>
+<<case "American">>
+	<<if $args[1].race is "black">>
+		<<set $args[1].birthName to $africanAmericanSlaveNames.random()>>
+	<<elseif $args[1].race is "latina">>
+		<<set $args[1].birthName to $latinaSlaveNames.random()>>
+	<<elseif $args[1].race is "asian">>
+		<<set $args[1].birthName to $asianAmericanSlaveNames.random()>>
+	<<elseif $args[1].race is "middle eastern">>
+		<<set $args[1].birthName to $egyptianSlaveNames.random()>>
+	<<else>>
+		<<set $args[1].birthName to $whiteAmericanSlaveNames.random()>>
+	<</if>>
+<<case "Canadian">>
+	<<set $args[1].birthName to $canadianSlaveNames.random()>>
+<<case "Mexican">>
+	<<set $args[1].birthName to $mexicanSlaveNames.random()>>
+<<case "Dominican">>
+	<<set $args[1].birthName to $dominicanSlaveNames.random()>>
+<<case "Puerto Rican">>
+	<<set $args[1].birthName to $puertoRicanSlaveNames.random()>>
+<<case "Haitian">>
+	<<set $args[1].birthName to $haitianSlaveNames.random()>>
+<<case "Jamaican">>
+	<<set $args[1].birthName to $jamaicanSlaveNames.random()>>
+<<case "Cuban">>
+	<<set $args[1].birthName to $cubanSlaveNames.random()>>
+<<case "Guatemalan">>
+	<<set $args[1].birthName to $guatemalanSlaveNames.random()>>
+<<case "Chilean">>
+	<<set $args[1].birthName to $chileanSlaveNames.random()>>
+<<case "Peruvian">>
+	<<set $args[1].birthName to $peruvianSlaveNames.random()>>
+<<case "Bolivian">>
+	<<set $args[1].birthName to $bolivianSlaveNames.random()>>
+<<case "Venezuelan">>
+	<<set $args[1].birthName to $venezuelanSlaveNames.random()>>
+<<case "Belarusian">>
+	<<set $args[1].birthName to $belarusianSlaveNames.random()>>
+<<case "Russian">>
+	<<set $args[1].birthName to $russianSlaveNames.random()>>
+<<case "Ukrainian">>
+	<<set $args[1].birthName to $ukrainianSlaveNames.random()>>
+<<case "Italian">>
+	<<set $args[1].birthName to $italianSlaveNames.random()>>
+<<case "Spanish">>
+	<<set $args[1].birthName to $spanishSlaveNames.random()>>
+<<case "British">>
+	<<set $args[1].birthName to $britishSlaveNames.random()>>
+<<case "Scottish">>
+	<<set $args[1].birthName to $scottishSlaveNames.random()>>
+<<case "French">>
+	<<set $args[1].birthName to $frenchSlaveNames.random()>>
+<<case "German">>
+	<<set $args[1].birthName to $germanSlaveNames.random()>>
+<<case "Lithuanian">>
+	<<set $args[1].birthName to $lithuanianSlaveNames.random()>>
+<<case "Norwegian">>
+	<<set $args[1].birthName to $norwegianSlaveNames.random()>>
+<<case "Slovak">>
+	<<set $args[1].birthName to $slovakSlaveNames.random()>>
+<<case "Danish">>
+	<<set $args[1].birthName to $danishSlaveNames.random()>>
+<<case "Dutch">>
+	<<set $args[1].birthName to $dutchSlaveNames.random()>>
+<<case "Austrian">>
+	<<set $args[1].birthName to $austrianSlaveNames.random()>>
+<<case "Swiss">>
+	<<set $args[1].birthName to $swissSlaveNames.random()>>
+<<case "Serbian">>
+	<<set $args[1].birthName to $serbianSlaveNames.random()>>
+<<case "Belgian">>
+	<<set $args[1].birthName to $belgianSlaveNames.random()>>
+<<case "Czech">>
+	<<set $args[1].birthName to $czechSlaveNames.random()>>
+<<case "Portuguese">>
+	<<set $args[1].birthName to $portugueseSlaveNames.random()>>
+<<case "Swedish">>
+	<<set $args[1].birthName to $swedishSlaveNames.random()>>
+<<case "Romanian">>
+	<<set $args[1].birthName to $romanianSlaveNames.random()>>
+<<case "Hungarian">>
+	<<set $args[1].birthName to $hungarianSlaveNames.random()>>
+<<case "Estonian">>
+	<<set $args[1].birthName to $estonianSlaveNames.random()>>
+<<case "Irish">>
+	<<set $args[1].birthName to $irishSlaveNames.random()>>
+<<case "Icelandic">>
+	<<set $args[1].birthName to $icelandicSlaveNames.random()>>
+<<case "Finnish">>
+	<<set $args[1].birthName to $finnishSlaveNames.random()>>
+<<case "Greek">>
+	<<set $args[1].birthName to $greekSlaveNames.random()>>
+<<case "Polish">>
+	<<set $args[1].birthName to $polishSlaveNames.random()>>
+<<case "Brazilian">>
+	<<set $args[1].birthName to $brazilianSlaveNames.random()>>
+<<case "Egyptian">>
+	<<set $args[1].birthName to $egyptianSlaveNames.random()>>
+<<case "Colombian">>
+	<<set $args[1].birthName to $colombianSlaveNames.random()>>
+<<case "Argentinian">>
+	<<set $args[1].birthName to $argentinianSlaveNames.random()>>
+<<case "Turkish">>
+	<<set $args[1].birthName to $turkishSlaveNames.random()>>
+<<case "Iranian">>
+	<<set $args[1].birthName to $iranianSlaveNames.random()>>
+<<case "Armenian">>
+	<<set $args[1].birthName to $armenianSlaveNames.random()>>
+<<case "Israeli">>
+	<<set $args[1].birthName to $israeliSlaveNames.random()>>
+<<case "Saudi">>
+	<<set $args[1].birthName to $saudiSlaveNames.random()>>
+<<case "South African">>
+	<<if $args[1].race is "black">>
+		<<set $args[1].birthName to $blackSouthAfricanSlaveNames.random()>>
+	<<else>>
+		<<set $args[1].birthName to $whiteSouthAfricanSlaveNames.random()>>
+	<</if>>
+<<case "Nigerian">>
+	<<set $args[1].birthName to $nigerianSlaveNames.random()>>
+<<case "Congolese">>
+	<<set $args[1].birthName to $congoleseSlaveNames.random()>>
+<<case "Kenyan">>
+	<<set $args[1].birthName to $kenyanSlaveNames.random()>>
+<<case "Tanzanian">>
+	<<set $args[1].birthName to $tanzanianSlaveNames.random()>>
+<<case "Zimbabwean">>
+	<<if $args[1].race == "white">>
+		<<set $args[1].birthName to $britishSlaveNames.random()>>
+	<<else>>
+		<<set $args[1].birthName to $zimbabweanSlaveNames.random()>>
+	<</if>>
+<<case "Ghanan">>
+	<<set $args[1].birthName to $ghananSlaveNames.random()>>
+<<case "Ugandan">>
+	<<set $args[1].birthName to $ugandanSlaveNames.random()>>
+<<case "Ethiopian">>
+	<<set $args[1].birthName to $ethiopianSlaveNames.random()>>
+<<case "Moroccan">>
+	<<set $args[1].birthName to $moroccanSlaveNames.random()>>
+<<case "Chinese">>
+	<<set $args[1].birthName to $chineseSlaveNames.random()>>
+<<case "Korean">>
+	<<set $args[1].birthName to $koreanSlaveNames.random()>>
+<<case "Thai">>
+	<<set $args[1].birthName to $thaiSlaveNames.random()>>
+<<case "Vietnamese">>
+	<<set $args[1].birthName to $vietnameseSlaveNames.random()>>
+<<case "Japanese">>
+	<<set $args[1].birthName to $japaneseSlaveNames.random()>>
+<<case "Indonesian">>
+	<<set $args[1].birthName to $indonesianSlaveNames.random()>>
+<<case "Filipina">>
+	<<set $args[1].birthName to $filipinaSlaveNames.random()>>
+<<case "Bangladeshi">>
+	<<set $args[1].birthName to $bangladeshiSlaveNames.random()>>
+<<case "Malaysian">>
+	<<set $args[1].birthName to $malaysianSlaveNames.random()>>
+<<case "Uzbek">>
+	<<set $args[1].birthName to $uzbekSlaveNames.random()>>
+<<case "Afghan">>
+	<<set $args[1].birthName to $afghanSlaveNames.random()>>
+<<case "Nepalese">>
+	<<set $args[1].birthName to $nepaleseSlaveNames.random()>>
+<<case "Burmese">>
+	<<set $args[1].birthName to $burmeseSlaveNames.random()>>
+<<case "Iraqi">>
+	<<set $args[1].birthName to $iraqiSlaveNames.random()>>
+<<case "Yemeni">>
+	<<set $args[1].birthName to $yemeniSlaveNames.random()>>
+<<case "Sudanese">>
+	<<set $args[1].birthName to $sudaneseSlaveNames.random()>>
+<<case "Algerian">>
+	<<set $args[1].birthName to $algerianSlaveNames.random()>>
+<<case "Tunisian">>
+	<<set $args[1].birthName to $tunisianSlaveNames.random()>>
+<<case "Libyan">>
+	<<set $args[1].birthName to $libyanSlaveNames.random()>>
+<<case "Omani">>
+	<<set $args[1].birthName to $omaniSlaveNames.random()>>
+<<case "Malian">>
+	<<set $args[1].birthName to $malianSlaveNames.random()>>
+<<case "Jordanian">>
+	<<set $args[1].birthName to $jordanianSlaveNames.random()>>
+<<case "Lebanese">>
+	<<set $args[1].birthName to $lebaneseSlaveNames.random()>>
+<<case "Emirati">>
+	<<set $args[1].birthName to $emiratiSlaveNames.random()>>
+<<case "Kazakh">>
+	<<set $args[1].birthName to $kazakhSlaveNames.random()>>
+<<case "Pakistani">>
+	<<set $args[1].birthName to $pakistaniSlaveNames.random()>>
+<<case "Indian">>
+	<<set $args[1].birthName to $indianSlaveNames.random()>>
+<<case "Australian">>
+	<<set $args[1].birthName to $australianSlaveNames.random()>>
+<<case "a New Zealander">>
+	<<set $args[1].birthName to $newZealanderSlaveNames.random()>>
+<<default>>
+	<<set $args[1].birthName to $whiteAmericanSlaveNames.random()>>
+<</switch>>
+
+<</widget>>
+
 <<widget "Family">>
 
 /*testtest PC parent passage - determines if the current slave is your mother or father*/
diff --git a/src/uncategorized/longSlaveDescription.tw b/src/uncategorized/longSlaveDescription.tw
index b0d222638dce947e0a7217380b72c67127abb0bd..70359ccc9c0bce68c4cf0a1a2a1a954f0cc55d6d 100644
--- a/src/uncategorized/longSlaveDescription.tw
+++ b/src/uncategorized/longSlaveDescription.tw
@@ -1565,15 +1565,21 @@ and
 	The proportions of $possessive arms and legs are odd, as though they have been surgically shortened.
 <</if>>
 
-<<if $activeSlave.muscles > 5>>
 $pronounCap is
 <<if $activeSlave.muscles > 95>>
 	@@color:pink;extremely muscular,@@ with defined pecs, powerful glutes, and massive traps.
 <<elseif $activeSlave.muscles > 30>>
 	@@color:pink;quite muscular,@@ with ripped abs, strong shoulders, and defined lats.
-<<else>>
+<<elseif $activeSlave.muscles > 5>>
 	@@color:pink;well built,@@ yet feminine, with just-visible muscles.
-<</if>>
+<<elseif $activeSlave.muscles > -6>>
+	@@color:pink;soft and feminine,@@ with no visible muscles.
+<<elseif $activeSlave.muscles > -31>>
+	@@color:red;rather weak,@@ with barely any muscles.
+<<elseif $activeSlave.muscles > -96>>
+	@@color:red;very weak;@@ she struggles with day-to-day tasks.
+<<else>>
+	@@color:red;frail;@@ she can barely hold herself up.
 <</if>>
 
 <<if $arcologies[0].FSGenderFundamentalistLawBeauty + $arcologies[0].FSGenderRadicalistLawBeauty > 0>>
diff --git a/src/uncategorized/saRecruitGirls.tw b/src/uncategorized/saRecruitGirls.tw
index d366f08c7f2e1ccee9063546dc7aa28267eeeb8a..24432000502b96568cde66109ac266fb80b91012 100644
--- a/src/uncategorized/saRecruitGirls.tw
+++ b/src/uncategorized/saRecruitGirls.tw
@@ -307,7 +307,9 @@ She uses her extra time and @@color:yellowgreen;recruitment allowance@@ this wee
 	<</if>>
 <</if>>
 <<if $arcologies[0].FSRestart != "unset">>
-	<<if $slaves[$i].preg < 6>>
+	<<if $slaves[$i].preg > 5 && $slaves[$i].breedingMark == 1>>
+		<<set _seed += 4, _FSmatch++, $arcologies[0].FSRestart += 0.01*$FSSingleSlaveRep>>
+	<<elseif $slaves[$i].preg < 6>>
 	<<if ($slaves[$i].ovaries == 0 && $slaves[$i].balls == 0)>>
 		<<set _seed += 4, _FSmatch++, $arcologies[0].FSRestart += 0.01*$FSSingleSlaveRep>>
 	<<elseif ($slaves[$i].ovaries == 0 || $slaves[$i].balls == 0)>>
@@ -491,7 +493,9 @@ She is able to smartly <<if $arcologies[0].FSPaternalist != "unset">>answer<<els
 	<</if>>
 <</if>>
 <<if $arcologies[0].FSRestart != "unset">>
-	<<if $slaves[$i].preg < 6>>
+	<<if $slaves[$i].preg > 5 && $slaves[$i].breedingMark == 1>>
+		She prominently displays her pregnancy and the mark branded upon it signifying the superior child growing within her. Her audience is enamoured by her distinct status.
+	<<elseif $slaves[$i].preg < 6>>
 	<<if ($slaves[$i].dick > 0 && $slaves[$i].balls == 0)>>
 		She makes sure to wear tight fitting clothes to show off the bulge of her dick and, most notably, the lack of testicles under it in all her photoshoots.
 	<<elseif ($slaves[$i].vaginalAccessory == "chastity belt" || $slaves[$i].dickAccessory == "chastity" || $slaves[$i].vaginalAccessory == "combined chastity" || $slaves[$i].dickAccessory == "combined chastity")>>
diff --git a/src/uncategorized/slaveSummary.tw b/src/uncategorized/slaveSummary.tw
index f38550fb0457dc1a66f72c8d5c1a3fd0e3e3f711..0b149e8f16a8f9e9d09947fbd410b2af4bb9a4a7 100644
--- a/src/uncategorized/slaveSummary.tw
+++ b/src/uncategorized/slaveSummary.tw
@@ -1557,6 +1557,13 @@ Release rules: _Slave.releaseRules.
 	Musc+
 <<elseif _Slave.muscles > 5>>
 	Toned
+<<elseif _Slave.muscles > -6>>
+<<elseif _Slave.muscles > -31>>
+	@@color:red;weak@@
+<<elseif _Slave.muscles > -96>>
+	@@color:red;weak+@@
+<<else>>
+	@@color:red;weak++@@
 <</if>>
 <<if _Slave.amp != 0>>
   <<if _Slave.amp == -1>>
@@ -1769,6 +1776,13 @@ _Slave.faceShape face.
 	Muscular.
 <<elseif _Slave.muscles > 5>>
 	Toned.
+<<elseif _Slave.muscles > -6>>
+<<elseif _Slave.muscles > -31>>
+	@@color:red;Weak.@@
+<<elseif _Slave.muscles > -96>>
+	@@color:red;Very weak.@@
+<<else>>
+	@@color:red;Frail.@@
 <</if>>
 <<if _Slave.amp != 0>>
   <<if _Slave.amp == -1>>