Merge branch 'pregmod-dev' into 'pregmod-master'

Fixed saPorn redundancy + superfetation work

See merge request pregmodfan/fc-pregmod!4178

devNotes/VersionChangeLog-Premod+LoliMod.txt

@@ -10,6 +10,7 @@ Pregmod
 	-added tracking for futanari sister impregnation
 	-player medicine and trading skill now more useful
 	-easier to passively gain slaving skill
+	-tweaks to FCTV
 	-added overalls outfit
 	-UI changes
 	-slave data structural changes

src/npc/fSlaveImpregConsummate.tw

@@ -2,6 +2,8 @@
 
 The first necessary step is to prepare the donatrix.
 
+<<set _belly = bellyAdjective($activeSlave)>>
+<<set _superfetation = ($activeSlave.geneticQuirks.superfetation == 2 && $activeSlave.pregKnown == 1) ? 1 : 0>>
 <<set _penCountBonus = random(6,20), _analCountBonus = _penCountBonus, _vagCountBonus = _penCountBonus>>
 <<set $impregnatrix.penetrativeCount += _penCountBonus+1, $penetrativeTotal += _penCountBonus+1>>
 <<run clearSummaryCache($activeSlave)>>
@@ -69,7 +71,7 @@ Next, you see to $activeSlave.slaveName.
 <</if>>
 
 <<if ($activeSlave.fetish == "pregnancy") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1) && (($activeSlave.vagina == 0) || (($activeSlave.anus == 0) && ($activeSlave.mpreg == 1)))>>
-	$He cries with joy and presents $his virgin <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>> to $impregnatrix.slaveName for fertilization. @@.hotpink;$He is grateful@@ for this fulfillment of $his fondest wish and naturally @@.lime;will break in $his <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>>.@@
+	$He cries with joy and presents $his virgin <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>> to $impregnatrix.slaveName for <<if _superfetation == 1>>repeat <</if>>fertilization. @@.hotpink;$He is grateful@@ for this fulfillment of $his fondest wish and naturally @@.lime;will break in $his <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>>.@@
 	<<if $activeSlave.mpreg == 1>>
 		<<set $activeSlave.anus = 1>>
 	<<else>>
@@ -78,7 +80,7 @@ Next, you see to $activeSlave.slaveName.
 	<<set $activeSlave.devotion += 10>>
 
 <<elseif ($activeSlave.fetish == "pregnancy") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1) && ($activeSlave.fetishStrength > 60)>>
-	$He cries with joy and presents $his fertile <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>> to $impregnatrix.slaveName for breeding. @@.hotpink;$He is grateful@@ for this fulfillment of $his fondest wish.
+	$He cries with joy and presents $his fertile <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>> to $impregnatrix.slaveName for <<if _superfetation == 1>>further <</if>>breeding. @@.hotpink;$He is grateful@@ for this fulfillment of $his fondest wish.
 	<<set $activeSlave.devotion += 4>>
 
 <<elseif ($activeSlave.devotion > 20) && (($activeSlave.vagina == 0) || (($activeSlave.anus == 0) && ($activeSlave.mpreg == 1)))>>
@@ -91,7 +93,13 @@ Next, you see to $activeSlave.slaveName.
 	<<set $activeSlave.devotion += 10>>
 
 <<elseif ($activeSlave.devotion >= -20) && (($activeSlave.vagina == 0) || (($activeSlave.anus == 0) && ($activeSlave.mpreg == 1)))>>
-	$He is clearly unhappy at the idea of losing $his pearl of great price to $impregnatrix.slaveName; this probably isn't what $he imagined $his first real sex would be like. Worse, $he knows $he's fertile and realizes $he'll likely get pregnant. Nevertheless, @@.hotpink;$he is broken to slavery@@ by this application of $his body, which naturally @@.lime;will break in $his <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>>.@@
+	$He is clearly unhappy at the idea of losing $his pearl of great price to $impregnatrix.slaveName; this probably isn't what $he imagined $his first real sex would be like. Worse, $he knows $he's fertile and realizes
+	<<if _superfetation == 1>>
+		$his existing pregnancy is of little concern to the new life likely to take root in $him.
+	<<else>>
+		$he'll likely get pregnant.
+	<</if>>
+	Nevertheless, @@.hotpink;$he is broken to slavery@@ by this application of $his body, which naturally @@.lime;will break in $his <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>>.@@
 	<<if $activeSlave.mpreg == 1>>
 		<<set $activeSlave.anus = 1>>
 	<<else>>
@@ -110,14 +118,16 @@ Next, you see to $activeSlave.slaveName.
 
 <<elseif ($activeSlave.amp == 1)>>
 	You set $his limbless torso up for $impregnatrix.slaveName.
+<<elseif tooBigBelly($activeSlave)>>
+	You set $him up for $impregnatrix.slaveName, face-down so $he may rest helplessly against $his _belly belly.
 <<elseif tooBigBreasts($activeSlave)>>
-	You set $him up for $impregnatrix.slaveName, face-down so the weight of $his tits pins $him helplessly in place.
+	You set $him up for $impregnatrix.slaveName, face-<<if $activeSlave.belly >= 60000>>up<<else>>down<</if>> so the weight of $his tits pins $him helplessly in place.
 <<elseif tooBigButt($activeSlave)>>
 	You set $him up for $impregnatrix.slaveName, face-down so the weight of $his giant ass pins $him helplessly in place and gives $impregnatrix.slaveName a lovely cushion to thrust against.
 <<elseif tooBigDick($activeSlave)>>
 	You set $him up for $impregnatrix.slaveName, face-up so $he is pinned under the weight of $his giant cock.
 <<elseif tooBigBalls($activeSlave)>>
-	You set $him up for $impregnatrix.slaveName, face-down so the weight of $his giant balls anchor $him helplessly in place.
+	You set $him up for $impregnatrix.slaveName, face-<<if $activeSlave.belly >= 60000>>up<<else>>down<</if>> so the weight of $his giant balls anchor $him helplessly in place.
 <<elseif ($activeSlave.fetish == "submissive") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
 	$He is accustomed to submit to you, but as a natural submissive $he doesn't have much trouble submitting to $impregnatrix.slaveName's seed instead.
 <<elseif $activeSlave.devotion < -20>>
@@ -156,12 +166,12 @@ Next, you see to $activeSlave.slaveName.
 	<</if>>
 
 <<elseif ($impregnatrix.fetish == "pregnancy") && ($impregnatrix.fetishStrength > 60) && ($impregnatrix.devotion > 20) && ($activeSlave.devotion < -20)>>
-	You arrange $activeSlave.slaveName on the couch with $his fertile pussy defenseless and available, and then tell the randy $impregnatrix.slaveName that it's all _hers2. The slave life has so affected $impregnatrix.slaveName that _he2 is quite eager to rape another slave pregnant to fulfill _his2 desire to reproduce. _He2 finishes with indecent speed and looks almost disappointed until you tell _him2 to take _his2 time and be thorough. By the end of the day $activeSlave.slaveName's <<if $activeSlave.mpreg == 1>>ass<<else>>cunt<</if>> is dripping cum, to $his @@.gold;horror@@ and @@.mediumorchid;resentment,@@ while $impregnatrix.slaveName is lying next to $him on the couch in a state of obvious @@.hotpink;satiation and bliss.@@ $impregnatrix.slaveName kisses $activeSlave.slaveName's stomach and expresses the hope that $he'll produce a good new slave.
+	You arrange $activeSlave.slaveName on the couch with $his fertile pussy defenseless and available, and then tell the randy $impregnatrix.slaveName that it's all _hers2. The slave life has so affected $impregnatrix.slaveName that _he2 is quite eager to rape another slave pregnant<<if _superfetation == 1>>, even more so since $he is already with child<</if>> to fulfill _his2 desire to reproduce. _He2 finishes with indecent speed and looks almost disappointed until you tell _him2 to take _his2 time and be thorough. By the end of the day $activeSlave.slaveName's <<if $activeSlave.mpreg == 1>>ass<<else>>cunt<</if>> is dripping cum, to $his @@.gold;horror@@ and @@.mediumorchid;resentment,@@ while $impregnatrix.slaveName is lying next to $him on the couch in a state of obvious @@.hotpink;satiation and bliss.@@ $impregnatrix.slaveName kisses $activeSlave.slaveName's _belly stomach and expresses the hope that $he'll produce a good new slave.
 	<<set $activeSlave.devotion -= 5, $activeSlave.trust -= 5>>
 	<<set $impregnatrix.devotion += 4>>
 
 <<elseif ($impregnatrix.energy > 95) && ($impregnatrix.devotion > 20) && ($activeSlave.devotion < -20)>>
-	You arrange $activeSlave.slaveName on the couch with $his fertile <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>> defenseless and available, and then tell the randy $impregnatrix.slaveName that it's all _hers2. The slave life has so affected $impregnatrix.slaveName that _he2 is quite eager to rape another slave pregnant, just for the perverted novelty of the act. _He2 blows _his2 load with indecent speed and looks crushed until you tell _him2 to take _his2 time and be thorough. By the end of the day $activeSlave.slaveName's <<if $activeSlave.mpreg == 1>>anus<<else>>cunt<</if>> is dripping cum, to $his @@.gold;horror@@ and @@.mediumorchid;resentment,@@ while $impregnatrix.slaveName is lying next to $him on the couch in a state of obvious @@.hotpink;satiation and bliss.@@ $impregnatrix.slaveName kisses $activeSlave.slaveName's stomach and expresses the hope that you'll let _him2 do this again sometime.
+	You arrange $activeSlave.slaveName on the couch with $his fertile <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>> defenseless and available, and then tell the randy $impregnatrix.slaveName that it's all _hers2. The slave life has so affected $impregnatrix.slaveName that _he2 is quite eager to rape another slave pregnant<<if _superfetation == 1>>, especially since $he is already with child<</if>>, just for the perverted novelty of the act. _He2 blows _his2 load with indecent speed and looks crushed until you tell _him2 to take _his2 time and be thorough. By the end of the day $activeSlave.slaveName's <<if $activeSlave.mpreg == 1>>anus<<else>>cunt<</if>> is dripping cum, to $his @@.gold;horror@@ and @@.mediumorchid;resentment,@@ while $impregnatrix.slaveName is lying next to $him on the couch in a state of obvious @@.hotpink;satiation and bliss.@@ $impregnatrix.slaveName kisses $activeSlave.slaveName's _belly stomach and expresses the hope that you'll let _him2 do this again <<if _superfetation == 1>>soon<<else>>sometime<</if>>.
 	<<set $activeSlave.devotion -= 5, $activeSlave.trust -= 5>>
 	<<set $impregnatrix.devotion += 4>>
 
@@ -169,10 +179,10 @@ Next, you see to $activeSlave.slaveName.
 	You order $activeSlave.slaveName onto the couch and tell $impregnatrix.slaveName to get on with it. They fuck mechanically, gazing with roiling emotions into each others' eyes. They do seem to come to some sort of a nonverbal understanding on the necessity of getting it done, and there is no real unhappiness in either of them when they finish and disentangle themselves, with $impregnatrix.slaveName's rapidly softening dick slipping easily out of $activeSlave.slaveName's cum-filled <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>>.
 
 <<elseif ($activeSlave.devotion <= 50) || ($impregnatrix.devotion <= 50)>>
-	You order $activeSlave.slaveName and $impregnatrix.slaveName to get on with it. They fuck mechanically at first, gazing with roiling emotions into each others' eyes. Eventually, they begin to enjoy the extreme intimacy of the act, finding between themselves a hint of a life before slavery, when men and women had sex within the bonds of marriage for the purpose of procreation. They finish and resume life as slaves, the light of this intimacy diminishing, softening with $impregnatrix.slaveName's dick and dripping away with the contents of $activeSlave.slaveName's cum-filled <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>>.
+	You order $activeSlave.slaveName and $impregnatrix.slaveName to get on with it. They fuck mechanically at first, gazing with roiling emotions into each others' eyes. Eventually, they begin to enjoy the extreme intimacy of the act, finding between themselves a hint of a life before slavery, when men and women had sex within the bonds of marriage for the purpose of procreation<<if _superfetation == 1>>, even though one of them is already heavy with child<</if>>. They finish and resume life as slaves, the light of this intimacy diminishing, softening with $impregnatrix.slaveName's dick and dripping away with the contents of $activeSlave.slaveName's cum-filled <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>>.
 
 <<elseif $activeSlave.mpreg == 1>>
-	The parents-to-be need little encouragement. They embrace happily and turn eagerly to the business of anal sex in the cowgirl position. They take their time, humping slowly and gazing into each others' eyes. After a little while, though, $activeSlave.slaveName looks over to where you're sitting, the invitation clear in $his eyes. As soon as you stand to come over, $activeSlave.slaveName turns around on $impregnatrix.slaveName's cock and opens wide for you. You and $impregnatrix.slaveName enjoy the mother-to-be gently until $he climaxes, $his eager oral reaching a fever pitch, bringing you to your own climax.
+	The parents-to-be need little encouragement. They embrace happily and turn eagerly to the business of anal sex in <<if $activeSlave.belly+$impregnatrix.belly >= 5000>>an awkward<<else>>the<</if>> cowgirl position. They take their time, humping slowly and gazing into each others' eyes. After a little while, though, $activeSlave.slaveName looks over to where you're sitting, the invitation clear in $his eyes. As soon as you stand to come over, $activeSlave.slaveName turns around on $impregnatrix.slaveName's cock and opens wide for you. You and $impregnatrix.slaveName enjoy the <<if _superfetation == 1>>gravid $girl<<else>>mother-to-be<</if>> gently until $he climaxes, $his eager oral reaching a fever pitch, bringing you to your own climax.
 	<<if $PC.dick == 1>>
 		<<if canDoVaginal($impregnatrix)>>
 			Pulling out, you flip them again so that $impregnatrix.slaveName is on top and switch to _his2 pussy instead, stimulating _his2 <<if $impregnatrix.prostate != 0>>prostate<<else>>internals<</if>> with a good fucking until _he2 blows _his2 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.
@@ -222,7 +232,7 @@ Next, you see to $activeSlave.slaveName.
 
 <<else>>
 	<<set _didImpregnatrix = 0>>
-	The parents-to-be need little encouragement. They embrace happily and turn eagerly to the business of vanilla sex in the missionary position. They take their time, humping slowly and gazing into each others' eyes. After a little while, though, $activeSlave.slaveName looks over $impregnatrix.slaveName's shoulder to where you're sitting, the invitation clear in $his eyes. As soon as you stand to come over, they roll over without being ordered to
+	The parents-to-be need little encouragement. They embrace happily and turn eagerly to the business of vanilla sex in <<if $activeSlave.belly+$impregnatrix.belly >= 5000>>an awkward<<else>>the<</if>> missionary position. They take their time, humping slowly and gazing into each others' eyes. After a little while, though, $activeSlave.slaveName looks over $impregnatrix.slaveName's shoulder to where you're sitting, the invitation clear in $his eyes. As soon as you stand to come over, they roll over without being ordered to
 	<<if canDoAnal($activeSlave)>>
 		present $activeSlave.slaveName's butthole.
 		<<set $activeSlave.analCount += _penCountBonus, $analTotal += _penCountBonus>>
@@ -230,7 +240,7 @@ Next, you see to $activeSlave.slaveName.
 		invite you into $activeSlave.slaveName's crowded pussy.
 		<<set $activeSlave.vaginalCount += _penCountBonus, $vaginalTotal += _penCountBonus>>
 	<</if>>
-	You and $impregnatrix.slaveName double penetrate the mother-to-be gently until $he climaxes, clenching you to orgasm in turn with $his spasms. Pulling out, you offer <<if $PC.dick ==1>>yourself<<else>>your strap-on<</if>> to $activeSlave.slaveName's gasping mouth so $he can <<if $PC.dick ==1>>suck you hard again<<else>>lube the phallus with some saliva<</if>> as $he continues riding cock. Once <<if $PC.dick ==1>>stiff<<else>>the strap-on is nice and wet<</if>>, you flip them again so that $impregnatrix.slaveName is back on top and switch to _his2
+	You and $impregnatrix.slaveName double penetrate the <<if _superfetation == 1>>gravid $girl<<else>>mother-to-be<</if>> gently until $he climaxes, clenching you to orgasm in turn with $his spasms. Pulling out, you offer <<if $PC.dick ==1>>yourself<<else>>your strap-on<</if>> to $activeSlave.slaveName's gasping mouth so $he can <<if $PC.dick ==1>>suck you hard again<<else>>lube the phallus with some saliva<</if>> as $he continues riding cock. Once <<if $PC.dick ==1>>stiff<<else>>the strap-on is nice and wet<</if>>, you flip them again so that $impregnatrix.slaveName is back on top and switch to _his2
 	<<if canDoVaginal($activeSlave)>>
 		feminine slit instead, stimulating _his2 <<if $impregnatrix.prostate != 0>>prostate<<else>>internals<</if>> with a hard fucking
 		<<set _didImpregnatrix = 1>>
@@ -270,7 +280,12 @@ Next, you see to $activeSlave.slaveName.
 
 <</if>>
 
-Throughout the week, you keep $activeSlave.slaveName's <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>> intimate with $impregnatrix.slaveName's cock. In the end, you are certain $activeSlave.slaveName is carrying $impregnatrix.slaveName's child.
+Throughout the week, you keep $activeSlave.slaveName's <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>> intimate with $impregnatrix.slaveName's cock. In the end, you are certain $activeSlave.slaveName
+<<if _superfetation == 1>>
+	has @@.lime;added $impregnatrix.slaveName's child@@ to $his pregnancy.
+<<else>>
+	is @@.lime;carrying $impregnatrix.slaveName's child.@@
+<</if>>
 
 
 <<if $arcologies[0].FSRestart != "unset" && $eugenicsFullControl != 1>>

src/pregmod/saPorn.tw

@@ -2007,7 +2007,7 @@
 				<<set $slaves[$i].pornPrestige = 3, $slaves[$i].porn.fame.boobs = 250000, $pornStarBoobsID = $slaves[$i].ID>>
 				<<set $slaves[$i].pornFame = $slaves[$i].porn.fame.boobs>>
 				<<set $slaves[$i].pornPrestigeDesc = "She is world famous for her career in slave pornography. Millions are intimately familiar with her breasts.">>
-				@@.green;$He has become world famous for $his career in $slaves[$i].porn.fameType pornography!@@ Millions are now intimately familiar with $his breasts, so it is now extremely prestigious to own $him, so it is now extremely prestigious to own $him.
+				@@.green;$He has become world famous for $his career in $slaves[$i].porn.fameType pornography!@@ Millions are now intimately familiar with $his breasts, so it is now extremely prestigious to own $him.
 				<<set _desc = "a framed shot from porn starring " + $slaves[$i].slaveName + " showing her bare chest">>
 				<<set $trinkets.push(_desc)>>
 			<<elseif $slaves[$i].porn.fame.boobs < 40000>>