diff --git a/src/pregmod/managePersonalAffairs.tw b/src/pregmod/managePersonalAffairs.tw
index 1d97c06bba8c0e9c32ac2de9990c33f816855e46..3dd539b8f9e944e7982fabca00364b477712928d 100644
--- a/src/pregmod/managePersonalAffairs.tw
+++ b/src/pregmod/managePersonalAffairs.tw
@@ -314,13 +314,13 @@ __Contraceptives and Fertility__
<span id="miniscene">
<<if $PC.preg < 6 && $PC.pregKnown == 1 && $PC.pregSource != -1>>
- Your period is late, so the first thing you do is test yourself for a potential pregnancy: @@.lime;you are pregnant.@@ <<link "Abort your child">><<replace "#miniscene">><<set $PC.preg = 0, $PC.pregType = 0, $PC.pregSource = 0, $PC.pregKnown = 0>><<print "You take a syringe filled with abortifacients and make your self comfortable. Injecting the vial through your belly into your womb, your close your eyes and wait for what is coming. Once you feel it is over, you clean yourself up and go on your way, child free.">><br> <</replace>><</link>>
+ Your period is late, so the first thing you do is test yourself for a potential pregnancy: @@.lime;you are pregnant.@@ <<link "Abort your child">><<replace "#miniscene">><<set $PC.preg = 0, $PC.pregType = 0, $PC.pregSource = 0, $PC.pregKnown = 0, $PC.pregWeek = 0>><<set wombFlush($PC)>><<print "You take a syringe filled with abortifacients and make your self comfortable. Injecting the vial through your belly into your womb, your close your eyes and wait for what is coming. Once you feel it is over, you clean yourself up and go on your way, child free.">><br> <</replace>><</link>>
<<elseif $PC.labor == 1>>
You are beginning to feel contractions, you'll be giving birth soon.
<<elseif $PC.preg >= 39>>
Your due date is looming, but your child doesn't seem to be interested in coming out just yet. [[Induce childbirth|Manage Personal Affairs][$PC.labor = 1]]
<<elseif $PC.pregKnown == 1 && $PC.pregSource != -1>>
- You're pregnant, something rather unbecoming for an arcology owner. <<link "Abort your child">><<replace "#miniscene">><<set $PC.preg = 0, $PC.pregWeek == -2, $PC.pregType = 0, $PC.pregSource = 0, $PC.belly = 0, $PC.pregKnown = 0>><<print "You take a syringe filled with abortifacients and make your self comfortable. Injecting the vial through your belly into your womb, your close your eyes and wait for what is coming. Once you feel it is over, you clean yourself up and go on your way, child free.">><br> <</replace>><</link>>
+ You're pregnant, something rather unbecoming for an arcology owner. <<link "Abort your child">><<replace "#miniscene">><<set $PC.preg = 0, $PC.pregWeek = -2, $PC.pregType = 0, $PC.pregSource = 0, $PC.belly = 0, $PC.pregKnown = 0>><<set wombFlush($PC)>><<print "You take a syringe filled with abortifacients and make your self comfortable. Injecting the vial through your belly into your womb, your close your eyes and wait for what is coming. Once you feel it is over, you clean yourself up and go on your way, child free.">><br> <</replace>><</link>>
<</if>>
</span>
@@ -382,7 +382,7 @@ In total, you have given birth to:
<<elseif $PC.preg > 1>>
You've missed your period. This could be bad.
<<elseif $PC.preg > 0 && $PC.pregSource != -1>>
- Your fertile pussy has been thoroughly seeded, there is a chance you are pregnant. [[Pop some morning after pills|Manage Personal Affairs][$PC.preg = 0, $PC.pregWeek == 0, $PC.pregKnown = 0, $PC.pregType = 0]]
+ Your fertile pussy has been thoroughly seeded, there is a chance you are pregnant. <<link "Pop some morning after pills">><<set $PC.preg = 0, $PC.pregWeek = 0, $PC.pregType = 0, $PC.pregSource = 0, $PC.pregKnown = 0>><<set wombFlush($PC)>><<goto "Manage Personal Affairs">><</link>>
<<elseif $PC.pregWeek < 0>>
You're still recovering from your recent pregnancy.
<<elseif $PC.preg == -2>>
@@ -427,7 +427,7 @@ In total, you have given birth to:
<br><br>
The tap connected to $dairyName is calling to you. Begging to let it fill you with cum again. If you wanted to try and go bigger, that is.
<br>[[Sounds fun!|FSelf]]
- <br>[[You only want to get pregnant.|Manage Personal Affairs][$PC.preg = 1, $PC.pregSource = 0]]
+ <br><<link "You only want to get pregnant.">><<set $PC.preg = 1, $PC.pregWeek = 1, $PC.pregSource = 0, $PC.pregKnown = 1>><<SetPregType $PC>><<set WombImpregnate($PC, $PC.pregType, 0, 1)>><<goto "Manage Personal Affairs">><</link>>
<</if>>
<</if>>
<<if $PC.vagina == 1 && $PC.dick == 1>>
diff --git a/src/uncategorized/REroyalblood.tw b/src/uncategorized/REroyalblood.tw
index 93375421212642f71cbf5f608fed76bc5f68b61b..2c74d2678f9f69287e6be7d96b0e07bb066e6c08 100644
--- a/src/uncategorized/REroyalblood.tw
+++ b/src/uncategorized/REroyalblood.tw
@@ -577,6 +577,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<set $activeSlave.pregWeek = 7>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
<<set $activeSlave.pubicHStyle = "waxed">>
<<set $activeSlave.shoulders = random(-1,1)>>
@@ -638,6 +639,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<set $activeSlave.pregWeek = 7>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
<<set $activeSlave.pubicHStyle = "waxed">>
<<set $activeSlave.shoulders = random(-1,1)>>
@@ -736,6 +738,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<set $activeSlave.pregWeek = 7>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
<<set $activeSlave.pubicHStyle = "waxed">>
<<set $activeSlave.hips = 1>>
@@ -840,6 +843,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<set $activeSlave.pregWeek = 7>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
<<set $activeSlave.pubicHStyle = "waxed">>
<<set $activeSlave.hips = 1>>
@@ -991,6 +995,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<set $activeSlave.pregWeek = 7>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
<<set $activeSlave.pubicHStyle = "waxed">>
<<set $activeSlave.shoulders = random(-1,1)>>
@@ -1186,6 +1191,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<set $activeSlave.pregWeek = 7>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
<<set $activeSlave.pubicHStyle = "waxed">>
<<set $activeSlave.shoulders = random(-1,1)>>
diff --git a/src/uncategorized/genericPlotEvents.tw b/src/uncategorized/genericPlotEvents.tw
index b6bd1f5c4e95aef75bd8f0e7f7e15c4f9e1079e2..3320b033952bfeb264feab46690c6a81d442d3e8 100644
--- a/src/uncategorized/genericPlotEvents.tw
+++ b/src/uncategorized/genericPlotEvents.tw
@@ -331,7 +331,7 @@ When the aircraft lands at your penthouse pad, the would-be escapees are still u
<<set $one_time_age_overrides_pedo_mode = 1>> /% Old enough to be pregnant. %/
<<include "Generate XX Slave">>
<<set $activeSlave.origin = "She was an expectant mother you enslaved when you evacuated her from a threatened old world hospital.">>
- <<set $activeSlave.career = "a housewife">>
+ <<set $activeSlave.career = "a housewife">>
<<set $activeSlave.devotion = random(-90,-75)>>
<<set $activeSlave.trust = -20>>
<<set $activeSlave.preg = random(28,40)>>
@@ -339,6 +339,7 @@ When the aircraft lands at your penthouse pad, the would-be escapees are still u
<<set $activeSlave.pregKnown = 1>>
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.health = random(-10,10)>>
<<set $activeSlave.vagina = random(1,3)>>
<<set $activeSlave.boobs += 100*random(0,2)>>
@@ -553,10 +554,11 @@ A screen opposite your desk springs to life, <<if $assistant == 0>>showing your
<<for $i = 0; $i < $slaves.length; $i++>>
<<if ($slaves[$i].drugs == "breast injections") && canGetPregnant($slaves[$i])>>
<<set $slaves[$i].preg = 1>>
- <<set $slaves[$i].pregType = random(10,19)>>
+ <<set $slaves[$i].pregType = random(10,25)>>
<<set $activeSlave.pregKnown = 1>>
<<set $activeSlave.pregWeek = 1>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<elseif $slaves[$i].drugs == "breast injections">>
<<set $slaves[$i].lactation = 1>>
<<if $slaves[$i].hips < 1>>
@@ -574,10 +576,11 @@ A screen opposite your desk springs to life, <<if $assistant == 0>>showing your
<<set $slaves[$i].boobs += 300>>
<<elseif ($slaves[$i].drugs == "hyper breast injections") && canGetPregnant($slaves[$i])>>
<<set $slaves[$i].preg = 1>>
- <<set $slaves[$i].pregType = random(20,29)>>
+ <<set $slaves[$i].pregType = random(20,45)>>
<<set $activeSlave.pregKnown = 1>>
<<set $activeSlave.pregWeek = 1>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<elseif $slaves[$i].drugs == "hyper breast injections">>
<<set $slaves[$i].lactation = 1>>
<<if $slaves[$i].hips < 1>>
diff --git a/src/uncategorized/pRivalryActions.tw b/src/uncategorized/pRivalryActions.tw
index 4776931a0883e8548a16a4a12e50f65750f9f1bf..a4f652f354d708ff8ea25e49f1a86aac44705f69 100644
--- a/src/uncategorized/pRivalryActions.tw
+++ b/src/uncategorized/pRivalryActions.tw
@@ -60,6 +60,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = $rivalryDuration>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
<<set $hostage.vagina = 2>>
<<set $hostage.oralCount += 50>>
<<set $hostage.vaginalCount += 50>>
@@ -76,6 +77,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = $rivalryDuration>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
<<set $hostage.vagina = 2>>
<<set $hostage.oralCount += 50>>
<<set $hostage.vaginalCount += 50>>
@@ -282,6 +284,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = $rivalryDuration>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
<<set $hostage.oralCount += 50>>
<<set $hostage.vaginalCount += 50>>
<<set $hostage.analCount += 50>>
@@ -296,6 +299,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = $rivalryDuration>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
<<set $hostage.boobs += 100>>
<<set $hostage.oralCount += 50>>
<<set $hostage.vaginalCount += 50>>
@@ -552,6 +556,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = 12>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
<</if>>
<<if $hostage.vagina < 3>>
<<set $hostage.vagina = 3>>
@@ -587,6 +592,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = $rivalryDuration>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
<<set $hostage.vagina = 3>>
<<set $hostage.boobs += 100>>
<<set $hostage.lactation = 1>>
@@ -608,6 +614,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = $rivalryDuration>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
<<set $hostage.vagina = 3>>
<<set $hostage.boobs += 300>>
<<set $hostage.lactation = 1>>
@@ -860,6 +867,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = $hostage.preg>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
<</if>>
<<if $hostage.vagina < 4>>
<<set $hostage.vagina = 4>>
@@ -891,6 +899,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = $rivalryDuration>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
<<set $hostage.vagina = 4>>
<<set $hostage.boobs += 100>>
<<set $hostage.lactation = 1>>
@@ -909,6 +918,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = $rivalryDuration>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
<<set $hostage.vagina = 4>>
<<set $hostage.boobs += 400>>
<<set $hostage.lactation = 1>>
@@ -1100,6 +1110,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = $hostage.preg>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
<</if>>
<<set $hostage.oralCount += 50>>
<<set $hostage.vaginalCount += 50>>
@@ -1117,37 +1128,39 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
giving an interview. She gushes over how important it is for only the best of society to reproduce, and how it is an atrocity that some people bring so many wasted lives into being.
<<case "Eugenics">>
<<if $seeHyperPreg != 1>>
- <<set $hostage.preg = 1>>
- <<set $hostage.pregType = 8>>
- <<set $hostage.pregKnown = 1>>
- <<set $hostage.pregWeek = 1>>
- <<SetBellySize $hostage>>
- <<set $hostage.vagina = 5>>
- <<if $hostage.births < 1>>
- <<set $hostage.births = 1>>
- <<set $hostage.birthsTotal += 1>>
- <</if>>
- <<set $hostage.oralCount += 100>>
- <<set $hostage.vaginalCount += 100>>
- <<set $hostage.analCount += 100>>
- <<set $hostage.mammaryCount += 100>>
- <<set $activeSlave.bellySag = 2, $activeSlave.bellySagPreg = 2>>
+ <<set $hostage.preg = 1>>
+ <<set $hostage.pregType = 8>>
+ <<set $hostage.pregKnown = 1>>
+ <<set $hostage.pregWeek = 1>>
+ <<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
+ <<set $hostage.vagina = 5>>
+ <<if $hostage.births < 1>>
+ <<set $hostage.births = 1>>
+ <<set $hostage.birthsTotal += 1>>
+ <</if>>
+ <<set $hostage.oralCount += 100>>
+ <<set $hostage.vaginalCount += 100>>
+ <<set $hostage.analCount += 100>>
+ <<set $hostage.mammaryCount += 100>>
+ <<set $activeSlave.bellySag = 2, $activeSlave.bellySagPreg = 2>>
<<else>>
- <<set $hostage.preg = 1>>
- <<set $hostage.pregType = 40>>
- <<set $hostage.pregKnown = 1>>
- <<set $hostage.pregWeek = 1>>
- <<SetBellySize $hostage>>
- <<set $hostage.vagina = 5>>
- <<if $hostage.births < 50>>
- <<set $hostage.births = 20>>
- <<set $hostage.birthsTotal += 20>>
- <</if>>
- <<set $hostage.oralCount += 100>>
- <<set $hostage.vaginalCount += 100>>
- <<set $hostage.analCount += 100>>
- <<set $hostage.mammaryCount += 100>>
- <<set $activeSlave.bellySag = 5, $activeSlave.bellySagPreg = 5>>
+ <<set $hostage.preg = 1>>
+ <<set $hostage.pregType = 40>>
+ <<set $hostage.pregKnown = 1>>
+ <<set $hostage.pregWeek = 1>>
+ <<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
+ <<set $hostage.vagina = 5>>
+ <<if $hostage.births < 50>>
+ <<set $hostage.births = 20>>
+ <<set $hostage.birthsTotal += 20>>
+ <</if>>
+ <<set $hostage.oralCount += 100>>
+ <<set $hostage.vaginalCount += 100>>
+ <<set $hostage.analCount += 100>>
+ <<set $hostage.mammaryCount += 100>>
+ <<set $activeSlave.bellySag = 5, $activeSlave.bellySagPreg = 5>>
<</if>>
giving an interview. She gushes over how important it is for women to conceive and carry as many children as they can, as well as how terrible it is that some people strip away a woman's most important purpose. Before she can continue, her water breaks and she drops to the floor. You close the video in disgust of whats coming.
<<case "Gender Radicalism">>
@@ -1157,6 +1170,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = 8>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
giving an interview. She gushes over how great it feels knowing that someone is always watching out for her safety and health as a traditional woman, as well as how terrible it is that some people want to blur the lines between the genders.
<<case "Gender Fundamentalism">>
<<set $hostage.analCount += 10>>
@@ -1197,6 +1211,7 @@ Your inter-arcology war with the arcology owner behind the Daughters of Liberty
<<set $hostage.pregKnown = 1>>
<<set $hostage.pregWeek = 14>>
<<SetBellySize $hostage>>
+ <<set WombImpregnate($hostage, $hostage.pregType, 0, $hostage.preg)>>
and her owner at the altar during their wedding. It seems she couldn't wait, since her belly already shows signs of an early pregnancy.
<<case "Body Purism">>
<<set $hostage.boobs = 50000>>
diff --git a/src/uncategorized/pRivalryVictory.tw b/src/uncategorized/pRivalryVictory.tw
index db03712cdc56f5a27c77d4526eb235e4963852e4..6212699c36237ca156fea1d49dbbcd1d43a2d5f3 100644
--- a/src/uncategorized/pRivalryVictory.tw
+++ b/src/uncategorized/pRivalryVictory.tw
@@ -369,18 +369,19 @@ For the first time, you receive a direct call from your rival. You pictured the
<<set $activeSlave.preg = 25>>
<<if $seeHyperPreg == 1>>
<<set $activeSlave.vagina = 10>>
- <<set $activeSlave.pregType = random(20,29)>>
+ <<set $activeSlave.pregType = random(20,35)>>
<<set $activeSlave.birthsTotal = random(120,180)>>
<<set $activeSlave.bellySag = 30, $activeSlave.bellySagPreg = 30>>
<<else>>
<<set $activeSlave.vagina = 5>>
- <<set $activeSlave.pregType = either(3,3,4,4,4,5)>>
+ <<set $activeSlave.pregType = either(3,3,4,4,4,5,5,6,6,7,7,8,8,8)>>
<<set $activeSlave.birthsTotal = random(18,27)>>
<<set $activeSlave.bellySag = 2, $activeSlave.bellySagPreg = 2>>
<</if>>
<<set $activeSlave.pregKnown = 1>>
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, 0, $activeSlave.preg)>>
<<set $activeSlave.vaginalSkill = 100>>
<<set $activeSlave.oralSkill = 15>>
<<set $activeSlave.analSkill = 15>>
@@ -505,6 +506,7 @@ For the first time, you receive a direct call from your rival. You pictured the
<<set $activeSlave.pregKnown = 1>>
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, 0, $activeSlave.preg)>>
<<set $activeSlave.vaginalSkill = 100>>
<<set $activeSlave.oralSkill = 100>>
<<set $activeSlave.analSkill = 100>>
diff --git a/src/uncategorized/reFSAcquisition.tw b/src/uncategorized/reFSAcquisition.tw
index 9f7c5d0788293b5498a92c97a54a4640f5635846..ec6cc449fef38e33bb9c96cfcd338699f0b86f3c 100644
--- a/src/uncategorized/reFSAcquisition.tw
+++ b/src/uncategorized/reFSAcquisition.tw
@@ -42,6 +42,7 @@
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+<<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.lactation = 1>>
<<set $activeSlave.vagina = 1>>
<<set $activeSlave.boobs += 200*random(2,5)>>
@@ -232,6 +233,7 @@
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+<<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.vagina = 1>>
<<slaveCost $activeSlave>>
<<set $slaveCost -= 1000>>
@@ -252,6 +254,7 @@
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+<<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.vagina = 1>>
<<set $activeSlave.pregTotal = random(1,3)>>
<<slaveCost $activeSlave>>
diff --git a/src/uncategorized/reRecruit.tw b/src/uncategorized/reRecruit.tw
index 8564a187f75ef41591fe5b1b0618045e458fba85..0e0667db171fcfe86e0792fdb9cb2a14e7567d44 100644
--- a/src/uncategorized/reRecruit.tw
+++ b/src/uncategorized/reRecruit.tw
@@ -173,6 +173,7 @@ One of the tenants in your arcology has not paid rent in some time. In the Free
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+<<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.fetish = "none">>
<<set $activeSlave.fetishKnown = 0>>
<<set $activeSlave.health = random(-40,-20)>>
@@ -202,6 +203,7 @@ A young woman comes to your penthouse for an interview. You accepted her request
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+<<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.eyes = -2>>
<<set $activeSlave.weight = -100>>
<<set $activeSlave.fetish = "none">>
@@ -823,6 +825,7 @@ After the fighting died down, they found a dickgirl inside the compound, harshly
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
<<set $activeSlave.dick = random(1,3)>>
<<set $activeSlave.balls = 0>>
@@ -875,6 +878,7 @@ After the fighting died down, they found a woman inside the compound, harshly us
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
<<set $activeSlave.weight = random(-80,20)>>
<<set $activeSlave.pubicHStyle = "waxed">>
@@ -1076,6 +1080,10 @@ As fate has it, the person calling is the owner of the local race-track, wanting
<<set $activeSlave.labia = 1>>
<<set $activeSlave.ovaries = 1>>
<<set $activeSlave.preg = 1>>
+<<set $activeSlave.pregWeek = 1>>
+<<set $activeSlave.pregType = 1>>
+<<set $activeSlave.pregKnown = 1>>
+<<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.pubicHStyle = "waxed">>
<<set $activeSlave.underArmHStyle = "waxed">>
<<set $activeSlave.height = random(180,200)>>
@@ -1260,6 +1268,7 @@ The current sale offer by the company was taken from a businesswoman's apartment
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+<<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.birthsTotal += 3>>
<<set $activeSlave.pubicHStyle = "waxed">>
<<set $activeSlave.underArmHStyle = "waxed">>
@@ -1697,6 +1706,7 @@ Your desk flags a video message as having potential. It's a desperate refugee fr
<<set $activeSlave.pregWeek = 30>>
<<set $activeSlave.pregKnown = 1>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
As you are heading back to your penthouse from overseeing a promising new store's opening, you noticed a feminine face peeking around a nearby corner. It quickly darts out of sight before a hand beckons you in. The alley isn't particularly out of sight, so no harm looking in. The girl is young, with silver hair, blue eyes, dark skin and<<if $activeSlave.preg > 0>>is enormously pregnant<<else>>a waifish build<</if>>; certainly an eye-catching display. She doesn't seem to speak much $language at all, and judging by her gesturing, is trying to ask you to purchase her.
diff --git a/src/uncategorized/reRelativeRecruiter.tw b/src/uncategorized/reRelativeRecruiter.tw
index 2faccffa5c94275c45f0548e059c2be4f63e9a0f..e8eed19211d2d5c949ed7e731a0181350ed7e2fc 100644
--- a/src/uncategorized/reRelativeRecruiter.tw
+++ b/src/uncategorized/reRelativeRecruiter.tw
@@ -127,6 +127,7 @@
<<set $activeSlave.pregType = 0>>
<<set $activeSlave.pregWeek = 0>>
<<set $activeSlave.pregKnown = 0>>
+ <<set WombFlush($activeSlave)>>
<<SetBellySize $activeSlave>>
$eventSlave.slaveName requests an interview with you. She's a devoted slave, and you grant it, and are happy you did when you see the troubled expression on her face. She explains<<if !canTalk($eventSlave)>> with desperate gestures<</if>> that
@@ -232,6 +233,7 @@ She waits anxiously for your decision.
<<set $activeSlave.pregKnown = 1>>
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
<<set $activeSlave.weight = random(30,135)>>
<<set $activeSlave.muscles = random(0,15)>>
diff --git a/src/uncategorized/resFailure.tw b/src/uncategorized/resFailure.tw
index 0f054652772f4b958ccede829a0d492784722b03..95cebbbf28a2104d16a18641701ec680daeac6fb 100644
--- a/src/uncategorized/resFailure.tw
+++ b/src/uncategorized/resFailure.tw
@@ -117,6 +117,7 @@
<<set $activeSlave.pregKnown = 1>>
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.bellySag = 10>>
<<set $activeSlave.bellySagPreg = 10>>
<<set $activeSlave.hips = either(2, 2, 2, 2, 3)>>
@@ -579,6 +580,7 @@
<<set $activeSlave.pregKnown = 1>>
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
<</if>>
<<set $activeSlave.intelligenceImplant = 1>>
@@ -655,6 +657,7 @@
<<set $activeSlave.pregKnown = 1>>
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
<</if>>
<<set $activeSlave.intelligenceImplant = 1>>
diff --git a/src/uncategorized/seCoursing.tw b/src/uncategorized/seCoursing.tw
index b3e8fc6dce5af89813844317646fce5ece56c60d..d116aee88368674341511a3653ebfef62ee63b60 100644
--- a/src/uncategorized/seCoursing.tw
+++ b/src/uncategorized/seCoursing.tw
@@ -68,6 +68,7 @@ The rules have been explained to the hares: they're to be freed if they can reac
<<set $activeSlave.preg = random(30,40)>>
<<set $activeSlave.pregKnown = 1, $activeSlave.pregType = 1, $activeSlave.pregWeek = $activeSlave.preg>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.ovaries = 1>>
<<set $activeSlave.vaginalSkill = 0>>
<<set $activeSlave.oralSkill = 0>>
diff --git a/src/uncategorized/slaveShelter.tw b/src/uncategorized/slaveShelter.tw
index 75788104e472f4cfac847ce638f11965e776ce06..fa7a0e19d6f42ac8aaec7bb96600066334073ad7 100644
--- a/src/uncategorized/slaveShelter.tw
+++ b/src/uncategorized/slaveShelter.tw
@@ -188,6 +188,7 @@ You contact the Slave Shelter to review the profile of the slave the Shelter is
<<if $shelterSlave.preg > 0>>
<<set $shelterSlave.pregSource = -2, $shelterSlave.pregKnown = 1>>
<<SetPregType $shelterSlave>>
+ <<set WombImpregnate($shelterSlave, $shelterSlave.pregType, $shelterSlave.pregSource, $shelterSlave.preg)>>
<</if>>
<</if>>
<<if $shelterSlave.vagina > -1>>
diff --git a/src/utility/slaveCreationWidgets.tw b/src/utility/slaveCreationWidgets.tw
index 023b05c6395ac627f433fcc79f16e0159750a46a..996d77e54b1d7a7a3788c7fe654b5180c21722f3 100644
--- a/src/utility/slaveCreationWidgets.tw
+++ b/src/utility/slaveCreationWidgets.tw
@@ -2373,6 +2373,7 @@
<<set $activeSlave.pregType = random(3,8)>>
<</if>>
<</if>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.lactation = random(0,1)>>
<<elseif $arcologies[_market].FSRestart > 50>>
They have all been rendered unable to reproduce.
@@ -2428,7 +2429,9 @@
<<set $activeSlave.mpreg = 1>>
<<if isFertile($activeSlave)>>
<<set $activeSlave.preg = random(1,39)>>
+ <<SetPregType $activeSlave>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<</if>>
<</if>>
<<else>>
@@ -2459,7 +2462,9 @@
<<set $activeSlave.preg = 0>> /*removing contraception of default slave generation so isFertile can work right*/
<<if isFertile($activeSlave)>>
<<set $activeSlave.preg = random(1,40)>>
+ <<SetPregType $activeSlave>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.lactation = random(0,1)>>
<</if>>
<</if>>
@@ -2800,6 +2805,10 @@
<<set $activeSlave.health = random(-80,20)>>
<<if $activeSlave.vagina > 1 && isFertile($activeSlave)>>
<<set $activeSlave.preg = either(-2, -1, -1, -1, -1, -1, -1, -1, 1, 20, 40)>>
+ <<if $activeSlave.preg > 0>>
+ <<SetPregType $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
+ <</if>>
<<SetBellySize $activeSlave>>
<</if>>
@@ -2833,6 +2842,10 @@
<<if $activeSlave.vagina > -1>>
<<set $activeSlave.preg = either(-2, -1, -1, -1, -1, -1, -1, -1, 1, 1)>>
<<if $activeSlave.physicalAge < $activeSlave.pubertyAgeXX>><<set $activeSlave.preg = -1>><</if>>
+ <<if $activeSlave.preg > 0>>
+ <<SetPregType $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
+ <</if>>
<<SetBellySize $activeSlave>>
<<set $activeSlave.vaginalSkill = random(15,100)>>
<<set $activeSlave.vagina = random(1,3)>>
@@ -3346,6 +3359,7 @@
<<set $activeSlave.preg = random(10,40)>>
<<set $activeSlave.pregType = random(1,5)>>
<<SetBellySize $activeSlave>>
+ <<set WombImpregnate($activeSlave, $activeSlave.pregType, $activeSlave.pregSource, $activeSlave.preg)>>
<<set $activeSlave.bellySag = 2>>
<<set $activeSlave.bellySagPreg = 2>>
<<set $activeSlave.hips = either(1, 1, 1, 2, 2)>>
@@ -3516,6 +3530,7 @@
<<else>>
<<set $activeSlave.preg = random(1,40)>>
<</if>>
+ <<set WombImpregnate($activeSlave, 1, 0, $activeSlave.preg)>>
<</if>>
<</if>>
<<SetBellySize $activeSlave>>
@@ -3805,6 +3820,7 @@
<<case "Motherly Attendant">>
<<set $activeSlave.devotion = 90, $activeSlave.trust = 90, $activeSlave.health = random(80,95), $activeSlave.fetish = "submissive", $activeSlave.fetishStrength = 100, $activeSlave.face = random(60,90)>>
<<set $activeSlave.career = either("a counselor", "a dispatch officer", "a lifeguard", "a masseuse", "a psychologist", "a therapist"), $activeSlave.birthsTotal = random(1,3), $activeSlave.pregKnown = 1, $activeSlave.preg = random(20,35), $activeSlave.pregWeek = $activeSlave.preg>>
+ <<set WombImpregnate($activeSlave, 1, 0, $activeSlave.preg)>>
<<SetBellySize $activeSlave>>
<<set $activeSlave.actualAge = random(36,$retirementAge-3)>>
<<set $activeSlave.vagina = random(3,4)>>