Skip to content
Snippets Groups Projects
Commit 8d79fbdd authored by Pregmodder's avatar Pregmodder
Browse files

More player centered incest.

parent af818275
Branches
Tags
4 merge requests!843Delete Please.,!833Pregmod master,!758Pregmod master,!142Pregmod 0.10.0.0a v58
Hide whitespace changes
Inline Side-by-side
src/uncategorized/assistantEvents.tw
+ 53
− 0
View file @ 8d79fbdd
......@@ -778,6 +778,47 @@ of your personal assistant pops up on the nearest screen. "<<if $PC.title != 0>
casts a spell to make herself appear Chinese; she succeeds in swapping the material of her robes to a fine silk.
<</if>>
<<case "ERROR_1606_APPEARANCE_FILE_CORRUPT">>
<<if $arcologies[0].FSPaternalist != "unset">>
adjusts her appearance to be conservative to conform with your vision of a well-bred race of slaves.
<<elseif $arcologies[0].FSGenderRadicalist != "unset">>
adjusts her appearance to be androgynous to conform with your vision of gender being defined by power.
<<elseif $arcologies[0].FSGenderFundamentalist != "unset">>
adjusts her appearance to be feminine to conform with your vision of preserving traditional gender roles.
<<elseif $arcologies[0].FSDegradationist != "unset">>
adjusts her appearance to include odly fleshy piercings to conform with your vision that slaves are not human and should be thoroughly degraded.
<<elseif $arcologies[0].FSRepopulationFocus != "unset">>
bulges her middle to look pregnant to conform with your vision that all wombs should be filled.
<<elseif $arcologies[0].FSRestart != "unset">>
adjusts her appearance to be oddly flawless.
<<elseif $arcologies[0].FSBodyPurist != "unset">>
adjusts her appearance to look somewhat natural to conform with your vision of an implant free society.
<<elseif $arcologies[0].FSTransformationFetishist != "unset">>
inflates her breasts until they are comically huge, rounded and jiggling ominously to conform with your vision of a society focused on implants, alterations, and modifications.
<<elseif $arcologies[0].FSYouthPreferentialist != "unset">>
adopts a youthful appearance to conform with your vision of a society glorifying young ladies.
<<elseif $arcologies[0].FSMaturityPreferentialist != "unset">>
adopts a mature appearance to conform with your vision of a society glorifying older ladies.
<<elseif $arcologies[0].FSSlimnessEnthusiast != "unset">>
adopts a slimmer appearance to conform with your vision of a society glorifying lithe ladies.
<<elseif $arcologies[0].FSAssetExpansionist != "unset">>
swells her breasts until they are bigger than her head, and moving oddly, to conform with your vision that bigger is better.
<<elseif $arcologies[0].FSPastoralist != "unset">>
starts lactating a strange fluid to conform with your vision that slaves should be milked.
<<elseif $arcologies[0].FSPhysicalIdealist != "unset">>
adjusts her appearance to be outragously bulky to conform with your vision that all slaves should be tall and strong.
<<elseif $arcologies[0].FSChattelReligionist != "unset">>
adjusts her outfit to prominently display a religious symbol of your new religion.
<<elseif $arcologies[0].FSRomanRevivalist != "unset">>
adjusts her form to a Roman woman to conform with your vision of building a new Rome.
<<elseif $arcologies[0].FSEgyptianRevivalist != "unset">>
adjusts her form to an Egyptian woman to conform with your vision of building a new land of the Pharaohs.
<<elseif $arcologies[0].FSEdoRevivalist != "unset">>
adjusts her form to a Japanese woman to conform with your vision of building new a Edo Japan.
<<elseif $arcologies[0].FSArabianRevivalist != "unset">>
adjusts her form to an Arabian woman to conform with your vision of building a new Sultanate.
<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
adjusts her form to a Chinese woman to conform with your vision of pursuing the Mandate of Heaven.
<</if>>
<<case "schoolgirl">>
<<if $arcologies[0].FSPaternalist != "unset">>
adjusts her appearance to be more prim and proper to conform with your vision of a well-bred race of slaves.
......@@ -850,6 +891,18 @@ Suddenly, there is a fresh source of light behind you. The reflection you're loo
She has her hands behind her back and is glancing at the ground submissively.
<<case "preggololi">>
She has her hands on her pregnant belly, she is rubbing it nervously.
<<case "angel">>
She is kneeling, deep in prayer.
<<case "cherub" "imp">>
She is on her feet, submissively rubbing a wing.
<<case "incubus">>
She looking down, hands crossed over her seldomly flaccid penis.
<<case "succubus">>
She isn't trying to seduce you, instead appearing uncharacteristically unsure of herself.
<<case "witch">>
She isn't trying to cast or learn any spells, instead choosing to study you instead.
<<case "ERROR_1606_APPEARANCE_FILE_CORRUPT">>
She has supressed her odd ticks and is managing to stand before you, almost appearing normal.
<<case "schoolgirl">>
She has her legs crossed and her hands clasped behind her, and is turning her body from side to side in girlish nervousness.
<<default>>
......
src/uncategorized/saRelationships.tw
+ 245
− 1
View file @ 8d79fbdd
......@@ -315,7 +315,7 @@
<<elseif _SlaveI.behavioralQuirk is "sinful">>
is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own father.
<<elseif _SlaveI.devotion > 75>>
is so devoted to you that she accepts carrying on an incestuous relationship with her own mother.
is so devoted to you that she accepts carrying on an incestuous relationship with her own father.
<<elseif _SlaveI.devotion > 50>>
is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own father.
<<set _SlaveI.devotion -= 2>>
......@@ -361,6 +361,128 @@
<</if>>
<</if>>
<</if>>
<<elseif $PC.mother == _SlaveI.ID || $PC.father == _SlaveI.ID>>
She
<<if _SlaveI.sexualQuirk is "perverted">>
is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own daughter.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.devotion > 95>>
is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own daughter.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.behavioralQuirk is "sinful">>
is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own daughter.
<<elseif _SlaveI.devotion > 75>>
is so devoted to you that she accepts carrying on an incestuous relationship with her own daughter.
<<elseif _SlaveI.devotion > 50>>
is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own daughter.
<<set _SlaveI.devotion -= 2>>
<<elseif _SlaveI.devotion > 20>>
is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own daughter.
<<set _SlaveI.devotion -= 2>>
<<set _SlaveI.trust -= 2>>
<<else>>
is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own daughter.
<<set _SlaveI.devotion -= 4>>
<<set _SlaveI.trust -= 4>>
<</if>>
<<if _SlaveI.preg > 0>>
<<if _SlaveI.pregSource == -1>>
<<if _SlaveI.sexualQuirk is "perverted">>
She's even @@color:hotpink;aroused@@ by the constant awareness that her daughter is the parent of the daughter<<if _SlaveI.pregType > 1>>s<</if>> she's carrying.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.behavioralQuirk is "sinful">>
Her feelings about carrying her daughter's child<<if _SlaveI.pregType > 1>>ren<</if>> are @@color:hotpink;secretly less mixed,@@ though.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.devotion > 95>>
She occasionally remembers that she's carrying her daughter's child<<if _SlaveI.pregType > 1>>ren<</if>>, but does her best to accept it by not thinking about it.
<<elseif _SlaveI.devotion > 50>>
She's @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her daughter's, though she tries her best not to think about it.
<<set _SlaveI.devotion -= 1>>
<<elseif _SlaveI.devotion > 20>>
She's so @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her daughter's that she often wakes up crying about it.
<<set _SlaveI.devotion -= 2>>
<<else>>
She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
<<set _SlaveI.devotion -= 4>>
<</if>>
<</if>>
<</if>>
<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
Society @@color:green;strongly approves@@ of your incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
<<if _SlaveI.preg > 0>>
<<if _SlaveI.pregSource == $relation.ID>>
@@color:green;The effect is greatly enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
<</if>>
<</if>>
<</if>>
<<elseif areSisters(_SlaveI, $PC) > 0>>
<<set _PCrelative = areSisters(_SlaveI, $PC)>>
<<if _PCrelative == 1>>
<<set _PCrelative = "twin">>
<<elseif _PCrelative == 2>>
<<set _PCrelative = "sister">>
<<elseif _PCrelative == 3>>
<<set _PCrelative = "half-sister">>
<</if>>
She
<<if _SlaveI.sexualQuirk is "perverted">>
is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own _PCrelative.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.devotion > 95>>
is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own _PCrelative.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.behavioralQuirk is "sinful">>
is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own _PCrelative.
<<elseif _SlaveI.devotion > 75>>
is so devoted to you that she accepts carrying on an incestuous relationship with her own mother.
<<elseif _SlaveI.devotion > 50>>
is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own _PCrelative.
<<set _SlaveI.devotion -= 2>>
<<elseif _SlaveI.devotion > 20>>
is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own _PCrelative.
<<set _SlaveI.devotion -= 2>>
<<set _SlaveI.trust -= 2>>
<<else>>
is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own _PCrelative.
<<set _SlaveI.devotion -= 4>>
<<set _SlaveI.trust -= 4>>
<</if>>
<<if _SlaveI.preg > 0>>
<<if _SlaveI.pregSource == -1>>
<<if _SlaveI.sexualQuirk is "perverted">>
She's even @@color:hotpink;aroused@@ by the constant awareness that her _PCrelative is the parent of the daughter<<if _SlaveI.pregType > 1>>s<</if>> she's carrying.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.behavioralQuirk is "sinful">>
Her feelings about carrying her <<print _PCrelative>>'s child<<if _SlaveI.pregType > 1>>ren<</if>> are @@color:hotpink;secretly less mixed,@@ though.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.devotion > 95>>
She occasionally remembers that she's carrying her <<print _PCrelative>>'s child<<if _SlaveI.pregType > 1>>ren<</if>>, but does her best to accept it by not thinking about it.
<<elseif _SlaveI.devotion > 50>>
She's @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her <<print _PCrelative>>'s, though she tries her best not to think about it.
<<set _SlaveI.devotion -= 1>>
<<elseif _SlaveI.devotion > 20>>
She's so @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her <<print _PCrelative>>'s that she often wakes up crying about it.
<<set _SlaveI.devotion -= 2>>
<<else>>
She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
<<set _SlaveI.devotion -= 4>>
<</if>>
<</if>>
<</if>>
<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
Society @@color:green;strongly approves@@ of your incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
<<if _SlaveI.preg > 0>>
<<if _SlaveI.pregSource == $relation.ID>>
@@color:green;The effect is greatly enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
<</if>>
<</if>>
<</if>>
<</if>>
<<if (_SlaveI.devotion + _SlaveI.trust < 150)>>
<<if random(1, 100) > 50>>
......@@ -496,6 +618,128 @@
<</if>>
<</if>>
<</if>>
<<elseif $PC.mother == _SlaveI.ID || $PC.father == _SlaveI.ID>>
She
<<if _SlaveI.sexualQuirk is "perverted">>
is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own daughter.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.devotion > 95>>
is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own daughter.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.behavioralQuirk is "sinful">>
is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own daughter.
<<elseif _SlaveI.devotion > 75>>
is so devoted to you that she accepts carrying on an incestuous relationship with her own daughter.
<<elseif _SlaveI.devotion > 50>>
is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own daughter.
<<set _SlaveI.devotion -= 2>>
<<elseif _SlaveI.devotion > 20>>
is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own daughter.
<<set _SlaveI.devotion -= 2>>
<<set _SlaveI.trust -= 2>>
<<else>>
is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own daughter.
<<set _SlaveI.devotion -= 4>>
<<set _SlaveI.trust -= 4>>
<</if>>
<<if _SlaveI.preg > 0>>
<<if _SlaveI.pregSource == -1>>
<<if _SlaveI.sexualQuirk is "perverted">>
She's even @@color:hotpink;aroused@@ by the constant awareness that her daughter is the parent of the daughter<<if _SlaveI.pregType > 1>>s<</if>> she's carrying.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.behavioralQuirk is "sinful">>
Her feelings about carrying her daughter's child<<if _SlaveI.pregType > 1>>ren<</if>> are @@color:hotpink;secretly less mixed,@@ though.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.devotion > 95>>
She occasionally remembers that she's carrying her daughter's child<<if _SlaveI.pregType > 1>>ren<</if>>, but does her best to accept it by not thinking about it.
<<elseif _SlaveI.devotion > 50>>
She's @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her daughter's, though she tries her best not to think about it.
<<set _SlaveI.devotion -= 1>>
<<elseif _SlaveI.devotion > 20>>
She's so @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her daughter's that she often wakes up crying about it.
<<set _SlaveI.devotion -= 2>>
<<else>>
She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
<<set _SlaveI.devotion -= 4>>
<</if>>
<</if>>
<</if>>
<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
Society @@color:green;strongly approves@@ of your incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
<<if _SlaveI.preg > 0>>
<<if _SlaveI.pregSource == $relation.ID>>
@@color:green;The effect is greatly enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
<</if>>
<</if>>
<</if>>
<<elseif areSisters(_SlaveI, $PC) > 0>>
<<set _PCrelative = areSisters(_SlaveI, $PC)>>
<<if _PCrelative == 1>>
<<set _PCrelative = "twin">>
<<elseif _PCrelative == 2>>
<<set _PCrelative = "sister">>
<<elseif _PCrelative == 3>>
<<set _PCrelative = "half-sister">>
<</if>>
She
<<if _SlaveI.sexualQuirk is "perverted">>
is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own _PCrelative.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.devotion > 95>>
is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own _PCrelative.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.behavioralQuirk is "sinful">>
is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own _PCrelative.
<<elseif _SlaveI.devotion > 75>>
is so devoted to you that she accepts carrying on an incestuous relationship with her own mother.
<<elseif _SlaveI.devotion > 50>>
is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own _PCrelative.
<<set _SlaveI.devotion -= 2>>
<<elseif _SlaveI.devotion > 20>>
is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own _PCrelative.
<<set _SlaveI.devotion -= 2>>
<<set _SlaveI.trust -= 2>>
<<else>>
is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own _PCrelative.
<<set _SlaveI.devotion -= 4>>
<<set _SlaveI.trust -= 4>>
<</if>>
<<if _SlaveI.preg > 0>>
<<if _SlaveI.pregSource == -1>>
<<if _SlaveI.sexualQuirk is "perverted">>
She's even @@color:hotpink;aroused@@ by the constant awareness that her _PCrelative is the parent of the daughter<<if _SlaveI.pregType > 1>>s<</if>> she's carrying.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.behavioralQuirk is "sinful">>
Her feelings about carrying her <<print _PCrelative>>'s child<<if _SlaveI.pregType > 1>>ren<</if>> are @@color:hotpink;secretly less mixed,@@ though.
<<set _SlaveI.devotion += 1>>
<<elseif _SlaveI.devotion > 95>>
She occasionally remembers that she's carrying her <<print _PCrelative>>'s child<<if _SlaveI.pregType > 1>>ren<</if>>, but does her best to accept it by not thinking about it.
<<elseif _SlaveI.devotion > 50>>
She's @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her <<print _PCrelative>>'s, though she tries her best not to think about it.
<<set _SlaveI.devotion -= 1>>
<<elseif _SlaveI.devotion > 20>>
She's so @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her <<print _PCrelative>>'s that she often wakes up crying about it.
<<set _SlaveI.devotion -= 2>>
<<else>>
She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
<<set _SlaveI.devotion -= 4>>
<</if>>
<</if>>
<</if>>
<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
Society @@color:green;strongly approves@@ of your incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
<<if _SlaveI.preg > 0>>
<<if _SlaveI.pregSource == $relation.ID>>
@@color:green;The effect is greatly enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
<</if>>
<</if>>
<</if>>
<</if>>
<<if (_SlaveI.devotion + _SlaveI.trust < 150)>>
<<if random(1, 100) > 50>>
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment