From b41f51329202bc86cd1efa70c2a9f2d48f15ac1a Mon Sep 17 00:00:00 2001 From: fcanon <fcanon@nowhere.na> Date: Sun, 28 May 2017 18:05:16 -0400 Subject: [PATCH] pRaped and husks --- src/pregmod/huskSlaveSwap.tw | 2 +- src/pregmod/huskSlaveSwapWorkaround.tw | 2 +- src/pregmod/pRaped.tw | 26 +++++++------------------- src/pregmod/seHuskSlaveDelivery.tw | 9 +++------ 4 files changed, 12 insertions(+), 27 deletions(-) diff --git a/src/pregmod/huskSlaveSwap.tw b/src/pregmod/huskSlaveSwap.tw index 4e7b546eb43..d11e5b9c595 100644 --- a/src/pregmod/huskSlaveSwap.tw +++ b/src/pregmod/huskSlaveSwap.tw @@ -2,7 +2,7 @@ <<set $nextButton = "Continue", $nextLink = "AS Dump">> -You strap $oldSlave.slaveName and the body $pronoun will transfer to into the remote surgery and stand back as it goes to work. +You strap $oldSlave.slaveName and the body to which $object will transfer into the remote surgery and stand back as it goes to work. <<BodySwap $activeSlave $oldSlave>> After an honestly impressive procedure, $activeSlave.slaveName is released and allowed to explore her new body. diff --git a/src/pregmod/huskSlaveSwapWorkaround.tw b/src/pregmod/huskSlaveSwapWorkaround.tw index 4bd330396ca..8984cce4508 100644 --- a/src/pregmod/huskSlaveSwapWorkaround.tw +++ b/src/pregmod/huskSlaveSwapWorkaround.tw @@ -7,7 +7,7 @@ <<set $oldSlave = 0>> <<set $swapFailure = random(1,1000)>> -"This operation is neither simple nor is it perfected. There are extreme health risks involved and no gauruntee of success. Strap a slave into your surgery to consent to the operation. Indentured servants<<if $incubator > 0>> and slaves with reserved children<</if>> not eligible." +"This operation is neither simple nor is it perfected. There are extreme health risks involved and no guarantee of success. Strap a slave into your remote surgery to consent to the operation. Indentured servants<<if $incubator > 0>> and slaves with reserved children<</if>> not eligible." //Select the slave whose brain will be transferred into the waiting husk.<<if $cyberMod == 1>> Amputated slaves must not be wearing prosthetics.<</if>>// diff --git a/src/pregmod/pRaped.tw b/src/pregmod/pRaped.tw index 541da793879..35673c0da1b 100644 --- a/src/pregmod/pRaped.tw +++ b/src/pregmod/pRaped.tw @@ -1,6 +1,6 @@ :: P raped [nobr] -<<set $raped = 1>> +<<set $raped = 1, $nextLink = "Nonrandom Event", $returnTo = "Nonrandom Event">> 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. @@ -128,18 +128,16 @@ Now the only question is what to do with the would be rapist. You could toss the <br> //Applying enslavement as punishment will cost ¤$contractCost. Doing so and then selling her immediately will bring in approximately ¤$slaveCost.// -<<set $saleDescription = 1>> +<<set $saleDescription = 1, $applyLaw = 0>> <<include "Long Slave Description">> <<set $saleDescription = 0>> <span id="result"> <<if $cash >= $contractCost>> <br><<link "Enslave her">> - <<AddSlave $activeSlave>> <<set $cash -= $contractCost>> <<replace "#result">> You complete the legalities and biometric scanning quickly and without fuss. The idiot will regret crossing you when she wakes in the penthouse for basic slave induction. - <<set $nextLink = "AS Dump">> <<include "New Slave Intro">> <</replace>> <</link>> @@ -155,41 +153,34 @@ Now the only question is what to do with the would be rapist. You could toss the <</if>> <</if>> <<if $activeSlave.publicCount>><<set $activeSlave.publicCount += 47>><<else>><<set $activeSlave.publicCount to 47>><</if>> - <<AddSlave $activeSlave>> <<set $cash -= $contractCost>> <<replace "#result">> You declare her holes fair game for the entire arcology. She 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 her ordeal, bruises all over her body, cum leaking from her @@.lime;loosened@@ anus<<if $activeSlave.vagina > -1>> and @@.lime;fucked-out@@ pussy<</if>>. The public @@.green;enjoys the fun.@@ <<set $rep += 100>> <<set $arcologies[0].prosperity += 2>> - <<set $nextLink = "AS Dump">> <<include "New Slave Intro">> <</replace>> <</link>> <<if $arcade > 0>> <br><<link "Enslave her and sentence her to a month in the arcade">> - <<set $activeSlave.assignment to "be confined in the arcade">> - <<set $activeSlave.choosesOwnAssignment = 0>> + <<assignJob $activeSlave "be confined in the arcade">> <<set $activeSlave.sentence = 4>> - <<AddSlave $activeSlave>> <<set $cash -= $contractCost>> <<replace "#result">> You complete the legalities and biometric scanning quickly and cautiously. The idiot will be in for a surprise when they awake to find they can't move and a dick is in their ass. - <<set $nextLink = "AS Dump">> - <<include "New Slave Intro">> + <<AddSlave $activeSlave>> /* skip New Slave Intro */ <</replace>> <</link>> <</if>> <<if $dairy > 0>> <<if $dairyRestraintsSetting > 1>> <br><<link "Enslave her and send her straight to the industrial dairy">> - <<set $activeSlave.assignment = "work in the dairy">> - <<set $activeSlave.choosesOwnAssignment = 0>> - <<AddSlave $activeSlave>> + <<assignJob $activeSlave "work in the dairy">> <<set $cash -= $contractCost>> <<replace "#result">> You complete the legalities and biometric scanning quickly and cautiously. The idiot will wake up <<if $dairyStimulatorsSetting > 1>>in agony as her anus takes the rectal hydration dildo<<else>>to find her chest has begun swelling with milk<</if>>. <<set $activeSlave.boobs += 300>> - <<set $nextLink = "AS Dump">> + <<AddSlave $activeSlave>> /* skip New Slave Intro */ <</replace>> <</link>> <</if>> @@ -200,12 +191,9 @@ Now the only question is what to do with the would be rapist. You could toss the <<set $activeSlave.amp = 1>> <<set $activeSlave.heels = 0>> <<set $activeSlave.behavioralFlaw = "odd">> - <<AddSlave $activeSlave>> <<set $cash -= $contractCost>> <<replace "#result">> You want her to suffer for what she tried to pull on you. You make sure she is fully awake as she is strapped into the autosurgery. You take great pleasure in watching her struggle as her limbs are taken, one by one. Of course, @@.red;her health is affected@@ and the horrible experience has left her @@.red;acting oddly.@@ After she has stabilized, it's off to the penthouse for basic slave induction. You'd like to see her try and touch you again without arms and legs. - <<set $nextLink = "AS Dump">> - <<include "New Slave Intro">> <</replace>> <</link>> <br><<link "Enslave the criminal and geld her">> @@ -217,6 +205,7 @@ Now the only question is what to do with the would be rapist. You could toss the <<set $cash -= $contractCost>> <<replace "#result">> You want her to suffer for what she tried to pull on you. You make sure she is fully awake as she is strapped into the autosurgery, taking the time to roughly fondle her balls. You take great pleasure in watching her struggle as her testicles are removed. Once she can stand again, it's off to the penthouse for basic slave induction. + <<include "New Slave Intro">> <</replace>> <</link>> <</if>> @@ -227,7 +216,6 @@ Now the only question is what to do with the would be rapist. You could toss the <<replace "#result">> Naturally, the wretch will be thrown out of the arcology: but an example must first be made. Free people must understand that criminals who commit outrages against them will be severely punished. The protesting malefactor is stripped and flogged on the promenade before being escorted bleeding from the arcology. The public @@.green;approves of this harshness.@@ <<set $rep += 100>> - <<set $nextLink to "RIE Eligibility Check">> <</replace>> <</link>> </span> diff --git a/src/pregmod/seHuskSlaveDelivery.tw b/src/pregmod/seHuskSlaveDelivery.tw index c08b08da352..71c0b3f19e1 100644 --- a/src/pregmod/seHuskSlaveDelivery.tw +++ b/src/pregmod/seHuskSlaveDelivery.tw @@ -1,9 +1,6 @@ :: SE husk slave delivery [nobr] -<<set $nextButton = "Continue", $nextLink = "Scheduled Event", $returnTo = "Scheduled Event">> -<<set $showEncyclopedia = 1>><<set $encyclopedia = "Enslaving People">> - -<<set $huskSlaveOrdered = 0>> +<<set $huskSlaveOrdered = 0, $nextButton = "Continue", $nextLink = "Scheduled Event", $returnTo = "Scheduled Event", $showEncyclopedia = 1, $encyclopedia = "Enslaving People">> <<set $activeSlaveOneTimeMinAge = $huskSlave.age>> <<set $activeSlaveOneTimeMaxAge = $huskSlave.age>> @@ -90,11 +87,11 @@ \ \ -A slave came in matching fitting the description you provided. +A slave came in fitting the description you provided. <br> //As expected, she is a complete vegetable, but that is what you ordered after all. You lack the facilities to care for her in this state, so you should do what you are planning quickly. Or you could return her to the Flesh Heap, though you won't get your credits back.// <br><br> -<<set $saleDescription = 1>><<include "Long Slave Description">><<set $saleDescription = 0>> +<<set $saleDescription = 1, $applyLaw = 0>><<include "Long Slave Description">><<set $saleDescription = 0>> <br><br> <span id="result"> <<if $cash >= $slaveCost>>\ -- GitLab