From 84fcb4aa3cd8519721fbbf16f05e0c118523fb31 Mon Sep 17 00:00:00 2001
From: Pregmodder <pregmodder@gmail.com>
Date: Fri, 23 Mar 2018 18:36:34 -0400
Subject: [PATCH] finished setPregType implementation and added .hormoneBalance
 setting to incubator.

---
 src/pregmod/incubatorReport.tw              | 31 +++++++++++++++++++++
 src/pregmod/pInsemination.tw                |  4 +--
 src/uncategorized/RESS.tw                   |  6 ++--
 src/uncategorized/dairyReport.tw            |  2 +-
 src/uncategorized/saLongTermEffects.tw      | 22 +++++++--------
 src/uncategorized/servantsQuartersReport.tw |  2 +-
 6 files changed, 49 insertions(+), 18 deletions(-)

diff --git a/src/pregmod/incubatorReport.tw b/src/pregmod/incubatorReport.tw
index 8ad8ea08b74..18b87377623 100644
--- a/src/pregmod/incubatorReport.tw
+++ b/src/pregmod/incubatorReport.tw
@@ -217,6 +217,9 @@
 				Combined with the abundant food provided to her, her body grows rapidly.
 				<<if $tanks[_inc].ovaries == 1>>
 					<<set $tanks[_inc].pubertyXX = 1>>
+					<<if $tanks[_inc].hormoneBalance < 500>>
+						<<set $tanks[_inc].hormoneBalance += 100>>
+					<</if>>
 					<<if $seeHyperPreg == 1>>
 						<<set $tanks[_inc].readyOva = random(25,45)>>
 					<<else>>
@@ -290,6 +293,9 @@
 					<</if>>
 				<<elseif $tanks[_inc].balls > 0>>
 					<<set $tanks[_inc].pubertyXY = 1>>
+					<<if $tanks[_inc].hormoneBalance > -500>>
+						<<set $tanks[_inc].hormoneBalance -= 100>>
+					<</if>>
 					<<if $incubatorUpgradeSpeed == 52>>
 						<<if $tanks[_inc].balls < 40>>
 							The excess testosterone-laced growth hormones @@.green;cause her balls to balloon for extra cum production.@@
@@ -341,6 +347,9 @@
 				Combined with the healthy food provided to her, her body grows readily.
 				<<if $tanks[_inc].ovaries == 1>>
 					<<set $tanks[_inc].pubertyXX = 1>>
+					<<if $tanks[_inc].hormoneBalance < 500>>
+						<<set $tanks[_inc].hormoneBalance += 100>>
+					<</if>>
 					<<if $seeHyperPreg == 1>>
 						<<set $tanks[_inc].readyOva = random(15,25)>>
 					<<else>>
@@ -414,6 +423,9 @@
 					<</if>>
 				<<elseif $tanks[_inc].balls > 0>>
 					<<set $tanks[_inc].pubertyXY = 1>>
+					<<if $tanks[_inc].hormoneBalance > -500>>
+						<<set $tanks[_inc].hormoneBalance -= 100>>
+					<</if>>
 					<<if $incubatorUpgradeSpeed == 52>>
 						<<if $tanks[_inc].balls < 10>>
 							The excess testosterone-laced growth hormones @@.green;cause her balls to balloon for extra cum production.@@
@@ -465,6 +477,9 @@
 				Since her body has little to work with, her growth is fairly minor.
 				<<if $tanks[_inc].ovaries == 1>>
 					<<set $tanks[_inc].pubertyXX = 1>>
+					<<if $tanks[_inc].hormoneBalance < 500>>
+						<<set $tanks[_inc].hormoneBalance += 100>>
+					<</if>>
 					<<if $seeHyperPreg == 1>>
 						<<set $tanks[_inc].readyOva = random(10,15)>>
 					<<else>>
@@ -538,6 +553,9 @@
 					<</if>>
 				<<elseif $tanks[_inc].balls > 0>>
 					<<set $tanks[_inc].pubertyXY = 1>>
+					<<if $tanks[_inc].hormoneBalance > -500>>
+						<<set $tanks[_inc].hormoneBalance -= 100>>
+					<</if>>
 					<<if $incubatorUpgradeSpeed == 52>>
 						<<if $tanks[_inc].balls < 6>>
 							The excess testosterone-laced growth hormones @@.green;cause her balls to grow for extra cum production.@@
@@ -590,6 +608,7 @@
 			Her hormone levels are being carefully managed, @@.green;encouraging early puberty.@@
 			<<if $tanks[_inc].ovaries == 1>>
 				<<set $tanks[_inc].pubertyXX = 1>>
+				<<set $tanks[_inc].hormoneBalance = 250>>
 				<<if $tanks[_inc].boobs < 400 && random(1,100) > 60>>
 					The added estrogen @@.green;causes her breasts to swell.@@
 					<<set $tanks[_inc].boobs += 50>>
@@ -604,6 +623,7 @@
 				<</if>>
 			<<elseif $tanks[_inc].balls > 0>>
 				<<set $tanks[_inc].pubertyXY = 1>>
+				<<set $tanks[_inc].hormoneBalance = -250>>
 				<<if $tanks[_inc].balls < 3 && random(1,100) > 80>>
 					The added testosterone @@.green;causes her balls to swell.@@
 					<<set $tanks[_inc].balls++>>
@@ -614,6 +634,11 @@
 				<</if>>
 			<</if>>
 		<<else>>
+			<<if $tanks[_inc].hormoneBalance > 100>>
+				<<set $tanks[_inc].hormoneBalance -= 50>>
+			<<elseif $tanks[_inc].hormoneBalance < -100>>
+				<<set $tanks[_inc].hormoneBalance += 50>>
+			<</if>>
 			<<if $tanks[_inc].balls > 0>>
 				<<if $tanks[_inc].balls > 1>>
 					<<set $tanks[_inc].balls -= 5>>
@@ -636,6 +661,11 @@
 			<</if>>
 		<</if>>
 	<<else>>
+		<<if $tanks[_inc].hormoneBalance > 100>>
+			<<set $tanks[_inc].hormoneBalance -= 50>>
+		<<elseif $tanks[_inc].hormoneBalance < -100>>
+			<<set $tanks[_inc].hormoneBalance += 50>>
+		<</if>>
 		<<if $tanks[_inc].balls > 0>>
 			<<if $tanks[_inc].balls > 1>>
 				<<set $tanks[_inc].balls -= 5>>
@@ -673,6 +703,7 @@
 	<<set $tanks[_inc].balls = Math.clamp($tanks[_inc].balls, 0, 40)>>
 	<<set $tanks[_inc].boobs = Math.clamp($tanks[_inc].boobs, 0, 30000)>>
 	<<set $tanks[_inc].height = Math.clamp($tanks[_inc].height, 0, 274)>>
+	<<set $tanks[_inc].hormoneBalance = Math.clamp($tanks[_inc].hormoneBalance, -500, 500)>>
 	
 <br>
 <</for>>
diff --git a/src/pregmod/pInsemination.tw b/src/pregmod/pInsemination.tw
index 33956e7ad52..e2de7ce96e8 100644
--- a/src/pregmod/pInsemination.tw
+++ b/src/pregmod/pInsemination.tw
@@ -84,7 +84,7 @@
 		You arrive at the apartment of the rather moody girl with both sets of functional genitals. What answers the door surprises you; she is extremely pregnant, easily ready to drop. Positioning you over the edge of her bed, she mounts you and begins to enjoy herself. Between the sensations within your pussy, <<if $PC.dick == 1>>your dick's motions against her satin sheets,<</if>>and her belly rubbing up and down your ass and lower back; you quickly tense up in orgasm, prompting her to cum strongly into your pussy. You help her onto her couch and head on your way, but not before she informs you that she'll be waiting to fuck you when you are as pregnant as she is now.
 		<<set $preggoCount++>>
 	<<elseif $preggoCount == 1>>
-		You arrive at the apartment of the heavily pregnant futa. When she answers the door and you are greeted by an even larger belly than last time it become abundantly clear that you two are on similar reproductive schedules. Noticing your look, she grabs your hands and happily says "twins". You wrap you arms around your lover for the evening and help her back to her bed, enjoying the weight of her middle. She stops you once she takes a seat and asks "You know, I have some fertility drugs if you want to get as big as me this time, cutey?" You shake your head "no", being that pregnant would certainly impede your ability to run the arcology. She sighs and lies back, her stiff prick pressed against the underside of her belly, and invites you to ride her cock. You waste no time in mounting her, the feel of <<if $PC.dick == 1>>your own erection rubbing between your bellies<<else>>the underside of her pregnancy pushing into your own middle<</if>> as she thrusts up into you driving you wild with lust. It doesn't take long for you to start bucking with orgasm and wrapping your arms around her gravid middle. Her occupants send several kicks your way as she quickens her pace, grabs your hips, and thrusts hard, cumming deep in your pussy. Panting, you slide off her and snuggle up beside her as you catch your breath. "You're looking good after having a child you know? But obviously you looked even better heavy with my child. I'm keeping those pictures of you close!" she says with a giggle as you rise. With a gentle pat on your bottom, she sends you on your way.
+		You arrive at the apartment of the heavily pregnant futa. When she answers the door and you are greeted by an even larger belly than last time it becomes abundantly clear that you two are on similar reproductive schedules. Noticing your look, she grabs your hands and happily says "twins". You wrap you arms around your lover for the evening and help her back to her bed, enjoying the weight of her middle. She stops you once she takes a seat and asks "You know, I have some fertility drugs if you want to get as big as me this time, cutey?" You shake your head "no", being that pregnant would certainly impede your ability to run the arcology. She sighs and lies back, her stiff prick pressed against the underside of her belly, and invites you to ride her cock. You waste no time in mounting her, the feel of <<if $PC.dick == 1>>your own erection rubbing between your bellies<<else>>the underside of her pregnancy pushing into your own middle<</if>> as she thrusts up into you, driving you wild with lust. It doesn't take long for you to start bucking with orgasm and wrapping your arms around her gravid middle. Her occupants send several kicks your way as she quickens her pace, grabs your hips, and thrusts hard, cumming deep in your pussy. Panting, you slide off her and snuggle up beside her as you catch your breath. "You're looking good after having a child you know? But obviously you looked even better heavy with my child. I'm keeping those pictures of you close!" she says with a giggle as you rise. With a gentle pat on your bottom, she sends you on your way.
 		<<set $preggoCount++>>
 	<<else>>
 		You arrive once more at the apartment of the heavily pregnant futa, though this time she takes awhile to reach the door by the sound of it. When it opens, you are greeting by her usual smile and an octuplets stuffed belly. She grabs your hand and pulls it to her taut middle. "Feel them kick! There's so many of them, it feels amazing!" You wrap you arms around your heavy lover for the evening and help her back to her bed, savoring the weight of her pregnancy. She stops you once she takes a seat and asks "My offer still stands, cutey. I assure you it feels amazing to be so full of babies." You shake your head "no", being that pregnant would definitely impede your ability to run the arcology and even enjoy your slaves properly. She lies back, before shifting her weight to her side out of discomfort. Her belly is really big, and hangs low enough that reaching her needy cock is quite the challenge, you take a moment to think of a good position to receive her. You take her dick, and gently sliding yourself between her legs, fit it into your pussy. The two of you buck against each other as best you can; a struggle, seeing as you are bearing the weight of her children right now. You have no choice but to wrap your arms around the eagerly kicking mass<<if $PC.dick == 1>>, trapping your dick between it and yourself,<</if>> as you near your climax. You feel your nethers clamp down as she cums, hard, deep into your pussy. Her children shift under your arms as her water breaks onto you. You quickly untangle yourself and help her to her feet; you can't help but enjoy the feeling of her close contractions under your hand. She points you to her bathroom; "Water birth" she pants, struggling to not give birth where she stands. The tub is already prepared for her, so you help her into it. She refuses to let go of your hand, "Join me?" You take her up on the offer and slide in behind her. You massage her taxed stomach as she struggles to bring her children into the world. A loud moan, escapes her lips as the first of her children slips from her pussy and into your waiting hands. Setting her aside, you prepare for the next. After several hours, and a mutual shower, you and her recover together with her eight children; as thanks, you have one milky nipple all to yourself. When it's time to leave, she blows you a kiss and thanks you sincerely for helping her through this.
@@ -106,6 +106,6 @@
 
 /* You're getting pregnant, period be damned */
 <<set $PC.preg = 1, $PC.pregSource = -1, $PC.pregKnown = 1>>
-<<SetPregType $PC>>
+<<set $PC.pregType = setPregType($PC)>>
 <<set WombImpregnate($PC, $PC.pregType, -1, 1)>>
 
diff --git a/src/uncategorized/RESS.tw b/src/uncategorized/RESS.tw
index ff7c8a3a727..dbbdf11afb3 100644
--- a/src/uncategorized/RESS.tw
+++ b/src/uncategorized/RESS.tw
@@ -3942,7 +3942,7 @@ May I plea<<s>>e try out <<s>>omething <<s>>kimpier today?"
 	<</if>>
 	She enjoys herself immensely, but she loses it again when she feels your seed in her, realizing that she will find herself swelling with your child over the coming months. She has become @@.hotpink;more submissive@@ to your will now that her very first egg has been fertilized by her <<Master>>.
 	<<set $activeSlave.devotion += 5, $activeSlave.preg = 1, $activeSlave.pregWeek = 1, $activeSlave.pregKnown = 1, $activeSlave.pregSource = -1>>
-	<<SetPregType $activeSlave>>
+	<<set $activeSlave.pregType = setPregType($activeSlave)>>
 	<<set WombImpregnate($activeSlave, $activeSlave.pregType, -1, 1)>>
 	<<VaginalVCheck>>
 	<</replace>>
@@ -18120,7 +18120,7 @@ You tell her kindly that you understand, and that she'll be trained to address t
 	<</if>>
 	her youthful partners particularly enjoyed filling her with their potent seed. Unsurprisingly, at a routine check up later that week, $activeSlave.slaveName joyfully discovers that she was impregnated during her Frat House excursion. It seems that being bred by a bunch of horny college boys has eliminated her prior worries about the importance of age and also caused her to @@.lightcoral;fetishize impregnation.@@ @@.hotpink;She has become more submissive to you@@ for giving her the means to broaden her sexual horizons.
 	<<set $activeSlave.devotion += 4, $activeSlave.preg = 1, $activeSlave.pregWeek = 1, $activeSlave.pregKnown = 1>>
-	<<SetPregType $activeSlave>>
+	<<set $activeSlave.pregType = setPregType($activeSlave)>>
 	<<set WombImpregnate($activeSlave, $activeSlave.pregType, 0, 1)>>
 	<<set $activeSlave.fetish = "pregnancy", $activeSlave.fetishKnown = 1, $activeSlave.fetishStrength = 5>>
 	<<if $activeSlave.mpreg == 1>>
@@ -18266,7 +18266,7 @@ You tell her kindly that you understand, and that she'll be trained to address t
 	<</if>>
 	her aged partners particularly enjoyed filling her with their still potent seed. Unsurprisingly, at a routine check up later that week, $activeSlave.slaveName joyfully discovers that she was impregnated during her excursion. It seems that being bred by a bunch of horny old men has eliminated her prior worries about the importance of age and also caused her to @@.lightcoral;fetishize impregnation.@@ @@.hotpink;She has become more submissive to you@@ for giving her the means to broaden her sexual horizons.
 	<<set $activeSlave.devotion += 4, $activeSlave.preg = 1, $activeSlave.pregWeek = 1, $activeSlave.pregKnown = 1>>
-	<<SetPregType $activeSlave>>
+	<<set $activeSlave.pregType = setPregType($activeSlave)>>
 	<<set WombImpregnate($activeSlave, $activeSlave.pregType, 0, 1)>>
 	<<set $activeSlave.fetish = "pregnancy", $activeSlave.fetishKnown = 1, $activeSlave.fetishStrength = 5>>
 	<<if $activeSlave.mpreg == 1>>
diff --git a/src/uncategorized/dairyReport.tw b/src/uncategorized/dairyReport.tw
index 07d43cf37b6..1ca0743f127 100644
--- a/src/uncategorized/dairyReport.tw
+++ b/src/uncategorized/dairyReport.tw
@@ -62,7 +62,7 @@
 			<<set $i = $slaveIndices[$DairyiIDs[_dI]]>>
 			<<if (canImpreg($slaves[$i], $Milkmaid))>>
 				<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = $Milkmaid.ID, $slaves[$i].pregKnown = 1, $slaves[$i].pregWeek = 1, _milkmaidImpregnated++, $slaves[$i].vaginalCount += 10, $vaginalTotal += 10>>
-				<<SetPregType $slaves[$i]>>
+				<<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 				<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, $Milkmaid.ID, 1)>>
 			<</if>>
 		<</for>>
diff --git a/src/uncategorized/saLongTermEffects.tw b/src/uncategorized/saLongTermEffects.tw
index bd0749ef2ba..a53801aecb0 100644
--- a/src/uncategorized/saLongTermEffects.tw
+++ b/src/uncategorized/saLongTermEffects.tw
@@ -4134,7 +4134,7 @@
 	<</if>> /* closes .preg >= 10 */
 
 	<<if ($slaves[$i].preg > 0 && $slaves[$i].pregType == 0)>> //Catch for strange cases - now with checking.
-	 	<<SetPregType $slaves[$i]>> 
+	 	<<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 	 	<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, $slaves[$i].pregSource, $slaves[$i].preg)>>
 	<</if>>
 
@@ -4189,7 +4189,7 @@
 		<</if>>
 	<</if>>
 
-	<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = -1, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<SetPregType $slaves[$i]>>
+	<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = -1, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 	<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, -1, 1)>>
 	<<set $activeSlave = $slaves[$i]>><<if $slaves[$i].mpreg == 1>><<AnalVCheck 10>><<else>><<VaginalVCheck 10>><</if>><<set $slaves[$i] = $activeSlave>>
 
@@ -4284,7 +4284,7 @@
 		<</if>> /* closes not fuckdoll not mindbroken */
 
 		<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = $HeadGirl.ID, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1, $HGCum -= 1, $HeadGirl.penetrativeCount += 10, $penetrativeTotal += 10>>
-		<<SetPregType $slaves[$i]>>
+		<<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 		<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, $HeadGirl.ID, 1)>>
 		<<set $activeSlave = $slaves[$i]>><<if $slaves[$i].mpreg == 1>><<AnalVCheck 10>><<else>><<VaginalVCheck 10>><</if>><<set $slaves[$i] = $activeSlave>>
 		<<for $j = 0; $j < $slaves.length; $j++>>
@@ -4303,14 +4303,14 @@
 	<<case "be your Concubine">>
 		<<if ($PC.dick == 1) && ($slaves[$i].fuckdoll == 0) && ($slaves[$i].fetish != "mindbroken") && ($slaves[$i].eggType == "human")>>
 			As your concubine, she takes care to only share her fertile <<if $slaves[$i].mpreg == 1>>ass<<else>>pussy<</if>> with you. Her efforts paid off; @@.lime;she has become pregnant with your child.@@
-			<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = -1, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<SetPregType $slaves[$i]>>
+			<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = -1, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 			<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, -1, 1)>>
 		<</if>>
 
 	<<case "serve in the master suite">>
 		<<if ($PC.dick == 1) && ($slaves[$i].eggType == "human") && (($slaves[$i].toyHole == "all her holes" && $slaves[$i].mpreg != 1 && $slaves[$i].vagina > 0) || ($slaves[$i].toyHole == "all her holes" && $slaves[$i].mpreg == 1 && $slaves[$i].anus > 0) || ($slaves[$i].toyHole == "pussy" && $slaves[$i].mpreg != 1) || ($slaves[$i].mpreg == 1 && $slaves[$i].toyHole == "ass"))>>
 			You frequently avail yourself to her fertile <<if $slaves[$i].mpreg == 1>>ass<<else>>pussy<</if>>. It's no surprise when @@.lime;she ends up pregnant with your child.@@
-			<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = -1, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<SetPregType $slaves[$i]>>
+			<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = -1, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 			<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, -1, 1)>>
 
 		<<else>> /% look for a random father among master suite slaves %/
@@ -4326,7 +4326,7 @@
 					<</if>>
 					/* found eligible father */
 					After all the unprotected sex $pronoun had this week, it's really no surprise when @@.lime;$pronoun ends up pregnant.@@
-					<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = _msSlaves[_m].ID, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<SetPregType $slaves[$i]>>
+					<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = _msSlaves[_m].ID, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 					<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, $slaves[$i].pregSource, 1)>>
 					<<break>>
 				<</if>>
@@ -4336,21 +4336,21 @@
 	<<case "please you">>
 		<<if ($PC.dick == 1) && ($slaves[$i].eggType == "human") && (($slaves[$i].toyHole == "all her holes" && $slaves[$i].mpreg != 1 && $slaves[$i].vagina > 0) || ($slaves[$i].toyHole == "all her holes" && $slaves[$i].mpreg == 1 && $slaves[$i].anus > 0) || ($slaves[$i].toyHole == "pussy" && $slaves[$i].mpreg != 1) || ($slaves[$i].mpreg == 1 && $slaves[$i].toyHole == "ass"))>>
 			You frequently avail yourself to her fertile <<if $slaves[$i].mpreg == 1>>ass<<else>>pussy<</if>>. It's no surprise when @@.lime;she ends up pregnant with your child.@@
-			<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = -1, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<SetPregType $slaves[$i]>>
+			<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = -1, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 			<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, -1, 1)>>
 		<</if>>
 
 	<<case "work in the brothel" "serve in the club" "whore" "serve the public">>
 		<<if ($slaves[$i].eggType == "human")>>
 			Due to all the citizens cumming in $possessive fertile <<if $slaves[$i].mpreg == 1>>ass<<else>>pussy<</if>>, @@.lime;$pronoun has become pregnant.@@
-			<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = -2, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<SetPregType $slaves[$i]>>
+			<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = -2, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 			<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, -2, 1)>>
 		<</if>>
 
 	<<case "work a glory hole" "be confined in the arcade">>
 		<<if ($slaves[$i].eggType == "human")>>
 			Due to all the customers cumming in $possessive fertile, restrained <<if $slaves[$i].mpreg == 1>>ass<<else>>pussy<</if>>, @@.lime;$pronoun has become pregnant.@@
-			<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = -2, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<SetPregType $slaves[$i]>>
+			<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = -2, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 			<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, -2, 1)>>
 		<</if>>
 
@@ -4401,7 +4401,7 @@
 			<</if>>
 			<<if $slaves[$i].pregSource != 0>>
 				A quick scan after a bout of morning nausea reveals that @@.lime;$pronoun has become pregnant.@@
-				<<set $slaves[$i].preg = 1, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<SetPregType $slaves[$i]>>
+				<<set $slaves[$i].preg = 1, $slaves[$i].pregWeek = 1, $slaves[$i].pregKnown = 1>><<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 				<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, $slaves[$i].pregSource, 1)>>
 			<</if>>
 		<</if>> /* closes random chance and non-zero sex acts check */
@@ -4416,7 +4416,7 @@
 		<<set WombFlush($slaves[$i])>>
 	<</if>>
 <<elseif $slaves[$i].preg > 0 && $slaves[$i].pregType == 0>>
-	<<SetPregType $slaves[$i]>>
+	<<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 	<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, $slaves[$i].pregSource, 1)>>
 <</if>>
 <<if $slaves[$i].readyOva != 0>>
diff --git a/src/uncategorized/servantsQuartersReport.tw b/src/uncategorized/servantsQuartersReport.tw
index 7b1bd4e6a0b..3d699147b79 100644
--- a/src/uncategorized/servantsQuartersReport.tw
+++ b/src/uncategorized/servantsQuartersReport.tw
@@ -51,7 +51,7 @@
 			<<set $i = $slaveIndices[$ServQiIDs[_dI]]>>
 			<<if (canImpreg($slaves[$i], $Stewardess))>>
 				<<KnockMeUp $slaves[$i] 100 2 $Stewardess.ID>>
-				<<set $slaves[$i].preg = 1, $slaves[$i].pregKnown = 1, $slaves[$i].pregWeek = 1, $slaves[$i].pregSource = $Stewardess.ID>><<SetPregType $slaves[$i]>>
+				<<set $slaves[$i].preg = 1, $slaves[$i].pregKnown = 1, $slaves[$i].pregWeek = 1, $slaves[$i].pregSource = $Stewardess.ID>><<set $slaves[$i].pregType = setPregType($slaves[$i])>>
 				<<set WombImpregnate($slaves[$i], $slaves[$i].pregType, $slaves[$i].pregSource, 1)>>
 				<<set $slaves[$i].vagina = Math.clamp($slaves[$i].vagina,1,10), _stewardessImpregnated++, $slaves[$i].vaginalCount += 10, $vaginalTotal += 10>>
 				<<set $slaves[$i].need = 0>>
-- 
GitLab