From 4aeff6d57ab9763d371eb799802b46e1f1b003a8 Mon Sep 17 00:00:00 2001
From: lowercase-donkey <lowercasedonkey@gmail.com>
Date: Wed, 16 Jan 2019 22:58:44 -0500
Subject: [PATCH] Another wave of these. Ugh. So many.
---
src/Mods/DinnerParty/dinnerPartyExecution.tw | 2 +-
src/SecExp/secExpSmilingMan.tw | 8 +++----
src/SpecialForce/Proposal.tw | 2 +-
src/pregmod/fMarry.tw | 6 +++---
src/pregmod/incubator.tw | 10 ++++-----
src/pregmod/reLegendaryWomb.tw | 8 +++----
src/pregmod/rePregInventor.tw | 8 +++----
src/uncategorized/REFS.tw | 10 ++++-----
src/uncategorized/REroyalblood.tw | 21 ++++++++++++-------
src/uncategorized/costsBudget.tw | 18 ++++++++++------
src/uncategorized/costsWidgets.tw | 2 +-
src/uncategorized/economics.tw | 4 ++--
src/uncategorized/pBombing.tw | 14 ++++++-------
src/uncategorized/pCoupAftermath.tw | 2 +-
src/uncategorized/pCoupAttempt.tw | 12 +++++------
src/uncategorized/pDefenseFears.tw | 2 +-
src/uncategorized/pHackerSupport.tw | 2 +-
src/uncategorized/pSnatchAndGrab.tw | 2 +-
src/uncategorized/pSnatchAndGrabResult.tw | 1 +
src/uncategorized/persBusiness.tw | 13 ++++++------
src/uncategorized/personalAssistantOptions.tw | 3 ++-
src/uncategorized/reAWOL.tw | 5 +++--
src/uncategorized/reBusyBrothel.tw | 10 ++++++---
src/uncategorized/reBusyClub.tw | 4 ++--
src/uncategorized/reBusyDairy.tw | 6 +++---
src/uncategorized/reFSNonconformist.tw | 2 +-
src/uncategorized/reFormerAbolitionist.tw | 12 +++++------
src/uncategorized/reLegendaryBalls.tw | 8 +++----
src/uncategorized/reLegendaryCow.tw | 8 +++----
src/uncategorized/reLegendaryEntertainer.tw | 8 +++----
src/uncategorized/reLegendaryWhore.tw | 8 +++----
src/uncategorized/reMalefactor.tw | 2 +-
src/uncategorized/reMilfTourist.tw | 2 +-
src/uncategorized/recETS.tw | 9 +++++---
34 files changed, 128 insertions(+), 106 deletions(-)
diff --git a/src/Mods/DinnerParty/dinnerPartyExecution.tw b/src/Mods/DinnerParty/dinnerPartyExecution.tw
index e6ec94c51ad..b2f68f51368 100644
--- a/src/Mods/DinnerParty/dinnerPartyExecution.tw
+++ b/src/Mods/DinnerParty/dinnerPartyExecution.tw
@@ -260,7 +260,7 @@
As you and your guests enjoy your tartare, suddenly you hear a loud crunch coming from the guest sitting right next to you. You see blood spewing from his mouth as he spits out his chipped tooth along with a lactation implant. You apologize profusely and pay the man ¤10000 as compensation. The rest of your guests are @@.red;not happy@@ that you serve them drugged meat.
<<set _dishRating = 0>>
<<set $rep -= 1000>>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event")>>
<<elseif $activeSlave.lactation > 0 >>
You detect a hint of creamy taste to your tartare. The clearly lactating breast earns the dish an extra star.
<<set _dishRating += 1>>
diff --git a/src/SecExp/secExpSmilingMan.tw b/src/SecExp/secExpSmilingMan.tw
index c87fce96c6e..04fb56cea2c 100644
--- a/src/SecExp/secExpSmilingMan.tw
+++ b/src/SecExp/secExpSmilingMan.tw
@@ -21,7 +21,7 @@
<br>
<<if $cash >= 10000>>
<<link "Devote funds to the search for this dangerous criminal">>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event")>>
<<set $investedFunds = 1>>
<<set $relationshipLM += 1>>
<<set $smilingManProgress += 1>>
@@ -31,7 +31,7 @@
<</link>>
<br>
<<link "Attempt to contact the mysterious figure">>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event")>>
<<set $investedFunds = 1>>
<<set $relationshipLM += 2>>
<<set $smilingManProgress += 1>>
@@ -41,7 +41,7 @@
<</link>>
<br>
<<link "Invest funds to increase the cyber-security of the arcology">>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event")>>
<<set $investedFunds = 1>>
<<set $relationshipLM += random(5,10)>>
<<set $smilingManProgress += 1>>
@@ -92,7 +92,7 @@
<<set _lostCash -= 20000>>
The funding you dedicated to the Smiling Man case saved some of the assets that would have been otherwise lost.
<</if>>
- <<set $cash -= _lostCash>>
+ <<run cashX(_lostCash, "event")>>
<br>
<br>
<span id="result">
diff --git a/src/SpecialForce/Proposal.tw b/src/SpecialForce/Proposal.tw
index 307368db34b..35c38483455 100644
--- a/src/SpecialForce/Proposal.tw
+++ b/src/SpecialForce/Proposal.tw
@@ -14,7 +14,7 @@ The Free Cities were founded on the principles of unrestrained anarcho-capitalis
<<elseif $PC.warfare >= 50||$PC.career === "arcology owner">>
<<set _price = _price*.75>> <</if>>
<br><<link "Prepare for an announcement.""Security Force Naming-Colonel">> <<replace "#result">>
- <<= SFInit()>> <<set $cash -= _price,$SF.Active += 2>>
+ <<= SFInit()>> <<set $SF.Active += 2>><<run cashX(forceNeg(_price), "specialForces")>>
<</replace>> <</link>><br>//Initial costs are @@.yellowgreen;<<print cashFormat(_price)>>@@ and upon establishment the force will have significant support costs until it is self-sufficient.//
<br><<link "The current measures are enough.""RIE Eligibility Check">> <<replace "#result">> <<run Object.assign(, $SF, {Active:0})>> <</replace>> <</link>> </span>
\ No newline at end of file
diff --git a/src/pregmod/fMarry.tw b/src/pregmod/fMarry.tw
index 4800df4c142..4e3b9a430d7 100644
--- a/src/pregmod/fMarry.tw
+++ b/src/pregmod/fMarry.tw
@@ -718,7 +718,7 @@ You tell $activeSlave.slaveName that you're going to marry $him. (A proposal, of
<<replace "#result">>
You order $assistantName to invite deserving citizens to a straightforward ceremony for a slave being married to a slaveowner, and to make the arrangement. The wedding will take place during the upcoming week.
<<set $weddingPlanned = 1>>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<</replace>>
<</link>>
<<if ($activeSlave.vagina != 0) && ($activeSlave.anus != 0)>>
@@ -726,7 +726,7 @@ You tell $activeSlave.slaveName that you're going to marry $him. (A proposal, of
<<replace "#result">>
You order $assistantName to invite deserving citizens to an orgiastic ceremony for a slave being married to a slaveowner, and to make the arrangements. The wedding orgy will take place during the upcoming week.
<<set $weddingPlanned = 2>>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<</replace>>
<</link>> //This will involve the slave having sex with a very large number of citizens//
<</if>>
@@ -735,7 +735,7 @@ You tell $activeSlave.slaveName that you're going to marry $him. (A proposal, of
<<replace "#result">>
You order $assistantName to invite deserving citizens to a ceremony for a fertile slave being married to a slaveowner, and to make the arrangements. The wedding will take place during the upcoming week.
<<set $weddingPlanned = 3>>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<</replace>>
<</link>> //This will involve you impregnating the slave//
<</if>>
diff --git a/src/pregmod/incubator.tw b/src/pregmod/incubator.tw
index 31ad363baf9..c73049ad8aa 100644
--- a/src/pregmod/incubator.tw
+++ b/src/pregmod/incubator.tw
@@ -491,7 +491,7 @@ Target age for release: <<textbox "$targetAge" $targetAge "Incubator">> [[Minimu
<br>
<<if $tanks[$i].ovaries == 0 && $tankOrgans.ovaries != 1>>
<<link "Prepare ovaries">>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "incubator", $tanks[$i])>>
<<set _newOrgan = {type: "ovaries", weeksToCompletion: "10", ID: 0}>>
<<set _newOrgan.ID = $tanks[$i].ID>>
<<set $incubatorOrgans.push(_newOrgan)>>
@@ -500,7 +500,7 @@ Target age for release: <<textbox "$targetAge" $targetAge "Incubator">> [[Minimu
<</if>>
<<if $tanks[$i].dick == 0 && $tankOrgans.penis != 1>>
<<link "Prepare penis">>
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "incubator", $tanks[$i])>>
<<set _newOrgan = {type: "penis", weeksToCompletion: "5", ID: 0}>>
<<set _newOrgan.ID = $tanks[$i].ID>>
<<set $incubatorOrgans.push(_newOrgan)>>
@@ -510,7 +510,7 @@ Target age for release: <<textbox "$targetAge" $targetAge "Incubator">> [[Minimu
<<if $tanks[$i].balls == 0 && $tankOrgans.testicles != 1>>
|
<<link "Prepare testicles">>
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "incubator", $tanks[$i])>>
<<set _newOrgan = {type: "testicles", weeksToCompletion: "10", ID: 0}>>
<<set _newOrgan.ID = $tanks[$i].ID>>
<<set $incubatorOrgans.push(_newOrgan)>>
@@ -520,7 +520,7 @@ Target age for release: <<textbox "$targetAge" $targetAge "Incubator">> [[Minimu
<<if $tanks[$i].eyes == -2 && $tankOrgans.eyes != 1>>
<br>$He appears to be blind:
<<link "Prepare eyes">>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "incubator", $tanks[$i])>>
<<set _newOrgan = {type: "eyes", weeksToCompletion: "10", ID: 0}>>
<<set _newOrgan.ID = $tanks[$i].ID>>
<<set $incubatorOrgans.push(_newOrgan)>>
@@ -530,7 +530,7 @@ Target age for release: <<textbox "$targetAge" $targetAge "Incubator">> [[Minimu
<<if $tanks[$i].voice == 0 && $tankOrgans.voicebox != 1>>
<br>It appears $he was born a mute:
<<link "Prepare vocal cords">>
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "incubator", $tanks[$i])>>
<<set _newOrgan = {type: "voicebox", weeksToCompletion: "5", ID: 0}>>
<<set _newOrgan.ID = $tanks[$i].ID>>
<<set $incubatorOrgans.push(_newOrgan)>>
diff --git a/src/pregmod/reLegendaryWomb.tw b/src/pregmod/reLegendaryWomb.tw
index fbec834c156..20112daa68e 100644
--- a/src/pregmod/reLegendaryWomb.tw
+++ b/src/pregmod/reLegendaryWomb.tw
@@ -42,7 +42,7 @@ This is a rare opportunity. The idea of a pregnancy pageant isn't new but it is
<<if random(1,100) > 50>>
<<replace "#result">>
$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then asked to demonstrate how to pleasure a man while so heavily pregnant. Several of the judges cannot resist giving you a wink as they look $him over. $activeSlave.slaveName is unsurprisingly named best in show, and will be @@.green;remembered@@ as a breeder of the highest pedigree. As $his owner, your reputation has @@.green;also increased.@@
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<<set $rep += 100>>
<<set $activeSlave.prestige = 1>>
<<set $activeSlave.prestigeDesc = "She is remembered for winning best in show as a breeder.">>
@@ -52,7 +52,7 @@ This is a rare opportunity. The idea of a pregnancy pageant isn't new but it is
<<else>>
<<replace "#result">>
$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then asked to demonstrate how to pleasure a man while so heavily pregnant. Several of the judges cannot resist giving you a wink as they look $him over, but others look disapprovingly at them; it seems some of your competitors also forwarded money to the committee. After furious wrangling, $activeSlave.slaveName loses to another mother. The public is impressed with $activeSlave.slaveName's reproductive capability anyway; as you are $his owner, your reputation has @@.green;increased@@ a little.
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<<set $rep += 100>>
<</replace>>
<</if>>
@@ -62,7 +62,7 @@ This is a rare opportunity. The idea of a pregnancy pageant isn't new but it is
<<if random(1,100) > 10>>
<<replace "#result">>
$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then asked to demonstrate how to pleasure a man while so heavily pregnant. After $he's put through $his paces, the most unfortunate series of accidents somehow befalls $his fellow mothers. One is taken ill, another seems drugged, and another went into labor and gave birth, disqualifying her. $activeSlave.slaveName is unsurprisingly named best in show, and will be @@.green;remembered@@ as a breeder of the highest pedigree. As $his owner, your reputation has @@.green;also increased.@@
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $rep += 100>>
<<set $activeSlave.prestige = 1>>
<<set $activeSlave.prestigeDesc = "She is remembered for winning best in show as a breeder.">>
@@ -72,7 +72,7 @@ This is a rare opportunity. The idea of a pregnancy pageant isn't new but it is
<<else>>
<<replace "#result">>
$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then asked to demonstrate how to pleasure a man while so heavily pregnant. You are surprised to see that the judging committee has been changed at the last minute. They choose another breeder as best in show. There are persistent @@.red;rumors@@ after the show that there was an absolute massacre of firings at the dairy organization headquarters the night before the show after it was discovered that someone, widely thought to be you, had been corrupting the judges.
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $rep -= 100>>
<</replace>>
<</if>>
diff --git a/src/pregmod/rePregInventor.tw b/src/pregmod/rePregInventor.tw
index 6cfbffdc101..a468df343e3 100644
--- a/src/pregmod/rePregInventor.tw
+++ b/src/pregmod/rePregInventor.tw
@@ -272,7 +272,7 @@
collapsing into orgasm on $his bloated body,
<</if>>
you call up your personal assistant, giving _himA orders to have your menials collect your exhausted breeder and to ensure $he has all the funds necessary to make $his perverted dreams a reality. $activeSlave.slaveName can only @@.hotpink;idolize you.@@
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $activeSlave.devotion += 15>>
<<set $pregInventor = 1>>
<</replace>>
@@ -351,7 +351,7 @@
<br><<link "Organize a televised demonstration of $his skills.">>
<<replace "#result2">>
You are so impressed by $his ideas that you arrange to have $him demonstrate $his discoveries on a prominent FCTV talk show. It will take some time, and you'll have to insure that $he's at least reasonably well known before the show's executives will agree to allow $him on-air, but you're certain that $activeSlave.slaveName's name will soon be on the lips of pregnancy-loving slaveowners and Free Cities citizens around the world. In the meantime, you implement $his ideas around the arcology. $He is @@.hotpink;thrilled@@ to have pleased you so much that you would @@.mediumaquamarine;put such faith in $his ideas.@@
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $pregInventor = 2>>
<<set $pregInventions = 1>>
<<set $activeSlave.trust += 4, $activeSlave.devotion += 10>>
@@ -540,7 +540,7 @@
<br><<link "Organize a televised demonstration of $his skills.">>
<<replace "#result2">>
You are so impressed by $his ideas that you arrange to have $him demonstrate $his discoveries on a prominent FCTV talk show. It will take some time, and you'll have to insure that $he's at least reasonably well known before the show's executives will agree to allow $him on-air, but you're certain that $activeSlave.slaveName's name will soon be on the lips of pregnancy-loving slaveowners and Free Cities citizens around the world. In the meantime, you implement $his ideas around the arcology. $He is @@.hotpink;thrilled@@ to have pleased you so much that you would @@.mediumaquamarine;put such faith in $his ideas.@@
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $pregInventor = 2>>
<<set $pregInventions = 1>>
<<set $activeSlave.trust += 4, $activeSlave.devotion += 10>>
@@ -759,7 +759,7 @@
<br><<link "Organize a televised demonstration of $his skills.">>
<<replace "#result2">>
You are so impressed by $his ideas that you arrange to have $him demonstrate $his discoveries on a prominent FCTV talk show. It will take some time, and you'll have to insure that $he's at least reasonably well known before the show's executives will agree to allow $him on-air, but you're certain that $activeSlave.slaveName's name will soon be on the lips of pregnancy-loving slaveowners and Free Cities citizens around the world. In the meantime, you implement $his ideas around the arcology. $He is @@.hotpink;thrilled@@ to have pleased you so much that you would @@.mediumaquamarine;put such faith in $his ideas.@@
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $pregInventor = 2>>
<<set $pregInventions = 1>>
<<set $activeSlave.trust += 4, $activeSlave.devotion += 10>>
diff --git a/src/uncategorized/REFS.tw b/src/uncategorized/REFS.tw
index afad1404d68..36676446478 100644
--- a/src/uncategorized/REFS.tw
+++ b/src/uncategorized/REFS.tw
@@ -216,7 +216,7 @@ On this particular outing you happen to cross paths with a comely female citizen
<br><<link "Take the poor slave $girl into your custody">>
<<replace "#result">>
Confronting the citizen is simplicity in itself; he would not dare defy you under threat of arrest by your security drones and is unlikely to garner any sympathy from the public for his degradationist behaviors. As such, you are able to take civil ownership over the poor slave $girl and take $him into your care with only minimal compensation to the citizen. As you stride away from $his former owner with the $girl in your arms, $he leans over to plant a chaste kiss of thanks on your cheek.
- <<set $cash -= 2000>>
+ <<run cashX(-2000, "event")>>
<<include "New Slave Intro">>
<</replace>>
<</link>> // Taking custody of the $girl will cost <<print cashFormat(2000)>>. //
@@ -241,7 +241,7 @@ On this particular outing you happen to cross paths with a comely female citizen
<br><<link "Take the pampered slave $girl into your custody">>
<<replace "#result">>
Confronting the citizen is simplicity in itself; he would not dare defy you directly under threat of arrest by your security drones and is unlikely to garner any sympathy from the public for his disturbing actions. As such, you are able to take civil ownership over the slave $girl and claim $him for yourself with only token compensation to the citizen. As you stride away from $his former owner with the girl in your arms, $he clings to you with obvious naiveté for how you will treat $him. It's time $he learnt how slaves are treated in $arcologies[0].name.
- <<set $cash -= 2000>>
+ <<run cashX(-2000, "event")>>
<<include "New Slave Intro">>
<</replace>>
<</link>> // Taking custody of the $girl will cost <<print cashFormat(2000)>>. //
@@ -334,7 +334,7 @@ On this particular outing you happen to cross paths with a comely female citizen
<<replace "#result2">>
As your new playmate lies slumbering in bed, you consult with $assistantName as to the cost of the surgery conducted today. With some creative accounting, you settle the citizen's other outstanding debts and then arrange for $him to be charged a sum in excess of $his financial means for the surgery conducted on $him today. Of course, that was not what you agreed, but it was $his mistake for undergoing an expensive procedure without a formal contract. When $he awakens, though $he will retain $his new bimbo body, $he will be just another slave in your penthouse.
<<run newSlave($activeSlave)>> /* skip New Slave Intro */
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<</replace>>
<</link>> // Purchasing $his outstanding debts will cost <<print cashFormat(10000)>>. //
</span>
@@ -400,7 +400,7 @@ On this particular outing you happen to cross paths with a comely female citizen
<<replace "#result2">>
After $he regains $his bearings from your sexual encounter, the girl slips on $his simple clothes and attempts to slink away from your private suite unobtrusively. $He makes it out the door before being confronted by a glowing array of wallscreen monitors, each displaying a visual representation of your purchase of $his father's considerable debt and subsequent enslavement of $him on the basis of that debt. Tears begin to stream down $his cheeks as $he sinks to $his knees, $his hopes of a long life without enslavement now dashed.
<br><br>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<include "New Slave Intro">>
<</replace>>
<</link>> // Purchasing $his outstanding debts will cost <<print cashFormat(10000)>>. //
@@ -439,7 +439,7 @@ On this particular outing you happen to cross paths with a comely female citizen
<<replace "#result2">>
After $he regains $his bearings from your sexual encounter, the older woman slips on $his simple clothes and attempts to slink away from your private suite unobtrusively. $He makes it out the door before being confronted by a glowing array of wallscreen monitors, each displaying a visual representation of your purchase of $his considerable debt and subsequent enslavement of $him on the basis of that debt. Tears begin to stream down $his weathered cheeks as $he sinks to $his knees, $his hopes of making it through the breadth of $his long life without enslavement now dashed.
<br><br>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<include "New Slave Intro">>
<</replace>>
<</link>> // Purchasing $his outstanding debts will cost <<print cashFormat(10000)>>. //
diff --git a/src/uncategorized/REroyalblood.tw b/src/uncategorized/REroyalblood.tw
index aa2ece577ea..e0343b3d91b 100644
--- a/src/uncategorized/REroyalblood.tw
+++ b/src/uncategorized/REroyalblood.tw
@@ -179,10 +179,10 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<br><br>
Eventually she arrives in your penthouse, the perfect image of a demure yet composed princess. Her clearly practiced façade of poise and grace fades under scrutiny, however. The slightest trembling of her balled up fists, the minute tremors that mar her immaculate posture, her inability to meet your eyes with her own — all signs that she is still a scared girl despite all her royal trappings. Nonetheless, though the princess's court training is unlikely to be very beneficial to her in her new life in the penthouse, it does stand in stark contrast to her more common slave peers.
<br><br>
- <<set $cash -= 50000>>
<<set $rep -= 2000>>
<<set _princess.origin = "She was a princess of a royal kingdom, till her family was overthrown and she was sold to you in exchange for aid.">>
<<set $activeSlave = _princess>>
+ <<run cashX(-50000, "slaveTransfer", $activeSlave)>>
<<include "New Slave Intro">>
<<set $activeSlave.recruiter = 0>> /* override New Slave Intro */
<</replace>>
@@ -214,9 +214,9 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<br><br>
When he arrives in your penthouse, the former prince is beside himself with rage. When he is brought to be modified in the remote surgery, he breaks free and attempts to fight his way out of your penthouse. His attempt at freedom is futile, however, and he is soon overwhelmed by your guards and dragged back to the remote surgery. It doesn't take long for the valiant prince to become a new dickgirl, though his submission to life as a slave is another question entirely.
<br><br>
- <<set $cash -= 35000>>
<<set _prince.origin = "She was the crown prince of a royal kingdom, till her family was overthrown and she was sold to you in exchange for aid.">>
<<set $activeSlave = _prince>>
+ <<run cashX(-35000, "slaveTransfer", $activeSlave)>>
<<include "New Slave Intro">>
<<set $activeSlave.recruiter = 0>> /* override New Slave Intro */
<</replace>>
@@ -248,7 +248,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<br><br>
Eventually they arrive in your penthouse, faces flushed with embarrassment of their compromising position. The former prince is beside himself with rage, but seems to be holding himself back for his little sister's sake, while she struggles to maintain a façade of poise and grace. The slightest trembling of her balled up fists, the minute tremors that mar her immaculate posture, her inability to meet your eyes with her own — all signs that she is still a scared girl despite all her royal trappings. Nonetheless, though the princess's court training is unlikely to be very beneficial to her in her new life in the penthouse, it does stand in stark contrast to her more common slave peers. However, the prince's submission to life as a slave is another question entirely.
<br><br>
- <<set $cash -= 100000>>
+ <<run cashX(-100000, "slaveTransfer", _princess)>>
<<set $rep -= 10000>>
/* princess */
<<set _princess.origin = "She was a princess of a royal kingdom, till her family was overthrown and she was sold to you in exchange for aid.">>
@@ -323,7 +323,6 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<br><br>
When the ladies arrive at your penthouse, they seem almost relieved at the opulence of their new surroundings. Though they still retain much of their aristocratic arrogance, they each submit to biometric scanning with relative obedience. It seems likely that their obedience is borne out of a delusional rationalization that enslavement by one wealthy master is better than enslavement by the unwashed masses they once lorded over.
<br><br>
- <<set $cash -= 25000>>
<<for $i = 0; $i < 3; $i++>>
<<set $activeSlaveOneTimeMinAge = 21>>
<<set $activeSlaveOneTimeMaxAge = ($retirementAge-2)>>
@@ -359,6 +358,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<set $activeSlave.behavioralFlaw = either("arrogant", "bitchy")>>
<<run newSlave($activeSlave)>> /* skip New Slave Intro */
<<set $activeSlave.recruiter = 0>> /* override New Slave Intro */
+ <<run cashX(-8333, "slaveTransfer", $activeSlave)>>
<</for>>
<</replace>>
<</link>> // It will cost about <<print cashFormat(25000)>> to enslave them.//
@@ -423,7 +423,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<br><br>
When the Queen arrives at your penthouse, she seems almost relieved and almost basks in the opulence of her new surroundings. Yet, it seems likely that her relief has more to do with saving her from a lifetime of gang rape at the mercy of her former subjects, than it does the familiar luxury. She submits to biometric scanning obediently and without fuss<<if $seePreg != 0>>, during which you discover to her surprise that she is pregnant. Since she hasn't begun to show yet, it's unclear whether the child is the former King's or the new arcology owner's. You don't have the means to discern the father of the child, but you notice she cradles her ever so slightly rounded stomach protectively nonetheless<</if>>.
<br><br>
- <<set $cash -= 15000>>
+ <<run cashX(-15000, "slaveTransfer", _queen)>>
<<set $activeSlaveOneTimeMinAge = ($fertilityAge+2)>>
<<if $pedo_mode == 1>>
<<set $activeSlaveOneTimeMaxAge = 24>>
@@ -473,7 +473,8 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<if $cash >= 500000>>
<br><<link "Send a large amount of credits and goods to retrieve both the princess and Queen.">>
<<replace "#result">>
- <<set $cash -= 500000>>
+ <<run cashX(-400000, "slaveTransfer", _princess)>>
+ <<run cashX(-100000, "slaveTransfer", _queen)>>
You take a tablet and transmit a communication request to the new arcology owner with your intent. Once his shock wears off, he readily accepts with little need for negotiation. Soon, a flight of VTOLs land in the new arcology laden with goods. When they take off again they have the princess and the Queen, who is resigned to her fate, clad in chains then bound face to face in a forced embrace.
<br><br>
Eventually they both arrive in your penthouse. The princess is flushed with embarrassment in her compromising position, struggling to maintain a façade of poise and grace. The slightest trembling of her balled up fists, the minute tremors that mar her immaculate posture, her inability to meet your eyes with her own — all signs that she is still a scared girl despite all her royal trappings. Nonetheless, though the princess's court training is unlikely to be very beneficial to her in her new life in the penthouse, it does stand in stark contrast to her more common slave peers. The Queen, on the other hand, seems almost relieved and basks in the opulence of her new surroundings. Yet, it seems likely that her relief has more to do with saving her from a lifetime of gang rape at the mercy of her former subjects, than it does the familiar luxury. She submits to biometric scanning obediently and without fuss<<if $seePreg != 0>>, during which you discover to her surprise that she is pregnant. Since she hasn't begun to show yet, it's unclear whether the child is the former King's or the new arcology owner's. You don't have the means to discern the father of the child, but you notice she cradles her ever so slightly rounded stomach protectively nonetheless<</if>>.
@@ -544,7 +545,6 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<if $cash >= 500000>>
<br><<link "Offer a generous amount of cash in exchange for both the Queen and her court ladies.">>
<<replace "#result">>
- <<set $cash -= 500000>>
You take a tablet and transmit a communication request to the new arcology owner with your intent. Once his shock wears off, he readily accepts with little need for negotiation. Soon, a flight of VTOLs land in the new arcology laden with goods. When they take off again they have the Queen, who is resigned to her fate, and a gaggle of terrified court ladies chained together.
<br><br>
Eventually they all arrive in your penthouse. The Queen seems almost relieved and basks in the opulence of her new surroundings. Yet, it seems likely that her relief has more to do with saving her from a lifetime of gang rape at the mercy of her former subjects, than it does the familiar luxury. She submits to biometric scanning obediently and without fuss<<if $seePreg != 0>>, during which you discover to her surprise that she is pregnant. Since she hasn't begun to show yet, it's unclear whether the child is the former King's or the new arcology owner's. You don't have the means to discern the father of the child, but you notice she cradles her ever so slightly rounded stomach protectively nonetheless<</if>>. Meanwhile, the ladies seem comforted by the opulence of their new surroundings. Though they still retain much of their aristocratic arrogance, they each submit to biometric scanning with relative obedience. It seems likely that their obedience is borne out of a delusional rationalization that enslavement by one wealthy master is better than enslavement by the unwashed masses they once lorded over.
@@ -584,6 +584,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<set $activeSlave.behavioralFlaw = either("arrogant", "bitchy")>>
<<run newSlave($activeSlave)>> /* skip New Slave Intro */
<<set $activeSlave.recruiter = 0>> /* override New Slave Intro */
+ <<run cashX(-100000, "slaveTransfer", $activeSlave)>>
<</for>>
/*Queen*/
<<set _queen.origin = "She was the Queen of a royal kingdom, till her husband was overthrown and she was sold for credits.">>
@@ -593,6 +594,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<set _queen.father = $missingParentID>>
<<set $missingParentID-->>
<<run newSlave(_queen)>> /* skip New Slave Intro */
+ <<run cashX(-200000, "slaveTransfer", _queen)>>
<</replace>>
<</link>> // It will cost about <<print cashFormat(500000)>> to enslave the Queen and her court ladies.//
<<else>>
@@ -658,7 +660,6 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<if $cash >= 2500000 && $familyTesting == 1>>
<br><<link "Send an unheard amount of credits and goods to retrieve the entire court.">>
<<replace "#result">>
- <<set $cash -= 2500000>>
You take a tablet and transmit a communication request to the new arcology owner with your intent. Once his shock wears off, he readily accepts with little need for negotiation. Soon, a flight of VTOLs land in the new arcology laden with goods. When they take off again they have the prince and princess, clad in chains and bound face to face in a forced embrace, the Queen, who is resigned to her fate, and a gaggle of terrified court ladies.
<br><br>
Eventually they all arrive in your penthouse. The prince and princess are flushed with embarrassment in their compromising position. The former prince is beside himself with rage, but seems to be holding himself back for his little sister's sake, while she struggles to maintain a façade of poise and grace. The slightest trembling of her balled up fists, the minute tremors that mar her immaculate posture, her inability to meet your eyes with her own — all signs that she is still a scared girl despite all her royal trappings. Nonetheless, though the princess's court training is unlikely to be very beneficial to her in her new life in the penthouse, it does stand in stark contrast to her more common slave peers. However, the prince's submission to life as a slave is another question entirely. The Queen, on the other hand, seems almost relieved and basks in the opulence of her new surroundings. Yet, it seems likely that her relief has more to do with saving her from a lifetime of gang rape at the mercy of her former subjects, than it does the familiar luxury. She submits to biometric scanning obediently and without fuss<<if $seePreg != 0>>, during which you discover to her surprise that she is pregnant. Since she hasn't begun to show yet, it's unclear whether the child is the former King's or the new arcology owner's. You don't have the means to discern the father of the child, but you notice she cradles her ever so slightly rounded stomach protectively nonetheless<</if>>. Lastly, the ladies seem comforted by the opulence of their new surroundings. Though they still retain much of their aristocratic arrogance, they each submit to biometric scanning with relative obedience. It seems likely that their obedience is borne out of a delusional rationalization that enslavement by one wealthy master is better than enslavement by the unwashed masses they once lorded over.
@@ -698,6 +699,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<set $activeSlave.behavioralFlaw = either("arrogant", "bitchy")>>
<<run newSlave($activeSlave)>> /* skip New Slave Intro */
<<set $activeSlave.recruiter = 0>> /* override New Slave Intro */
+ <<run cashX(-250000, "slaveTransfer", $activeSlave)>>
<</for>>
/* princess */
<<set _princess.origin = "She was a princess of a royal kingdom, till her family was overthrown and she was sold for credits.">>
@@ -706,12 +708,14 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<set _princess.father = $missingParentID>>
<<set $missingParentID-->>
<<run newSlave(_princess)>> /* skip New Slave Intro */
+ <<run cashX(-1500000, "slaveTransfer", $activeSlave)>>
/* prince */
<<set _prince.origin = "She was the crown prince of a royal kingdom, till her family was overthrown and she was sold for credits.">>
<<set _prince.recruiter = 0>>
<<set _prince.mother = _princess.mother>>
<<set _prince.father = _princess.father>>
<<run newSlave(_prince)>> /* skip New Slave Intro */
+ <<run cashX(-150000, "slaveTransfer", $activeSlave)>>
/*Queen*/
<<set _queen.origin = "She was the Queen of a royal kingdom, till her husband was overthrown and she was sold for credits.">>
<<set _queen.recruiter = 0>>
@@ -720,6 +724,7 @@ Time is short, but you are well placed to acquire some choice slaves. With an ad
<<set _queen.father = $missingParentID>>
<<set $missingParentID-->>
<<run newSlave(_queen)>> /* skip New Slave Intro */
+ <<run cashX(-600000, "slaveTransfer", $activeSlave)>>
<</replace>>
<</link>> // It will cost about <<print cashFormat(2500000)>> to enslave the entire court.//
<<elseif $familyTesting == 1>>
diff --git a/src/uncategorized/costsBudget.tw b/src/uncategorized/costsBudget.tw
index 7c825bb8556..a80473c9181 100644
--- a/src/uncategorized/costsBudget.tw
+++ b/src/uncategorized/costsBudget.tw
@@ -443,7 +443,13 @@ for(var i = 0; i < State.variables.lastWeeksCashIncome.length; i++){
<<if $lastWeeksCashIncome.weather || $lastWeeksCashExpenses.weather>>
<tr>
- <td>Weather</td>
+ <td>
+ <<if $lastWeeksCashExpenses.weather > 0>>
+ Weather is causing @@.red;expensive damage.@@ Consider a protective [[upgrade|Manage Arcology][$nextButton = "Back to Budget", $nextLink = "Costs Budget"]].
+ <<else>>
+ Weather
+ <</if>>
+ </td>
<td>$lastWeeksCashIncome.weather</td>
<td>$lastWeeksCashExpenses.weather</td>
<td>
@@ -747,14 +753,14 @@ for(var i = 0; i < State.variables.lastWeeksCashIncome.length; i++){
</tr>
<</if>>
- <<if $lastWeeksCashIncome.stocksBought|| $lastWeeksCashExpenses.stocksBought>>
+ <<if $lastWeeksCashIncome.stocksTraded|| $lastWeeksCashExpenses.stocksTraded>>
<tr>
<td>Stock trading</td>
- <td>$lastWeeksCashIncome.stocksBought</td>
- <td>$lastWeeksCashExpenses.stocksBought</td>
+ <td>$lastWeeksCashIncome.stocksTraded</td>
+ <td>$lastWeeksCashExpenses.stocksTraded</td>
<td>
- <<set $lastWeeksCashProfits.stocksBought = ($lastWeeksCashIncome.stocksBought + $lastWeeksCashExpenses.stocksBought)>>
- $lastWeeksCashProfits.stocksBought
+ <<set $lastWeeksCashProfits.stocksTraded = ($lastWeeksCashIncome.stocksTraded + $lastWeeksCashExpenses.stocksTraded)>>
+ $lastWeeksCashProfits.stocksTraded
</td>
</tr>
<</if>>
diff --git a/src/uncategorized/costsWidgets.tw b/src/uncategorized/costsWidgets.tw
index 9c4a055c835..f774a749f49 100644
--- a/src/uncategorized/costsWidgets.tw
+++ b/src/uncategorized/costsWidgets.tw
@@ -529,7 +529,7 @@ personalBusiness:0,
PCtraining: 0,
PCmedical: 0,
PCskills: 0,
-stocksBought:0, /*trading*/
+stocksTraded:0, /*trading*/
stocks:0, /*share growth*/
fines:0,
event:0, /*poker night etc. Try to file things elsewhere if you can.*/
diff --git a/src/uncategorized/economics.tw b/src/uncategorized/economics.tw
index 5ac17c73d0a..5f7f02c2c86 100644
--- a/src/uncategorized/economics.tw
+++ b/src/uncategorized/economics.tw
@@ -31,7 +31,7 @@
<br><br>
<<if $corpIncorporated == 0>>
<span id="incorporate">
- You have not yet committed funds to create a publicly traded slave trading corporation. <<link "Lay the groundwork for incorporation">><<set $corpIncorporated = 1>><<set $sharePrice = 10>><<set $oldSharePrice = $sharePrice>><<set $personalShares = 2000>><<set $cash -= 30000>><<set $publicShares = 1000>><<set $corpCash = 20000>><<set $generalAssets = 500>><<set $slaveAssets = 1000>><<set $entrapmentAssets = 500>><<set $captureAssets = 500>><<set $trainingAssets = 500>><<set $surgicalAssets = 500>><<set $drugAssets = 500>><<replace "#incorporate">><<print "The groundwork has been laid for the incorporation of a publicly traded slave trading corporation. The IPO will involve 1000 shares at <<print cashFormat(10)>>/share.">><</replace>><</link>> //Costs <<print cashFormat(30000)>>//
+ You have not yet committed funds to create a publicly traded slave trading corporation. <<link "Lay the groundwork for incorporation">><<set $corpIncorporated = 1>><<set $sharePrice = 10>><<set $oldSharePrice = $sharePrice>><<set $personalShares = 2000>><<run cashX(-30000, "stocksTraded")>><<set $publicShares = 1000>><<set $corpCash = 20000>><<set $generalAssets = 500>><<set $slaveAssets = 1000>><<set $entrapmentAssets = 500>><<set $captureAssets = 500>><<set $trainingAssets = 500>><<set $surgicalAssets = 500>><<set $drugAssets = 500>><<replace "#incorporate">><<print "The groundwork has been laid for the incorporation of a publicly traded slave trading corporation. The IPO will involve 1000 shares at <<print cashFormat(10)>>/share.">><</replace>><</link>> //Costs <<print cashFormat(30000)>>//
</span>
<<else>>
<<include "Corporation Developments">>
@@ -107,7 +107,7 @@
<div class="content">
<<if $corpIncorporated == 0>>
<span id="incorporate">
- You have not yet committed funds to create a publicly traded slave trading corporation. <<link "Lay the groundwork for incorporation">><<set $corpIncorporated = 1>><<set $sharePrice = 10>><<set $oldSharePrice = $sharePrice>><<set $personalShares = 2000>><<set $cash -= 30000>><<set $publicShares = 1000>><<set $corpCash = 20000>><<set $generalAssets = 500>><<set $slaveAssets = 1000>><<set $entrapmentAssets = 500>><<set $captureAssets = 500>><<set $trainingAssets = 500>><<set $surgicalAssets = 500>><<set $drugAssets = 500>><<replace "#incorporate">><<print "The groundwork has been laid for the incorporation of a publicly traded slave trading corporation. The IPO will involve 1000 shares at <<print cashFormat(10)>>/share.">><</replace>><</link>> //Costs <<print cashFormat(30000)>>//
+ You have not yet committed funds to create a publicly traded slave trading corporation. <<link "Lay the groundwork for incorporation">><<set $corpIncorporated = 1>><<set $sharePrice = 10>><<set $oldSharePrice = $sharePrice>><<set $personalShares = 2000>><<run cashX(-30000, "stocksTraded")>><<set $publicShares = 1000>><<set $corpCash = 20000>><<set $generalAssets = 500>><<set $slaveAssets = 1000>><<set $entrapmentAssets = 500>><<set $captureAssets = 500>><<set $trainingAssets = 500>><<set $surgicalAssets = 500>><<set $drugAssets = 500>><<replace "#incorporate">><<print "The groundwork has been laid for the incorporation of a publicly traded slave trading corporation. The IPO will involve 1000 shares at <<print cashFormat(10)>>/share.">><</replace>><</link>> //Costs <<print cashFormat(30000)>>//
</span>
<<else>>
<<include "Corporation Developments">>
diff --git a/src/uncategorized/pBombing.tw b/src/uncategorized/pBombing.tw
index 7e0bbeebe26..294fdd0af96 100644
--- a/src/uncategorized/pBombing.tw
+++ b/src/uncategorized/pBombing.tw
@@ -30,7 +30,7 @@ The implant is small, and went off too far ahead to do anything more than stun.
Your bodyguard's enhancements are not exactly secret, however, and the attackers are numerous, sent to overwhelm $him. $He drops $his weapon, ammunition expended, producing a scream of triumph from one of the few remaining assailants. Nothing daunted, $he swings $his dominant hand down to $his thigh on that side. It unfolds and places a pistol in $his grip, which $he brings up and uses to end the engagement.
<br><br>
After reloading $his pistol from the ammunition compartment in $his other thigh, $he strides mechanically from body to body, a few of which are still moving. Stopping by each one, $he places $his palm against the base of each head with obscene care before extending the blade in $his forearm through it. This done, $he scans for further threats. There are none, and due to $his terrifying display there is @@.green;an increase in confidence in the security of $arcologies[0].name@@ and @@.green;public applause for your skill in training $him.@@ There is some @@.red;minor damage@@ to repair, but no lasting harm.
- <<set $cash -= 1000>>
+ <<run cashX(-1000, "event", $Bodyguard)>>
<<set $rep += 500>>
<<set $arcologies[0].prosperity += 1>>
@@ -46,18 +46,18 @@ The implant is small, and went off too far ahead to do anything more than stun.
drawing $his machine pistol. $He cradles the diminutive weapon in both hands and swivels from target to target, placing a disciplined burst of fire in each at its center of mass.
<</if>>
None of them gets within five <<if $showInches == 2>>yards<<else>>meters<</if>>. $Bodyguard.slaveName dispassionately places a round in the head of each body, reloads, and takes up a position from which $he can watch for further threats. There are none, and due to $his sterling conduct there is @@.green;an increase in confidence in the security of $arcologies[0].name@@ and @@.green;public applause for your skill in training $him.@@ There is some @@.red;minor damage@@ to repair, but no lasting harm.
- <<set $cash -= 1000>>
+ <<run cashX(-1000, "event", $Bodyguard)>>
<<set $rep += 500>>
<<set $arcologies[0].prosperity += 1>>
<<elseif $Bodyguard.muscles > 5>>
$Bodyguard.slaveName hurriedly <<if ($Bodyguard.muscles+$Bodyguard.height-100)/25 > 5>>gets $his light machine gun firing. The weapon's high rate of fire tears through the first enemy but rapidly pulls $his aim off target.<<elseif ($Bodyguard.muscles+$Bodyguard.height-100)/25 > 4>>brings up $his battle rifle. $He hits the nearest assailant with $his first round and then fires again, but the weapon's powerful recoil sends it over $his target.<<elseif ($Bodyguard.muscles+$Bodyguard.height-100)/25 > 3>>brings up $his submachine gun. $He points it at the nearest assailant and pulls the trigger; the weapon's high rate of fire tears through the enemy but rapidly pulls $his aim off target.<<else>>draws $his machine pistol. $He points it one-handed at the nearest assailant and pulls the trigger; the weapon's high rate of fire tears through the enemy but rapidly pulls $his aim off target.<</if>> By the time $he pulls the muzzle back down the others are on $him. Fortunately, $he is equal to the challenge, getting $his sword into gory action. $He is physically powerful but unskilled, so the result is simple, unlovely butcher's work. This spectacle produces @@.green;an increase in confidence in the security of $arcologies[0].name.@@ There is some @@.red;minor property damage@@ to repair, but no lasting harm.
- <<set $cash -= 1000>>
+ <<run cashX(-1000, "event", $Bodyguard)>>
<<set $arcologies[0].prosperity += 1>>
<<else>>
$Bodyguard.slaveName hurriedly <<if ($Bodyguard.muscles+$Bodyguard.height-100)/25 > 5>>gets $his light machine gun firing. The weapon's high rate of fire tears through the first enemy but rapidly pulls $his aim off target.<<elseif ($Bodyguard.muscles+$Bodyguard.height-100)/25 > 4>>brings up $his battle rifle. $He hits the nearest assailant with $his first round and then fires again, but the weapon's powerful recoil sends it over $his target.<<elseif ($Bodyguard.muscles+$Bodyguard.height-100)/25 > 3>>brings up $his submachine gun. $He points it at the nearest assailant and pulls the trigger; the weapon's high rate of fire tears through the enemy but rapidly pulls $his aim off target.<<else>>draws $his machine pistol. $He points it one-handed at the nearest assailant and pulls the trigger; the weapon's high rate of fire tears through the enemy but rapidly pulls $his aim off target.<</if>> By the time $he pulls the muzzle back down the others are on $him. $His sword is very sharp, but so are $his assailants' weapons, and everyone is unskilled. As often happens with bladed fights between unarmored novices, everyone dies, and so fast that you cannot intervene. $Bodyguard.slaveName expires gasping in agony over multiple deep wounds to $his abdomen, but still manages to lock eyes with you as $he does. There is some @@.red;minor property damage@@ to repair, but no lasting harm.
- <<set $cash -= 1000>>
+ <<run cashX(-1000, "event", $Bodyguard)>>
<<set $Bodyguard.health -= 1000>>
<<set $activeSlave = $Bodyguard>>
<<include "Remove activeSlave">>
@@ -65,15 +65,15 @@ The implant is small, and went off too far ahead to do anything more than stun.
<<elseif $personalArms > 0>>
You are prepared for this exigency. Your handsome clothing conceals a small but very powerful pistol. This fact comes slowly back to you as your ears and mind shake off the blast effects. There is something important about this fact, but you are having trouble thinking of it. Eventually, you remember, and groggily draw and level the weapon. Its rocket-assisted slugs detonate on contact, assisting your impaired marksmanship by causing fatal damage regardless of shot placement. You are alive, and not permanently damaged, which is more than can be said for your assailants, who have, with the assistance of your weapon, redecorated this area of the club in red tones. There is some @@.red;minor property damage@@ to repair, but no lasting harm.
- <<set $cash -= 1000>>
+ <<run cashX(-1000, "event")>>
<<elseif $mercenaries > 0>>
As you collect your senses, you are dimly aware of a massive form rushing to stand over you. In its hands is a chunky object that emits three long tongues of flame and makes three barking sounds that break through the ringing in your ears. You manage to get yourself together enough to understand the mercenary as he slings his shotgun and kneels to check you over. His experienced hands disclose no injury, and he says, "You'll be OK, <<= properTitle()>>. Come on, up and at 'em. Let's get you checked out." There is some @@.red;minor property damage@@ to repair, but no lasting harm.
- <<set $cash -= 1000>>
+ <<run cashX(-1000, "event")>>
<<elseif $arcologyUpgrade.drones == 1>>
Two security drones reach the scene at the very last second. They drop the assailants with taser rounds, the demonic little munitions' sharp heads burying themselves in muscle before applying voltage. There is some @@.red;minor property damage@@ to repair, but no lasting harm.
- <<set $cash -= 1000>>
+ <<run cashX(-1000, "event")>>
<<else>>
<<set $gameover = "bombing">><<goto "Gameover">>
diff --git a/src/uncategorized/pCoupAftermath.tw b/src/uncategorized/pCoupAftermath.tw
index 67c1bed78d3..ec89484d5bd 100644
--- a/src/uncategorized/pCoupAftermath.tw
+++ b/src/uncategorized/pCoupAftermath.tw
@@ -62,7 +62,7 @@ You inquire as to whether there's any identifiable cause for the evident dislike
<<set $nextButton = "Continue">><<UpdateNextButton>> /* unlock Continue button */
<<replace "#result">>
The money flows out, and the information flows in. You are rewarded with a reasonably complete picture of your rival's operations. The intelligence will be extremely useful going forward, since by gathering it, you sent an unmistakable signal that you do not consider the matter closed. There is stony silence from the Daughters' backer; today, you began a real inter-arcology war. But, with this information, you can maintain it from a position of advantage.
- <<set $cash -= 20000>>
+ <<run cashX(-20000, "war")>>
<<set $rivalryPower = 5>>
<<if $rivalSet != 0>>
<<for $i = 0; $i < $arcologies.length; $i++>>
diff --git a/src/uncategorized/pCoupAttempt.tw b/src/uncategorized/pCoupAttempt.tw
index 3d557a5f3c9..24788e6e0fe 100644
--- a/src/uncategorized/pCoupAttempt.tw
+++ b/src/uncategorized/pCoupAttempt.tw
@@ -59,8 +59,8 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
<<if $arcologies[0].FSRomanRevivalistLaw + $mercenaries + $personalArms + $hackerSupport > 8>>
@@.yellow;The Daughters of Liberty are utterly crushed.@@ $arcologies[0].name has been slightly damaged, but even as the last pockets of resistance are crushed, your citizens begin repairs themselves. The effect on your reputation is @@.green;immensely positive,@@ since your victory was insultingly easy and barely set the arcology's prosperity back at all. You also took a truly impressive bag of prisoners.
<<set $daughtersVictory = 3>>
- <<set $cash -= 2000>>
- <<set $cash -= Math.trunc($cash*0.2)>>
+ <<run cashX(-2000, "war")>>
+ <<run cashX(forceNeg(Math.trunc($cash*0.2)), "war")>>
<<set $arcologies[0].prosperity = Math.trunc($arcologies[0].prosperity*0.7)>>
<<set $rep += 2000>>
<<set $activeSlaveOneTimeMinAge = 16>>
@@ -92,8 +92,8 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
<<elseif $arcologies[0].FSRomanRevivalistLaw == 1>>
@@.yellow;The Daughters of Liberty are annihilated.@@ @@.red;$arcologies[0].name has been damaged,@@ and the repairs will be quite costly. However, the effect on your reputation is @@.green;very positive,@@ since though your victory was hard-fought and set the arcology's prosperity back @@.red;considerably,@@ you did better than other arcology owners have done when faced with similar well-armed unrest. You also took a truly impressive bag of prisoners.
<<set $daughtersVictory = 3>>
- <<set $cash -= 5000>>
- <<set $cash -= Math.trunc($cash*0.2)>>
+ <<run cashX(-5000, "war")>>
+ <<run cashX(forceNeg(Math.trunc($cash*0.2)), "war")>>
<<set $arcologies[0].prosperity = Math.trunc($arcologies[0].prosperity*0.7)>>
<<set $rep += 1000>>
<<if $seeDicks > 50>>
@@ -141,8 +141,8 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
<<set $traitor = 0, $traitorStats = 0>>
<</if>>
<<set $daughtersVictory = 2>>
- <<set $cash -= 10000>>
- <<set $cash -= Math.trunc($cash*0.3)>>
+ <<run cashX(-10000, "war")>>
+ <<run cashX(forceNeg(Math.trunc($cash*0.3)), "war")>>
<<set $arcologies[0].prosperity = Math.trunc($arcologies[0].prosperity*0.5)>>
<<set $rep += 500>>
<<if $seeDicks > 50>>
diff --git a/src/uncategorized/pDefenseFears.tw b/src/uncategorized/pDefenseFears.tw
index da1167a6eb1..c333020c066 100644
--- a/src/uncategorized/pDefenseFears.tw
+++ b/src/uncategorized/pDefenseFears.tw
@@ -24,7 +24,7 @@ A deputation of slaveowning citizens comes to see you. Though they haven't exper
<<replace "#result">>
You hire a full platoon of reputable mercenaries and a veteran officer to command them, kit them in excellent gear, and quarter them in the arcology. Their pay is on an escrow basis; the huge lump sum you paid will serve to secure them, and its interest will constitute their pay. The sight of many armed men on patrol has reassured the worried slaveowners, and they are @@.green;grateful@@ to you for seeing to their defense.
<<set $rep += 500>>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "mercenaries")>>
<<set $mercenaries = 3>>
<</replace>>
<</link>> <<if ($PC.warfare >= 100) || ($PC.career == "arcology owner")>>//This will cost <<print cashFormat(10000)>> and some upkeep, @@.springgreen;reduced by your mercenary contacts@@//<<else>>//This will cost <<print cashFormat(10000)>> and incur significant upkeep costs//<</if>>
diff --git a/src/uncategorized/pHackerSupport.tw b/src/uncategorized/pHackerSupport.tw
index 599d0503448..b368c4269d9 100644
--- a/src/uncategorized/pHackerSupport.tw
+++ b/src/uncategorized/pHackerSupport.tw
@@ -138,7 +138,7 @@ As she finishes speaking, another spasm distorts her expression, and then she su
She seems to have left a present for your poor personal assistant; _hisA little bugged avatar is visible in the bottom corner of a screen on the wall opposite you, and is writhing disturbingly. _HisA arms twist into a pair of extremely phallic tentacles, which it uses to forcefully fuck _hisA ass and pussy.
<</switch>>
<</if>>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event")>>
<<set $hackerSupport = 1>>
<</replace>>
<</link>> //This will cost <<print cashFormat(10000)>>//
diff --git a/src/uncategorized/pSnatchAndGrab.tw b/src/uncategorized/pSnatchAndGrab.tw
index af051c927d1..ad3dba51fd3 100644
--- a/src/uncategorized/pSnatchAndGrab.tw
+++ b/src/uncategorized/pSnatchAndGrab.tw
@@ -58,7 +58,7 @@
<<link "Bankroll the snatch and grab">>
<<replace "#result">>
You receive no response whatsoever. Twenty minutes later, however, a liaison VTOL aircraft the mercenaries sometimes hire arrives, loads a party of armed men and women, and leaves.
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "slaveTransfer")>>
<<set $PSnatch = 1>>
<</replace>>
<</link>>
diff --git a/src/uncategorized/pSnatchAndGrabResult.tw b/src/uncategorized/pSnatchAndGrabResult.tw
index 7516c2dc9e4..fc415478f16 100644
--- a/src/uncategorized/pSnatchAndGrabResult.tw
+++ b/src/uncategorized/pSnatchAndGrabResult.tw
@@ -128,6 +128,7 @@
<<slaveCost $activeSlave>>
<<set $slaveCost -= 1000>>
<<setLocalPronouns $activeSlave>>
+<<set $activeSlave.slaveCost = "10000">>
In the middle of the night, there is a polite knock on your penthouse door. You are alerted by $assistantName, who observes with some irritation that the mercenary who knocked has gone, has left a large case outside the door, and has satisfied the security systems that the case contains nothing hazardous.
diff --git a/src/uncategorized/persBusiness.tw b/src/uncategorized/persBusiness.tw
index cf375f698ca..d9b2d188dd4 100644
--- a/src/uncategorized/persBusiness.tw
+++ b/src/uncategorized/persBusiness.tw
@@ -373,7 +373,7 @@
<<elseif $proclamationCurrency == "reputation">>
<<set $rep = Math.clamp($rep - 4000,0,20000)>>
<<else>>
- <<set $cash -= 8000>>
+ <<run cashX(-8000, "personalBusiness")>>
<</if>>
<<elseif $proclamationType == "crime">>
force the arrest of many suspected citizens. Their personal power allowed them to avoid justice for a long time, but this day is their end. @@.green;Your crime greatly decreased@@.
@@ -383,7 +383,7 @@
<<elseif $proclamationCurrency == "reputation">>
<<set $rep = Math.clamp($rep - 4000,0,20000)>>
<<else>>
- <<set $cash -= 8000>>
+ <<run cashX(-8000, "personalBusiness")>>
<</if>>
<</if>>
<<set $proclamationsCooldown = 4, $personalAttention = "business">>
@@ -748,7 +748,7 @@
<<if $arcRepairTime > 0>>
The recent rebellion left the arcology wounded and it falls to its owner to fix it. It will still take <<if $arcRepairTime > 1>>$arcRepairTime weeks<<else>>a week<</if>> to finish repair works.
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "personalBusiness")>>
<<set $arcRepairTime--, $PC.engineering += .1>>
<</if>>
<</if>>
@@ -772,7 +772,7 @@ Routine upkeep of your demesne costs @@.yellow;<<print cashFormat($costs)>>.@@
<<set $rep -= 100>>
<</if>>
<<if $cash > 0>>
- <<set $cash -= _weatherRepairCost>>
+ <<run cashX(_weatherRepairCost, "weather")>>
<<elseif $arcologies[0].FSRestartDecoration == 100>>
Since you lack the resources to effect prompt repairs yourself, the Societal Elite cover for you. The arcology's prosperity is @@.red;is damaged,@@ but your public reputation is left intact.
<<if $eugenicsFullControl != 1>>
@@ -782,14 +782,15 @@ Routine upkeep of your demesne costs @@.yellow;<<print cashFormat($costs)>>.@@
<<if $arcologies[0].prosperity > 50>>
<<set $arcologies[0].prosperity -= random(5,10), $PC.engineering += .1>>
<</if>>
- <<set $cash -= Math.trunc(_weatherRepairCost/4)>>
+ <<run cashX(forceNeg(Math.trunc(_weatherRepairCost/4)), "weather")>>
<<else>>
Since you lack the resources to effect prompt repairs yourself, prominent citizens step in to repair their own parts of the arcology. This is @@.red;terrible for your reputation,@@ and it also @@.red;severely reduces the arcology's prosperity.@@
<<if $arcologies[0].prosperity > 50>>
<<set $arcologies[0].prosperity -= random(5,10), $PC.engineering += .1>>
<</if>>
<<set $rep = Math.trunc($rep*0.8)>>
- <<set $cash -= Math.trunc(_weatherRepairCost/4), $PC.engineering += .1>>
+ <<set $PC.engineering += .1>>
+ <<run cashX(forceNeg(Math.trunc(_weatherRepairCost/4)), "weather")>>
<</if>>
<<elseif $weatherToday.severity-$weatherCladding <= 2>>
<<if $weatherToday.severity > 2>>
diff --git a/src/uncategorized/personalAssistantOptions.tw b/src/uncategorized/personalAssistantOptions.tw
index da16d69a380..f651118d5b0 100644
--- a/src/uncategorized/personalAssistantOptions.tw
+++ b/src/uncategorized/personalAssistantOptions.tw
@@ -830,7 +830,8 @@ __Downloadable Appearances:__
<<if $assistantExtra2 == 0>>
<<if $PC.hacking < 75>>
<<link "Purchase a set of heaven and hell themed appearances">>
- <<set $cash -= Math.trunc(10000*$upgradeMultiplierArcology), $assistantExtra2 = 1, $nextLink = "Personal assistant options">>
+ <<set $assistantExtra2 = 1, $nextLink = "Personal assistant options">>
+ <<run cashX(forceNeg(Math.trunc(10000*$upgradeMultiplierArcology)), "capEx")>>
<<goto "Assistant Appearance Pack Two">>
<</link>> //Costs <<print cashFormat(Math.trunc(10000*$upgradeMultiplierArcology))>>//
<<else>>
diff --git a/src/uncategorized/reAWOL.tw b/src/uncategorized/reAWOL.tw
index 88f55d599aa..93c50ae9d56 100644
--- a/src/uncategorized/reAWOL.tw
+++ b/src/uncategorized/reAWOL.tw
@@ -167,7 +167,7 @@ Your window of opportunity to act is closing. If you have plans for punishing th
Despite the trouble $he has caused you, you manage to complete the legalities and biometric scanning quickly and without incident. Of course, this is in large part due to the fact that the would-be mutineer is of course restrained. Based on the accounts of $his captors and the numerous injuries evident amongst them, $he is likely to be violent when $he is finally released.
<br>
<<include "New Slave Intro">>
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<</replace>>
<</link>>
@@ -176,7 +176,8 @@ Your window of opportunity to act is closing. If you have plans for punishing th
<<link "Flog $him in public then exile $him from the arcology">>
<<replace "#aliveresult">>
An example must be made. There is a binding contract between you and your $mercenariesTitle, and this $woman attempted to undermine it for $his own selfish profit. The protesting bitch is stripped and flogged on the promenade before being escorted bleeding from the arcology. The public @@.green;approves of this harshness.@@
- <<set $rep += 1000, $cash -= 5000>>
+ <<set $rep += 1000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<</replace>>
<</link>>
diff --git a/src/uncategorized/reBusyBrothel.tw b/src/uncategorized/reBusyBrothel.tw
index fee3125824e..5bc834a38cd 100644
--- a/src/uncategorized/reBusyBrothel.tw
+++ b/src/uncategorized/reBusyBrothel.tw
@@ -17,21 +17,25 @@ Of course, $brothelName is the best establishment of its kind in the arcology. C
The problem with assembly-line sex is that it has a tendency to destroy any sense of intimacy or fun. So, you make some simple preparations and close the brothel for a day, hiring some freelancers to cover. All your slave whores are allowed to sleep late, and then spend the day with you playing games and enjoying light amusements. The girls are surprised by your generosity, but they have fun. Many of the games are sexually themed. One day of giggling and squealing can't completely reverse the transactionalization of sex for them, but they @@.hotpink;appreciate the effort.@@
<<for $i = 0; $i < $BrothiIDs.length; $i++>>
<<set $slaves[$slaveIndices[$BrothiIDs[$i]]].devotion += 4>>
+ <<set $slaves[$slaveIndices[$BrothiIDs[$i]]].lastWeeksCashIncome += 250>>
+ <<set $slaves[$slaveIndices[$BrothiIDs[$i]]].lifetimeCashIncome += 250>>
<</for>>
- <<set $cash -= 1000>>
+ <<run cashX(-1000, "event")>>
<</replace>>
<</link>> //This will cost <<print cashFormat(1000)>>//
<br><<link "Hire an expert hooker to give lessons">>
<<replace "#result">>
The citizen streetwalker has had her day. A few of the cleverest have avoided being driven into poverty, either by becoming madams or by finding a way to build a new career serving the slave brothel industry. One of these is touring the city, offering her long sexual experience in seminars for slave prostitutes. Her services are not cheap, but it rapidly becomes clear that they are worth it. She is a grey-haired but still elegant woman with deep crow's feet and a smoker's voice. She is not only a sexual master, but a hard-bitten and comprehensively experienced businesswoman. All of your brothel slaves with any room for improvement in their whoring skills @@.green;learn from her lessons,@@ while those who have nothing to learn @@.hotpink;gain confidence@@ from her praise.
<<for $i = 0; $i < $BrothiIDs.length; $i++>>
+ <<set $slaves[$slaveIndices[$BrothiIDs[$i]]].lastWeeksCashIncome += 250>>
+ <<set $slaves[$slaveIndices[$BrothiIDs[$i]]].lifetimeCashIncome += 250>>
<<if $slaves[$slaveIndices[$BrothiIDs[$i]]].whoreSkill < 100>>
<<set $slaves[$i].whoreSkill += 10>>
<<else>>
<<set $slaves[$slaveIndices[$BrothiIDs[$i]]].devotion += 4>>
<</if>>
<</for>>
- <<set $cash -= 2000>>
+ <<run cashX(-2000, "event")>>
<</replace>>
<</link>> //This will cost <<print cashFormat(2000)>>//
<br><<link "Eliminate prices for one morning to promote the brothel">>
@@ -54,7 +58,7 @@ Of course, $brothelName is the best establishment of its kind in the arcology. C
<<set $slaves[_rebb].oralCount += 10>>
<<set $oralTotal += 10>>
<</for>>
- <<set $cash -= 2000>>
+ <<run cashX(-2000, "event")>>
<<set $rep += 200>>
<</replace>>
<</link>> //This will cost <<print cashFormat(2000)>>//
diff --git a/src/uncategorized/reBusyClub.tw b/src/uncategorized/reBusyClub.tw
index 283ae4f8fa1..8c9c0a9b7de 100644
--- a/src/uncategorized/reBusyClub.tw
+++ b/src/uncategorized/reBusyClub.tw
@@ -15,14 +15,14 @@ Offering slaves for free sex would become unmanageable if the club where your pu
<<link "Sponsor a special event in the club">>
<<replace "#result">>
The Free Cities are new, and so is their culture. There are new traditions, new expectations, and now, new holidays. One morning, the upper classes of the arcology are surprised and gratified to find that the club has been specially decorated, and all the club sluts are nude. The floor of the club is typically meant for dirty dancing and some light sex, not public penetrative intercourse. Not today; today is special. The festivities @@.green;greatly improve your renown;@@ you have set a high bar for what a wealthy arcology owner should do.
- <<set $cash -= 2000>>
+ <<run cashX(-2000, "event")>>
<<set $rep += 500>>
<</replace>>
<</link>> //This will cost <<print cashFormat(2000)>>//
<br><<link "Host a business exposition">>
<<replace "#result">>
With the world economy in a perilous state, the Free Cities are one of the few remaining areas where innovation and new business opportunities still appear. The novel markets associated with the slave trade only reinforce this trend, offering a cornucopia of opportunities for the clear-eyed investor with liquid assets. Every other week there is news of a new fortune being made from smart investments in leather, in human growth hormones, or in psychoactive drugs. You host an exposition for slave services centered on the club, with your slaves serving as greeters who are eager to ensure that all the little wants of visiting notables are thoroughly satisfied. The optimistic outlook projected by this event @@.green;improves $arcologies[0].name's business prospects@@ and even @@.green;reflects well on you personally.@@
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event")>>
<<set $arcologies[0].prosperity += 2>>
<<set $rep += 500>>
<</replace>>
diff --git a/src/uncategorized/reBusyDairy.tw b/src/uncategorized/reBusyDairy.tw
index 56c362463d6..eb2dcd1be7a 100644
--- a/src/uncategorized/reBusyDairy.tw
+++ b/src/uncategorized/reBusyDairy.tw
@@ -28,14 +28,14 @@ Even with high doses of modern drugs, human cows simply do not produce a very hi
<<set $slaves[_rebd].oralCount += 1>>
<<set $oralTotal += 1>>
<</for>>
- <<set $cash -= 1000>>
+ <<run cashX(-1000, "event")>>
<</replace>>
<</link>> //This will cost <<print cashFormat(1000)>>//
<<if $club != 0>>
<br><<link "Add fresh milk to the club for a day to advertise">>
<<replace "#result">>
Sexual sights and sounds are all over the arcology. Nevertheless, passersby on the club are surprised to find one morning that a previously normal screen advertising your brand of milk has a luscious pair of breasts protruding through it at head height. The advertisement encourages anyone to try a free sample. The slaves constantly rotate, pressing fresh tits through the gap for public suckling. It is @@.green;generally agreed that your product is of the finest quality@@ and you even have enquiries about how it might be exported outside the arcology, should you manage to increase production.
- <<set $cash -= 2000>>
+ <<run cashX(-2000, "event")>>
<<set $rep += 500>>
<</replace>>
<</link>> //This will cost <<print cashFormat(2000)>>//
@@ -45,7 +45,7 @@ Even with high doses of modern drugs, human cows simply do not produce a very hi
<<replace "#result">>
As a promotional gimmick, you announce with considerable fanfare a special, experimental brand of milk, available at the normal price for a short time only. The milk will be unique in that it will be from cows fed mostly on slaves' cum; the cockmilked slaves will in turn be given as much milk as possible to produce a 'pure slave product,' recursively. The sad realities of nutrition stop it from being much more than a marketing ploy, but it's certainly a @@.green;successful@@ attempt to spark discussion.
<<set $rep += 1000>>
- <<set $cash -= 1000>>
+ <<run cashX(-1000, "event")>>
<</replace>>
<</link>> //This will cost <<print cashFormat(1000)>>//
<</if>>
diff --git a/src/uncategorized/reFSNonconformist.tw b/src/uncategorized/reFSNonconformist.tw
index 89241ac8fa2..ba64b751226 100644
--- a/src/uncategorized/reFSNonconformist.tw
+++ b/src/uncategorized/reFSNonconformist.tw
@@ -214,7 +214,7 @@ The nonconformist is far too prominent and prosperous to make this an easy dilem
<</link>>
<<if $cash > 10000>>
<br><<link "Quickly manage a nuanced response">>
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event")>>
<<replace "#result">><<nobr>>
<<if $arcologies[0].FSRestart != "unset">>
You promise to deal with the situation. The Societal Elite trust you to not fail, and they are not disappointed. The fallen elite
diff --git a/src/uncategorized/reFormerAbolitionist.tw b/src/uncategorized/reFormerAbolitionist.tw
index 7bf7c1258a5..9692f93bc0a 100644
--- a/src/uncategorized/reFormerAbolitionist.tw
+++ b/src/uncategorized/reFormerAbolitionist.tw
@@ -42,7 +42,7 @@ You fasten $activeSlave.slaveName in a kneeling position in the center of your c
<<if random(1,100) > 50>>
<<replace "#result">>
You buy media coverage of $him, invest in an ad campaign, and even arrange for $him to give a speech denouncing the abolitionist movement and praising your efforts in fighting against them. Your efforts are a success. $His current extreme popularity will fade in time, but you have managed to arrange for $him a permanent place as an @@.green;example of your slave-breaking skills.@@
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<<set $rep += 200>>
<<set $activeSlave.prestige = 1>>
<<set $activeSlave.prestigeDesc = "She is notorious as a former abolitionist turned devoted slave.">>
@@ -50,7 +50,7 @@ You buy media coverage of $him, invest in an ad campaign, and even arrange for $
<<else>>
<<replace "#result">>
You buy media coverage of $him, invest in an ad campaign, and even arrange for $him to give a speech denouncing the abolitionist movement and praising your efforts in fighting against them. Unfortunately, popularity remains an art, not a science; though you do your best, the public mind's fancy eludes your grasp. As $his owner, your reputation has @@.green;increased,@@ but in a week $he'll be forgotten.
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<<set $rep += 200>>
<</replace>>
<</if>>
@@ -60,7 +60,7 @@ You buy media coverage of $him, invest in an ad campaign, and even arrange for $
<<if random(1,100) > 10>>
<<replace "#result">>
You buy prime media coverage of $him, invest in a lavish ad campaign, and even arrange for $him to give a speech denouncing the abolitionist movement and praising your efforts in fighting against them that is broadcast around the world. Your efforts are a success. $His current extreme popularity will fade in time, but you have managed to arrange for $him a permanent place as an @@.green;example of your slave-breaking skills.@@
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $rep += 400>>
<<set $activeSlave.prestige = 1>>
<<set $activeSlave.prestigeDesc = "She is notorious as a former abolitionist turned devoted slave.">>
@@ -68,7 +68,7 @@ You buy prime media coverage of $him, invest in a lavish ad campaign, and even a
<<else>>
<<replace "#result">>
You buy prime media coverage of $him, invest in a lavish ad campaign, and even arrange for $him to give a speech denouncing the abolitionist movement and praising your efforts in fighting against them that is broadcast around the world. Unfortunately, popularity remains an art, not a science; though you do your best, the public mind's fancy eludes your grasp. As $his owner, your reputation has @@.green;increased,@@ but in a week $he'll be forgotten.
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $rep += 400>>
<</replace>>
<</if>>
@@ -79,7 +79,7 @@ You buy prime media coverage of $him, invest in a lavish ad campaign, and even a
<<if random(1,100) > 50>>
<<replace "#result">>
The world is in love with $activeSlave.slaveName. $His face graces magazine covers the world over and $his passionate arguments (ghostwritten by the best spin doctors money can buy) spark debate everywhere they're heard. $He is mentioned by name in strident denunciations about the immorality of the present day from religious leaders. $He appears on the internet with all sorts of attempts at humor superimposed on $his image. $His loving and overblown descriptions of you spark a new trend in protagonists of badly-written romance novels. When a very popular talk show host attempts to call $his bluff and receives oral sex in front of a live studio audience, @@.yellowgreen;you know for sure that $his fame has stuck.@@
- <<set $cash -= 25000>>
+ <<run cashX(-25000, "event", $activeSlave)>>
<<set $rep += 600>>
<<set $activeSlave.prestige = 2>>
<<set $activeSlave.prestigeDesc = "She is world famous as an anti-abolitionist, and has told the world at length of the joys of slavery in general and slavery to you in particular.">>
@@ -87,7 +87,7 @@ The world is in love with $activeSlave.slaveName. $His face graces magazine cove
<<else>>
<<replace "#result">>
The world seems temporarily enamored with $activeSlave.slaveName as $he appears on talk shows and in political debates with millions of watchers, but before long $his fifteen minutes of fame peter out and the only offers coming in are from pornography magnates and local talk radio shows. Though $he achieved @@.yellowgreen;local fame@@ for appearing on the world stage, the rest of the world seems to have gotten bored with $activeSlave.slaveName.
- <<set $cash -= 25000>>
+ <<run cashX(-25000, "event", $activeSlave)>>
<<set $activeSlave.prestige = 1>>
<<set $activeSlave.prestigeDesc = "She is notorious as a former abolitionist turned devoted slave.">>
<<set $rep += 400>>
diff --git a/src/uncategorized/reLegendaryBalls.tw b/src/uncategorized/reLegendaryBalls.tw
index 3dc3acc512c..2fb0859bc12 100644
--- a/src/uncategorized/reLegendaryBalls.tw
+++ b/src/uncategorized/reLegendaryBalls.tw
@@ -42,7 +42,7 @@ This is a rare opportunity. The idea of cockmilking is new and understandably fa
<<if random(1,100) > 50>>
<<replace "#result">>
$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then publicly cockmilked. Several of the judges cannot resist giving you a wink as they look $him over. $activeSlave.slaveName is unsurprisingly named best in show, and will be @@.green;remembered@@ as cock stock of the highest pedigree. As $his owner, your reputation has @@.green;also increased.@@
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<<set $rep += 100>>
<<set $activeSlave.prestige = 1>>
<<set $activeSlave.prestigeDesc = "She is remembered for winning best in show as a cockmilker.">>
@@ -52,7 +52,7 @@ This is a rare opportunity. The idea of cockmilking is new and understandably fa
<<else>>
<<replace "#result">>
$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then publicly cockmilked. Several of the judges cannot resist giving you a wink as they look $him over, but others look disapprovingly at them; it seems some of your competitors also forwarded money to the committee. After furious wrangling, $activeSlave.slaveName loses to another milker. The public is impressed with $activeSlave.slaveName's balls anyway; as you are $his owner, your reputation has @@.green;increased@@ a little.
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<<set $rep += 100>>
<</replace>>
<</if>>
@@ -62,7 +62,7 @@ This is a rare opportunity. The idea of cockmilking is new and understandably fa
<<if random(1,100) > 10>>
<<replace "#result">>
$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then publicly cockmilked. After $he's put through $his paces, the most unfortunate series of accidents somehow befalls $his fellow cows. One is taken ill, another seems drugged, and someone seems to have slipped a finger of raw ginger up another's urethra, making them whine and squeal when cockmilked. $activeSlave.slaveName is unsurprisingly named best in show, and will be @@.green;remembered@@ as cock stock of the highest pedigree. As $his owner, your reputation has @@.green;also increased.@@
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $rep += 100>>
<<set $activeSlave.prestige = 1>>
<<set $activeSlave.prestigeDesc = "She is remembered for winning best in show as a cockmilker.">>
@@ -72,7 +72,7 @@ This is a rare opportunity. The idea of cockmilking is new and understandably fa
<<else>>
<<replace "#result">>
$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then publicly cockmilked. You are surprised to see that the judging committee has been changed at the last minute. They choose another cow as best in show. There are persistent @@.red;rumors@@ after the show that there was an absolute massacre of firings at the stock organization headquarters the night before the show after it was discovered that someone, widely thought to be you, had been corrupting the judges.
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $rep -= 100>>
<</replace>>
<</if>>
diff --git a/src/uncategorized/reLegendaryCow.tw b/src/uncategorized/reLegendaryCow.tw
index 3bbb5cbb614..da92f02f430 100644
--- a/src/uncategorized/reLegendaryCow.tw
+++ b/src/uncategorized/reLegendaryCow.tw
@@ -42,7 +42,7 @@ This is a rare opportunity. The idea of human dairy is new and understandably fa
<<if random(1,100) > 50>>
<<replace "#result">>
$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then publicly milked. Several of the judges cannot resist giving you a wink as they look $him over. $activeSlave.slaveName is unsurprisingly named best in show, and will be @@.green;remembered@@ as dairy stock of the highest pedigree. As $his owner, your reputation has @@.green;also increased.@@
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<<set $rep += 100>>
<<set $activeSlave.prestige = 1>>
<<set $activeSlave.prestigeDesc = "She is remembered for winning best in show as a dairy cow.">>
@@ -52,7 +52,7 @@ This is a rare opportunity. The idea of human dairy is new and understandably fa
<<else>>
<<replace "#result">>
$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then publicly milked. Several of the judges cannot resist giving you a wink as they look $him over, but others look disapprovingly at them; it seems some of your competitors also forwarded money to the committee. After furious wrangling, $activeSlave.slaveName loses to another cow. The public is impressed with $activeSlave.slaveName's tits anyway; as you are $his owner, your reputation has @@.green;increased@@ a little.
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<<set $rep += 100>>
<</replace>>
<</if>>
@@ -62,7 +62,7 @@ This is a rare opportunity. The idea of human dairy is new and understandably fa
<<if random(1,100) > 10>>
<<replace "#result">>
$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then publicly milked. After $he's put through $his paces, the most unfortunate series of accidents somehow befalls $his fellow cows. One is taken ill, another seems drugged, and someone seems to have slipped a finger of raw ginger up another's ass, making them whine and squeal constantly. $activeSlave.slaveName is unsurprisingly named best in show, and will be @@.green;remembered@@ as dairy stock of the highest pedigree. As $his owner, your reputation has @@.green;also increased.@@
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $rep += 100>>
<<set $activeSlave.prestige = 1>>
<<set $activeSlave.prestigeDesc = "She is remembered for winning best in show as a dairy cow.">>
@@ -72,7 +72,7 @@ This is a rare opportunity. The idea of human dairy is new and understandably fa
<<else>>
<<replace "#result">>
$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then publicly milked. You are surprised to see that the judging committee has been changed at the last minute. They choose another cow as best in show. There are persistent @@.red;rumors@@ after the show that there was an absolute massacre of firings at the dairy organization headquarters the night before the show after it was discovered that someone, widely thought to be you, had been corrupting the judges.
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $rep -= 100>>
<</replace>>
<</if>>
diff --git a/src/uncategorized/reLegendaryEntertainer.tw b/src/uncategorized/reLegendaryEntertainer.tw
index fc52eb1642f..a9162bf16be 100644
--- a/src/uncategorized/reLegendaryEntertainer.tw
+++ b/src/uncategorized/reLegendaryEntertainer.tw
@@ -31,7 +31,7 @@ This is a rare opportunity. Such popularity and fame is here today, and gone tom
<<if random(1,100) > 50>>
<<replace "#result">>
You buy media coverage of $him, invest in an ad campaign, and even arrange for persons of influence and taste to sample and review $his gentle caresses. Your efforts are a success. $His current extreme popularity will fade in time, but you have managed to arrange for $him a permanent place as a @@.green;respected and famous courtesan.@@ As $his owner, your reputation has @@.green;also increased.@@
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<<set $rep += 200>>
<<if $activeSlave.prestige <= 1>>
<<set $activeSlave.prestige = 1>>
@@ -43,7 +43,7 @@ This is a rare opportunity. Such popularity and fame is here today, and gone tom
<<else>>
<<replace "#result">>
You buy media coverage of $him, invest in an ad campaign, and even arrange for persons of influence and taste to sample and review $his gentle caresses. Unfortunately, popularity remains an art, not a science; though you do your best, the public mind's fancy eludes your grasp. As $his owner, your reputation has @@.green;increased,@@ but in a week $he'll be forgotten.
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<<set $rep += 200>>
<</replace>>
<</if>>
@@ -53,7 +53,7 @@ This is a rare opportunity. Such popularity and fame is here today, and gone tom
<<if random(1,100) > 10>>
<<replace "#result">>
You buy prime media coverage of $him, invest in a lavish ad campaign, and even arrange for persons of great influence and fine taste to sample and review $his gentle caresses. Your efforts are a success. $His current extreme popularity will fade in time, but you have managed to arrange for $him a permanent place as a @@.green;respected and famous courtesan.@@ As $his owner, your reputation has @@.green;also increased.@@
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $rep += 400>>
<<if $activeSlave.prestige <= 1>>
<<set $activeSlave.prestige = 1>>
@@ -65,7 +65,7 @@ This is a rare opportunity. Such popularity and fame is here today, and gone tom
<<else>>
<<replace "#result">>
You buy prime media coverage of $him, invest in a lavish ad campaign, and even arrange for persons of great influence and fine taste to sample and review $his gentle caresses. Unfortunately, popularity remains an art, not a science; though you do your best, the public mind's fancy eludes your grasp. As $his owner, your reputation has @@.green;increased,@@ but in a week $he'll be forgotten.
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $rep += 400>>
<</replace>>
<</if>>
diff --git a/src/uncategorized/reLegendaryWhore.tw b/src/uncategorized/reLegendaryWhore.tw
index 5081385ce4f..b546dc972ed 100644
--- a/src/uncategorized/reLegendaryWhore.tw
+++ b/src/uncategorized/reLegendaryWhore.tw
@@ -32,7 +32,7 @@ This is a rare opportunity. Such popularity and fame is here today, and gone tom
<<if random(1,100) > 50>>
<<replace "#result">>
You buy media coverage of $him, invest in an ad campaign, and even arrange for persons of influence and taste to sample and review $his many delights. Your efforts are a success. $His current extreme popularity will fade in time, but you have managed to arrange for $him a permanent place as a @@.green;notorious and very popular prostitute.@@ As $his owner, your reputation has @@.green;also increased.@@
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<<set $rep += 100>>
<<set $activeSlave.prestige = 1>>
<<set $activeSlave.prestigeDesc = "She is a famed Free Cities whore, and commands top prices.">>
@@ -42,7 +42,7 @@ This is a rare opportunity. Such popularity and fame is here today, and gone tom
<<else>>
<<replace "#result">>
You buy media coverage of $him, invest in an ad campaign, and even arrange for persons of influence and taste to sample and review $his many delights. Unfortunately, popularity remains an art, not a science; though you do your best, the public mind's fancy eludes your grasp. As $his owner, your reputation has @@.green;increased,@@ but in a week she'll be forgotten.
- <<set $cash -= 5000>>
+ <<run cashX(-5000, "event", $activeSlave)>>
<<set $rep += 100>>
<</replace>>
<</if>>
@@ -52,7 +52,7 @@ This is a rare opportunity. Such popularity and fame is here today, and gone tom
<<if random(1,100) > 10>>
<<replace "#result">>
You buy prime media coverage of $him, invest in a lavish ad campaign, and even arrange for persons of great influence and fine taste to sample and review $his many delights. Your efforts are a success. $His current extreme popularity will fade in time, but you have managed to arrange for $him a permanent place as a @@.green;notorious and very popular prostitute.@@ As $his owner, your reputation has @@.green;also increased.@@
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $rep += 200>>
<<set $activeSlave.prestige = 1>>
<<set $activeSlave.prestigeDesc = "She is a famed Free Cities whore, and commands top prices.">>
@@ -62,7 +62,7 @@ This is a rare opportunity. Such popularity and fame is here today, and gone tom
<<else>>
<<replace "#result">>
You buy prime media coverage of $him, invest in a lavish ad campaign, and even arrange for persons of great influence and fine taste to sample and review $his many delights. Unfortunately, popularity remains an art, not a science; though you do your best, the public mind's fancy eludes your grasp. As $his owner, your reputation has @@.green;increased,@@ but in a week she'll be forgotten.
- <<set $cash -= 10000>>
+ <<run cashX(-10000, "event", $activeSlave)>>
<<set $rep += 200>>
<</replace>>
<</if>>
diff --git a/src/uncategorized/reMalefactor.tw b/src/uncategorized/reMalefactor.tw
index cf61156e43d..bf2ffeab58d 100644
--- a/src/uncategorized/reMalefactor.tw
+++ b/src/uncategorized/reMalefactor.tw
@@ -333,7 +333,7 @@ $He is easily taken into custody and $his contraband confiscated once the jeerin
<<case "liberator">>
<<setNonlocalPronouns $seeDicks>>
-<<if $assistantName == "your personal assistant">>Your personal assistant<<else>>$assistantName<</if>> alerts you that a criminal has been detected by your security systems and detained by the drones. Crime is extremely uncommon in your arcology, but this is a special case. A well-muscled, well-armed $woman was caught attempting to smuggle a slave owned by one of your tenants out of the arcology. Though the slave surrendered immediately (and will be dealt with by _hisU owner), the would-be liberatrix was caught by your security drones. $He destroyed two of them and caused @@.red;other minor damage@@<<set $cash -= 1000>> that will require a small sum to repair, but was eventually subdued. The drones had to expend a great deal of nonlethal ordnance to bring $him down and keep $him down, but $he is now entirely at your mercy.
+<<if $assistantName == "your personal assistant">>Your personal assistant<<else>>$assistantName<</if>> alerts you that a criminal has been detected by your security systems and detained by the drones. Crime is extremely uncommon in your arcology, but this is a special case. A well-muscled, well-armed $woman was caught attempting to smuggle a slave owned by one of your tenants out of the arcology. Though the slave surrendered immediately (and will be dealt with by _hisU owner), the would-be liberatrix was caught by your security drones. $He destroyed two of them and caused @@.red;other minor damage@@<<run cashX(-1000, "event", $activeSlave)>> that will require a small sum to repair, but was eventually subdued. The drones had to expend a great deal of nonlethal ordnance to bring $him down and keep $him down, but $he is now entirely at your mercy.
<</switch>>
diff --git a/src/uncategorized/reMilfTourist.tw b/src/uncategorized/reMilfTourist.tw
index 8a8718f6ca6..492c08af78e 100644
--- a/src/uncategorized/reMilfTourist.tw
+++ b/src/uncategorized/reMilfTourist.tw
@@ -134,7 +134,7 @@
<<replace "#result">>
When your new slave comes to, _his2 weight is hanging from _his2 wrists, bound over _his2 head. _He2's not exactly thin, making the position uncomfortable for _his2 arms, so _he2 groggily stands, finding _himself2 in a pool of light in the middle of a cell. _He2's nursing a tremendous hangover, and though _he2 does not realize it, _he2's drugged. You're present, though not visible, witnessing _his2 first conscious moment of slavery from your desk. Realization is slow. _He2's no innocent, so _he2 recognizes the sensations of waking up the morning after a night of drinking interspersed with vigorous vaginal, oral and anal intercourse, but _he2 does not remember the specifics. After a few minutes, _he2 understands that no one is coming, and speaks up hesitantly: "Is anyone there?" Getting no immediate answer, _he2 slumps against _his2 wrist restraints again, and begins to cry to _himself2. "W-why would a-anyone do this."
<br>
- <<set $cash -= 20000>>
+ <<run cashX(-20000, "event", $activeSlave)>>
<<include "New Slave Intro">>
<<set $activeSlave.recruiter = 0>>
<</replace>>
diff --git a/src/uncategorized/recETS.tw b/src/uncategorized/recETS.tw
index ef10166c049..6912822258c 100644
--- a/src/uncategorized/recETS.tw
+++ b/src/uncategorized/recETS.tw
@@ -1676,7 +1676,6 @@ This call is coming from a public kiosk, which is usually an indication that the
<<case "addict mother daughter" "posh mother daughter">>
<<link "Manipulate $him to enslave both mother and daughter">>
- <<set $cash -= ($contractCost*2)>>
<<replace "#result">>
<<switch $RecETSevent>>
<<case "addict mother daughter">>
@@ -1691,20 +1690,23 @@ This call is coming from a public kiosk, which is usually an indication that the
$His daughter walks in angrily demanding to know why you called _him2 here. _He2 sees _his2 mother kneeling naked next to you, hears the hiss-click of the door closing and locking behind _him2, and makes the connection far too late to run. _He2 begins to scream at both you and _his2 mother at the top of _his2 lungs, and manages to keep up an impressive volume until you get _him2 gagged. _His2 mother does not move to interfere as you strip and bind $his daughter's struggling body.
<</switch>>
<<run newSlave($relative)>>
+ <<run cashX($contractCost, "slaveTransfer", $relative)>>
<<run newSlave($relative2)>>
+ <<run cashX($contractCost, "slaveTransfer", $relative2)>>
<</replace>>
<</link>>
<<case "mismatched pair">>
<<link "Enslave both">>
- <<set $cash -= ($contractCost*2)>>
<<replace "#result">>
The poor sissy isn't happy to become a slave, but $he's clearly relieved to be away from $his sister. The bitch isn't likely to have an easy time; the sale didn't clear _him2 from debt. $activeSlave.slaveName describes $his basic sexual experience, which includes a lot of sucking and anal whoring. Without further ado $he moves from practical sexual slavery at the hands of $his sister to actual sexual slavery.
<br><br>
$His sister-pimp walks in angrily demanding to know why you called _him2 here. _He2 sees _his2 sissy sister kneeling naked next to you, hears the hiss-click of the door closing and locking behind _him2, and makes the connection far too late to run. _He2 begins to scream at both you and _his2 sister at the top of _his2 lungs, and manages to keep up an impressive volume until you get _him2 gagged. _His2 sister does not move to interfere as you strip and bind the struggling body. In fact, as you get the gag in place, $he begins to laugh an unstable, cracking laugh that degenerates into sobbing.
<<run newSlave($relative)>>
+ <<run cashX($contractCost, "slaveTransfer", $relative)>>
<<run newSlave($relative2)>>
+ <<run cashX($contractCost, "slaveTransfer", $relative2)>>
<</replace>>
<</link>>
@@ -1712,7 +1714,6 @@ This call is coming from a public kiosk, which is usually an indication that the
<<if $minimumSlaveAge <= 3>>
<<link "Accept $his offer">>
- <<set $cash -= ($contractCost*2)>>
<<replace "#result">>
You have the needy girl immediately bought to your penthouse where you help $his laboring body into an available bed or inspection. $He asks where $his other babies were taken, to which you reply somewhere they can be raised properly. They'll be taken care of and won't have to grow up on the streets, plus they were sucking the life out of $him. $He's a little depressed at the news, but understands your reasons. You take the opportunity to give $him a good look over; $he is really dilated! Apart from that, between all the births and dicks, $his vagina is rather worn out, though $he seems to understand how to use it. $His anus has also seen use, but not nearly as much.
<br><br>
@@ -1721,7 +1722,9 @@ This call is coming from a public kiosk, which is usually an indication that the
You notice _his2 belly is slightly distended. It could be hunger, but upon closer inspection, you realize _his2 hymen has been torn. _He2's likely been servicing men alongside _his2 mother and has a bun in the oven too.
<</if>>
<<run newSlave($relative)>>
+ <<run cashX($contractCost, "slaveTransfer", $relative)>>
<<run newSlave($relative2)>>
+ <<run cashX($contractCost, "slaveTransfer", $relative2)>>
<</replace>>
<</link>>
<</if>>
--
GitLab