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

Merge branch 'pRaped-to-local' into 'pregmod-master' 

pRaped $activeSlave to local

See merge request pregmodfan/fc-pregmod!7810
parents f48a55a6 0236b386
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 61 additions and 61 deletions
src/pregmod/pRaped.tw
+ 61
− 61
View file @ d0e5ace3
...@@ -12,29 +12,29 @@ ...@@ -12,29 +12,29 @@
<</if>> <</if>>
<<set _genParam = {minAge: 16, race: _race, disableDisability: 1}>> <<set _genParam = {minAge: 16, race: _race, disableDisability: 1}>>
<<if $PC.vagina >= 0>> <<if $PC.vagina >= 0>>
<<set $activeSlave = GenerateNewSlave("XY", _genParam)>> <<set _rapist = GenerateNewSlave("XY", _genParam)>>
<<set $activeSlave.dick = 6>> <<set _rapist.dick = 6>>
<<set $activeSlave.balls = 5>> <<set _rapist.balls = 5>>
<<set $activeSlave.boobs = 0>> <<set _rapist.boobs = 0>>
<<set $activeSlave.waist = 50>> <<set _rapist.waist = 50>>
<<set $activeSlave.skill.oral = 0>> <<set _rapist.skill.oral = 0>>
<<set $activeSlave.skill.anal = 0>> <<set _rapist.skill.anal = 0>>
<<else>> <<else>>
<<set $activeSlave = GenerateNewSlave("XX", _genParam)>> <<set _rapist = GenerateNewSlave("XX", _genParam)>>
<<set $activeSlave.vagina = 1>> <<set _rapist.vagina = 1>>
<<set $activeSlave.preg = 0>> <<set _rapist.preg = 0>>
<<set $activeSlave.weight = random(-20,30)>> <<set _rapist.weight = random(-20,30)>>
<<set $activeSlave.waist = -20>> <<set _rapist.waist = -20>>
<</if>> <</if>>
<<set $activeSlave.origin = "You sentenced $him to enslavement for the attempted rape of a free " + _womanP + ".">> <<set _rapist.origin = "You sentenced $him to enslavement for the attempted rape of a free " + _womanP + ".">>
<<set $activeSlave.devotion = -100>> <<set _rapist.devotion = -100>>
<<set $activeSlave.trust = -100>> <<set _rapist.trust = -100>>
<<run setHealth($activeSlave, jsRandom(-40, -20), normalRandInt(15, 3), undefined, 1, jsRandom(30, 80))>> <<run setHealth(_rapist, jsRandom(-40, -20), normalRandInt(15, 3), undefined, 1, jsRandom(30, 80))>>
<<set $activeSlave.anus = 0>> <<set _rapist.anus = 0>>
<<set $activeSlave.behavioralFlaw = "arrogant">> <<set _rapist.behavioralFlaw = "arrogant">>
<<set $activeSlave.sexualFlaw = "judgemental">> <<set _rapist.sexualFlaw = "judgemental">>
<<setLocalPronouns $activeSlave>> <<setLocalPronouns _rapist>>
While returning from a meeting with a prospective investor, an unfortunate wrong turn has led you into a rather seedy area of your arcology. You feel distinctly uncomfortable for some reason. While returning from a meeting with a prospective investor, an unfortunate wrong turn has led you into a rather seedy area of your arcology. You feel distinctly uncomfortable for some reason.
...@@ -232,100 +232,100 @@ While returning from a meeting with a prospective investor, an unfortunate wrong ...@@ -232,100 +232,100 @@ While returning from a meeting with a prospective investor, an unfortunate wrong
Now the only question is what to do with the would-be rapist. You could toss them out of the arcology, but it might be more fun to turn the tables on $him. Now the only question is what to do with the would-be rapist. You could toss them out of the arcology, but it might be more fun to turn the tables on $him.
<<set _ContractCost = 1000>> <<set _ContractCost = 1000>>
<<set _slaveCost = slaveCost($activeSlave)>> <<set _slaveCost = slaveCost(_rapist)>>
<<set _slaveCost -= 1000>> <<set _slaveCost -= 1000>>
<br> <br>
//Applying enslavement as punishment will cost <<print cashFormat(_ContractCost)>>. Doing so and then selling $him immediately will bring in approximately <<print cashFormat(_slaveCost)>>.// //Applying enslavement as punishment will cost <<print cashFormat(_ContractCost)>>. Doing so and then selling $him immediately will bring in approximately <<print cashFormat(_slaveCost)>>.//
<br> <br>
<<includeDOM App.Desc.longSlave(V.activeSlave, {market: "generic"})>> <<includeDOM App.Desc.longSlave(_rapist, {market: "generic"})>>
<span id="result"> <span id="result">
<<if $cash >= _ContractCost>> <<if $cash >= _ContractCost>>
<br><<link "Enslave $him">> <br><<link "Enslave $him">>
<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $activeSlave)>> <<run cashX(forceNeg(_ContractCost), "slaveTransfer", _rapist)>>
<<replace "#result">> <<replace "#result">>
You complete the legalities and biometric scanning quickly and without fuss. The idiot will regret crossing you when $he wakes in the penthouse for basic slave induction. You complete the legalities and biometric scanning quickly and without fuss. The idiot will regret crossing you when $he wakes in the penthouse for basic slave induction.
<<includeDOM App.UI.newSlaveIntro($activeSlave)>> <<includeDOM App.UI.newSlaveIntro(_rapist)>>
<</replace>> <</replace>>
<</link>> <</link>>
<br><<link "Sentence $him to a day in the stocks, then enslave $him">> <br><<link "Sentence $him to a day in the stocks, then enslave $him">>
<<run healthDamage($activeSlave, 10)>> <<run healthDamage(_rapist, 10)>>
<<set $activeSlave.behavioralFlaw = "odd">> <<set _rapist.behavioralFlaw = "odd">>
<<set $activeSlave.sexualFlaw = "hates penetration">> <<set _rapist.sexualFlaw = "hates penetration">>
<<set $activeSlave.anus = 2>> <<set _rapist.anus = 2>>
<<run seX($activeSlave, "oral", "public", "penetrative", 23)>> <<run seX(_rapist, "oral", "public", "penetrative", 23)>>
<<run seX($activeSlave, "anal", "public", "penetrative", 12)>> <<run seX(_rapist, "anal", "public", "penetrative", 12)>>
<<if $activeSlave.vagina > -1>> <<if _rapist.vagina > -1>>
<<set $activeSlave.vagina = 2>> <<set _rapist.vagina = 2>>
<<run seX($activeSlave, "vaginal", "public", "penetrative", 12)>> <<run seX(_rapist, "vaginal", "public", "penetrative", 12)>>
<<if random(1,100) > 60 && isFertile($activeSlave)>> <<if random(1,100) > 60 && isFertile(_rapist)>>
<<= knockMeUp($activeSlave, 100, 0, -2, 1)>> <<= knockMeUp(_rapist, 100, 0, -2, 1)>>
<</if>> <</if>>
<<else>> <<else>>
<<run seX($activeSlave, "anal", "public", "penetrative", 12)>> /* even more anal */ <<run seX(_rapist, "anal", "public", "penetrative", 12)>> /* even more anal */
<</if>> <</if>>
<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $activeSlave)>> <<run cashX(forceNeg(_ContractCost), "slaveTransfer", _rapist)>>
<<replace "#result">> <<replace "#result">>
You declare $his holes fair game for the entire arcology. $He spends a torturous day in the stocks before being hauled in for enslavement, somewhat @@.red;the worse for wear@@ and @@.red;acting oddly@@ due to $his ordeal, bruises all over $his body, cum leaking from $his @@.lime;loosened@@ anus<<if $activeSlave.vagina > -1>> and @@.lime;fucked-out@@ pussy<</if>>. The public @@.green;enjoys the fun.@@ You declare $his holes fair game for the entire arcology. $He spends a torturous day in the stocks before being hauled in for enslavement, somewhat @@.red;the worse for wear@@ and @@.red;acting oddly@@ due to $his ordeal, bruises all over $his body, cum leaking from $his @@.lime;loosened@@ anus<<if _rapist.vagina > -1>> and @@.lime;fucked-out@@ pussy<</if>>. The public @@.green;enjoys the fun.@@
<<run repX(500, "event")>> <<run repX(500, "event")>>
<<set $arcologies[0].prosperity += 2>> <<set $arcologies[0].prosperity += 2>>
<<includeDOM App.UI.newSlaveIntro($activeSlave)>> <<includeDOM App.UI.newSlaveIntro(_rapist)>>
<</replace>> <</replace>>
<</link>> <</link>>
<<if $arcade > 0>> <<if $arcade > 0>>
<br><<link "Enslave $him and sentence $him to a month in the arcade">> <br><<link "Enslave $him and sentence $him to a month in the arcade">>
<<= assignJob($activeSlave, "be confined in the arcade")>> <<= assignJob(_rapist, "be confined in the arcade")>>
<<set $activeSlave.sentence = 4>> <<set _rapist.sentence = 4>>
<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $activeSlave)>> <<run cashX(forceNeg(_ContractCost), "slaveTransfer", _rapist)>>
<<replace "#result">> <<replace "#result">>
You complete the legalities and biometric scanning quickly and cautiously. The idiot will be in for a surprise when $he awakes to find $he can't move and a dick is in $his ass. You complete the legalities and biometric scanning quickly and cautiously. The idiot will be in for a surprise when $he awakes to find $he can't move and a dick is in $his ass.
<<run newSlave($activeSlave)>> /* skip New Slave Intro */ <<run newSlave(_rapist)>> /* skip New Slave Intro */
<</replace>> <</replace>>
<</link>> <</link>>
<</if>> <</if>>
<<if $dairy > 0>> <<if $dairy > 0>>
<<if $dairyRestraintsSetting > 1>> <<if $dairyRestraintsSetting > 1>>
<br><<link "Enslave $him and send $him straight to the industrial dairy">> <br><<link "Enslave $him and send $him straight to the industrial dairy">>
<<= assignJob($activeSlave, "work in the dairy")>> <<= assignJob(_rapist, "work in the dairy")>>
<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $activeSlave)>> <<run cashX(forceNeg(_ContractCost), "slaveTransfer", _rapist)>>
<<replace "#result">> <<replace "#result">>
You complete the legalities and biometric scanning quickly and cautiously. The idiot will wake up <<if $dairyStimulatorsSetting > 1>>in agony as $his anus takes the rectal hydration dildo<<else>>to find $his chest has begun swelling with milk<</if>>. You complete the legalities and biometric scanning quickly and cautiously. The idiot will wake up <<if $dairyStimulatorsSetting > 1>>in agony as $his anus takes the rectal hydration dildo<<else>>to find $his chest has begun swelling with milk<</if>>.
<<set $activeSlave.boobs += 300>> <<set _rapist.boobs += 300>>
<<run newSlave($activeSlave)>> /* skip New Slave Intro */ <<run newSlave(_rapist)>> /* skip New Slave Intro */
<</replace>> <</replace>>
<</link>> <</link>>
<</if>> <</if>>
<</if>> <</if>>
<<if $farmyard > 0>> <<if $farmyard > 0>>
<br><<link "Enslave $him and send $him straight to the farmyard">> <br><<link "Enslave $him and send $him straight to the farmyard">>
<<= assignJob($activeSlave, "work as a farmhand")>> <<= assignJob(_rapist, "work as a farmhand")>>
<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $activeSlave)>> <<run cashX(forceNeg(_ContractCost), "slaveTransfer", _rapist)>>
<<replace "#result">> <<replace "#result">>
You complete the legalities and biometric scanning quickly and cautiously. The idiot will wake up in $farmyardName, where $he will spend the rest of $his days working the fields<<if $farmyardShows == 1>> and <<if $seeBestiality == 1>>getting fucked by animals<<else>>putting on shows with animals<</if>><</if>>. You complete the legalities and biometric scanning quickly and cautiously. The idiot will wake up in $farmyardName, where $he will spend the rest of $his days working the fields<<if $farmyardShows == 1>> and <<if $seeBestiality == 1>>getting fucked by animals<<else>>putting on shows with animals<</if>><</if>>.
<<run newSlave($activeSlave)>> /* skip New Slave Intro */ <<run newSlave(_rapist)>> /* skip New Slave Intro */
<</replace>> <</replace>>
<</link>> <</link>>
<</if>> <</if>>
<<if $seeExtreme > 0>> <<if $seeExtreme > 0>>
<br><<link "Punitively amputate $his limbs, and then enslave $him">> <br><<link "Punitively amputate $his limbs, and then enslave $him">>
<<run healthDamage($activeSlave, 20)>> <<run healthDamage(_rapist, 20)>>
<<run removeLimbs($activeSlave, "all")>> <<run removeLimbs(_rapist, "all")>>
<<set $activeSlave.behavioralFlaw = "odd">> <<set _rapist.behavioralFlaw = "odd">>
<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $activeSlave)>> <<run cashX(forceNeg(_ContractCost), "slaveTransfer", _rapist)>>
<<replace "#result">> <<replace "#result">>
You want $him to suffer for what $he tried to pull on you. You make sure $he is fully awake as $he is strapped into the autosurgery. You take great pleasure in watching $him struggle as $his limbs are taken, one by one. Of course, @@.red;$his health is affected@@ and the horrible experience has left $him @@.red;acting oddly.@@ After $he has stabilized, it's off to the penthouse for basic slave induction. You'd like to see $him try and touch you again without arms and legs. You want $him to suffer for what $he tried to pull on you. You make sure $he is fully awake as $he is strapped into the autosurgery. You take great pleasure in watching $him struggle as $his limbs are taken, one by one. Of course, @@.red;$his health is affected@@ and the horrible experience has left $him @@.red;acting oddly.@@ After $he has stabilized, it's off to the penthouse for basic slave induction. You'd like to see $him try and touch you again without arms and legs.
<</replace>> <</replace>>
<</link>> <</link>>
<<if $activeSlave.balls > 0>> <<if _rapist.balls > 0>>
<br><<link "Enslave the criminal and geld $him">> <br><<link "Enslave the criminal and geld $him">>
<<run healthDamage($activeSlave, 20)>> <<run healthDamage(_rapist, 20)>>
<<set $activeSlave.balls = 0>> <<set _rapist.balls = 0>>
<<set $activeSlave.devotion -= 25>> <<set _rapist.devotion -= 25>>
<<set $activeSlave.trust -= 25>> <<set _rapist.trust -= 25>>
<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $activeSlave)>> <<run cashX(forceNeg(_ContractCost), "slaveTransfer", _rapist)>>
<<replace "#result">> <<replace "#result">>
You want $him to suffer for what $he tried to pull on you. You make sure $he is fully awake as $he is strapped into the autosurgery, taking the time to roughly fondle $his balls. You take great pleasure in watching $him struggle as $his testicles are removed. Once $he can stand again, it's off to the penthouse for basic slave induction. You want $him to suffer for what $he tried to pull on you. You make sure $he is fully awake as $he is strapped into the autosurgery, taking the time to roughly fondle $his balls. You take great pleasure in watching $him struggle as $his testicles are removed. Once $he can stand again, it's off to the penthouse for basic slave induction.
<<includeDOM App.UI.newSlaveIntro($activeSlave)>> <<includeDOM App.UI.newSlaveIntro(_rapist)>>
<</replace>> <</replace>>
<</link>> <</link>>
<</if>> <</if>>
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment