diff --git a/devNotes/VersionChangeLog-Premod+LoliMod.txt b/devNotes/VersionChangeLog-Premod+LoliMod.txt
index ba41ee437a579b54af1cc18607c6a4cfeddc91f5..72b7537b9c3852a3547af2669332a47126868508 100644
--- a/devNotes/VersionChangeLog-Premod+LoliMod.txt
+++ b/devNotes/VersionChangeLog-Premod+LoliMod.txt
@@ -2,6 +2,22 @@
 
 0.10.7.0/1
 
+3/17/2018
+
+	399.2
+	-added missing impregnation checks to slave-slave impreg
+
+	399.1
+	-policy now sets properly
+
+	399
+	-added incest focus policy (pre-EgyptianRevivalist bonus)
+	-SFanon's fixes and tweaks
+	-pregmodfan's fixes to the autosurgery
+	-pregmodfan's belly implant implantation and filling to the RA
+	-pregmodfan's broodmother implant tweaks (implant stays in after shutdown; must be removed surgically, but can be restarted)
+	-various little text fixes
+
 3/16/2018
 
 	398
diff --git a/devNotes/twine JS b/devNotes/twine JS
index f1c4d366e2c32dd677f064218d5d8028c235eaf8..0096138c994100f65b3c5b8b510780891c4dcfc5 100644
--- a/devNotes/twine JS	
+++ b/devNotes/twine JS	
@@ -293,7 +293,7 @@ window.canImpreg = function(slave1, slave2) {
 window.isFertile = function(slave) {
 	if (!slave) {
 		return null;
-	} else if (slave.preg > 0) { /* currently pregnant */
+	} else if (slave.womb.length > 0 || slave.broodmother > 0) { /* currently pregnant or broodmother */
 		return false;
 	} else if (slave.preg < -1) { /* sterile */
 		return false;
@@ -6891,7 +6891,7 @@ window.WombInit = function(actor) //Init womb system.
     {
         WombImpregnate(actor, actor.pregType, actor.pregSource, actor.preg);
     }
-    else if (actor.womb.length == 0 && actor.pregType != 0 && actor.broodmother > 0) //sorry but for already present broodmothers it's impossible to calculate fully, aproximation used.
+    else if (actor.womb.length == 0 && actor.pregType != 0 && actor.broodmother > 0 && actor.broodmotherOnHold < 1) //sorry but for already present broodmothers it's impossible to calculate fully, aproximation used.
     {
         var i, pw = actor.preg, bCount, bLeft;
         if (pw > 40)
@@ -7093,6 +7093,23 @@ window.WombNormalizePreg = function(actor)
 {
 //    console.log("New actor: " + actor.slaveName + " ===============" + actor.name);
     WombInit(actor);
+
+    if (actor.womb.length == 0 && actor.broodmother >= 1) // this is broodmother on hold.
+    {
+        actor.pregType = 0; 
+        actor.pregKnown = 0;
+        
+        if (actor.preg > 0)
+            actor.preg = 0.1; //to avoid legacy code conflicts - broodmother on hold can't be impregnated, but she not on normal contraceptives. So we set this for special case.
+        
+        if (actor.pregSource > 0)
+            actor.pregSource = 0;
+
+        if (actor.pregWeek > 0) 
+            actor.pregWeek = 0;
+            
+        actor.broodmotherCountDown = 0;
+    }
     
     if (actor.womb.length > 0)
     {
@@ -7116,7 +7133,7 @@ window.WombNormalizePreg = function(actor)
         actor.pregType = actor.womb.length;
         actor.pregSource = actor.womb[0].fatherID;
     } 
-    else if (actor.womb.length == 0 && actor.broodmother < 1)
+    else if (actor.womb.length == 0 && actor.broodmother < 1) //not broodmother
     {
 //        console.log("preg fixing");
         actor.pregType = 0;
@@ -8679,9 +8696,9 @@ window.extractHairColor = function(hColor) {
 /*SFJS [script]*/
 
 window.simpleWorldEconomyCheck = function() {
-	var n1 = 7;
-	var n2 = 5;
-	var n3 = 3;
+	var n1 = 4;
+	var n2 = 3;
+	var n3 = 2;
 	if(State.variables.economy === .5) {
 		return n1;
 	} else if(State.variables.economy === 1.5) {
diff --git a/src/cheats/mod_EditFSCheat.tw b/src/cheats/mod_EditFSCheat.tw
index 541aa1b204f56c7b9da29ccebfddce107b5f5842..33b7592888a3323f7aea603cf344bf92054ae60c 100644
--- a/src/cheats/mod_EditFSCheat.tw
+++ b/src/cheats/mod_EditFSCheat.tw
@@ -532,7 +532,7 @@
 	<<radiobutton "$arcologies[0].FSEgyptianRevivalistLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSEgyptianRevivalistLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][$arcologies[0].FSRomanRevivalist = "unset",$arcologies[0].FSRomanRevivalistDecoration = 20,$arcologies[0].FSRomanRevivalistLaw = 0,$arcologies[0].FSAztecRevivalist = "unset",$arcologies[0].FSAztecRevivalistDecoration = 20,$arcologies[0].FSAztecRevivalistLaw = 0,$arcologies[0].FSEdoRevivalistDecoration = 20,$arcologies[0].FSEdoRevivalistLaw = 0,$arcologies[0].FSArabianRevivalist = "unset",$arcologies[0].FSArabianRevivalistDecoration = 20,$arcologies[0].FSArabianRevivalistLaw = 0,$arcologies[0].FSChineseRevivalist = "unset",$arcologies[0].FSChineseRevivalistDecoration = 20,$arcologies[0].FSChineseRevivalistLaw = 0]]
+	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][$arcologies[0].FSRomanRevivalist = "unset",$arcologies[0].FSRomanRevivalistDecoration = 20,$arcologies[0].FSRomanRevivalistLaw = 0,$arcologies[0].FSAztecRevivalist = "unset",$arcologies[0].FSAztecRevivalistDecoration = 20,$arcologies[0].FSAztecRevivalistLaw = 0,$arcologies[0].FSEdoRevivalistDecoration = 20,$arcologies[0].FSEdoRevivalistLaw = 0,$arcologies[0].FSArabianRevivalist = "unset",$arcologies[0].FSArabianRevivalistDecoration = 20,$arcologies[0].FSArabianRevivalistLaw = 0,$arcologies[0].FSChineseRevivalist = "unset",$arcologies[0].FSChineseRevivalistDecoration = 20,$arcologies[0].FSChineseRevivalistLaw = 0,$arcologies[0].FSEgyptianRevivalistIncestPolicy = 0]]
 
 <br><br>
 
diff --git a/src/events/intro/initNationalities.tw b/src/events/intro/initNationalities.tw
index e135b73a8401b22a64fc3d9ce1d27bfa72864981..0484cb90c475e5193073a979706c0a49f22aae8e 100644
--- a/src/events/intro/initNationalities.tw
+++ b/src/events/intro/initNationalities.tw
@@ -677,5 +677,8 @@
 <<set $arcologies[0].FSHedonisticDecadenceDietResearch = 0>>
 <<set $arcologies[0].FSCummunismResearch = 0>>
 
+<<set $arcologies[0].FSEgyptianRevivalistIncestPolicy = 0>>
+<<set $arcologies[0].FSEgyptianRevivalistInterest = 0>>
+
 <<set $showStartingGirlsExplanation = 1>>
 <<goto "Starting Girls">>
diff --git a/src/init/setupVars.tw b/src/init/setupVars.tw
index ebc975daa32cacf021b79430dbcd7caf5a27671e..18ceda704bb852a199a18273279a7b9aedb01eb7 100644
--- a/src/init/setupVars.tw
+++ b/src/init/setupVars.tw
@@ -1278,6 +1278,7 @@ Then pick _namePool.random(), or display those names as possible choices, or do
 <<set setup.ArcologyNamesRepopulationist = ["Hope", "The Womb", "Holders of the Future", "Future", "Haven of the Pregnant", "Sacred Womb", "Glorious Mother"]>>
 <<set setup.ArcologyNamesHedonisticDecadence = ["Sloth", "Gluttony", "New Wisconsin", "Indulgence", "Stuffedtopia", "Plumpland", "Decadence", "All You Can Eat"]>>
 <<set setup.ArcologyNamesCummunism = ["Cumstantine", "Mother Cumtry", "Crusty Cummies", "Cummunist Russwhore", "Jizzington upon Wank", "Arscrotzka", "Free Slave Central", "Da Cumrade", "Cumstantinople"]>>
+<<set setup.ArcologyNamesIncestFetishist = ["Oedipal City", "Oeditropolis", "Sib City", "Incestral Home", "Family Fortunes", "Familial Embrace", "Pure Blood"]>>
 
 
 <<set setup.badWords = ["fuck", "shit", "ass", "cock", "piss", "dick", "slut", "cum", "whore", "butt", "boob", "cunt", "cunny", "pussy", "junk", "trash", "slave"]>>
diff --git a/src/js/SFJS.tw b/src/js/SFJS.tw
index e7146c2272c394d7b9a92e0471f959dcd18f40ba..d016e96b98ec6fb448bb8e1061c6bcde578d654a 100644
--- a/src/js/SFJS.tw
+++ b/src/js/SFJS.tw
@@ -1,9 +1,9 @@
 :: SFJS [script]
 
 window.simpleWorldEconomyCheck = function() {
-	var n1 = 7;
-	var n2 = 5;
-	var n3 = 3;
+	var n1 = 4;
+	var n2 = 3;
+	var n3 = 2;
 	if(State.variables.economy === .5) {
 		return n1;
 	} else if(State.variables.economy === 1.5) {
diff --git a/src/js/storyJS.tw b/src/js/storyJS.tw
index bac88df0e53003ecf645b88ed61c7b1db2086e96..b98205536d1e182870175d3d160de9ffd006c312 100644
--- a/src/js/storyJS.tw
+++ b/src/js/storyJS.tw
@@ -291,9 +291,14 @@ window.canImpreg = function(slave1, slave2) {
 
 /* contraceptives (.preg == -1) do not negate this function */
 window.isFertile = function(slave) {
+	
 	if (!slave) {
 		return null;
-	} else if (slave.womb.length > 0 || slave.broodmother > 0) { /* currently pregnant or broodmother */
+	}
+
+	WombInit(slave);
+
+	if (slave.womb.length > 0 || slave.broodmother > 0) { /* currently pregnant or broodmother */
 		return false;
 	} else if (slave.preg < -1) { /* sterile */
 		return false;
diff --git a/src/npc/fSlaveImpregConsummate.tw b/src/npc/fSlaveImpregConsummate.tw
index e2fea3b4fa62a378a478c2c045822adf49e53a21..095f5c62862b7860749d498d2dba13d0f916be39 100644
--- a/src/npc/fSlaveImpregConsummate.tw
+++ b/src/npc/fSlaveImpregConsummate.tw
@@ -128,7 +128,7 @@ Next, you see to $activeSlave.slaveName.
 <</if>>
 
 
-<<KnockMeUp $activeSlave 100 2 $impregnatrix.ID>>
+<<KnockMeUp $activeSlave 100 2 $impregnatrix.ID 1>>
 
 
 <br><br>
@@ -177,7 +177,9 @@ Next, you see to $activeSlave.slaveName.
 				$impregnatrix.slaveName will certainly remember this @@.hotpink;very special@@ day for many reasons, including it being her @@.lime;first time@@ as she inseminated $activeSlave.slaveName.
 				<<set $impregnatrix.devotion += 4, $impregnatrix.vagina = 1>>
 			<</if>>
-			<<KnockMeUp $impregnatrix 10 0 -1 1>>
+			<<if $PC.dick == 1 && $impregnatrix.eggType == "human" && canGetPregnant($impregnatrix)>>
+				<<KnockMeUp $impregnatrix 10 0 -1 1>>
+			<</if>>
 			<<set $impregnatrix.vaginalCount += _penCountBonus, $vaginalTotal += _penCountBonus>>
 		<<elseif canDoAnal($impregnatrix)>>
 			Pulling out, you flip them again so that $impregnatrix.slaveName is on top and switch to her ass instead, stimulating her <<if $impregnatrix.prostate != 0>>prostate<<else>>internals<</if>> with a good assfuck until she blows her load into $activeSlave.slaveName's fertile <<if $activeSlave.mpreg == 1>>ass<<else>>cunt<</if>>. The two of them collapse into an exhausted, @@.hotpink;happy@@ pile of slave flesh with three loads inside them.
@@ -185,7 +187,9 @@ Next, you see to $activeSlave.slaveName.
 				$impregnatrix.slaveName will certainly remember this @@.hotpink;very special@@ day for many reasons, including taking her @@.lime;first buttfuck@@ as she inseminated $activeSlave.slaveName.
 				<<set $impregnatrix.devotion += 4, $impregnatrix.anus = 1>>
 			<</if>>
-			<<KnockMeUp $impregnatrix 10 1 -1 1>>
+			<<if $PC.dick == 1 && $impregnatrix.eggType == "human" && canGetPregnant($impregnatrix)>>
+				<<KnockMeUp $impregnatrix 10 1 -1 1>>
+			<</if>>
 			<<set $impregnatrix.analCount += _penCountBonus, $analTotal += _penCountBonus>>
 		<<else>>
 			The two of them collapse into an exhausted, @@.hotpink;happy@@ pile of slave flesh.
@@ -197,7 +201,6 @@ Next, you see to $activeSlave.slaveName.
 				$impregnatrix.slaveName will certainly remember this @@.hotpink;very special@@ day for many reasons, including it being her @@.lime;first time@@ as she inseminated $activeSlave.slaveName.
 				<<set $impregnatrix.devotion += 4, $impregnatrix.vagina = 1>>
 			<</if>>
-			<<KnockMeUp $impregnatrix 10 0 -1 1>>
 			<<set $impregnatrix.vaginalCount += _penCountBonus, $vaginalTotal += _penCountBonus>>
 		<<elseif canDoAnal($impregnatrix)>>
 			Pulling back, you flip them again so that $impregnatrix.slaveName is on top and don a strapon. You begin stimulating her <<if $impregnatrix.prostate != 0>>prostate<<else>>internals<</if>> with a good assfuck until she blows her load into $activeSlave.slaveName's fertile <<if $activeSlave.mpreg == 1>>ass<<else>>cunt<</if>>. The two of them collapse into an exhausted, @@.hotpink;happy@@ pile of slave flesh.
@@ -231,7 +234,9 @@ Next, you see to $activeSlave.slaveName.
 			<<set $impregnatrix.devotion += 4, $impregnatrix.vagina = 1>>
 		<</if>>
 		<<set $impregnatrix.vaginalCount += _penCountBonus, $vaginalTotal += _penCountBonus>>
-		<<KnockMeUp $impregnatrix 10 0 -1 1>>
+		<<if $PC.dick == 1 && $impregnatrix.eggType == "human" && canGetPregnant($impregnatrix)>>
+			<<KnockMeUp $impregnatrix 10 0 -1 1>>
+		<</if>>
 	<<elseif canDoAnal($activeSlave)>>
 		ass instead, stimulating her <<if $impregnatrix.prostate != 0>>prostate<<else>>internals<</if>> with a good assfuck
 		<<if ($impregnatrix.anus == 0)>>
@@ -239,7 +244,9 @@ Next, you see to $activeSlave.slaveName.
 			<<set $impregnatrix.devotion += 4, $impregnatrix.anus = 1>>
 		<</if>>
 		<<set $impregnatrix.analCount += _penCountBonus, $analTotal += _penCountBonus>>
-		<<KnockMeUp $impregnatrix 10 1 -1 1>>
+		<<if $PC.dick == 1 && $impregnatrix.eggType == "human" && canGetPregnant($impregnatrix)>>
+			<<KnockMeUp $impregnatrix 10 1 -1 1>>
+		<</if>>
 	<<else>>
 		mouth instead, giving her a good facefuck
 		<<set $impregnatrix.oralCount += _penCountBonus, $oralTotal += _penCountBonus>>
diff --git a/src/pregmod/SecForceEX/SpecialForceUpgradeDec.tw b/src/pregmod/SecForceEX/SpecialForceUpgradeDec.tw
index 7261a8d5049ef7d5e2340d3c4260467f09700eaa..7db07e497d988c1b4150da1793f4511f5fede1da 100644
--- a/src/pregmod/SecForceEX/SpecialForceUpgradeDec.tw
+++ b/src/pregmod/SecForceEX/SpecialForceUpgradeDec.tw
@@ -312,7 +312,7 @@
 	<<case 7>>
 		Modernized the electronics, wiring and circuitry. Boosted the advanced comms jammer's power by 50% (now can destroy affected equipment).
 	<<case 8>>
-		Modernized the electronics, wiring and circuitry. Boosted the advanced comms jammer's power by 50% (now can destroy affected equipment). The Satellite is now equipped with a basic EMP generator (advanced EMP hardening was applied before the insulation and activation) will "slightly" anger locals until it is deactivated.
+		Modernized the electronics, wiring and circuitry. Boosted the advanced comms jammer's power by 50% (now can destroy affected equipment). The Satellite is now equipped with a basic EMP generator (advanced EMP hardening was applied before the insulation and activation) that will "slightly" anger locals until it is deactivated.
 	<<case 9>>
 		Modernized the electronics, wiring and circuitry. Boosted the advanced comms jammer's power by 50% (now can destroy affected equipment). The Satellite is now equipped with an advanced EMP generator by, increasing the AO localization which reduces the quantity of affected equipment.
 	<<case 10>>
diff --git a/src/uncategorized/BackwardsCompatibility.tw b/src/uncategorized/BackwardsCompatibility.tw
index d47fa344ceb744546a97c98fb93467c97d8e02e9..dc1c009fa6d01614499715b7a2cf8afbfeb923fc 100644
--- a/src/uncategorized/BackwardsCompatibility.tw
+++ b/src/uncategorized/BackwardsCompatibility.tw
@@ -1437,6 +1437,13 @@
 	<<set $arcologies[0].FSEgyptianRevivalistLaw = 0>>
 <</if>>
 
+<<if ndef $arcologies[0].FSEgyptianRevivalistIncestPolicy>>
+	<<set $arcologies[0].FSEgyptianRevivalistIncestPolicy = 0>>
+<</if>>
+<<if ndef $arcologies[0].FSEgyptianRevivalistInterest>>
+	<<set $arcologies[0].FSEgyptianRevivalistInterest = 0>>
+<</if>>
+
 <<if def $FSEdoRevivalist && $FSEdoRevivalist != "unset">>
 	<<set $arcologies[0].FSEdoRevivalist = $FSEdoRevivalist>>
 	<<unset $FSEdoRevivalist>>
diff --git a/src/uncategorized/SFMBarracks.tw b/src/uncategorized/SFMBarracks.tw
index 0baeb4091774f17b32b45bf994bf9afba8f64c19..4fdaf78ec3c64263282f646805879aee9343045f 100644
--- a/src/uncategorized/SFMBarracks.tw
+++ b/src/uncategorized/SFMBarracks.tw
@@ -76,12 +76,12 @@
 		<<set $CashGift = 25000*(Math.max(0.99,$SFAO/10))*$Env>>
 			<<if random(1,100) > 50>>
 				<<if random(1,100) > 50>>
-					_Name nods. "Sure boss," she says, "we had a bit of a haul this week. One of my sergeants convinced a woman to tell us where she had hidden her shit. Cut her up pretty bad, but she told us. Bunch of nice jewelry, I kept a nice piece for myself." She picks up a tablet on the table, tapping a few commands on it. "@@.green;There's your cut,@@ <<print cashFormat($CashGift)>>."
+					_Name nods. "Sure boss," she says, "we had a bit of a haul this week. One of my sergeants convinced a woman to tell us where she had hidden her shit. Cut her up pretty bad, but she told us. Bunch of nice jewelry, I kept a nice piece for myself." She picks up a tablet on the table, tapping a few commands on it. "@@.yellowgreen;There's your cut,@@ <<print cashFormat($CashGift)>>."
 				<<else>>
-					_Name smiles widely. "Sure boss," she says, "we pulled in some good shit this week. One of the boys found a real nice family hiding in a basement. 18-year old triplets. Brought in a good bit of cash." She picks up a tablet on the table, tapping a few commands on it. "@@.green;There's your cut,@@ <<print cashFormat($CashGift)>>."
+					_Name smiles widely. "Sure boss," she says, "we pulled in some good shit this week. One of the boys found a real nice family hiding in a basement. 18-year old triplets. Brought in a good bit of cash." She picks up a tablet on the table, tapping a few commands on it. "@@.yellowgreen;There's your cut,@@ <<print cashFormat($CashGift)>>."
 				<</if>>
 			<<else>>
-				_Name picks up a tablet. "Sure boss," she says, "we had a nice score this week. Looters fucked up and left a bunch of nice shit behind." She taps a few commands on the tablet. "@@.green;There's your cut,@@ <<print cashFormat($CashGift)>>."
+				_Name picks up a tablet. "Sure boss," she says, "we had a nice score this week. Looters fucked up and left a bunch of nice shit behind." She taps a few commands on the tablet. "@@.yellowgreen;There's your cut,@@ <<print cashFormat($CashGift)>>."
 			<</if>>
 			<<set $securityForceGiftToken = 1>>
 			<<set $cash += $CashGift>>
diff --git a/src/uncategorized/arcmgmt.tw b/src/uncategorized/arcmgmt.tw
index c20177958c85afb1df08f4e90dcb95947b3feb41..6b17e731dc2cc86175be85357557c2e2098911c8 100644
--- a/src/uncategorized/arcmgmt.tw
+++ b/src/uncategorized/arcmgmt.tw
@@ -183,7 +183,7 @@ This week, <<if _flux > 0>>few to none<<else>>many<</if>> of $arcologies[0].name
 <<if $arcologies[0].FSRomanRevivalistLaw == 1>>The citizens take pride in their martial duties, preferring to wear utilitarian clothing even when off duty.<</if>>
 <<if $arcologies[0].FSGenderRadicalistDecoration == 100>>Every single one of the slaves is female by virtue of her fuckable asshole.
 <<elseif $arcologies[0].FSGenderFundamentalistSMR == 1>>Almost every citizen is an upstanding man, while the slave population is almost completely female.<</if>>
-<<if $arcologies[0].FSEgyptianRevivalistLaw == 1>>Close relationships between citizens and slaves, especially slave siblings, are common.<</if>>
+<<if $arcologies[0].FSEgyptianRevivalistLaw == 1>>Close relationships between citizens and slaves, especially slave siblings, are common.<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>Close relationships between citizens, slaves and siblings are common.<</if>>
 <<if $arcologies[0].FSSubjugationistLawME == 1>>$arcologies[0].FSSubjugationistRace subhumans form a majority of the slaves.<</if>>
 <<if $arcologies[0].FSChattelReligionistLaw == 1>>The slave population as a whole is unusually accepting of its station.<</if>>
 <<if $arcologies[0].FSPaternalistLaw == 1>>The slaves are well cared for, and it can sometimes be difficult to tell slaves from citizens.
diff --git a/src/uncategorized/arcologyDescription.tw b/src/uncategorized/arcologyDescription.tw
index e7fd93a9d4b59cb7c6d93713934d6134e0db7b39..a8b94e396eda5ae72b8e431b18eca2aca2d1837a 100644
--- a/src/uncategorized/arcologyDescription.tw
+++ b/src/uncategorized/arcologyDescription.tw
@@ -637,7 +637,8 @@ Its<<if $weatherCladding == 2>> glorious<<elseif $weatherCladding > 0>> dull<<el
 <<elseif $arcologies[0].FSYouthPreferentialistLaw == 1>>Most citizens shine with youth and enthusiasm.<</if>>
 <<if $arcologies[0].FSGenderRadicalistDecoration == 100>>Every single one of the slaves is female by virtue of her fuckable asshole.
 <<elseif $arcologies[0].FSGenderFundamentalistSMR == 1>>Almost every citizen is an upstanding man, while the slave population is almost completely female.<</if>>
-<<if $arcologies[0].FSEgyptianRevivalistLaw == 1>>Close relationships between citizens and slaves, especially slave siblings, are common.<</if>>
+<<if $arcologies[0].FSEgyptianRevivalistLaw == 1>>Close relationships between citizens and slaves, especially slave siblings, are common.
+<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>Close relationships between citizens, slaves and siblings are common.<</if>>
 <<if $arcologies[0].FSSubjugationistLawME == 1>>$arcologies[0].FSSubjugationistRace subhumans form a majority of the slaves.<</if>>
 <<if $arcologies[0].FSChattelReligionistLaw == 1>>The slave population as a whole is unusually accepting of its station.<</if>>
 <<if $arcologies[0].FSPaternalistLaw == 1>>The slaves are well cared for, and it can sometimes be difficult to tell slaves from citizens.
diff --git a/src/uncategorized/assistantEvents.tw b/src/uncategorized/assistantEvents.tw
index 82a5518401c3c575b95cc2c1cbdaf28b5fc62d6f..071cac18a9dfe7362a9793c2a156507edb9e385a 100644
--- a/src/uncategorized/assistantEvents.tw
+++ b/src/uncategorized/assistantEvents.tw
@@ -818,7 +818,7 @@ of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>
 	<<elseif $arcologies[0].FSRestart != "unset">>
 		casts a contraceptive spell; her pussy vanishes.
 	<<elseif $arcologies[0].FSBodyPurist != "unset">>
-		casts a purifying spell; nothing happens, at first. The front of her robes, above her lower belly, steadily becoming transparent. Moments later, her skin joins in, revealing a inactive egg vibrator concealed in her pussy. $assistantName squeals in embarrassment and hurries offscreen.
+		casts a purifying spell; nothing happens, at first. The front of her robes, above her lower belly, steadily becomes transparent. Moments later, her skin joins in, revealing a inactive egg vibrator concealed in her pussy. $assistantName squeals in embarrassment and hurries offscreen.
 	<<elseif $arcologies[0].FSTransformationFetishist != "unset">>
 		casts a spell to inflate her breasts; they rapidly swell, along with her ass, belly, thighs and lips until she looks like an overinflated blowup doll. She struggles to bring a rubbery arm to her O-shaped lips before giving up and rebounding back into place; she really is a blowup sex doll!
 	<<elseif $arcologies[0].FSYouthPreferentialist != "unset">>
diff --git a/src/uncategorized/barracks.tw b/src/uncategorized/barracks.tw
index ecf16cdc64926274fa46104a9caf477b6934186b..582b6cc9de9f8642da8b4ed3da1bd635bbacf00d 100644
--- a/src/uncategorized/barracks.tw
+++ b/src/uncategorized/barracks.tw
@@ -157,7 +157,7 @@ You head up a deck, to the staff area, and up one more, to look into the living
 
 <<if $mercenariesHelpCorp > 0>>
 	<br><br>
-	As you leave, a squad moves thunderously into the bay, fresh from a slave raid on behalf of your corporation. Most of their captures have been dropped off with the corporate receivers, but they've been given a pretty girl who isn't a good training prospect for the corporate brand, a common reward. The squad looks after their weapons and armor first, an inviolable rule, and as they do, they leave their naked slave standing in the middle of the bay, ignored. She isn't even bound, but she's standing nude and alone amongst modern mercenaries, so she knows that resistance is futile. So she does the only thing left available to her,try to cover herself with her hands and cry.
+	As you leave, a squad moves thunderously into the bay, fresh from a slave raid on behalf of your corporation. Most of their captures have been dropped off with the corporate receivers, but they've been given a pretty girl who isn't a good training prospect for the corporate brand, a common reward. The squad looks after their weapons and armor first, an inviolable rule, and as they do, they leave their naked slave standing in the middle of the bay, ignored. She isn't even bound, but she's standing nude and alone amongst modern mercenaries, so she knows that resistance is futile. So she does the only thing left available to her, try to cover herself with her hands and cry.
 <</if>>
 
 <br><br>
diff --git a/src/uncategorized/fsDevelopments.tw b/src/uncategorized/fsDevelopments.tw
index 541de3f1df9fa7b7725edf1d76f37fe31403495f..d069c1b99be0464f2fb31f2142ab8ba231a54f58 100644
--- a/src/uncategorized/fsDevelopments.tw
+++ b/src/uncategorized/fsDevelopments.tw
@@ -640,6 +640,13 @@ With her $assistantAppearance appearance, $assistantName's public visibility mes
 	<<set $arcologies[0].FSRestart = $FSLockinLevel>>
 <</if>>
 
+/* warm up policy influence */
+<<if $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1 && $arcologies[0].FSEgyptianRevivalistInterest < 26>>
+	<<set $arcologies[0].FSEgyptianRevivalistInterest += $arcologies[0].FSEgyptianRevivalistIncestPolicy>>
+<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 0 && $arcologies[0].FSEgyptianRevivalistInterest > 0>>
+	<<set $arcologies[0].FSEgyptianRevivalistInterest-->>
+<</if>>
+
 <<if ($arcologies[0].FSSupremacistSMR + $arcologies[0].FSSubjugationistSMR + $arcologies[0].FSGenderRadicalistSMR + $arcologies[0].FSGenderFundamentalistSMR + $arcologies[0].FSPaternalistSMR + $arcologies[0].FSDegradationistSMR + $arcologies[0].FSBodyPuristSMR + $arcologies[0].FSTransformationFetishistSMR + $arcologies[0].FSYouthPreferentialistSMR + $arcologies[0].FSMaturityPreferentialistSMR + $arcologies[0].FSSlimnessEnthusiastSMR + $arcologies[0].FSAssetExpansionistSMR + $arcologies[0].FSPastoralistSMR + $arcologies[0].FSPhysicalIdealistSMR + $arcologies[0].FSChattelReligionistSMR + $arcologies[0].FSRomanRevivalistSMR + $arcologies[0].FSAztecRevivalistSMR + $arcologies[0].FSEgyptianRevivalistSMR + $arcologies[0].FSEdoRevivalistSMR + $arcologies[0].FSRepopulationFocusSMR + $arcologies[0].FSRestartSMR + $arcologies[0].FSHedonisticDecadenceSMR + $arcologies[0].FSArabianRevivalistSMR + $arcologies[0].FSChineseRevivalistSMR) > 0>>
 	The slave market regulations help ensure the arcology's slaves fit within its society.
 <</if>>
diff --git a/src/uncategorized/futureSocities.tw b/src/uncategorized/futureSocities.tw
index 752fa05789046fd8ed9f5d34c6c062b94f71331b..8f8feeb026c07158f4e5067834bafa2f4d83348c 100644
--- a/src/uncategorized/futureSocities.tw
+++ b/src/uncategorized/futureSocities.tw
@@ -1656,7 +1656,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 	<</if>>
 <<else>>
 	<<if $FSCredits > 0>>
-	<br>''''[[Egyptian Revivalism|Future Society][$arcologies[0].FSEgyptianRevivalist = 4, $FSCredits -= 1]]: a vision of a Pharaoh's Egypt.
+	<br>''''[[Egyptian Revivalism|Future Society][$arcologies[0].FSEgyptianRevivalist = (4+$arcologies[0].FSEgyptianRevivalistInterest), $FSCredits -= 1, $arcologies[0].FSEgyptianRevivalistIncestPolicy = 0]]: a vision of a Pharaoh's Egypt.
 	<<else>>
 	/*//''Egyptian Revivalism'': a vision of Pharaoh's Egypt.//*/
 	<</if>>
diff --git a/src/uncategorized/peConcubineInterview.tw b/src/uncategorized/peConcubineInterview.tw
index 84025f6b89661a7e8a428f9fff2f73c438b3475a..d058bc561d829139322f108d6a48ad0dfe55c9b2 100644
--- a/src/uncategorized/peConcubineInterview.tw
+++ b/src/uncategorized/peConcubineInterview.tw
@@ -304,10 +304,10 @@ You receive an official communication from a popular talk show hosted in one of
 			Blood empire reborn,
 		<<elseif $arcologies[0].FSEgyptianRevivalist > 0>>
 			the land of the Pharaoh<<s>> reborn,
-		<<elseif $arcologies[0].FSGenderRadicalist > 0>>
-			more a<<ss>> than you can po<<ss>>ibly fuck,
 		<</if>>
-		<<if $arcologies[0].FSGenderFundamentalist > 0>>
+		<<if $arcologies[0].FSGenderRadicalist > 0>>
+			more a<<ss>> than you can po<<ss>>ibly fuck,
+		<<elseif $arcologies[0].FSGenderFundamentalist > 0>>
 			so much pu<<ss>>y it'<<s>> unbelievable,
 		<</if>>
 		<<if $arcologies[0].FSChattelReligionist > 0>>
@@ -345,6 +345,9 @@ You receive an official communication from a popular talk show hosted in one of
 			MILF<<s>> on their tenth,
 		<</if>>
 		lip<<s>>, tongue<<s>>,
+		<<if $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+			in<<c>>e<<s>>t,
+		<</if>>
 		<<if $arcologies[0].FSSlimnessEnthusiast == "unset">>
 			huge breast<<s>> and plu<<sh>> a<<ss>>e<<s>>,
 		<<elseif $arcologies[0].FSAssetExpansionist == "unset">>
diff --git a/src/uncategorized/personalAssistantAppearance.tw b/src/uncategorized/personalAssistantAppearance.tw
index 3e919e0a066a8adfa4c63a1fa5233dc2366de61f..e60c34c274f676f44aed89c1bc2584f1b8a983e0 100644
--- a/src/uncategorized/personalAssistantAppearance.tw
+++ b/src/uncategorized/personalAssistantAppearance.tw
@@ -596,7 +596,7 @@ She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0]
 	<<case "physical idealist">>
 		girl wearing spats and a tight shirt. She occasionally renders herself sweaty, as if just finishing exercising.
 	<<case "hedonistic decadence">>
-		girl wearing spats barely pulled over her big ass and a tight shirt that rides up her chubby belly. It seem's someone snuck out of gym class.
+		girl wearing spats barely pulled over her big ass and a tight shirt that rides up her chubby belly. It seems someone snuck out of gym class.
 	<<case "gender radicalist">>
 		girl wearing shorts and a t-shirt. She's changed her appearance recently to make herself quite androgynous.
 	<<case "gender fundamentalist">>
@@ -1201,7 +1201,7 @@ She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0]
 	<<if $assistantFSOptions>>
 	<<switch $assistantFSAppearance>>
 	<<case "paternalist">>
-		She still hasn't managed to undo the spell; her chest is still unnatural smooth, not one nipple peaks the fabric of the robe.
+		She still hasn't managed to undo the spell; her chest is still unnaturally smooth, not one nipple peaks the fabric of the robe.
 	<<case "degradationist">>
 		She still hasn't managed to undo the spell; her face, hands and every surface of her body are completely covered in tattoos. It is especially noticeable when she talks that her tongue is tattoo'd too; wonder what decorates the surfaces of her body you can't see?
 	<<case "roman revivalist">>
@@ -1241,7 +1241,7 @@ She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0]
 	<<case "pastoralist">>
 		She's managed to shrink her nine breasts somewhat; they are merely head sized now. The front of her robes are strained from her excessive number of milky tits.
 	<<case "maturity preferentialist">>
-		She's managed to rein in her aging spell and with a little size up to her breasts, hips and ass makes a very pleasant milf.
+		She's managed to reign in her aging spell and with a little size up to her breasts, hips and ass makes a very pleasant milf.
 	<<case "youth preferentialist">>
 		<<if $minimumSlaveAge == 3>>
 			She's adjusted her tiny body slightly to be less feeble. Now she is a fully capable and adorable toddler witch in an oversized robe, though she has to fight to keep her hat from covering her entire head.
@@ -1357,7 +1357,7 @@ She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0]
 		wearing absolutely nothing. She periodically twitches when you aren't looking and you swear you see movement under her skin.
 	<</if>>
 <<if ($cockFeeder == 1) && ($seed == 1)>>
-	She is steadily thrusting several tentacles extending from her crotch down and down the throat of a recognizable little representation of one of your slaves. The slave must be down in the kitchen, getting a meal out of the food dispensers. She notices you watching and moans as multiple bulges work their way down her shafts and into the slave. Your eyes are drawn to the hapless girl's rapidly swelling stomach as the creatures seed takes root.
+	She is steadily thrusting several tentacles extending from her crotch down the throat of a recognizable little representation of one of your slaves. The slave must be down in the kitchen, getting a meal out of the food dispensers. She notices you watching and moans as multiple bulges work their way down her shafts and into the slave. Your eyes are drawn to the hapless girl's rapidly swelling stomach as the creature's seed takes root.
 <<elseif ($suppository == 1) && ($seed == 2)>>
 	A recognizable little representation of one of your slaves is before her, writhing in pleasure and pain, as multiple tentacles fuck her ass. The slave must be receiving her drugs from one of the dildo dispensers. She notices you watching and moans as multiple bulges work their way down her shafts and into the slave. Your eyes are drawn to the hapless girl's rapidly swelling stomach as the creatures seed takes root.
 <<elseif ($masturbationAllowed == 1) && ($seed == 3)>>
@@ -1367,7 +1367,7 @@ She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0]
 <<elseif ($seed == 5) && ($invasionVictory > 0)>>
 	She's partially enveloped a representation of one of your security drones. When she sees you looking at her, she bluntly states, "This one did good. Captured many for your nest."
 <<elseif ($seed == 6) && ($studio == 1)>>
-	She is holding dozens of cameras at a recognizable little representation of one of your slaves masturbating. The slave must be using one of the penthouse's many vibrators, and $assistantName is likely  turning the feed of it into a porno.
+	She is holding dozens of cameras at a recognizable little representation of one of your slaves masturbating. The slave must be using one of the penthouse's many vibrators, and $assistantName is likely turning the feed of it into a porno.
 <<elseif ($seed == 7) && ($marketAssistantAnnounced == 1)>>
 	She's accompanied by your market assistant's fecund avatar.
 	<<if $marketAssistantRelationship == "cute">>
@@ -1473,7 +1473,7 @@ She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0]
 	<<elseif $marketAssistantRelationship == "nonconsensual">>
 		The market assistant is being violently penetrated by $assistantName, her bloated belly swaying in tune to her thrusts. The hapless girl struggles in discomfort as the incubus blows another load into her already full womb, causing cum to backflow out of her now loose pussy. $assistantName leans back, motions to you, and asks, "Plenty of holes still to go around, if you want one!"
 	<<elseif $marketAssistantRelationship == "incestuous">>
-		The market assistant is eagerly riding her big brother, $assistantName's dick. You can't help but notice how full her breasts have gotten and how plump her ass and thighs now are. She moans with lust as $assistantName cums into her fertile pussy; a glowing sigil appearing below her navel. She is well on her way to becoming the succubus consort of her once human brother.
+		The market assistant is eagerly riding her big brother, <<print $assistantName>>'s, dick. You can't help but notice how full her breasts have gotten and how plump her ass and thighs now are. She moans with lust as $assistantName cums into her fertile pussy; a glowing sigil appearing below her navel. She is well on her way to becoming the succubus consort of her once human brother.
 	<<else>>
 		The market assistant is embracing $assistantName as she is lovingly penetrated by the caring incubus. They pull each other close as they cum together, locking lips and refusing to let go until the other is completely satisfied. It takes quite some before they settle down and wave to you, thanking you deeply for the true love you've gifted them.
 	<</if>>
@@ -1518,7 +1518,7 @@ She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0]
 	<<case "transformation fetishist">>
 		She has her jeans unbuttoned and is absentmindedly trying to jerk off. When she notices you watching, she waves her throbbing erection at you, inviting you to lend a pair of hands.
 	<<case "pastoralist">>
-		She is laying on her back, legs squeezing her immense balls as cums again and again across herself. When she notices you watching, she struggles to sit up before giving into the sensations and blowing another load across your desk.
+		She is laying on her back, legs squeezing her immense balls as she cums again and again across herself. When she notices you watching, she struggles to sit up before giving into the sensations and blowing another load across your desk.
 	<<case "maturity preferentialist">>
 		She has a hand down her pants. When she notices you watching, she begins eagerly stroking herself while describing, in detail, what she'd love to do to you.
 	<<case "youth preferentialist">>
diff --git a/src/uncategorized/policies.tw b/src/uncategorized/policies.tw
index b34c35b67b87e15d63dd954ba87132c5ca02854d..2a7163a6251d49e28c9992f1bb8d17ffc6ac14b9 100644
--- a/src/uncategorized/policies.tw
+++ b/src/uncategorized/policies.tw
@@ -157,7 +157,7 @@
 	[[Repeal|Policies][$MixedMarriage = 0]]
 <</if>>
 
-<<if $OralEncouragement + $OralDiscouragement + $VaginalEncouragement + $VaginalDiscouragement + $AnalEncouragement + $AnalDiscouragement + $sexualOpeness > 0>>
+<<if $OralEncouragement + $OralDiscouragement + $VaginalEncouragement + $VaginalDiscouragement + $AnalEncouragement + $AnalDiscouragement + $sexualOpeness + $arcologies[0].FSEgyptianRevivalistIncestPolicy > 0>>
 <br><br>__Sexual Trendsetting__
 
 <<if $OralEncouragement == 1>>
@@ -191,10 +191,16 @@
 <</if>>
 
 <<if $sexualOpeness == 1>>
-	<br>''Penetrative Sex Campaign:'' you are use your personal influence to attempt to make getting fucked by slaves fashionable, but mostly to garner acceptance for your sexual preference.
+	<br>''Penetrative Sex Campaign:'' you are using your personal influence to attempt to make getting fucked by slaves fashionable, but mostly to garner acceptance for your sexual preference.
 	[[Repeal|Policies][$sexualOpeness = 0, $PC.degeneracy += 30]]
 <</if>>
 
+/* sub FS policies */
+<<if $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+	<br>''Incest Encouragement:'' you are using your personal influence to spur interest in incest.
+	[[Repeal|Policies][$arcologies[0].FSEgyptianRevivalistIncestPolicy = 0]]
+<</if>>
+
 <</if>>
 <<if $ProRefugees + $ProRecruitment + $ProImmigrationCash + $ProImmigrationRep + $AntiImmigrationCash + $AntiImmigrationRep + $ProEnslavementCash + $ProEnslavementRep + $AntiEnslavementCash + $AntiEnslavementRep > 0>>
 <br><br>__Population Policy__
@@ -917,6 +923,12 @@
 	<br>&nbsp;&nbsp;&nbsp;&nbsp;//Will not be well received, but will head off potentially damaging rumors. This policy assumes you wish to be penetrated.//
 <</if>>
 
+/* sub FS policies */
+<<if $arcologies[0].FSEgyptianRevivalistIncestPolicy == 0 && $arcologies[0].FSEgyptianRevivalist == "unset">>
+	<br>''Incest Encouragement:'' you will use your personal influence to spur interest in incest.
+	[[Implement|Policies][$arcologies[0].FSEgyptianRevivalistIncestPolicy = 1, $cash -=5000, $rep -= 1000]]
+<</if>>
+
 <br><br>__Population Policy__
 
 <<if $arcologies[0].FSDegradationist == "unset">>
diff --git a/src/uncategorized/remoteSurgery.tw b/src/uncategorized/remoteSurgery.tw
index 838db590d7c98f798eb61d15f55dd1091889ef07..51f638e0af1e42fa2532ea69b297b63d14b824a6 100644
--- a/src/uncategorized/remoteSurgery.tw
+++ b/src/uncategorized/remoteSurgery.tw
@@ -507,7 +507,7 @@ $pronounCap's
 <<if $activeSlave.pregKnown > 0>>
 	pregnant.
 <<elseif $activeSlave.womb.length == 0 && $activeSlave.broodmother > 0>>
-	broodmother on hold.
+	got a dormant broodmother implant in $possessive womb.
 <<elseif $activeSlave.preg > 0>>
 	showing unusual discomfort as $possessive stomach is inspected. A quick test reveals that @@.lime;$pronoun is pregnant.@@
 	<<set $activeSlave.pregKnown = 1>>
@@ -764,9 +764,9 @@ Work on her sex:
 <<if $permaPregImplant == 1>>
 	<<if $activeSlave.broodmother >= 1 >>
 		<<if $activeSlave.womb.length == 0 >>
-			[[Remove a pregnancy generator|Surgery Degradation][$activeSlave.preg = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0,$activeSlave.pregType = 0,$activeSlave.broodmother = 0,$activeSlave.broodmotherFetuses = 0,$activeSlave.broodmotherOnHold = 0,$cash -= $surgeryCost,$activeSlave.pregControl = "none",$activeSlave.health -= 10,$surgeryType = "pregRemove"]] 
+			[[Remove a pregnancy generator|Surgery Degradation][$activeSlave.preg = 0,$activeSlave.pregWeek = -2,$activeSlave.pregSource = 0,$activeSlave.pregWeek = 0,$activeSlave.pregKnown = 0,$activeSlave.pregType = 0,$activeSlave.broodmother = 0,$activeSlave.broodmotherFetuses = 0,$activeSlave.broodmotherOnHold = 0,$cash -= $surgeryCost,$activeSlave.pregControl = "none",$activeSlave.health -= 10,$surgeryType = "pregRemove"]] 
 		<<else>>
-			She is pregnant right now, and her broodmother implant can't be safely extracted.
+			$possessiveCap is pregnant right now, so her broodmother implant can't be safely extracted.
 		<</if>>
 	<</if>>
 <</if>>
diff --git a/src/uncategorized/saRelationships.tw b/src/uncategorized/saRelationships.tw
index 0fb613f8923f98d9760a45dade8fe37d9008793c..3ee4a75cf6a29753e016f2bbdb7917271fbf1def 100644
--- a/src/uncategorized/saRelationships.tw
+++ b/src/uncategorized/saRelationships.tw
@@ -308,6 +308,15 @@
 								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
 							<</if>>
 						<</if>>
+					<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+						Society @@.green;enjoys@@ your incestuous relationship since incest is currently trendy.
+						<<set $repGain += 1.5*$FSSingleSlaveRep>>
+						<<if _SlaveI.bellyPreg >= 1500>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@.green;The effect is enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep>>
+							<</if>>
+						<</if>>
 					<</if>>
 				<<elseif _SlaveI.father == -1>>
 					She
@@ -365,6 +374,15 @@
 								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
 							<</if>>
 						<</if>>
+					<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+						Society @@.green;enjoys@@ your incestuous relationship since incest is currently trendy.
+						<<set $repGain += 1.5*$FSSingleSlaveRep>>
+						<<if _SlaveI.bellyPreg >= 1500>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@.green;The effect is enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep>>
+							<</if>>
+						<</if>>
 					<</if>>
 				<<elseif $PC.mother == _SlaveI.ID || $PC.father == _SlaveI.ID>>
 					She
@@ -422,6 +440,15 @@
 								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
 							<</if>>
 						<</if>>
+					<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+						Society @@.green;enjoys@@ your incestuous relationship since incest is currently trendy.
+						<<set $repGain += 1.5*$FSSingleSlaveRep>>
+						<<if _SlaveI.bellyPreg >= 1500>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@.green;The effect is enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep>>
+							<</if>>
+						<</if>>
 					<</if>>
 				<<elseif areSisters(_SlaveI, $PC) > 0>>
 					<<set _PCrelative = areSisters(_SlaveI, $PC)>>
@@ -495,6 +522,15 @@
 								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
 							<</if>>
 						<</if>>
+					<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+						Society @@.green;enjoys@@ your incestuous relationship since incest is currently trendy.
+						<<set $repGain += 1.5*$FSSingleSlaveRep>>
+						<<if _SlaveI.bellyPreg >= 1500>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@.green;The effect is enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep>>
+							<</if>>
+						<</if>>
 					<</if>>
 				<</if>>
 				<<if (_SlaveI.devotion + _SlaveI.trust < 150)>>
@@ -573,6 +609,15 @@
 								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
 							<</if>>
 						<</if>>
+					<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+						Society @@.green;enjoys@@ your incestuous relationship since incest is currently trendy.
+						<<set $repGain += 1.5*$FSSingleSlaveRep>>
+						<<if _SlaveI.bellyPreg >= 1500>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@.green;The effect is enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep>>
+							<</if>>
+						<</if>>
 					<</if>>
 				<<elseif _SlaveI.father == -1 && _SlaveI.fetish != "mindbroken">>
 					She
@@ -630,6 +675,15 @@
 								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
 							<</if>>
 						<</if>>
+					<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+						Society @@.green;enjoys@@ your incestuous relationship since incest is currently trendy.
+						<<set $repGain += 1.5*$FSSingleSlaveRep>>
+						<<if _SlaveI.bellyPreg >= 1500>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@.green;The effect is enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep>>
+							<</if>>
+						<</if>>
 					<</if>>
 				<<elseif ($PC.mother == _SlaveI.ID || $PC.father == _SlaveI.ID) && _SlaveI.fetish != "mindbroken">>
 					She
@@ -687,6 +741,15 @@
 								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
 							<</if>>
 						<</if>>
+					<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+						Society @@.green;enjoys@@ your incestuous relationship since incest is currently trendy.
+						<<set $repGain += 1.5*$FSSingleSlaveRep>>
+						<<if _SlaveI.bellyPreg >= 1500>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@.green;The effect is enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep>>
+							<</if>>
+						<</if>>
 					<</if>>
 				<<elseif areSisters(_SlaveI, $PC) > 0 && _SlaveI.fetish != "mindbroken">>
 					<<set _PCrelative = areSisters(_SlaveI, $PC)>>
@@ -760,6 +823,15 @@
 								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
 							<</if>>
 						<</if>>
+					<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+						Society @@.green;enjoys@@ your incestuous relationship since incest is currently trendy.
+						<<set $repGain += 1.5*$FSSingleSlaveRep>>
+						<<if _SlaveI.bellyPreg >= 1500>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@.green;The effect is enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep>>
+							<</if>>
+						<</if>>
 					<</if>>
 				<</if>>
 				/* obsolete due to forced marriage
@@ -1177,6 +1249,15 @@
 								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
 							<</if>>
 						<</if>>
+					<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+						Society @@.green;enjoys@@ their incestuous relationship since incest is currently trendy.
+						<<set $repGain += 1.5*$FSSingleSlaveRep>>
+						<<if _SlaveI.bellyPreg >= 1500>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@.green;The effect is enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep>>
+							<</if>>
+						<</if>>
 					<</if>>
 				<</if>>
 				<<set $relation = 0>>
@@ -1238,6 +1319,15 @@
 						@@.green;The effect is greatly enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
 						<<set $repGain += $FSSingleSlaveRep * ($arcologies[0].FSEgyptianRevivalist / $FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05 * $FSSingleSlaveRep * $pornFameBonus>>
 					<</if>>
+					<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+						Society @@.green;enjoys@@ their incestuous relationship since incest is currently trendy.
+						<<set $repGain += 1.5*$FSSingleSlaveRep>>
+						<<if _SlaveI.bellyPreg >= 1500>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@.green;The effect is enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep>>
+							<</if>>
+						<</if>>
 				<</if>>
 			<</if>>
 		<</if>> /* closes extended family mode */
diff --git a/src/uncategorized/saServeThePublic.tw b/src/uncategorized/saServeThePublic.tw
index e9c63ce224d89aa4f34c0dfb85adb6102bd1d2c1..776734fe301583980c02d6cd735f7255fdefd996 100644
--- a/src/uncategorized/saServeThePublic.tw
+++ b/src/uncategorized/saServeThePublic.tw
@@ -473,16 +473,22 @@ Her appearance attracted $beauty members of the public (<<print Math.trunc($beau
 			are public sluts too, she earns extra attention.
 			<<if $arcologies[0].FSEgyptianRevivalist > 20>>
 				Citizens are very excited about being able to participate in incestuous sex like the ancient Egyptians.
+			<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+				Citizens are very excited about being able to participate in incestuous sex.
 			<</if>>
 		<<elseif _children.length > 1>>
 			Since her relatives, _children[0].slaveName and _children[1].slaveName, are public sluts too, she earns extra attention.
 			<<if $arcologies[0].FSEgyptianRevivalist > 20>>
 				Citizens are very excited about being able to participate in incestuous sex like the ancient Egyptians.
+			<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+				Citizens are very excited about being able to participate in incestuous sex.
 			<</if>>
 		<<elseif _children.length > 0>>
 			Since her relative, _children[0].slaveName, is a public slut too, she earns extra attention.
 			<<if $arcologies[0].FSEgyptianRevivalist > 20>>
 				Citizens are very excited about being able to participate in incestuous sex like the ancient Egyptians.
+			<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+				Citizens are very excited about being able to participate in incestuous sex.
 			<</if>>
 		<</if>>
 	<</if>>
@@ -494,6 +500,8 @@ Her appearance attracted $beauty members of the public (<<print Math.trunc($beau
 			Since her $slaves[$j].relation $slaves[$j].slaveName is a public slut too, she earns extra attention.
 			<<if $arcologies[0].FSEgyptianRevivalist > 20>>
 				Citizens are very excited about being able to participate in incestuous sex like the ancient Egyptians.
+			<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+				Citizens are very excited about being able to participate in incestuous sex.
 			<</if>>
 			<</if>>
 			<<break>>
diff --git a/src/uncategorized/saWhore.tw b/src/uncategorized/saWhore.tw
index 1dddc3109105b40cff3456999b3e8337a15efb92..5a1ba416ca2bcf0644214880149f1da7fccbd162 100644
--- a/src/uncategorized/saWhore.tw
+++ b/src/uncategorized/saWhore.tw
@@ -475,16 +475,22 @@ Her appearance attracted $beauty customers (<<print Math.trunc($beauty/7)>> a da
 			are selling themselves too, she earns extra ¤ by working with them.
 			<<if $arcologies[0].FSEgyptianRevivalist > 20>>
 				Customers are very enthusiastic about being able to participate in incestuous sex like the ancient Egyptians.
+			<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+				Customers are very enthusiastic about being able to participate in incestuous sex.
 			<</if>>
 		<<elseif _children.length > 1>>
 			Since her relatives, _children[0].slaveName and _children[1].slaveName, are selling themselves too, she earns extra ¤ by working with them.
 			<<if $arcologies[0].FSEgyptianRevivalist > 20>>
 				Customers are very enthusiastic about being able to participate in incestuous sex like the ancient Egyptians.
+			<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+				Customers are very enthusiastic about being able to participate in incestuous sex.
 			<</if>>
 		<<elseif _children.length > 0>>
 			Since her relative, _children[0].slaveName, is selling herself too, she earns extra ¤ by working with her.
 			<<if $arcologies[0].FSEgyptianRevivalist > 20>>
 				Customers are very enthusiastic about being able to participate in incestuous sex like the ancient Egyptians.
+			<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+				Customers are very enthusiastic about being able to participate in incestuous sex.
 			<</if>>
 		<</if>>
 	<</if>>
@@ -496,6 +502,8 @@ Her appearance attracted $beauty customers (<<print Math.trunc($beauty/7)>> a da
 					Since her $slaves[$j].relation $slaves[$j].slaveName is selling herself too, she earns extra ¤ by working with her.
 					<<if $arcologies[0].FSEgyptianRevivalist > 20>>
 						Customers are very enthusiastic about being able to participate in incestuous sex like the ancient Egyptians.
+					<<elseif $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
+						Customers are very enthusiastic about being able to participate in incestuous sex.
 					<</if>>
 				<</if>>
 				<<break>>
diff --git a/src/uncategorized/slaveInteract.tw b/src/uncategorized/slaveInteract.tw
index 53c585cb3328bff8ca4c6770edb060fd1e86f8d5..4e7d804d3b055eb6ef1e50a46b656949222b83a1 100644
--- a/src/uncategorized/slaveInteract.tw
+++ b/src/uncategorized/slaveInteract.tw
@@ -1039,7 +1039,7 @@ Aphrodisiacs: <span id="aphrodisiacs"><strong><<if $activeSlave.aphrodisiacs > 1
 			<<SetBellySize $activeSlave>>
 		<</if>>
 	<<elseif $activeSlave.broodmotherOnHold == 1>>
-		//Her pregnancy implant is turned off<<if $activeSlave.broodmotherCountDown > 0>>; she expected to be completely emptied of her remaining brood in $activeSlave.broodmotherCountDown week<<if $activeSlave.broodmotherCountDown > 1>>s<</if>><<else>>.<</if>>// 
+		//Her pregnancy implant is turned off<<if $activeSlave.broodmotherCountDown > 0>>; she is expected to be completely emptied of her remaining brood in $activeSlave.broodmotherCountDown week<<if $activeSlave.broodmotherCountDown > 1>>s<</if>><<else>>.<</if>>// 
 		[[Turn on implant|Slave Interact][$activeSlave.broodmotherOnHold = 0, $activeSlave.broodmotherCountDown = 0]] 
 	<<elseif $activeSlave.preg >= -1>>
 	Contraception: <span id="fertility"><strong><<if $activeSlave.preg == -1>><<print "using contraceptives">><<elseif $activeSlave.pregWeek < 0>><<print "postpartum">><<elseif $activeSlave.preg == 0>><<print "fertile">><<elseif $activeSlave.preg < 4>><<print "may be pregnant">><<else>><<print $activeSlave.preg>><<print " weeks pregnant">><</if>></strong></span>.
diff --git a/src/uncategorized/spaReport.tw b/src/uncategorized/spaReport.tw
index 8cd1b76355ffe000c593d5cda28266c83e6c202e..f91c0c1eb927e5d71a0dbd7e903b99fbae4df45d 100644
--- a/src/uncategorized/spaReport.tw
+++ b/src/uncategorized/spaReport.tw
@@ -87,7 +87,7 @@
 		<<if ($slaves[$i].fetish == "mindbroken") && ($slaves[$i].health > 20) && (_attendantUsedCure == 0) && ($spaFix != 2)>>
 			<<set _attendantUsedCure = 1>>
 			<<if (random(1,100) > 90-$Attendant.devotion)>>
-				&nbsp;&nbsp;&nbsp;&nbsp;@@.green;Something almost miraculous has happened.@@ $Attendant.slaveName has always refused to believe that $slaves[$i].slaveName could not be reached, and has lavished patient tenderness on her in $spaName. $slaves[$i].slaveName has begun to respond, and is stirring from her mental torpor.
+				<br>&nbsp;&nbsp;&nbsp;&nbsp;@@.green;Something almost miraculous has happened.@@ $Attendant.slaveName has always refused to believe that $slaves[$i].slaveName could not be reached, and has lavished patient tenderness on her in $spaName. $slaves[$i].slaveName has begun to respond, and is stirring from her mental torpor.
 				<<set $slaves[$i].devotion = -3, $slaves[$i].sexualFlaw = "apathetic", $slaves[$i].behavioralFlaw = either("hates men", "odd"), $slaves[$i].fetish = "none", $slaves[$i].fetishKnown = 1>>
 				<<if ($arcologies[0].FSPaternalist > 0)>>
 					Society @@.green;strongly approves@@ of $slaves[$i].slaveName being restored to sanity, which advances ideals about enlightened slave ownership.
@@ -197,11 +197,11 @@
 			<<if $slaves[$i].behavioralFlaw != "none">>
 				<<SoftenBehavioralFlaw $slaves[$i]>>
 				<<set _attendantUsedCure += 1>>
-				&nbsp;&nbsp;&nbsp;&nbsp;$Attendant.slaveName works carefully with $slaves[$i].slaveName, and successfully @@.green;softens her behavioral flaw@@ into an appealing quirk.
+				<br>&nbsp;&nbsp;&nbsp;&nbsp;$Attendant.slaveName works carefully with $slaves[$i].slaveName, and successfully @@.green;softens her behavioral flaw@@ into an appealing quirk.
 			<<elseif $slaves[$i].sexualFlaw != "none">>
 				<<SoftenSexualFlaw $slaves[$i]>>
 				<<set _attendantUsedCure += 1>>
-				&nbsp;&nbsp;&nbsp;&nbsp;$Attendant.slaveName works carefully with $slaves[$i].slaveName, and successfully @@.green;softens her sexual flaw@@ into an appealing quirk.
+				<br>&nbsp;&nbsp;&nbsp;&nbsp;$Attendant.slaveName works carefully with $slaves[$i].slaveName, and successfully @@.green;softens her sexual flaw@@ into an appealing quirk.
 			<</if>>
 		<</if>>
 	<</for>>
diff --git a/src/utility/assayWidgets.tw b/src/utility/assayWidgets.tw
index 398a7baae0b956532a22501c325a6551c1b4fcf9..10b75791a3b69b12c160b076a24098befae49b42 100644
--- a/src/utility/assayWidgets.tw
+++ b/src/utility/assayWidgets.tw
@@ -1154,7 +1154,7 @@
 		<<if $args[0].mother == $slaves[$j].ID>>
 			<<if $slaves[$j].assignment == $args[0].assignment>>
 			<<set $FResult += 1>>
-				<<if $arcologies[0].FSEgyptianRevivalist > 20>>
+				<<if $arcologies[0].FSEgyptianRevivalist > 20 || $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
 					<<set $FResult += 1>>
 				<</if>>
 			<</if>>
@@ -1162,7 +1162,7 @@
 		<<if $args[0].father == $slaves[$j].ID>>
 			<<if $slaves[$j].assignment == $args[0].assignment>>
 			<<set $FResult += 1>>
-				<<if $arcologies[0].FSEgyptianRevivalist > 20>>
+				<<if $arcologies[0].FSEgyptianRevivalist > 20 || $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
 					<<set $FResult += 1>>
 				<</if>>
 			<</if>>
@@ -1170,7 +1170,7 @@
 		<<if $slaves[$j].mother == $args[0].ID || $slaves[$j].father == $args[0].ID>>
 			<<if $slaves[$j].assignment == $args[0].assignment>>
 			<<set $FResult += 1>>
-				<<if $arcologies[0].FSEgyptianRevivalist > 20>>
+				<<if $arcologies[0].FSEgyptianRevivalist > 20 || $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
 					<<set $FResult += 1>>
 				<</if>>
 			<</if>>
@@ -1178,7 +1178,7 @@
 		<<if areSisters($args[0], $slaves[$j]) > 0>>
 			<<if $slaves[$j].assignment == $args[0].assignment>>
 			<<set $FResult += 1>>
-				<<if $arcologies[0].FSEgyptianRevivalist > 20>>
+				<<if $arcologies[0].FSEgyptianRevivalist > 20 || $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
 					<<set $FResult += 1>>
 				<</if>>
 			<</if>>
@@ -1190,7 +1190,7 @@
 		<<set _fre = $slaves.findIndex(function(s) { return s.ID == $args[0].relationTarget && s.assignment == $args[0].assignment; })>>
 		<<if _fre != -1>>
 			<<set $FResult += 2>>
-			<<if $arcologies[0].FSEgyptianRevivalist > 20>>
+			<<if $arcologies[0].FSEgyptianRevivalist > 20 || $arcologies[0].FSEgyptianRevivalistIncestPolicy == 1>>
 				<<set $FResult += 2>>
 			<</if>>
 		<</if>>
diff --git a/src/utility/miscWidgets.tw b/src/utility/miscWidgets.tw
index c905ed175bdd070034b5cb607053a6ae1fa032d3..647748af6f8881b6fb667e039855f380256c0ca9 100644
--- a/src/utility/miscWidgets.tw
+++ b/src/utility/miscWidgets.tw
@@ -674,7 +674,7 @@
 			<<SetBellySize $activeSlave>>
 		<</if>>
 	<<elseif $activeSlave.broodmotherOnHold == 1>>
-	//Her pregnancy implant is turned off<<if $activeSlave.broodmotherCountDown > 0>>; she expected to be completely emptied of her remaining brood in $activeSlave.broodmotherCountDown week<<if $activeSlave.broodmotherCountDown > 1>>s<</if>><<else>>.<</if>>//  
+	//Her pregnancy implant is turned off<<if $activeSlave.broodmotherCountDown > 0>>; she is expected to be completely emptied of her remaining brood in $activeSlave.broodmotherCountDown week<<if $activeSlave.broodmotherCountDown > 1>>s<</if>><<else>>.<</if>>//  
 	[[Turn on implant|Slave Interact][$activeSlave.broodmotherOnHold = 0, $activeSlave.broodmotherCountDown = 0]]
 	<<elseif ($activeSlave.preg >= -1)>>
 		__Contraception__: <span id="fertility"><strong><<if $activeSlave.preg == -1>><<print "using contraceptives">><<elseif $activeSlave.pregWeek < 0>><<print "postpartum">><<elseif $activeSlave.preg == 0>><<print "fertile">><<elseif $activeSlave.preg < 4>><<print "may be pregnant">><<else>><<print $activeSlave.preg>><<print " weeks pregnant">><</if>></strong></span>.
diff --git a/src/utility/raWidgets.tw b/src/utility/raWidgets.tw
index d6a182780cba43055ef15d68605b3931ae201daf..6df784d53ccda06fa3fba86a2fa3ddd617941a77 100644
--- a/src/utility/raWidgets.tw
+++ b/src/utility/raWidgets.tw
@@ -3542,39 +3542,39 @@ Your brand design is ''$brandDesign.''
 
 <</if>> /* CLOSES FUCKDOLL CHECK */
 
-/* Here belly implants size control, it's used Surgery Degradation passage to setup devotion and thrust changes. */
+/* Here is belly implant size control, it's used in Surgery Degradation passage to setup devotion and trust changes. */
 <<if (def _combinedRule.bellyImplantVol) && $args[0].bellyImplant >= 0 && _combinedRule.bellyImplantVol >= 0>>
 	<<set _tmpNextL = $nextLink, _tmpNextB = $nextButton, _as = $activeSlave, $activeSlave = $args[0]>> /* this is hack to use Surgery Degradation without breaking normal End Week routine */
 	<br>
 	<<if $args[0].health > -10 >>
 		<<set _bdiff = _combinedRule.bellyImplantVol - $args[0].bellyImplant>>
 		<<if _bdiff >= 5000 && $activeSlave.bellyPain == 0 && $args[0].health > 50>>
-			$args[0].slaveName's belly is way too smaller then desired size, so she has been directed to have intensive belly implant filling procedures throught this week.
+			$args[0].slaveName's belly is way too small, so she has been directed to have intensive belly implant filling procedures throughout this week.
 			<<set $surgeryType = "bellyUp", $activeSlave.bellyImplant += 1000, $activeSlave.bellyPain += 2>>
 			<<silently>>
 				<<include "Surgery Degradation">>
 			<</silently>>
 		<<elseif _bdiff >= 500 && $activeSlave.bellyPain < 2 >>
-			$args[0].slaveName's belly not reached desired size, so she has been directed to have belly implant filling procedures throught this week.
+			$args[0].slaveName's belly has not reached the desired size, so she has been directed to have belly implant filling procedures throughout this week.
 			<<set $surgeryType = "bellyUp", $activeSlave.bellyImplant += 500, $activeSlave.bellyPain += 1>>
 			<<silently>>
 				<<include "Surgery Degradation">>
 			<</silently>>
 		<<elseif _bdiff <= -5000 >>
-			$args[0].slaveName's belly is way too big, so she has been directed to have intensive belly implant drainig procedures throught this week.
+			$args[0].slaveName's belly is way too big, so she has been directed to have intensive belly implant draining procedures throughout this week.
 			<<set $surgeryType = "bellyDown", $activeSlave.bellyImplant -= 1000>>
 			<<silently>>
 				<<include "Surgery Degradation">>
 			<</silently>>
 		<<elseif _bdiff <= -500 >>
-			$args[0].slaveName's belly is too big, so she has been directed to have belly implant drainig procedures throught this week.
+			$args[0].slaveName's belly is too big, so she has been directed to have belly implant draining procedures throughout this week.
 			<<set $surgeryType = "bellyDown", $activeSlave.bellyImplant -= 500>>
 			<<silently>>
 				<<include "Surgery Degradation">>
 			<</silently>>
 		<</if>>
 	<<else>>
-		$args[0].slaveName not heahty enough to safely manipulate her belly implant.
+		$args[0].slaveName is not healthy enough to safely adjust her belly implant.
 	<</if>>
 	<<set $nextLink = _tmpNextL, $nextButton = _tmpNextB, $activeSlave = _as>>
 <</if>>