Skip to content
Snippets Groups Projects
Commit 2cf1c519 authored by lowercasedonkey's avatar lowercasedonkey
Browse files

simplify contract cost calc

parent 6510a708
Branches
Tags
No related merge requests found
...@@ -1633,9 +1633,9 @@ ...@@ -1633,9 +1633,9 @@
<</if>> <</if>>
/* Enslave both */ /* Enslave both */
<<switch $RecETSevent>> <<if $cash >= (_ContractCost*2)>>
<<case "addict mother daughter" "desperate broodmother" "mismatched pair" "posh mother daughter">> <<switch $RecETSevent>>
<<if $cash >= (_ContractCost*2)>> <<case "addict mother daughter" "desperate broodmother" "mismatched pair" "posh mother daughter">>
<<switch $RecETSevent>> <<switch $RecETSevent>>
<<case "addict mother daughter" "posh mother daughter">> <<case "addict mother daughter" "posh mother daughter">>
<<link "Manipulate $him to enslave both mother and _daughter2">> <<link "Manipulate $him to enslave both mother and _daughter2">>
...@@ -1704,89 +1704,81 @@ ...@@ -1704,89 +1704,81 @@
ERROR: bad recETS event $RecETSevent <<print "[[Go back to previous passage '" + previous() +"'][previous()]]">> ERROR: bad recETS event $RecETSevent <<print "[[Go back to previous passage '" + previous() +"'][previous()]]">>
</div> </div>
<</switch>> <</switch>>
<<else>> <<case "identical herm pair" "identical pair" "incest brother brother" "incest brother sister" "incest father daughter" "incest father son" "incest mother daughter" "incest mother son" "incest sister sister" "incest twin brother" "incest twin sister" "incest twins mixed" "matched pair">>
<<if $cash < _ContractCost>> <<switch $RecETSevent>>
<div class="detail"> <<case "identical herm pair" "identical pair" "matched pair">>
You lack the necessary funds to enslave them both. <<link "Buy them both">>
</div> <<run newSlave($relative)>>
<</if>> <<run newSlave($relative2)>>
<</if>> <<run cashX(forceNeg(_ContractCost), "slaveTransfer", $relative)>>
<<case "identical herm pair" "identical pair" "incest brother brother" "incest brother sister" "incest father daughter" "incest father son" "incest mother daughter" "incest mother son" "incest sister sister" "incest twin brother" "incest twin sister" "incest twins mixed" "matched pair">> <<run cashX(forceNeg(_ContractCost), "slaveTransfer", $relative2)>>
<<if $cash >= _ContractCost*2>> <<replace #result>>
<<switch $RecETSevent>> <p>
<<case "identical herm pair" "identical pair" "matched pair">> <<switch $RecETSevent>>
<<link "Buy them both">> <<case "identical herm pair">>
<<run newSlave($relative)>> They giggle and kiss each other rather passionately, their miniskirts becoming pinned against their pregnancies by their stiffening pricks. They're very well trained but not very disciplined, though their pervertedness will be fun.
<<run newSlave($relative2)>> "You know we each are carrying the other'<<s>> twin<<s>>, right?"
<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $relative)>> <<case "identical pair">>
<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $relative2)>> They giggle and kiss each other rather sexually, pressing their nearly identical bodies closely together. They're clearly very well trained.
<<replace #result>> <<case "matched pair">>
<p> They giggle and kiss each other rather sexually, pressing their nearly identical bodies closely together so their hips and shapely buttocks hide any sign of their difference. They're clearly very well trained.
<</switch>>
</p>
<</replace>>
<</link>>
<<case "incest brother brother" "incest brother sister" "incest father daughter" "incest father son" "incest mother daughter" "incest mother son" "incest sister sister" "incest twin brother" "incest twin sister" "incest twins mixed">>
<<link "Buy them both">>
<<replace #mainbody>>
<<switch $RecETSevent>> <<switch $RecETSevent>>
<<case "identical herm pair">> <<case "incest brother brother">>
They giggle and kiss each other rather passionately, their miniskirts becoming pinned against their pregnancies by their stiffening pricks. They're very well trained but not very disciplined, though their pervertedness will be fun. They hug each other tightly as the older $sister slips a hand down the younger's pants. They ought to be an interesting addition to your penthouse.
"You know we each are carrying the other'<<s>> twin<<s>>, right?" <<case "incest brother sister">>
<<case "identical pair">> They cheer happily and hug each other tightly. They ought to be an interesting addition to your penthouse.
They giggle and kiss each other rather sexually, pressing their nearly identical bodies closely together. They're clearly very well trained. <<case "incest father daughter">>
<<case "matched pair">> The _daughter2 cheers happily and hugs _his2 relieved father. $He leans in and kisses _him2 deeply. They ought to be an interesting addition to your penthouse.
They giggle and kiss each other rather sexually, pressing their nearly identical bodies closely together so their hips and shapely buttocks hide any sign of their difference. They're clearly very well trained. <<case "incest father son">>
The father hugs $his _daughter2 tight and slips a hand down _his2 pants. They ought to be an interesting addition to your penthouse.
<<case "incest mother daughter">>
The _daughter2 cheers happily and hugs _his2 relieved mother. $He leans in and kisses _him2 deeply. They ought to be an interesting addition to your penthouse.
<<case "incest mother son">>
The _daughter2 cheers happily and hugs _his2 relieved mother. $He leans in and kisses _him2 deeply. They ought to be an interesting addition to your penthouse.
<<case "incest sister sister">>
They cheer happily and hug each other tightly. They ought to be an interesting addition to your penthouse.
<<case "incest twin brother">>
They hug each other tightly as they slip a hand down the other's pants. They ought to be an interesting addition to your penthouse.
<<case "incest twin sister">>
They cheer happily and hug each other tightly. They ought to be an interesting addition to your penthouse.
<<case "incest twins mixed">>
They cheer happily and hug each other tightly. They ought to be an interesting addition to your penthouse.
<</switch>> <</switch>>
</p> <<switch $RecETSevent>>
<</replace>> <<case "incest brother sister" "incest mother son">>
<</link>> <<run newSlave($relative2)>>
<<case "incest brother brother" "incest brother sister" "incest father daughter" "incest father son" "incest mother daughter" "incest mother son" "incest sister sister" "incest twin brother" "incest twin sister" "incest twins mixed">> <<run newSlave($relative)>>
<<link "Buy them both">> <<default>>
<<replace #mainbody>> <<run newSlave($relative)>>
<<switch $RecETSevent>> <<run newSlave($relative2)>>
<<case "incest brother brother">> <</switch>>
They hug each other tightly as the older $sister slips a hand down the younger's pants. They ought to be an interesting addition to your penthouse. <<include "newSlaveIncestSex">>
<<case "incest brother sister">> <</replace>>
They cheer happily and hug each other tightly. They ought to be an interesting addition to your penthouse. <<run cashX(forceNeg(_ContractCost), "slaveTransfer", $relative)>>
<<case "incest father daughter">> <<run cashX(forceNeg(_ContractCost), "slaveTransfer", $relative2)>>
The _daughter2 cheers happily and hugs _his2 relieved father. $He leans in and kisses _him2 deeply. They ought to be an interesting addition to your penthouse. <</link>>
<<case "incest father son">> <<default>>
The father hugs $his _daughter2 tight and slips a hand down _his2 pants. They ought to be an interesting addition to your penthouse. <div class="error">
<<case "incest mother daughter">> ERROR: bad recETS event $RecETSevent <<print "[[Go back to previous passage '" + previous() +"'][previous()]]">>
The _daughter2 cheers happily and hugs _his2 relieved mother. $He leans in and kisses _him2 deeply. They ought to be an interesting addition to your penthouse. </div>
<<case "incest mother son">> <</switch>>
The _daughter2 cheers happily and hugs _his2 relieved mother. $He leans in and kisses _him2 deeply. They ought to be an interesting addition to your penthouse. <<default>>
<<case "incest sister sister">> <div class="error">
They cheer happily and hug each other tightly. They ought to be an interesting addition to your penthouse. ERROR: bad recETS event $RecETSevent <<print "[[Go back to previous passage '" + previous() +"'][previous()]]">>
<<case "incest twin brother">>
They hug each other tightly as they slip a hand down the other's pants. They ought to be an interesting addition to your penthouse.
<<case "incest twin sister">>
They cheer happily and hug each other tightly. They ought to be an interesting addition to your penthouse.
<<case "incest twins mixed">>
They cheer happily and hug each other tightly. They ought to be an interesting addition to your penthouse.
<</switch>>
<<switch $RecETSevent>>
<<case "incest brother sister" "incest mother son">>
<<run newSlave($relative2)>>
<<run newSlave($relative)>>
<<default>>
<<run newSlave($relative)>>
<<run newSlave($relative2)>>
<</switch>>
<<include "newSlaveIncestSex">>
<</replace>>
<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $relative)>>
<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $relative2)>>
<</link>>
<<default>>
<div class="error">
ERROR: bad recETS event $RecETSevent <<print "[[Go back to previous passage '" + previous() +"'][previous()]]">>
</div>
<</switch>>
<<else>>
<div class="deatil>
You lack the necessary funds to enslave them both.
</div> </div>
<</if>> <</switch>>
<<default>> <<else>>
<div class="error"> <div class="detail">
ERROR: bad recETS event $RecETSevent <<print "[[Go back to previous passage '" + previous() +"'][previous()]]">> You lack the necessary funds to enslave them both.
</div> </div>
<</switch>> <</if>>
<<if $cheatMode == 1>> <<if $cheatMode == 1>>
<p> <p>
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment