diff --git a/src/init/storyInit.tw b/src/init/storyInit.tw
index 41c3bc9370a7c1e8cdeb90e9586089153f96a910..5224c5fc10854ea1d047e9ec54c9b4c91a13df06 100644
--- a/src/init/storyInit.tw
+++ b/src/init/storyInit.tw
@@ -196,7 +196,7 @@ You should have received a copy of the GNU General Public License along with thi
<<set $cheater = 0>>
<<set $PCName = "Anonymous">>
-<<set $PC = {title: 1, ID: -1, dick: 1, vagina: 0, preg: 0, pregSource: 0, pregMood: 0, labor: 0, births: 0, boobsBonus: 0, degeneracy: 0, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, career: "capitalist", rumor: "wealth", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 2, sexualEnergy: 4, refreshment: "cigar", refreshmentType: 0, trading: 0, warfare: 0, slaving: 0, engineering: 0, medicine: 0, cumTap: 0, race: "white", origRace: "white", skin: "white", origSkin: "white", eyeColor: "blue", origEye: "blue", hColor: "blonde", origHColor: "blonde", nationality: "Stateless", father: 0, mother: 0, sisters: 0, daughters: 0, birthElite: 0, birthMaster: 0, birthDegenerate: 0, birthClient: 0, birthOther: 0, birthArcOwner: 0, birthCitizen: 0, intelligence: 3, face: 100, actualAge: 35, physicalAge: 35, visualAge: 35, birthWeek: 0, boobsImplant: 0, butt: 0, buttImplant: 0, ballsImplant: 0, ageImplant: 0, newVag: 0}>>
+<<set $PC = {title: 1, ID: -1, dick: 1, vagina: 0, preg: 0, pregSource: 0, pregMood: 0, labor: 0, births: 0, boobsBonus: 0, degeneracy: 0, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, career: "capitalist", rumor: "wealth", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 2, sexualEnergy: 4, refreshment: "cigar", refreshmentType: 0, trading: 0, warfare: 0, slaving: 0, engineering: 0, medicine: 0, cumTap: 0, race: "white", origRace: "white", skin: "white", origSkin: "white", eyeColor: "blue", origEye: "blue", hColor: "blonde", origHColor: "blonde", nationality: "Stateless", father: 0, mother: 0, sisters: 0, daughters: 0, birthElite: 0, birthMaster: 0, birthDegenerate: 0, birthClient: 0, birthOther: 0, birthArcOwner: 0, birthCitizen: 0, birthSelf: 0, intelligence: 3, face: 100, actualAge: 35, physicalAge: 35, visualAge: 35, birthWeek: 0, boobsImplant: 0, butt: 0, buttImplant: 0, balls: 0, ballsImplant: 0, ageImplant: 0, newVag: 0}>>
<<set $cash = 10000>>
<<set $normalizedEvents = 0>>
<<set $autosave = 1>>
@@ -304,7 +304,7 @@ You should have received a copy of the GNU General Public License along with thi
<<set $cheater = 0>>
<<set $PCName = "Anonymous">>
<<set $cash = 10000>>
- <<set $PC = {title: 1, ID: -1, dick: 1, vagina: 0, preg: 0, pregSource: 0, pregMood: 0, labor: 0, births: 0, boobsBonus: 0, degeneracy: 0, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, career: "capitalist", rumor: "wealth", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 2, sexualEnergy: 4, refreshment: "cigar", refreshmentType: 0, trading: 0, warfare: 0, slaving: 0, engineering: 0, medicine: 0, cumTap: 0, race: "white", origRace: "white", skin: "white", origSkin: "white", eyeColor: "blue", origEye: "blue", hColor: "blonde", origHColor: "blonde", nationality: "Stateless", father: 0, mother: 0, sisters: 0, daughters: 0, birthElite: 0, birthMaster: 0, birthDegenerate: 0, birthClient: 0, birthOther: 0, birthArcOwner: 0, birthCitizen: 0, intelligence: 3, face: 100, actualAge: 35, physicalAge: 35, visualAge: 35, birthWeek: 0, boobsImplant: 0, butt: 0, buttImplant: 0, ballsImplant: 0, ageImplant: 0, newVag: 0}>>
+ <<set $PC = {title: 1, ID: -1, dick: 1, vagina: 0, preg: 0, pregSource: 0, pregMood: 0, labor: 0, births: 0, boobsBonus: 0, degeneracy: 0, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, career: "capitalist", rumor: "wealth", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 2, sexualEnergy: 4, refreshment: "cigar", refreshmentType: 0, trading: 0, warfare: 0, slaving: 0, engineering: 0, medicine: 0, cumTap: 0, race: "white", origRace: "white", skin: "white", origSkin: "white", eyeColor: "blue", origEye: "blue", hColor: "blonde", origHColor: "blonde", nationality: "Stateless", father: 0, mother: 0, sisters: 0, daughters: 0, birthElite: 0, birthMaster: 0, birthDegenerate: 0, birthClient: 0, birthOther: 0, birthArcOwner: 0, birthCitizen: 0, birthSelf: 0, intelligence: 3, face: 100, actualAge: 35, physicalAge: 35, visualAge: 35, birthWeek: 0, boobsImplant: 0, butt: 0, buttImplant: 0, balls: 0, ballsImplant: 0, ageImplant: 0, newVag: 0}>>
<</if>>
<</if>>
diff --git a/src/pregmod/MpregSelf.tw b/src/pregmod/MpregSelf.tw
index 24c3f6d433ede079a802739402daa918161d7326..0503e7ba7ab80d40903060a4f5bd655ee6092af2 100644
--- a/src/pregmod/MpregSelf.tw
+++ b/src/pregmod/MpregSelf.tw
@@ -1,7 +1,6 @@
:: MpregSelf [nobr]
-<<set $nextButton = "Back">>
-<<set $nextLink = "Main">>
+<<set $nextButton = "Back", $nextLink = "Main">>
<<if $PC.birthSelf == 0>>
<<if $PC.balls > 2>>
diff --git a/src/pregmod/electiveSurgery.tw b/src/pregmod/electiveSurgery.tw
index d93ceb4687063575d9fe726c13fc9911ad58afd4..b7d673016758ee395d4dfc6fa3993e191595f2c7 100644
--- a/src/pregmod/electiveSurgery.tw
+++ b/src/pregmod/electiveSurgery.tw
@@ -217,30 +217,30 @@ You're @@.orange;$PC.actualAge years old.@@
<<if $PC.dick == 1 && $PC.vagina == 1>>
You have working @@.orange;male and female reproductive organs@@ and a @@.orange;<<if $PC.title > 0>>masculine<<else>>feminine<</if>> appearance.@@
<br>
- [[Remove your male half|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.dick = 0, $cash -= 25000, $surgeryType = "herm2female"]] |
+ [[Remove your male half|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.balls = 0, $PC.dick = 0, $cash -= 25000, $surgeryType = "herm2female"]] |
[[Remove your female half|PC Surgery Degradation][$PC.vagina = 0, $PC.preg = 0, $cash -= 25000, $surgeryType = "herm2male"]] |
<<if $PC.title > 0>>
- [[Remove your male half completely|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.dick = 0, $PC.title = 0, $cash -= 25000, $surgeryType = "herm2truefemale"]]
+ [[Remove your male half completely|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.balls = 0, $PC.dick = 0, $PC.title = 0, $cash -= 25000, $surgeryType = "herm2truefemale"]]
<<else>>
[[Remove your female half completely|PC Surgery Degradation][$PC.vagina = 0, $PC.preg = 0, $PC.boobs = 0, $PC.boobsBonus = 0, $PC.boobsImplant = 0, $PC.title = 1, $cash -= 25000, $surgeryType = "herm2truemale"]]
<</if>>
<<elseif $PC.dick == 1>>
You have @@.orange;male genitalia@@ and a @@.orange;<<if $PC.title > 0>>masculine<<else>>feminine<</if>> appearance.@@
<br>
- [[Have your male organs replaced with female ones|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.dick = 0, $PC.vagina = 1, $PC.newVag = 1, $cash -= 50000, $surgeryType = "male2female"]] |
+ [[Have your male organs replaced with female ones|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.balls = 0, $PC.dick = 0, $PC.vagina = 1, $PC.newVag = 1, $cash -= 50000, $surgeryType = "male2female"]] |
[[Add a female reproductive tract|PC Surgery Degradation][$PC.vagina = 1, $PC.newVag = 1, $PC.preg = 0, $cash -= 150000, $surgeryType = "male2herm"]] |
<<if $PC.title > 0>>
- [[Become a woman|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.dick == 0, $PC.vagina = 1, $PC.newVag = 1, $PC.preg = 0, $PC.title = 0, $cash -= 50000, $surgeryType = "male2truefemale"]] |
+ [[Become a woman|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.balls = 0, $PC.dick == 0, $PC.vagina = 1, $PC.newVag = 1, $PC.preg = 0, $PC.title = 0, $cash -= 50000, $surgeryType = "male2truefemale"]] |
[[Become a hermaphrodite girl|PC Surgery Degradation][$PC.vagina = 1, $PC.newVag = 1, $PC.preg = 0, $PC.title = 0, $cash -= 150000, $surgeryType = "male2hermfemale"]]
<</if>>
<<else>>
You have @@.orange;female genitalia@@ and a @@.orange;<<if $PC.title > 0>>masculine<<else>>feminine<</if>> appearance.@@
<br>
- [[Have your female organs replaced with male ones|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.dick = 1, $PC.vagina = 0, $cash -= 50000, $surgeryType = "female2male"]] |
- [[Add a male reproductive tract|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.dick = 1, $cash -= 150000, $surgeryType = "female2herm"]] |
+ [[Have your female organs replaced with male ones|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.balls = 0, $PC.dick = 1, $PC.vagina = 0, $cash -= 50000, $surgeryType = "female2male"]] |
+ [[Add a male reproductive tract|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.balls = 0, $PC.dick = 1, $cash -= 150000, $surgeryType = "female2herm"]] |
<<if $PC.title == 0>>
- [[Become a man|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.dick = 1, $PC.vagina = 0, $PC.preg = 0, $PC.title = 1, $PC.boobs = 0, $PC.boobsBonus = 0, $PC.boobsImplant = 0, $cash -= 50000, $surgeryType = "female2truemale"]] |
- [[Become a hermaphrodite boy|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.dick = 1, $PC.title = 1, $PC.boobs = 0, $PC.boobsBonus = 0, $PC.boobsImplant = 0, $cash -= 150000, $surgeryType = "female2hermmale"]]
+ [[Become a man|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.balls = 0, $PC.dick = 1, $PC.vagina = 0, $PC.preg = 0, $PC.title = 1, $PC.boobs = 0, $PC.boobsBonus = 0, $PC.boobsImplant = 0, $cash -= 50000, $surgeryType = "female2truemale"]] |
+ [[Become a hermaphrodite boy|PC Surgery Degradation][$PC.ballsImplant = 0, $PC.balls = 0, $PC.dick = 1, $PC.title = 1, $PC.boobs = 0, $PC.boobsBonus = 0, $PC.boobsImplant = 0, $cash -= 150000, $surgeryType = "female2hermmale"]]
<</if>>
<</if>>
<</if>>
diff --git a/src/pregmod/managePersonalAffairs.tw b/src/pregmod/managePersonalAffairs.tw
index d8501216aefaa30e0b1b85092ad0b1d626a4a5ff..ea84226406df38c7293c604abe1095452f92d168 100644
--- a/src/pregmod/managePersonalAffairs.tw
+++ b/src/pregmod/managePersonalAffairs.tw
@@ -61,7 +61,7 @@ Beneath all that;
<<if $PC.dick == 1 && $PC.vagina == 1>>
an @@.orange;above average penis@@<<if $PC.balls > 2>> that is constantly streaming precum,<<elseif $PC.balls > 0>> that is constantly dripping precum,<</if> and a pair of
<<if $PC.ballsImplant > 3>>
- @@.orange;monstrous, heavy balls@@ roughly the size of small watermelons thanks to a combination of growth hormones and gel injections; it's impossible to sit normally, you have to sit in special chairs designed to accommodate your colossal testes. You've given up on wearing pants, and their bulging mass is so gargantuan that people assume they're fake, but every slave you fuck gets a distended belly from all the cum you pump into them. They make just about everything you do difficult: sitting, walking, fucking; but they certainly make life interesting.
+ @@.orange;monstrous, heavy balls@@ roughly the size of small watermelons thanks to a combination of growth hormones and gel injections; it's impossible to sit normally, <<if $ballsAccessibility == 1>>but your penthouse has been redesigned with oversized balls in mind. There are plenty of chairs capable of handling you littering the penthouse<<else>> you rest on the edge of your chair, allowing your oversized balls to dangle precariously<</if>>. You've given up on wearing pants around the penthouse, and their bulging mass is so gargantuan that people assume they're fake, but every slave you fuck gets a distended belly from all the cum you pump into them. They make just about everything you do difficult: sitting, walking, fucking; but they certainly make life interesting.
<<elseif $PC.ballsImplant == 3>>
@@.orange;enormous, heavy balls@@ roughly the size of cantaloupes; it's difficult to sit normally, your clothes barely fit, and everyone probably assumes they are fake, but every slave you fuck gets a distinct slap with each thrust. They get in the way of nearly everything you do: sitting, walking, fucking; but they make life certainly interesting.
<<elseif $PC.ballsImplant == 2>>
@@ -92,7 +92,7 @@ Beneath all that;
<<elseif $PC.dick == 1>>
an @@.orange;above average penis@@<<if $PC.balls > 2>> that is constantly streaming precum,<<elseif $PC.balls > 0>> that is constantly dripping precum,<</if> and a pair of
<<if $PC.ballsImplant > 3>>
- @@.orange;monstrous, heavy balls@@ roughly the size of small watermelons thanks to a combination of growth hormones and gel injections; it's impossible to sit normally, you have to sit in special chairs designed to accommodate your colossal testes. You've given up on wearing pants, and their bulging mass is so gargantuan that people assume they're fake, but every slave you fuck gets a distended belly from all the cum you pump into them. They make just about everything you do difficult: sitting, walking, fucking; but they certainly make life interesting.
+ @@.orange;monstrous, heavy balls@@ roughly the size of small watermelons thanks to a combination of growth hormones and gel injections; it's impossible to sit normally, <<if $ballsAccessibility == 1>>but your penthouse has been redesigned with oversized balls in mind. There are plenty of chairs capable of handling you littering the penthouse<<else>> you rest on the edge of your chair, allowing your oversized balls to dangle precariously<</if>>. You've given up on wearing pants around the penthouse, and their bulging mass is so gargantuan that people assume they're fake, but every slave you fuck gets a distended belly from all the cum you pump into them. They make just about everything you do difficult: sitting, walking, fucking; but they certainly make life interesting.
<<elseif $PC.ballsImplant == 3>>
@@.orange;enormous, heavy balls@@ roughly the size of cantaloupes; it's difficult to sit normally, your clothes barely fit, and everyone probably assumes they are fake, but every slave you fuck gets a distinct slap with each thrust. They get in the way of nearly everything you do: sitting, walking, fucking; but they make life certainly interesting.
<<elseif $PC.ballsImplant == 2>>
diff --git a/src/pregmod/sePlayerBirth.tw b/src/pregmod/sePlayerBirth.tw
index 7a0549d9890da9d40a9793e2893e2f0ced33d4d0..6afeac4b7271fc5997bb1f20a1c072f1cdfb94a9 100644
--- a/src/pregmod/sePlayerBirth.tw
+++ b/src/pregmod/sePlayerBirth.tw
@@ -2,8 +2,7 @@
<<set $nextButton = "Continue", $nextLink = "Scheduled Event">>
-<<set _gaveBirth = 0>>
-<<set _PCDegree = 0>>
+<<set _gaveBirth = 0, _PCDegree = 0>>
/*
PC.pregSource documentation
@@ -23,9 +22,7 @@ PC.pregSource documentation
<<set $badBirth = 10>>
<</if>>
-<<set $PC.preg = 0>>
-<<set $PC.labor = 0>>
-<<set $PC.births += 1>>
+<<set $PC.preg = 0, $PC.labor = 0, $PC.births += 1>>
<<if $PC.pregSource == 0>>
<<set $PC.birthOther += 1>>
<<elseif $PC.pregSource == -1>>
@@ -149,24 +146,23 @@ Your little <<if $babyGender == 1>>girl<<else>>boy<</if>>
<</if>>
<<if $PC.pregSource > 0>>
- <<for $i = 0; $i < $slaves.length; $i++>>
- <<if $slaves[$i].ID == $PC.pregSource>>
- Rumors spread that your child was fathered by a slave, @@.red;harming your lasting reputation.@@
- <<set $PC.degeneracy += 20>>
- <<if $arcologies[0].FSSupremacist != "unset">>
- <<if $activeSlave.race != $arcologies[0].FSSupremacistRace>>
- Furthermore, word is that your child was not $arcologies[0].FSSupremacistRace, @@.red;hurting your lasting reputation.@@
- <<set $PC.degeneracy += 10>>
- <</if>>
+ <<set _pb = $slaves.findIndex(function(s) { return s.ID == $PC.pregSource; })>>
+ <<if _pb != -1>>
+ Rumors spread that your child was fathered by a slave, @@.red;harming your lasting reputation.@@
+ <<set $PC.degeneracy += 20>>
+ <<if $arcologies[0].FSSupremacist != "unset">>
+ <<if $slaves[_pb].race != $arcologies[0].FSSupremacistRace>>
+ Furthermore, word is that your child was not $arcologies[0].FSSupremacistRace, @@.red;hurting your lasting reputation.@@
+ <<set $PC.degeneracy += 10>>
<</if>>
- <<if $arcologies[0].FSSubjugationist != "unset">>
- <<if $activeSlave.race == $arcologies[0].FSSubjugationistRace>>
- In addition, there is a nasty rumor that you gave birth to a $arcologies[0].FSSubjugationistRace child, @@.red;devastating your lasting reputation.@@
- <<set $PC.degeneracy += 50>>
- <</if>>
+ <</if>>
+ <<if $arcologies[0].FSSubjugationist != "unset">>
+ <<if $slaves[_pb].race == $arcologies[0].FSSubjugationistRace>>
+ In addition, there is a nasty rumor that you gave birth to a $arcologies[0].FSSubjugationistRace child, @@.red;devastating your lasting reputation.@@
+ <<set $PC.degeneracy += 50>>
<</if>>
<</if>>
- <</for>>
+ <</if>>
<</if>>
<br><br>
@@ -185,7 +181,4 @@ Now you are faced with a decision of what to do with your new child. You're far
<</if>> /*closes gaveBirth*/
<</if>> /*closes SE*/
-<<set $badBirth = 0>>
-<<set $PC.pregSource = 0>>
-<<set $seed = 0>>
-<<set $babyGender = 0>>
\ No newline at end of file
+<<set $badBirth = 0, $PC.pregSource = 0, $seed = 0, $babyGender = 0>>
\ No newline at end of file
diff --git a/src/uncategorized/main.tw b/src/uncategorized/main.tw
index 7ee9d0aab84b73349025d3d192b870241f186c24..ec4cae270f19c63aead812ede8ab4e1dcf74bf50 100644
--- a/src/uncategorized/main.tw
+++ b/src/uncategorized/main.tw
@@ -23,6 +23,12 @@
<<if ndef $dietCleanse>>
<<set $dietCleanse = 0>>
<</if>>
+<<if ndef $PC.birthSelf>>
+ <<set $PC.birthSelf = 0>>
+<</if>>
+<<if ndef $PC.balls>>
+ <<set $PC.balls = 0>>
+<</if>>
<<set $currentRule = $defaultRules[0]>>
<<SlaveSort $slaves>>
diff --git a/src/uncategorized/newSlaveIntro.tw b/src/uncategorized/newSlaveIntro.tw
index e60f2513cb9760ba0f0e493b7e6210ce7159f5d0..307184ba4683f905aec2192e5fe1459fada6d3e0 100644
--- a/src/uncategorized/newSlaveIntro.tw
+++ b/src/uncategorized/newSlaveIntro.tw
@@ -482,9 +482,11 @@ The legalities completed, ''__@@.pink;$activeSlave.slaveName@@__'' <<if ($active
<</if>>
<<if $activeSlave.devotion < -50 && $activeSlave.rudeTitle != 1>>
- <<set $activeSlave.rudeTitle = 1>>
- <<set $activeSlave.customTitle = $badNames.random()>>
- <<set $activeSlave.customTitleLisp = $activeSlave.customTitle, $activeSlave.customTitleLisp = $activeSlave.customTitleLisp.replace("ss", "th"), $activeSlave.customTitleLisp = $activeSlave.customTitleLisp.replace("S", "Th"), $activeSlave.customTitleLisp = $activeSlave.customTitleLisp.replace("s", "th")>>
+ <<if random(-100,0) <= $activeSlave.devotion>>
+ <<set $activeSlave.rudeTitle = 1>>
+ <<set $activeSlave.customTitle = $badNames.random()>>
+ <<set $activeSlave.customTitleLisp = $activeSlave.customTitle, $activeSlave.customTitleLisp = $activeSlave.customTitleLisp.replace("ss", "th"), $activeSlave.customTitleLisp = $activeSlave.customTitleLisp.replace("S", "Th"), $activeSlave.customTitleLisp = $activeSlave.customTitleLisp.replace("s", "th")>>
+ <</if>>
<</if>>
<<if $rulesAssistantAuto == 0>>
@@ -543,7 +545,7 @@ The legalities completed, ''__@@.pink;$activeSlave.slaveName@@__'' <<if ($active
<<set $activeSlave.pregType = 0>>
<<set $activeSlave.pregSource = 0>>
<<replace "#introResult">>
- You loudly place an innocuous-looking drug injector on your desk, and let her think about it for a long moment. Then, you declare exactly what made that sound, Abortifacients. After an instant of comprehension, her mood instantly improves. She pledges to @@.hotpink;submit to you,@@ <<if $PC.dick == 1>>suck your cock, take it in her pussy, take it up her ass<<else>>eat you out, worship you with her pussy, serve you with her ass<</if>>, anything, as long as @@.mediumaquamarine;remove her rape baby.@@ You observe that she'll do all of those things, regardless of what you decide to do about her pregnancy, but for now, you'll let her end her pregnancy. She needs all the nutrients for herself right now. She thanks you through her tears.
+ You loudly place an innocuous-looking drug injector on your desk, and let her think about it for a long moment. Then, you declare exactly what made that sound, Abortifacients. After an moment of comprehension, her mood instantly improves. She pledges to @@.hotpink;submit to you,@@ <<if $PC.dick == 1 && $PC.vagina == 1>>suck your cock, take it in her pussy, take it up her ass, eat you out<<elseif $PC.dick == 1>>suck your cock, take it in her pussy, take it up her ass<<else>>eat you out, worship you with her pussy, serve you with her ass<</if>>, anything, as long as @@.mediumaquamarine;remove her rape baby.@@ You observe that she'll do all of those things, regardless of what you decide to do about her pregnancy, but for now, you'll let her end her terminate it; she needs all the nutrients for herself right now. She thanks you through her tears.
<</replace>>
<</link>>
<br>
@@ -862,14 +864,17 @@ The legalities completed, ''__@@.pink;$activeSlave.slaveName@@__'' <<if ($active
<<set $activeSlave.preg = 1>>
<<set $activeSlave.pregSource = -1>>
<<replace "#introResult">>
- You perform a careful medical examination to verify fertility, and then restrain her in your office with her ass in the air. Whenever you feel able, you drain your balls into her cunt, only releasing her for other duties when scans verify a fertilized ovum. She didn't properly understand the scans, so she just thought it was bound, forced sex; she won't realize what happened for some weeks at least.
+ You perform a careful medical examination to verify fertility, and then restrain her in your office with her ass in the air. Whenever you feel able, you drain your balls into her <<if $activeSlave.mpreg == 1>>ass<<else>>cunt<</if>>, only releasing her for other duties when scans verify a fertilized ovum. She didn't properly understand the scans, so she just thought it was bound, forced sex; she won't realize what happened for some weeks at least.
<<VaginalVCheck>>
<<if $arcologies[0].FSRestart != "unset">>
The Societal Elite @@.green;disapprove@@ of this breach of eugenics.
<<set $failedElite += 5>>
- <<elseif $arcologies[0].FSGenderFundamentalist != "unset">>
+ <<elseif $arcologies[0].FSGenderFundamentalist != "unset" && $activeSlave.mpreg == 0>>
Society @@.green;approves@@ of your promptly putting a new slave in her; this advances the idea that all slaves should bear their masters' babies.
<<FSChange "GenderFundamentalist" 2>>
+ <<elseif $arcologies[0].FSGenderFundamentalist != "unset">>
+ Society @@.red;is disgusted@@ by you promptly knocking up her ass; babies come from women, not men.
+ <<FSChange "GenderFundamentalist" -2>>
<</if>>
<</replace>>
<</link>>
diff --git a/src/uncategorized/seWedding.tw b/src/uncategorized/seWedding.tw
index aa778c9d9a77ba84f99d5c430ffbe0e9fdcfd7c3..152b5795ab68c5c18959f06397f8240775611092 100644
--- a/src/uncategorized/seWedding.tw
+++ b/src/uncategorized/seWedding.tw
@@ -255,6 +255,14 @@
$activeSlave.slaveName appears after everyone has had a chance to socialize,<<if ($activeSlave.amp == 1)>> carried by another slave since she's a quadruple amputee and she cannot walk,<</if>> wearing beautiful bridal lingerie in
<<if ($activeSlave.vagina == 0)>>
white, since she's a virgin.
+ <<elseif ($activeSlave.preg > 0)>>
+ light pink, since she's pregnant.
+ <<elseif ($activeSlave.vagina < 0) && ($activeSlave.anus == 0)>>
+ white, since she's an anal virgin.
+ <<elseif ($activeSlave.vagina < 0) && ($activeSlave.boobs > 500)>>
+ electric blue, since she's a shemale.
+ <<elseif ($activeSlave.vagina < 0)>>
+ pale blue, since she's a sissy slave.
<<elseif ($activeSlave.dick > 0)>>
hot pink, since she's a futa slave.
<<else>>
@@ -345,7 +353,7 @@
<<if $activeSlave.fetish == "mindbroken">>
$activeSlave.slaveName is mindbroken, so you gather her up and hold her in front of you, pulling her panties off as you do. She follows your motions like a ragdoll. You maneuver your dick inside her while holding her against your <<if $PC.boobs == 1>>breasts<<else>>chest<</if>>. Then you pull her knees up to give your guests a good view as you fuck her fertile <<if $activeSlave.mpreg == 1>>asshole<<else>>cunt<</if>>. She is left to face them, staring off into space. Though she faces the crowd, her mind is empty; this might as well be any other fucking to her. She twitches ever so slightly when your seed flows into her, orgasming robotically to @@.green;applause from your guests.@@ You’ll fuck her repeatedly over the next few days, ensuring impregnation.
<<elseif $activeSlave.devotion+$activeSlave.trust >= 175>>
- Then, you <<if $activeSlave.amp == 1>>gather her up and hold her in front of you, pulling her panties off as you do. Showing considerable dexterity, you maneuver your dick inside her while holding her against your <<if $PC.boobs == 1>>breasts<<else>>chest<</if>><<else>>take her hand and pull her to her feet while she shimmies out of her panties. She cocks her hips for you and you slide your cock inside her before taking her knees and drawing them up to hold her in midair, impaled on you<</if>>. She is left to face your guests, watching raptly as you fuck her fertile cunt. Though her face is towards the crowd, her mind is concentrated on your hard cock, pumping in and out of her at an angle; to her, it's @@.mediumaquamarine;concrete proof that she's special to you.@@ She gasps when your seed flows into her, orgasming herself to @@.green;applause from your guests.@@ You'll fuck her repeatedly over the next few days, ensuring impregnation.
+ Then, you <<if $activeSlave.amp == 1>>gather her up and hold her in front of you, pulling her panties off as you do. Showing considerable dexterity, you maneuver your dick inside her while holding her against your <<if $PC.boobs == 1>>breasts<<else>>chest<</if>><<else>>take her hand and pull her to her feet while she shimmies out of her panties. She cocks her hips for you and you slide your cock inside her before taking her knees and drawing them up to hold her in midair, impaled on you<</if>>. She is left to face your guests, watching raptly as you fuck her fertile <<if $activeSlave.mpreg == 1>>asshole<<else>>cunt<</if>>. Though her face is towards the crowd, her mind is concentrated on your hard cock, pumping in and out of her at an angle; to her, it's @@.mediumaquamarine;concrete proof that she's special to you.@@ She gasps when your seed flows into her, orgasming herself to @@.green;applause from your guests.@@ You'll fuck her repeatedly over the next few days, ensuring impregnation.
<<elseif $activeSlave.devotion < -20 && $activeSlave.trust > 20>>
$activeSlave.slaveName is unwilling, so you gather her up and hold her in front of you, pulling her panties off as you do. She was crying before, but this causes her to tremble and tear up in anticipation of what’s next. Ignoring this, you maneuver your dick inside her while holding her against your <<if $PC.boobs == 1>>breasts<<else>>chest<</if>>.<<if $activeSlave.amp != 1>> Then you pull her knees up to give your guests a good view of the consummation.<</if>> She is left to face them, watching sullenly as you fuck her fertile <<if $activeSlave.mpreg == 1>>asshole<<else>>cunt<</if>>. Though her face is towards the crowd, her mind is concentrated on your hard cock, pumping in and out of her at an angle; to her, this is torture. She gasps when your seed flows into her, faking an orgasm to @@.green;applause from your guests.@@ At this, she shoots you a dirty look, blaming you for this indignity. You’ll fuck her repeatedly over the next few days, ensuring impregnation, despite her efforts to defy you.
<<elseif $activeSlave.devotion < -20>>
diff --git a/src/utility/miscWidgets.tw b/src/utility/miscWidgets.tw
index 5f03c90467ef597f929afb792d6ae442e90fa0e2..5de15393df44b6d3a0256ef3e4f96bad6c380325 100644
--- a/src/utility/miscWidgets.tw
+++ b/src/utility/miscWidgets.tw
@@ -1297,7 +1297,11 @@
%/
<<widget "AddSlave">>
-<<set $args[0].origEye = $args[0].eyeColor>>
+<<switch $args[0].eyeColor>>
+<<case "blind blue">><<set $args[0].origEye = "deep blue">>
+<<case "milky white">><<set $args[0].origEye = either("blue", "green", "brown", "hazel", "light blue", "light green", "dark green", "dark blue">>
+<<default>><<set $args[0].origEye = $args[0].eyeColor>>
+<</switch>>
<<set $args[0].origHColor = $args[0].hColor>>
<<set $args[0].underArmHColor = $args[0].hColor>>
<<set $args[0].pubicHColor = $args[0].hColor>>