code:
:: RE standard punishment [nobr]

<<set $activeSlave = $eventSlave>>

<<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "Next Week">>

/* 000-250-006 */
<<if $seeImages == 1>>
	<<if $imageChoice == 1>>

<<SlaveArt $activeSlave 2 0>>

	<<else>>

<<SlaveArt $activeSlave 2 0>>

	<</if>>
<</if>>
/* 000-250-006 */

<<set $desc = SlaveTitle($activeSlave)>>
<<setLocalPronouns $activeSlave>>

<<set _sins = []>>

<<set _sins.push("dawdling")>>
<<if canDoAnal($activeSlave)>>
	<<if $activeSlave.fetish != "buttslut">>
		<<if $activeSlave.anus != 0>>
			<<set _sins.push("anal reluctance")>>
		<</if>>
	<</if>>
<</if>>
<<if canDoVaginal($activeSlave)>>
	<<if $activeSlave.vagina != 0>>
		<<if $activeSlave.fetish != "pregnancy">>
			<<set _sins.push("vaginal reluctance")>>
		<</if>>
	<</if>>
<</if>>
<<if canTalk($activeSlave)>>
	<<set _sins.push("chatting")>>
<</if>>
<<if $universalRulesConsent == 0>>
	<<if $activeSlave.energy <= 60>>
		<<set _sins.push("slave refusal")>>
	<</if>>
<<else>>
	<<if $activeSlave.energy > 40>>
		<<if $activeSlave.releaseRules != "restrictive" && $activeSlave.releaseRules != "masturbation" && $activeSlave.releaseRules != "chastity">>
			<<set _sins.push("slave molestation")>>
		<</if>>
	<</if>>
<</if>>

<<EventNameLink>>

<<set _sins = _sins.random()>>
<<switch _sins>>
<<case "anal reluctance">>
	is sometimes punished for reluctance to take it up the ass. You run across the aftermath of one such incident as
<<case "vaginal reluctance">>
	is sometimes punished for reluctance to give up $his pussy. You run across the aftermath of one such incident as
<<case "chatting">>
	can be overly chatty with other slaves, and often makes $himself late for $his next task by losing $himself in gossip. You happen to appear after $he's been late as
<<case "dawdling">>
	is sometimes late to $his next task. This is probably the most common minor infraction among slaves, especially when they're assigned to do things they don't like. You happen to appear after $he's been late as
<<case "slave refusal">>
	lacks the sexual energy to be at home among your slaves, since $his peers can demand sex from $him whenever they want it. $He sometimes tries to evade them or even outright refuse. You come upon the aftermath of such a scene as
<<case "slave molestation">>
	struggles with the consent you require before sex between slaves. $His need for release pushes $him to overstep $his bounds. You come upon the aftermath of an example of $his sexual aggressiveness as
<<default>>
	ERROR: bad sin
<</switch>>

<<if $HeadGirl != 0>>
	<<setLocalPronouns $HeadGirl 2>>
	$HeadGirl.slaveName is <<if $activeSlave.standardPunishment == "situational">>assessing an appropriate punishment<<else>>sentencing $him to $his standard punishment, <<switch $activeSlave.standardPunishment>><<case "confinement">>several hours in confinement<<case "whipping">>a whipping<<case "chastity">>several hours in chastity<</switch>><</if>>. _He2 immediately defers to you, should you wish to take over.
<<else>>
	<<setAssistantPronouns>>
	$assistantName is <<if $activeSlave.standardPunishment == "situational">>assessing an appropriate punishment<<else>>sentencing $him to $his standard punishment, <<switch $activeSlave.standardPunishment>><<case "confinement">>several hours in confinement<<case "whipping">>a whipping<<case "chastity">>several hours in chastity<</switch>><</if>>. _HeA immediately defers to you, should you wish to take over.
<</if>>

/* STANDARD PUNISHMENTS */
<<switch $activeSlave.standardPunishment>>

<<case "confinement">>

<<link "Confine $him firmly but fairly">>
	<<EventNameDelink $activeSlave>>
	<<replace "#result">>
	Since you use confinement as a standard slave punishment, <<if $cellblock != 0>>in addition to $cellblockName, <</if>>you have little cubicles designed for the purpose scattered around the penthouse. You order $activeSlave.slaveName into one of these. $He obeys,
	<<if $activeSlave.devotion > 20>>
		knowing $he deserves punishment and eager to get it over with.
	<<elseif $activeSlave.trust < -20>>
		if only out of terror, knowing $he'll make $his situation far worse if $he doesn't.
	<<else>>
		warily, willing to go along until something worth real resistance happens.
	<</if>>
	The cell is padded and has leather restraints; you use these to secure $him to the wall, preventing $him from doing anything to relieve boredom in the tiny space. You restate the rule $he broke, state the length of $his punishment, and remonstrate firmly with $him before closing the door. As it shuts on $him, plunging $him into darkness, you hear <<if canTalk($activeSlave)>>$him try at an apology in a tiny voice<<elseif $activeSlave.voice != 0>>a tiny apologetic moan<<else>>a sad little intake of breath<</if>>. You're there to let $him out after a reasonable time, and $he exits the soft little cell @@.mediumaquamarine;with relief.@@
	<<set $activeSlave.trust += 4>>
	<</replace>>
<</link>>

<<link "Confine $him cruelly">>
	<<EventNameDelink $activeSlave>>
	<<replace "#result">>
	Since you use confinement as a standard slave punishment, <<if $cellblock != 0>>in addition to $cellblockName, <</if>>you have several boxes designed for the purpose in convenient areas. You order $activeSlave.slaveName to your office, and direct a box to be brought there. $He begins to cry when $he sees it,
	<<if $activeSlave.devotion > 20>>
		but obediently gets inside, not wanting $his punishment to be extended. $His obedience notwithstanding,
	<<elseif $activeSlave.trust < -20>>
		but desperately hurries to get inside, terrified that you might extend $his sentence. $His obedience notwithstanding,
	<<else>>
		making no move towards it. $He knows that active resistance will merely extend $his sentence, and lets you stuff $his sobbing body inside. Once $he's in,
	<</if>>
	<<if canTalk($activeSlave)>>$he begs tearfully<<elseif $activeSlave.voice != 0>>$he tries frantically to beg<<else>>$he uses $his hands to supplicate you<</if>> as you close the lid with exquisite slowness. The harshest thing you do is keep silent, not giving $him any indication of when $he's getting out. When you finally let $him out, $he's @@.gold;almost crazy with fear@@ of ever going back in the box and, for now, @@.hotpink;willing to do almost anything@@ to avoid it.
	<<set $activeSlave.devotion += 4>>
	<<set $activeSlave.trust -= 4>>
	<</replace>>
<</link>>

<<case "whipping">>

<<link "Give $him a solid whipping">>
	<<EventNameDelink $activeSlave>>
	<<replace "#result">>
	Since you use whipping as a standard slave punishment, there are many sets of restraints set high up on the walls for the purpose. You order $him to place $his hands in one of them, and $he
	<<if $activeSlave.devotion > 20>>
		sobs with fear but obeys, obviously hoping you'll be reasonable.
	<<elseif $activeSlave.trust < -20>>
		starts to cry but doesn't let that stop $him from hurriedly obeying. $He knows that resistance will earn $him more strokes.
	<<else>>
		breaks down and makes no move to obey, but does not resist as you take $his wrists in your hands and lift them into the restraints.
	<</if>>
	The shackles can be moved up or down, and you move them up, raising the shivering, frightened $desc to the tips of $his toes. $He struggles a little to find $his balance, and is distracted when the first stroke lands on $his $activeSlave.skin buttocks. Your leather instrument is exquisitely designed and balanced to produce pain without breaking the skin or leaving a permanent mark. You tell $him to count, and $he <<if canTalk($activeSlave)>>gasps "one" through $his agony<<elseif $activeSlave.voice != 0>>grunts once, doing $his best<<else>>sticks up one finger despite $his restrained hands<</if>>. You flog $his bottom until it's pleasantly warm to the touch, and then let $him down. $He's @@.mediumaquamarine;relieved@@ at your moderation.
	<<set $activeSlave.trust += 4>>
	<</replace>>
<</link>>

<<link "Whip $him cruelly">>
	<<EventNameDelink $activeSlave>>
	<<replace "#result">>
	Since you use whipping as a standard slave punishment, there are many sets of restraints set high up on the walls for the purpose. You order $him to place $his hands in one of them, and $he
	<<if $activeSlave.devotion > 20>>
		sobs with fear but obeys, despite something in your tone that makes $his knees go weak with terror.
	<<elseif $activeSlave.trust < -20>>
		starts to cry but doesn't let that stop $him from hurriedly obeying. $He stumbles once, something in your tone that making $his knees go weak with terror.
	<<else>>
		breaks down and makes no move to obey, but does not resist as you take $his wrists in your hands and hoist $him into the restraints.
	<</if>>
	The shackles can be moved up or down, and you move them down, forcing the weeping slave to spread $his legs. You let $him anticipate the pain for a long time before you start whipping $his buttocks. Your leather instrument is exquisitely designed and balanced to produce pain without breaking the skin or leaving a permanent mark, and you make cruel use of it. After a short preliminary asswhipping, you vary your strokes, letting $him feel the whip on $his thighs, calves and flanks before placing strokes against $his <<if $activeSlave.scrotum > 0>>poor ballsack<<elseif $activeSlave.dick > 0>>poor penis<<else>>poor pussy<</if>>. $He loses all control, <<if canTalk($activeSlave)>>shamelessly begging for mercy<<elseif $activeSlave.voice != 0>>sobbing and moaning incoherently<<else>>rasping pathetic little sobs past $his mute throat<</if>>. When you're done, $he's @@.gold;almost crazy with fear@@ of future whippings.
	<<set $activeSlave.trust -= 6>>
	<</replace>>
<</link>>

<<case "chastity">>

<<link "Restrain $him in your office">>
	<<EventNameDelink $activeSlave>>
	<<replace "#result">>
	Since you use chastity as a punishment, you're accustomed to using your office for supervising sexual denial. You bring $him up and restrain $his standing, hands over $his head in one of the sets of shackles set high on the walls, facing out so $he can see everything that goes on in your office. You gag $him securely, <<if $activeSlave.voice == 0>>despite $his muteness, a sad mockery<<else>>not wanting your work disturbed by unseemly noises<</if>>. Then you ignore $him. Business as usual in your office is profoundly sexual.
	<<if $activeSlave.energy > 60>>
		$His healthy sex drive makes this torture for $him; $he watches everything that happens in the office with desperate longing. Before long,
	<<elseif $activeSlave.devotion > 20>>
		$He's used to the idea of sexual slavery, and inevitably <<if canSee($activeSlave)>>sees<<elseif canHear($activeSlave)>>hears<<else>>is surrounded by<</if>> people $he finds attractive doing things $he considers sexy in the office. Before long,
	<<elseif $activeSlave.devotion >= -50>>
		$He's not comfortable with sexual slavery, but the heavily sexual atmosphere of the office affects even $him. After a few hours,
	<<else>>
		The office being what it is, $he <<if canSee($activeSlave)>>sees<<elseif canHear($activeSlave)>>hears<<else>>is surrounded by<</if>> many naked, attractive people doing sexy things over the course of the day. Despite $his resistance, after a few hours,
	<</if>>
	$he's quite horny. Restrained as $he is, $he <<if $activeSlave.devotion > 20>>couldn't<<else>>can't<</if>> hide
	<<if $activeSlave.dick > 0>>
		<<if canAchieveErection($activeSlave)>>
			$his <<if $activeSlave.dick > 2>>prominent<<else>>pathetic<</if>> erection,
		<<else>>
			the string of precum hanging off $his limp dick,
		<</if>>
	<<else>>
		<<if $activeSlave.vaginaLube > 0>>
			the lovely pussyjuice slicking $his thighs,
		<<else>>
			how flushed and eager $his cunt is,
		<</if>>
	<</if>>
	<<if $activeSlave.devotion > 20>>even if $he wanted to<<else>>though $he seems to want to<</if>>. Satisfied that $he's been tormented enough for today, you let $him down and send $him on $his way. $He's obviously @@.hotpink;more willing@@ than usual to apply $himself to $his next sexual task, whatever it is.
	<<set $activeSlave.devotion += 4>>
	<</replace>>
<</link>>

<<link "Torment $him with vibration">>
	<<EventNameDelink $activeSlave>>
	<<replace "#result">>
	Since you use chastity as a punishment, you're accustomed to using your office for supervising sexual denial. You order $him to place $his hands in one of the many sets of restraints set high up on the office walls for the purpose.
	<<if $activeSlave.clitPiercing != 3>>
		You equip $him with a set of smart vibrators. The first is attached <<if $activeSlave.dick > 0>>to $his dickhead<<else>>against $his clit<</if>>,
	<<else>>
		$His smart piercing makes the next step easy. $He gets three vibrators in total:
	<</if>>
	the second <<if $activeSlave.vagina > 0>>comfortably fills $his pussy<<elseif $activeSlave.vagina > 0>>rests against $his virgin pussy without breaking $his virtue<<else>>is a nice little bullet vibe for $his soft perineum<</if>>, and the third <<if $activeSlave.anus > 0>>is, of course, a vibrating plug for $his asspussy<<else>>rests against $his unfucked rosebud without penetrating it<</if>>.
	Then you walk away, setting the vibrators to bring $him to the edge of orgasm and keep $him there. The effect is almost instant, and as you go $he begins to writhe, <<if canTalk($activeSlave)>>desperately calling after you to beg for mercy<<elseif $activeSlave.voice != 0>>moaning desperately<<else>>panting mutely<</if>>. When you finally come back and let $him down, $he's unsteady on $his feet and @@.hotpink;very submissive,@@ though a bit @@.red;burned out@@ on stimulation.
	<<set $activeSlave.devotion += 6>>
	<<set $activeSlave.energy -= 1>>
	<</replace>>
<</link>>

<</switch>>

<<if $activeSlave.standardPunishment != "situational">>
<</if>>

/* SITUATIONAL PUNISHMENTS */
<<switch _sins>>

<<case "anal reluctance">>

<<link "Punish $his ass">>
	<<EventNameDelink $activeSlave>>
	<<replace "#result">>
	Deciding that the most appropriate punishment is some corrective assrape, you shove the slave to $his knees and stuff <<if $PC.dick == 1>>your cock<<else>>a formidable dildo<</if>> up $his
	<<if $activeSlave.anus > 2>>
		big butthole. It slides right in, the slave's relaxed sphincter offering no resistance. Announcing that you'll find $his limits, wherever they are, you insert fingers until $he's cruelly stretched and you're almost jerking <<if $PC.dick == 1>>yourself<<else>>the phallus<</if>> off inside $him.
	<<elseif $activeSlave.anus > 1>>
		defenseless asshole. You meet some delicious resistance and push past it, enjoying the feeling of the slave's sphincter spasming as you do. You pound $him hard, much harder than $he can comfortably take it up the ass.
	<<else>>
		tight hole. $His poor little anus doesn't want to let you in, but you force yourself in anyway, making the slave wriggle desperately beneath you as $he feels the invading phallus force $his anal ring to accommodate its girth.
	<</if>>
	You tell $him that many slaves enjoy anal, and that if $he's a good $desc, $he can too, but that it's against the rules for $him to show reluctance to be assfucked. The slave below you is too discomfited by anal pain to respond coherently, but $he gets the message. $He'll be @@.hotpink;better about submitting@@ in the future, but due to the connection between sex and punishment $he'll be @@.red;a little less eager for sex,@@ especially anal.
	<<set $activeSlave.counter.anal += 1>>
	<<set $analTotal += 1>>
	<<set $activeSlave.devotion += 4>>
	<<set $activeSlave.energy -= 2>>
	<</replace>>
<</link>>

<<case "vaginal reluctance">>

<<link "Punish $his pussy">>
	<<EventNameDelink $activeSlave>>
	<<replace "#result">>
	Deciding that the most appropriate punishment is some corrective rape, you push the slave down on $his back and shove <<if $PC.dick == 1>>your cock<<else>>a formidable dildo<</if>> inside $his
	<<if $activeSlave.anus > 2>>
		roomy cunt, which can take it easily. Announcing that you'll find $his limits, wherever they are, you insert fingers until $he's cruelly stretched and you're almost jerking <<if $PC.dick == 1>>yourself<<else>>the phallus<</if>> off inside $him.
	<<elseif $activeSlave.anus > 1>>
		poor womanhood. You fuck $him mercilessly, intentionally pulling out far enough that you have to spear $him again. You use $his poor boobs as leverage, pulling against them to batter $him harder.
	<<else>>
		poor tight pussy. $He's tight, and the initial penetration was uncomfortable for $him, but you make it worse by treating $his cunt like a veteran whore's. $He begins to struggle a little as you hammer $him.
	<</if>>
	You tell $him that many slaves enjoy getting fucked, and that if $he's a good $desc, $he can too, but that it's against the rules for $him to show reluctance to be penetrated. The slave below you is too discomfited to respond coherently, but $he gets the message. $He'll be @@.hotpink;better about submitting@@ in the future, but due to the connection between sex and punishment $he'll be @@.red;a little less eager for sex,@@ especially vaginal.
	<<set $activeSlave.counter.vaginal += 1>>
	<<set $vaginalTotal += 1>>
	<<set $activeSlave.devotion += 4>>
	<<set $activeSlave.energy -= 2>>
	<</replace>>
<</link>>

<<case "chatting">>

<<link "Put $his mouth to better use">>
	<<EventNameDelink $activeSlave>>
	<<replace "#result">>
	You announce that $he'll have less trouble gossiping instead of being prompt if $his mouth is nice and tired. Comprehension and apprehension dawn on $his face in the moment before you <<if $activeSlave.collar != "none">>grab $him by the collar and pull<<else>>put a hand on $his shoulder and shove<</if>> $him to the ground. $He goes down without resistance, <<if $PC.dick == 1>>already opening wide for your stiff prick.<<else>>$his look of unconcern vanishing when $he sees you pulling out a strap-on. $He doesn't get to eat pussy today; today $he gets fucked in the face.<</if>> You shove it down $his
	<<if $activeSlave.sexualQuirk == "gagfuck queen">>
		spectacularly unresisting throat. The gagfuck queen has no gag reflex to speak of, but even $he has $his limit. You rape $his face without mercy, deliberately ruining $his practiced ability to breathe while giving a cock deep oral.
	<<elseif ($activeSlave.fetish == "cumslut") && ($activeSlave.fetishKnown == 1)>>
		eager throat. The cumslut loves giving oral, but soon realizes that you have no intention of letting $him love this. You rape $his face without mercy, hilting $his lips against <<if $PC.dick == 1>>your base<<else>>the harness<</if>>.
	<<else>>
		gagging throat, enjoying the sensations of $his lips and tongue writhing against you as $he desperately tries to accommodate the intruder.
	<</if>>
	$He begins to struggle a little, so you snake a hand down behind $his head to hold $him in place. When you're done, $he's an inelegant mess, coughing and gasping for air. <<if canTalk($activeSlave)>>Once $he's got $his breath back, $he tearfully<<else>>Even as $he pants, $he uses shaky gestures to beg forgiveness, and $he even<</if>> promises to be less chatty. $He'll be @@.hotpink;more punctual@@ in the future, but due to the connection between sex and punishment $he'll be @@.red;a little less eager for sex,@@ especially oral.
	<<set $activeSlave.counter.oral += 1>>
	<<set $oralTotal += 1>>
	<<set $activeSlave.devotion += 4>>
	<<set $activeSlave.energy -= 2>>
	<</replace>>
<</link>>

<<case "dawdling">>

<<link "Make $him run">>
	<<EventNameDelink $activeSlave>>
	<<replace "#result">>
	You tell $him that $he clearly needs practice being prompt. Your tone is conversational, but $he doesn't mistake it for kindness. It's the tone you use with slaves when imparting guidance which is to be accepted and followed on pain of terrible punishment. You make $him explain where $he was and what $he was doing previously, and require $him to walk you there. $He does, <<if $activeSlave.trust > 20>>trustingly<<elseif $activeSlave.trust >= -20>>rather fearfully<<else>>shaking with fear<</if>>, and when you get there you tell $him to run to $his next task. $He hesitates for an instant, until you <<if $PC.title == 1>>bellow<<else>>shriek<</if>> at $him to run! $He takes off,
	<<if $activeSlave.shoes == "extreme heels">>
		tottering agonizingly along in $his extreme heels. $He isn't running, not really, but $his slutty shoes are so ridiculous that $he can't. $He's going as fast as $he possibly can.
	<<elseif ($activeSlave.shoes == "heels") || ($activeSlave.shoes == "boots")>>
		running awkwardly in $his <<if $activeSlave.shoes == "heels">>heels<<else>>heeled boots<</if>>.
	<<else>>
		running as fast as $his legs can carry $him.
	<</if>>
	As $he goes,
	<<if $activeSlave.dick > 3>>
		$his <<if $activeSlave.dick > 5>>ridiculous penis<<else>>big dick<</if>> flops around painfully, hitting $his thighs, but $he tries to ignore it.
	<<elseif $activeSlave.scrotum > 3>>
		$his <<if $activeSlave.scrotum > 5>>huge ballsack<<else>>generous scrotum<</if>> gets painfully pinched between $his thighs, but $he tries to ignore it.
	<<elseif $activeSlave.belly >= 10000>>
		$his huge <<if $activeSlave.pregKnown == 1>>pregnancy<<else>>belly<</if>> impedes $him terribly, but $he tries to waddle along as best $he can.
	<<elseif $activeSlave.boobsImplant > 600>>
		$his implants bounce around painfully, so $he cradles $his fake tits in $his arms, trying to support them as much as possible.
	<<elseif $activeSlave.boobs > 2000>>
		$his huge tits bounce around painfully, so $he cradles $his udders in $his arms, trying to support them as much as possible.
	<<elseif $activeSlave.butt > 2>>
		$his big buttocks impede $him a bit, but $he does $his best, making them work around delightfully.
	<<else>>
		$his cute rear makes a pretty picture.
	<</if>>
	You make $him repeat the exercise until $he's quite tired, hounding $him mercilessly, and then send $him off to rinse away the sweat $he worked up before getting back to work. $He'll be @@.hotpink;more punctual@@ in the future.
	<<set $activeSlave.devotion += 4>>
	<</replace>>
<</link>>

<<case "slave refusal">>

<<link "Make sure $he knows $he's for use">>
	<<EventNameDelink $activeSlave>>
	<<replace "#result">>
	Deciding to ensure the $desc really understands that $he's a sex slave and can be used by anyone, even other slaves, you order $him to put $his mouth to work on the slave who demanded sex from $him.
	<<set $activeSlave.counter.oral += 1>>
	<<set $oralTotal += 2>>
	<<if $activeSlave.devotion > 20>>$He hurries to comply, knowing $he's in trouble and not wanting to make it any worse.<<elseif $activeSlave.trust < -20>>$He hurries to obey, terrified that resistance will make it worse.<<else>>$He looks momentarily mutinous, but decides not to resist and gets down to it.<</if>> Once $he's working away, you pull $his hips up and
	<<if canDoVaginal($activeSlave) && ($activeSlave.vagina != 0)>>
		push $his legs apart, leaving $his <<if $activeSlave.vagina > 2>>loose<<elseif $activeSlave.vagina > 1>>poor<<else>>tight little<</if>> pussy vulnerable. You fuck $him hard, making it a punishment.
		<<set $activeSlave.counter.vaginal += 1>>
		<<set $vaginalTotal += 1>>
	<<elseif canDoAnal($activeSlave) && ($activeSlave.anus != 0)>>
		paw $his butt, using a couple of fingers to tease $his <<if $activeSlave.anus > 2>>relaxed<<elseif $activeSlave.anus > 1>>slutty<<else>>tight little<</if>> asshole before penetration. You fuck $him hard, making it a punishment.
		<<set $activeSlave.counter.anal += 1>>
		<<set $analTotal += 1>>
	<<else>>
		push $his legs together, settling for some <<if $PC.dick == 1>>frottage<<else>>tribbing<</if>> to preserve $his virginit<<if $activeSlave.vagina == -1>>y<<else>>ies<</if>>. Since you're not fucking $him, you spank $his ass mercilessly to make it an effective punishment.
		<<set $activeSlave.counter.oral += 1>>
		<<set $oralTotal += 1>>
	<</if>>
	The horny slave getting oral enjoys the oral attention, especially once $activeSlave.slaveName starts to groan with discomfort. You discard $him once everyone except $him has gotten off. $He'll be @@.hotpink;more submissive@@ to sexual demands from now on, though $he'll be @@.red;slightly less interested in sex@@ for $his own pleasure.
	<<set $activeSlave.devotion += 4>>
	<<set $activeSlave.energy -= 2>>
	<</replace>>
<</link>>

<<case "slave molestation">>

<<link "Make $him apologize and then dominate $him">>
	<<EventNameDelink $activeSlave>>
	<<replace "#result">>
	You order the horny $desc to apologize to the slave $he grabbed, which $he does, <<if canTalk($activeSlave)>>managing to sound authentically sorry<<else>>gesturing $his regret with apparent sincerity<</if>>. It seems $he might feel some actual guilt at molesting a fellow slave, but $he's about to feel much sorrier. Once the other slave has been dismissed, you grab $him by the neck and
	<<if canDoVaginal($activeSlave) && ($activeSlave.vagina != 0)>>
		shove $him up against the nearest wall, using a bit of warning pressure of your fingers against $his throat to warn $him to take $his punishment. Then you <<if $PC.dick == 1>>jam your cock inside $him, making $him wriggle from the uncomfortable angle<<else>>grind your pussy against $him, fucking $him hard despite the lack of penetration<</if>>.
		<<set $activeSlave.counter.vaginal += 1>>
		<<set $vaginalTotal += 1>>
	<<elseif canDoAnal($activeSlave) && ($activeSlave.anus != 0)>>
		shove $his face against the nearest wall, using a bit of warning pressure of your fingers against $his throat to warn $him to take $his punishment. Then you <<if $PC.dick == 1>>jam your cock up $his butt, making $his sphincter spasm from the rough penetration<<else>>use one hand to fuck $his ass and the other to look after yourself<</if>>.
		<<set $activeSlave.counter.anal += 1>>
		<<set $analTotal += 1>>
	<<else>>
		pull $him to $his knees, <<if $PC.dick == 1>>shoving your dick down $his throat<<else>>straddling $his face and grinding yourself against $his mouth<</if>>.
		<<set $activeSlave.counter.oral += 1>>
		<<set $oralTotal += 1>>
	<</if>>
	The slut needs it so badly that $he almost climaxes, but you ruin $his building orgasms whenever you detect them. When you've gotten yours, you drop $him and walk off, leaving $him feeling comprehensively fucked, but no less horny. $He'll be @@.hotpink;very willing@@ to do anything that will earn $his release.
	<<set $activeSlave.devotion += 4>>
	<</replace>>
<</link>>

<<default>>
	ERROR: bad sin
<</switch>>


code:
:: Recruiter Select [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $showEncyclopedia = 1, $encyclopedia = "Recruiter">>
<<if ($Recruiter != 0)>>
	<<set $Recruiter = getSlave($Recruiter.ID)>>
	<<setLocalPronouns $Recruiter>>
	''__@@.pink;<<= SlaveFullName($Recruiter)>>@@__'' is
	<<if $recruiterTarget != "other arcologies">>
		recruiting girls.
	<<else>>
		acting as a sexual
		<<if $arcologies[0].influenceTarget == -1>>
			Ambassador. @@.red;Since you have not selected another arcology to influence, $he has no target for Ambassadorial duties. Select an influence target to apply $his talents.@@
		<<else>>
			Ambassador to <<for $i = 0; $i < $arcologies.length; $i++>><<if $arcologies[$i].direction == $arcologies[0].influenceTarget>>$arcologies[$i].name<<break>><</if>><</for>>.
		<</if>>
	<</if>>
<<else>>
	You do not have a recruiter working at present.
<</if>>

Your recruiter will <<if $recruiterTarget != "other arcologies">>target ''$recruiterTarget.''<<else>>spread your arcology's culture to neighboring arcologies.<</if>> __Assign a different focus:__

    [[Desperate whores|Recruiter Select][$recruiterTarget = "desperate whores"]] //Likely to be skilled but unhealthy//

    [[Young migrants|Recruiter Select][$recruiterTarget = "young migrants"]] //Young and inexperienced but unhealthy//

    [[Recent divorcees|Recruiter Select][$recruiterTarget = "recent divorcees"]] //Will be mature//
<<if ($seeDicks != 100) && $seePreg != 0>>

    [[Expectant mothers|Recruiter Select][$recruiterTarget = "expectant mothers"]] //Will be pregnant, and likely unhealthy//
<</if>>
<<if ($seeDicks != 0)>>

    [[Dissolute sissies|Recruiter Select][$recruiterTarget = "dissolute sissies"]] //Will be born male and have some experience//

    [[Reassignment candidates|Recruiter Select][$recruiterTarget = "reassignment candidates"]] //Will be born male//
<</if>>
<<if $arcologies.length > 1>>
	<<if $FSAnnounced>>

    [[Other arcologies' cultures|Recruiter Select][$oldRecruiterTarget = $recruiterTarget, $recruiterTarget = "other arcologies"]] //Will appoint the Recruiter to be a sexual Ambassador//
	<</if>>
<</if>>

Target only individuals that can pass eugenics SMR.
<<if $recruiterEugenics < 1>>[[Target|Recruiter Select][$recruiterEugenics = 1]]
	<<else>>[[Stop targeting|Recruiter Select][$recruiterEugenics = 0]]
<</if>>

 //This option will increase time it takes to recruit depending on how many eugenics SMR are active.//

/* sum for "facilities & leadership" */
<<set _idleTarget = (2 + $brothel + $club + $arcade + $dairy + $servantsQuarters + $masterSuite)>>
<<if $HGSuite>><<set _idleTarget++>><</if>>
<<if $dojo>><<set _idleTarget++>><</if>>
<<if $brothel>><<set _idleTarget++>><</if>>
<<if $club>><<set _idleTarget++>><</if>>
<<if $dairy && ($dairyRestraintsSetting < 2)>><<set _idleTarget++>><</if>>
<<if $farmyard>><<set _idleTarget++>><</if>>
<<if $servantsQuarters>><<set _idleTarget++>><</if>>
<<if $masterSuite>><<set _idleTarget++>><</if>>
<<if $schoolroom>><<set _idleTarget++>><</if>>
<<if $spa>><<set _idleTarget++>><</if>>
<<if $nursery>><<set _idleTarget++>><</if>>
<<if $clinic>><<set _idleTarget++>><</if>>
<<if $cellblock>><<set _idleTarget++>><</if>>

Suspend active recruiting and focus on publicity when: <<switch $recruiterIdleRule>><<case "number">>''$recruiterIdleNumber sex slaves owned''<<case "facility">>''match facility expansion'', currently <<if _idleTarget >= 20>>_idleTarget positions<<else>>20 positions (rule minimum)<</if>><<default>>''always recruit''<</switch>>

     <<link "Always recruit">><<set $recruiterIdleRule = "always">><<replace "#idleRule">>''always recruit''<</replace>><</link>> | <<link "Facilities & leadership">><<set $recruiterIdleRule = "facility">><<replace "#idleRule">>''match facility expansion'', currently <<if _idleTarget >=20>>_idleTarget positions<<else>>20 positions (rule minimum)<</if>><</replace>><</link>> | <<link "Set to this many slaves:">><<set $recruiterIdleRule = "number", $recruiterIdleNumber = Math.max(Math.trunc(Number($seed) || 20), 20)>><<replace "#idleRule">>''$recruiterIdleNumber sex slaves owned''<</replace>><<replace "#numberBox">><<textbox "$seed" $recruiterIdleNumber>><</replace>><</link>> <<textbox "$seed" $recruiterIdleNumber>> /* use of $seed in conjunction with link prevents NaN error */

  //"Facilities" doesn't include training slots in cellblock, schoolroom, spa, clinic (but does include those leaders)//

''Appoint a recruiter from among your devoted slaves:''

[[None|Recruiter Workaround][$i = -1]]

<<print App.UI.SlaveList.facilityManagerSelection(App.Entity.facilities.penthouse)>>

repo_name: powerfful/fc


code:
:: Recruiter Workaround [silently]

<<if $Recruiter != 0>>
	<<= removeJob($Recruiter, "recruit girls")>>
<</if>>
<<if $i > -1>>
	<<= assignJob($slaves[$i], "recruit girls")>>
	<<set $slaves[$i].livingRules = "luxurious">>
	<<set $Recruiter = $slaves[$i]>>
<</if>>

<<goto "Main">>


code:
:: REM fluctuations [nobr]

<<set $nextButton = "Continue">>
<<set $nextLink = "RIE Eligibility Check">>

<<if ($REM == 1)>>
	<<set $REM = either("antislavery terrorism", "medical breakthrough", "new free city", "revel", "speculation", "tainted drugs")>>
<<else>>
	<<set $REM = either("anti-slavery coup", "arcology change", "bankruptcy", "empty prisons", "hostilities ended", "refugee boat", "unemployment", "war")>>
<</if>>
<<setAssistantPronouns>>

<<if $assistant > 0>>
<<if $marketAssistantAnnounced>>
	The market assistant's avatar appears on a wallscreen as you're going about your business.
	<<switch $assistantAppearance>>
	<<case "monstergirl">>The regular monstergirl stands behind and prods the human _girlM forward.
	<<case "shemale">>You recognize _hisM function by _hisM glasses and because _hisM bimbo cock softens, halfway, while _heM addresses you on economic matters.
	<<case "amazon">>_HeM illustrates a small group of gossiping tribeswomen that fades away as _heM leaves them and approaches you.
	<<case "businesswoman">>The junior businesswoman adopts a shy posture when addressing you directly, as if unsuccessfully concealing a workplace crush.
	<<case "goddess">>The demigoddess portrait arrives in a glittery cloud of dust, wearing winged shoes.
	<<case "schoolgirl">>Both schoolgirls are sitting knee to knee; the nerdy one hands the other a folded note. "Pass it on," _heM stage whispers. <<if $assistantName == "your personal assistant">>Your regular assistant<<else>>$assistantName<</if>> rolls _hisA eyes.
	<<case "hypergoddess">>The demigoddess portrait arrives in a glittery cloud of dust, wearing winged shoes and a noticeable roundness in _hisM middle.
	<<case "loli">>The chubby, glasses-wearing _loliM arrives holding a neatly folded note addressed to you.
	<<case "preggololi">>The chubby, glasses-wearing _loliM arrives holding a hastily written note addressed to you. _HeM seems kind of winded, with a suspicious stain in _hisM panties under _hisM pussy.
	<<case "fairy" "pregnant fairy">>The older fairy flutters into view before, curtseys, and holds out a rolled piece of parchment addressed to you.
	<<case "normal">>_HisM symbol lights up in regular green pulses while _heM waits for your attention.
	<<case "angel">>The short haired angel lands before you, a rolled piece of parchment under _hisM arm.
	<<case "cherub">>The short haired cherub flutters before you holding a rolled piece of parchment in _hisM hands.
	<<case "incubus">>The regular incubus stands behind and prods the human _girlM forward with _hisA dick.
	<<case "succubus">>The regular succubus stands behind and pushes the human _girlM forward.
	<<case "imp">>The short haired imp flaps before you holding a rolled piece of parchment in _hisM hands.
	<<case "witch">>The apprentice's apprentice arrives before you; a message begins playing the moment _heM opens _hisM mouth.
	<<case "ERROR_1606_APPEARANCE_FILE_CORRUPT">>The creature finishes forcing eggs into the human _girlM, leaving _himM to stagger towards you clutching a crumpled letter in one hand and struggling to hold back the eggs with the other.
	<</switch>>
<<else>>
	<<if $assistantName == "your personal assistant">>Your personal assistant<<else>>$assistantName<</if>> appears on a wallscreen as you're going about your business.
	<<switch $assistantAppearance>>
	<<case "monstergirl">>_HeA's looking unusually businesslike, with _hisA tentacle hair restrained in a bun.
	<<case "loli">>_HeA's looking unusually businesslike, withdrawn deep in thought.
	<<case "preggololi">>_HeA's looking unusually businesslike, withdrawn deep in thought.
	<<case "shemale">>_HeA's looking unusually businesslike, with _hisA perpetually erect dick going untended, for once.
	<<case "amazon">>_HeA's looking unusually businesslike, and is doing sums on a primitive little abacus.
	<<case "businesswoman">>_HeA has a clipboard pressed against _hisA generous bosom, and peers at you over the tops of _hisA spectacles.
	<<case "fairy">>_HeA's looking unusually businesslike, wearing a tiny business suit with an opening in the back for _hisA wings to come out.
	<<case "pregnant fairy">>_HeA's looking unusually businesslike, wearing a tiny business suit open in the front to let _hisA swollen belly out and another opening in the back for _hisA wings to come out.
	<<case "goddess" "hypergoddess">>_HeA's looking unusually businesslike, with _hisA hands clasped behind _hisA back and pivoting one foot.
	<<case "schoolgirl">>_HeA's looking unusually businesslike, and has a scribbled note in _hisA hand.
	<<case "angel">>_HeA's looking unusually businesslike; deep in thought with _hisA hands together in front of _himA.
	<<case "cherub">>_HeA's looking unusually businesslike, reading a newspaper titled "Heaven's Post".
	<<case "incubus">>_HeA's looking unusually businesslike, with _hisA typically erect dick flaccid for once.
	<<case "succubus">>_HeA's looking unusually businesslike, wearing a slutty business suit, glasses and _hisA hair in a tight bun. A slight buzzing can be heard from under _hisA skirt.
	<<case "imp">>_HeA's looking unusually businesslike, reading a list titled "Hell's Holes".
	<<case "witch">>_HeA's looking unusually businesslike, nose first in an a book title "Economics and You".
	<<case "ERROR_1606_APPEARANCE_FILE_CORRUPT">>_HeA's looking unusually businesslike, wearing an ill-fitted business suit. _HisA blouse buttons pop off as _hisA belly swells grotesquely, before the object within _himA begins steadily moving upwards.
	<<default>>_HisA symbol spins for attention.
	<</switch>>
	"<<= properTitle()>>, I have a news item that may be of business interest," _heA
	<<switch $assistantAppearance>>
	<<case "monstergirl" "normal">>informs you.
	<<case "shemale">>says seriously.
	<<case "amazon">>says warmly.
	<<case "businesswoman">>says diffidently.
	<<case "goddess">>announces.
	<<case "schoolgirl">>reads aloud.
	<<case "hypergoddess">>announces between _hisA children's kicking.
	<<case "loli" "preggololi">>says cutely.
	<<case "fairy" "pregnant fairy">>says excitedly.
	<<case "angel">>calmly states.
	<<case "cherub" "imp">>says enthusiastically.
	<<case "incubus">>starts, pauses to play with _himselfA, and continues.
	<<case "succubus">>says between overly loud moans.
	<<case "witch">>states, finishes the page, and snaps _hisA fingers. _HeA grunts, reaches up _hisA skirt and pulls out a message for you. Seems it didn't arrive as planned.
	<<case "ERROR_1606_APPEARANCE_FILE_CORRUPT">>says, _hisA throat bulging as the egg containing the message passes out _hisA mouth.
	<</switch>>
<</if>>
<<else>>
Your <<if $marketAssistantAnnounced>>market<<else>>personal<</if>> assistant's symbol appears on a wallscreen as you're going about your business. _HeA spins for your attention. "<<= properTitle()>>, I have a news item that may be of business interest," _heA says.
<</if>>

/* The events reducing slave prices are all supply sided. Without events reducing demand this is a little unbalanced. A minor issue */

<<if $REM == "revel">>
	Something is happening in one of the Free Cities' richest arcologies. It's not clear what, exactly, it is, since its owner is making skillful use of the arcology's advanced surveillance and media systems to keep its internal affairs quite secret. The truth will get out eventually, and it's probably not going to do much for old world opinions of the Free Cities. After all, cheap slaves go into that arcology at a prodigious rate, and they don't seem to ever come out again. The unexpected demand for slaves, any slaves, has produced a temporary tightening of the entire slave market. Projections suggest price increases of up to five percent. There will be no immediate impact on you or your slaves, but the coming weeks will be a great time to sell stock, and a bad time to buy. @@.yellow;The market price of slaves has increased.@@
	<<set $menialDemandFactor += 12000>>
	<<set $menialDemandFactor = Math.clamp($menialDemandFactor,-50000,50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "tainted drugs">>
	The Free Cities are anarcho-capitalist paradises — or 'paradises,' depending on one's station and assets. You can't complain personally, as one of the Free Cities' richest citizens, master of your own arcology and owner of sexual slaves. Unfortunately quite a few slaves in the markets are in a position to complain today, as are their owners. Many slave markets use long-lasting stimulants to pep their wares up for auction; dull-eyed slaves earn low bids. Corner-cutting at one of the major suppliers of these stimulants led to a number of slaves being prepared for auction being damaged today. Relatively few were permanently lost, but slaves are going to be a little scarce for a while, which will drive up the going rate. Projections suggest increases of up to five percent. There will be no immediate impact on you or your slaves, but the coming weeks will be a great time to sell stock, and a bad time to buy. @@.yellow;The market price of slaves has increased.@@
	<<set $menialSupplyFactor -= 12000>>
	<<set $menialSupplyFactor = Math.clamp($menialSupplyFactor,-50000,50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "antislavery terrorism">>
	Antislavery activism in the old world has grown to match the spread of slavery in the Free Cities. Unfortunately for the activists, they are confronted with a fundamental problem: the independence of the Free Cities. There is very little they can do without resorting to violence, and so, predictably, they often do. A major slave induction center in one of the more open Free Cities has just suffered a suicide bombing. The actual damage was slight, but a wave of increased import security is sweeping the Free Cities in reaction to the incident. Slave prices will be driven up by the cost of checking imported merchandise for explosive devices until the market adjusts. Projections suggest price increases of up to five percent. There will be no immediate impact on you or your slaves, but the coming weeks will be a great time to sell stock, and a bad time to buy. @@.yellow;The market price of slaves has increased.@@
	<<set $menialSupplyFactor -= 12000>>
	<<set $menialSupplyFactor = Math.clamp($menialSupplyFactor,-50000,50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "new free city">>
	New Free Cities arise unpredictably. They require either carving out a slice of the old world, emancipating it from whichever inattentive or corrupt country previously owned the land, or reclaiming new land from barren or uninhabitable areas, efforts which are often kept secret. The unpredictable happened today; the world has a new Free City. As usual, immigration rights are being offered cheaply to deserving persons. Many of the remaining rich and talented of the old world are staking claims in the new city, and they'll be buying slaves when they get to their new home. It's a sellers' market out there; projections show the price of slaves rising as much as ten percent in the short term. There will be no immediate impact on you or your slaves, but the coming weeks will be a great time to sell stock, and a bad time to buy. @@.yellow;The market price of slaves has increased.@@
	<<set $menialDemandFactor += 20000>>
	<<set $menialDemandFactor = Math.clamp($menialDemandFactor,-50000,50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "speculation">>
	The Free Cities are almost totally unregulated. Prices and interest rates can spike and plummet with speeds not seen since the South Sea Bubble, and for the most silly or corrupt of reasons. Today, it's the latter. A massive attempt to rig the slave market was uncovered this morning. Ultimately, the culprits were caught and much of the damage reversed, but confidence in the marketplace has been shaken. Many great slave vendors are holding onto their stock until they're sure the water's calm again. It's a sellers' market out there; projections show the price of slaves rising as much as ten percent in the short term. There will be no immediate impact on you or your slaves, but the coming weeks will be a great time to sell stock, and a bad time to buy. @@.yellow;The market price of slaves has increased.@@
	<<set $menialSupplyFactor -= 20000>>
	<<set $menialSupplyFactor = Math.clamp($menialSupplyFactor,-50000,50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "medical breakthrough">>
	There has been a breakthrough in gene therapy. More accurately, there was a breakthrough in gene therapy several years ago — you already knew all about it, and some of the more advanced slave medical upgrades available to you use the technology. However, it's finally gotten out of the prototype stage, and is becoming available to the Free Cities middle class, citizens with one or two slaves. The average citizen is more able today than he was yesterday to turn his chattel housekeeper into the girl he's always dreamed of. Aspirational stuff like this always causes a major price shock. It's a sellers' market out there; projections show the price of slaves rising as much as ten percent in the short term. There will be no immediate impact on you or your slaves, but the coming weeks will be a great time to sell stock, and a bad time to buy. @@.yellow;The market price of slaves has increased.@@
	<<set $menialDemandFactor += 20000>>
	<<set $menialDemandFactor = Math.clamp($menialDemandFactor,-50000,50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "bankruptcy">>
	The economy of the Free Cities is a rough-and-tumble place. The absence of old world regulations and institutions, and the often gold-rush atmosphere of the new cities, lead to fortunes being made and lost overnight. Last night, one of the Free Cities' greatest fortunes was lost. A great slave trading house unexpectedly went bankrupt, and its huge stable of slaves are being sold at fire-sale prices. The unforeseen sell off is driving down the market price of slaves all across the Free Cities. Projections show a short-term price drop of up to five percent. There will be no immediate impact on you or your slaves, but the coming weeks will be a fine time to buy new stock, and a terrible time to sell. @@.yellow;The market price of slaves has dropped.@@
	<<set $menialSupplyFactor += 12000>>
	<<set $menialSupplyFactor = Math.clamp($menialSupplyFactor,-50000,50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "refugee boat">>
	Periodic refugee crises sweep the old world, and sometimes the human flotsam shaken loose from its moorings in the old world is brought up on the shores of the Free Cities. This week, that was no metaphor. A floating Free City has been inundated by refugees in boats. Naturally, the boats have been discarded and the refugees enslaved. It is unclear whether they somehow did not know that this was their inevitable fate, or their lot in the old world was so desperate that they were willing to accept it. Projections show a short-term slave price drop of up to five percent as the market digests the influx. There will be no immediate impact on you or your slaves, but the coming weeks will be a fine time to buy new stock, and a terrible time to sell. @@.yellow;The market price of slaves has dropped.@@
	<<set $menialSupplyFactor += 12000>>
	<<set $menialSupplyFactor = Math.clamp($menialSupplyFactor,-50000,50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "arcology change">>
	All across the Free Cities, arcology owners are experimenting with new society models and new ways of enforcing them. A nearby arcology has just undergone a major internal struggle as its owner forced through a radical program of changes and harsh measures to enforce them. All but a handful of its inhabitants have been enslaved and placed under the control of a chosen few. With harems of hundreds and little experience or infrastructure to manage them, the new overlords are selling off stock to raise funds to make the transition. Projections show a short-term price drop of up to five percent as they flood the market with mediocre slaves. There will be no immediate impact on you or your slaves, but the coming weeks will be a fine time to buy new stock, and a terrible time to sell. @@.yellow;The market price of slaves has dropped.@@
	<<set $menialSupplyFactor += 12000>>
	<<set $menialSupplyFactor = Math.clamp($menialSupplyFactor,-50000,50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "war">>
	The old world outside the Free Cities took another step towards its final decline today. A relatively prosperous third world city fell to a regional warlord, and it seems the remaining great powers lack either the money or the will to do anything about it. The victors seem to be following the standard procedure for modern conquerors. Anything valuable, they steal. Among the population, they recruit the willing, shoot the unwilling, and enslave everyone else. The slave markets are going to be glutted with new stock soon. Projections show a short-term price drop of up to ten percent. There will be no immediate impact on you or your slaves, but the coming weeks will be a fine time to buy new stock, and a terrible time to sell. @@.yellow;The market price of slaves has dropped.@@
	<<set $menialSupplyFactor += 20000>>
	<<set $menialSupplyFactor = Math.clamp($menialSupplyFactor,-50000,50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "empty prisons">>
	A small, impoverished old world country defaulted on its currency today. Its beleaguered government is taking every available step to raise funds. Among other things, it has sold every inmate in its prisons who would fetch a price worth the trouble of sale into Free Cities slavery. Though most of the influx is going to be of abominably low quality, the sudden addition of so much new meat is going to have a big impact on the slave economy. Projections show a short-term price drop of up to ten percent. There will be no immediate impact on you or your slaves, but the coming weeks will be a fine time to buy new stock, and a terrible time to sell. @@.yellow;The market price of slaves has dropped.@@
	<<set $menialSupplyFactor += 20000>>
	<<set $menialSupplyFactor = Math.clamp($menialSupplyFactor,-50000,50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "unemployment">>
	A leading old world nation has just suffered a major economic downturn. Old world nations suffer economic downturns all the time, of course, but to those with interests in the slave market, news like this can be very important. Slave market shocks from catastrophes get all the headlines, but a change that affects millions will often be more impactful. As unemployment in the old world rises, the number of people faced with the choice between starvation and voluntary enslavement rises. Social safety nets just aren't what they used to be. Projections show a short-term slave price drop of up to ten percent due to the sharp increase in desperate people immigrating to the Free Cities for enslavement. There will be no immediate impact on you or your slaves, but the coming weeks will be a fine time to buy new stock, and a terrible time to sell. @@.yellow;The market price of slaves has dropped.@@
	<<set $menialSupplyFactor += 20000>>
	<<set $menialSupplyFactor = Math.clamp($menialSupplyFactor,-50000,50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "anti-slavery coup">>
	For months there were strong indications that an old world nation was quietly taking steps towards legalizing slavery. The market began to anticipate a serious increase in the demand for slaves in earnest but this week a month of protests against the country's leaders ended in a violent coup. The new government, claiming to only follow the will of the people, has made several promises, including a very vocal rebuke of even the slightest possibility of legal slavery within their borders. The slave market was shocked to find the previous government to be so weak and even more shocked at how unwilling the new one is to accept the times we live in. The panicked market quickly adjusted to greatly lowered slave demand and projections show a short-term price drop of up to ten percent. There will be no immediate impact on you or your slaves, but the coming weeks will be a fine time to buy new stock, and a terrible time to sell. @@.yellow;The market price of slaves has dropped.@@
	<<set $menialDemandFactor -= 20000>>
	<<set $menialDemandFactor = Math.clamp($menialDemandFactor, -50000, 50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<<elseif $REM == "hostilities ended">>
	The Free Cities make a real effort to avoid armed conflict, especially amonst themselves, as such endeavors almost never have any real winners. But tensions grew so high in their trade conflict that the likelihood of a full blown war between two Free Cities became not just a possibility but a near certainty for months. As skirmishes commenced and slave armies were quickly drilled for action on both sides, the slave market anticipated a boost to demand as soon as the fighting intensified. Miraculously, cooler heads prevailed and the Free Cities agreed to disband their armies. While many people sighed with relief the slave market was forced into a shock adjustment, projections show a short-term price drop of up to five percent. There will be no immediate impact on you or your slaves, but the coming weeks will be a fine time to buy new stock, and a terrible time to sell. @@.yellow;The market price of slaves has dropped.@@
	<<set $menialDemandFactor -= 12000>>
	<<set $menialDemandFactor = Math.clamp($menialDemandFactor, -50000, 50000)>>
	<<set $slaveCostFactor = menialSlaveCost()/1000>>
<</if>>


code:
:: REM merger [nobr]

<<set $nextButton = "Continue">>
<<set $nextLink = "RIE Eligibility Check">>

<<set _slaveCompany = []>>
<<if $corpDivExtra == 1>>
	<<set _slaveCompany.push("capture")>>
<</if>>
<<if $corpDivLegal == 1>>
	<<set _slaveCompany.push("entrapment")>>
<</if>>
<<if $corpDivBreak == 1>>
	<<set _slaveCompany.push("break")>>
<</if>>
<<if $corpDivSurgery == 1>>
	<<set _slaveCompany.push("surgery")>>
<</if>>
<<if $corpDivTrain == 1>>
	<<set _slaveCompany.push("training")>>
<</if>>
<<if $corpDivArcade == 1>>
	<<set _slaveCompany.push("arcade")>>
<</if>>
<<if $corpDivMenial == 1>>
	<<set _slaveCompany.push("slaves")>>
<</if>>
<<if $corpDivDairy == 1>>
	<<set _slaveCompany.push("dairy")>>
<</if>>
<<if $corpDivWhore == 1>>
	<<set _slaveCompany.push("whore")>>
<</if>>

<<set _company1 = _slaveCompany.pluck()>>
<<if $corpDiv > 1>>
	<<set _company2 = _slaveCompany.random()>>
<</if>>

<<if $marketAssistantAnnounced>>Your market assistant<<elseif $assistantName == "your personal assistant">>Your personal assistant<<else>>$assistantName<</if>> constantly combs business records, tax receipts and the media for leads on opportunities for your corporation to take advantage of. Small businesses go under all the time, and with a large amount of cash on hand, your corporation can afford to step in and acquire them.<<if $corpDiv > 1>> This week, there are not one but two troubled organizations you could easily fold into your corporation.<</if>>

<<if $corpDiv > 1>>The first is <<else>>This week you come across <</if>>
<<if _company1 == "slaves">>
	a minor slaveholding company. A major deal with a troubled government just fell through, and they had depended on it going through to an unwise degree. They need to merge with a larger slaving concern immediately, but there's nothing at all wrong with their significant inventory of slaves.
<<elseif _company1 == "entrapment">>
	an old world telemarketing firm. In an attempt to survive in the changing economy, it turned its focus towards convincing desperate, ignorant, or stupid people from the old world to accept voluntary enslavement, through a variety of entrapment procedures. It failed to make the transition successfully, but you could certainly continue its operations under your aegis.
<<elseif _company1 == "training">>
	a small slave training firm. Slave training is a notoriously difficult business, since the maturation times on the merchandise can be extremely long, and the improvement in price can be marginal if the training does not prove highly successful. There's nothing inherently wrong with the business, they've simply hit a cash flow bottleneck and need to merge with a cash-rich organization like yours.
<<elseif _company1 == "break">>
	a small slave breaking firm. Despite a great need for obedient slaves the owner of this little establishment was unable to turn a profit. The facility has everything a respecting slave breaking could ever need, it seems the owner simply lacked the right character to apply effective breaking techniques. Your corporation knows perfectly well what it takes to achieve obedience and the assets can be put to great use.
<<elseif _company1 == "capture">>
	a troubled mercenary company. After a spate of failed operations, the rank and file deposed their management and are now looking to merge with a better-run organization. The old leadership did not engage in enslavement activities, but the mercenaries have decided to turn their talents towards slaving for profit in conflict zones.
<<elseif _company1 == "arcade">>
	a quaint maid café. The prime location together with a popular concept should make for a bustling business and yet the owner is looking to get out of the business hoping to salvage some of his savings. Sadly there was a lack of capital to employ attractive servant slave maids. While someone might very well be more than willing to come in and invest in some better slaves, the place is so cheap you could easily replace the furniture and use the current assets to create a new arcade location for your corporation instead.
<<elseif _company1 == "dairy">>
	a dairy farm. Why a conventional dairy farm popped up as target confused you for a moment, but it quickly became clear the entire family was so deep in debt it would be a no brainer to buy the farm and start milking the large-uddered farmer's daughters as a great addition to your corporate dairy.
<<elseif _company1 == "whore">>
	a little brothel. With slave whores becoming the dominant force in sexual services the current madam lost her passion for the business. She's getting up there in age and has run a tight ship for many years so she deemed it the right time to bow out. All you need to do to add a new brothel location for your corporation is sign at the dotted line before anyone else has a chance to bite.
<<else>>
	a small medical clinic. Medical malpractice continues to be a major source of trouble for surgeons in the old world. A plastic surgeon has just suffered defeat in a major legal case over implant ruptures. He's looking to make the transition to a more enlightened area, along with his inventory and staff.
<</if>>

<<if $corpDiv > 1>>
	The second is
	<<if _company2 == "slaves">>
		a minor slaveholding company. A major deal with a troubled government just fell through, and they had depended on it going through to an unwise degree. They need to merge with a larger slaving concern immediately, but there's nothing at all wrong with their significant inventory of slaves.
	<<elseif _company2 == "entrapment">>
		an old world telemarketing firm. In an attempt to survive in the changing economy, it turned its focus towards convincing desperate, ignorant, or stupid people from the old world to accept voluntary enslavement, through a variety of entrapment procedures. It failed to make the transition successfully, but you could certainly continue its operations under your aegis.
	<<elseif _company2 == "training">>
		a small slave training firm. Slave training is a notoriously difficult business, since the maturation times on the merchandise can be extremely long, and the improvement in price can be marginal if the training does not prove highly successful. There's nothing inherently wrong with the business, they've simply hit a cash flow bottleneck and need to merge with a cash-rich organization like yours.
	<<elseif _company2 == "break">>
		a small slave breaking firm. Despite a great need for obedient slaves the owner of this little establishment was unable to turn a profit. The facility has everything a respecting slave breaking could ever need, it seems the owner simply lacked the right character to apply effective breaking techniques. Your corporation knows perfectly well what it takes to achieve obedience and the assets can be put to great use.
	<<elseif _company2 == "capture">>
		a troubled mercenary company. After a spate of failed operations, the rank and file deposed their management and are now looking to merge with a better-run organization. The old leadership did not engage in enslavement activities, but the mercenaries have decided to turn their talents towards slaving for profit in conflict zones.
	<<elseif _company2 == "arcade">>
		a quaint maid café. The prime location together with a popular concept should make for a bustling business and yet the owner is looking to get out of the business hoping to salvage some of his savings. Sadly there was a lack of capital to employ attractive servant slave maids. While someone might very well be more than willing to come in and invest in some better slaves, the place is so cheap you could easily replace the furniture and use the current assets to create a new arcade location for your corporation instead.
	<<elseif _company2 == "dairy">>
		a dairy farm. Why a conventional dairy farm popped up as target confused you for a moment, but it quickly became clear the entire family was so deep in debt it would be a no brainer to buy the farm and start milking the large-uddered farmer's daughters as a great addition to your corporate dairy.
	<<elseif _company2 == "whore">>
		a little brothel. With slave whores becoming the dominant force in sexual services the current madam lost her passion for the business. She's getting up there in age and has run a tight ship for many years so she deemed it the right time to bow out. All you need to do to add a new brothel location for your corporation is sign at the dotted line before anyone else has a chance to bite.
	<<else>>
		a small medical clinic. Medical malpractice continues to be a major source of trouble for surgeons in the old world. A plastic surgeon has just suffered defeat in a major legal case over implant ruptures. He's looking to make the transition to a more enlightened area, along with his inventory and staff.
	<</if>>
<</if>>

<<if $corpDiv > 1>>
	<<link "Absorb the first business">>
		<<replace "#result">>
			<<if _company1 == "slaves">>
				You immediately acquire the slaveholding firm, cash out its hapless staff, and absorb its stock into your corporation.
				<<set $corpDivMenialDev += 5,
				$corpDivMenialSlaves += 5>>
			<<elseif _company1 == "entrapment">>
				You immediately acquire the telemarketing firm and clean out the deadwood, getting the business in Free Cities shape.
				<<set $corpDivLegalDev += 5>>
			<<elseif _company1 == "capture">>
				You immediately acquire the mercenary company and ease their transition to conflict zone slaving.
				<<set $corpDivExtraDev += 5>>
			<<elseif _company1 == "training">>
				The owners of the slave training firm are happy to hear that they'll be able to continue operations under the aegis of a better-run, richer corporation.
				<<set $corpDivTrainDev += 3,
				$corpDivTrainSlaves += 3>>
			<<elseif _company1 == "break">>
				You quickly staff the slave breaking facility with qualified personnel to make use of the new assets.
				<<set $corpDivBreakDev += 5,
				$corpDivBreakSlaves += 5>>
			<<elseif _company1 == "arcade">>
				The old owner wishes his slaves luck under the new management, not knowing your plans for the place. A new sex arcade under your corporate umbrella will open shortly.
				<<set $corpDivArcadeDev += 5,
				$corpDivArcadeSlaves += 5>>
			<<elseif _company1 == "dairy">>
				You acquire the farm and your new slaves for the corporation. The family is not happy with your plans, but their approval is not required, you care only for their fluids.
				<<set $corpDivDairyDev += 3,
				$corpDivDairySlaves += 3>>
			<<elseif _company1 == "whore">>
				Without delay you contact the madam and seal the deal before anyone else can make an offer. She's surprised by your speed, but happily signs over the brothel.
				<<set $corpDivWhoreDev += 3,
				$corpDivWhoreSlaves += 3>>
			<<else>>
				The surgeon decides to retire on the proceeds of the sale, wishing your corporation well. It was a smart decision; he can retire to the Free Cities on that sum of money, and remote surgery is killing surgeons' wages.
				<<set $corpDivSurgeryDev += 3,
				$corpDivSurgerySlaves += 3>>
			<</if>>
			<<set $corpCash -= 50000>>
		<</replace>>
	<</link>>

	<<link "Absorb the second business">>
		<<replace "#result">>
			<<if _company2 == "slaves">>
				You immediately acquire the slaveholding firm, cash out its hapless staff, and absorb its stock into your corporation.
				<<set $corpDivMenialDev += 5,
				$corpDivMenialSlaves += 5>>
			<<elseif _company2 == "entrapment">>
				You immediately acquire the telemarketing firm and clean out the deadwood, getting the business in Free Cities shape.
				<<set $corpDivLegalDev += 5>>
			<<elseif _company2 == "capture">>
				You immediately acquire the mercenary company and ease their transition to conflict zone slaving.
				<<set $corpDivExtraDev += 5>>
			<<elseif _company2 == "training">>
				The owners of the slave training firm are happy to hear that they'll be able to continue operations under the aegis of a better-run, richer corporation.
				<<set $corpDivTrainDev += 3,
				$corpDivTrainSlaves += 3>>
			<<elseif _company2 == "break">>
				You quickly staff the slave breaking facility with qualified personnel to make use of the new assets.
				<<set $corpDivBreakDev += 5,
				$corpDivBreakSlaves += 5>>
			<<elseif _company2 == "arcade">>
				The old owner wishes his slaves luck under the new management, not knowing your plans for the place. A new sex arcade under your corporate umbrella will open shortly.
				<<set $corpDivArcadeDev += 5,
				$corpDivArcadeSlaves += 5>>
			<<elseif _company2 == "dairy">>
				You acquire the farm and your new slaves for the corporation. The family is not happy with your plans, but their approval is not required, you care only for their fluids.
				<<set $corpDivDairyDev += 3,
				$corpDivDairySlaves += 3>>
			<<elseif _company2 == "whore">>
				Without delay you contact the madam and seal the deal before anyone else can make an offer. She's surprised by your speed, but happily signs over the brothel.
				<<set $corpDivWhoreDev += 3,
				$corpDivWhoreSlaves += 3>>
			<<else>>
				The surgeon decides to retire on the proceeds of the sale, wishing your corporation well. It was a smart decision; he can retire to the Free Cities on that sum of money, and remote surgery is killing surgeons' wages.
				<<set $corpDivSurgeryDev += 3,
				$corpDivSurgerySlaves += 3>>
			<</if>>
			<<set $corpCash -= 50000>>
		<</replace>>
	<</link>>
<<else>>
	<<link "Absorb the business">>
		<<replace "#result">>
			<<if _company1 == "slaves">>
				You immediately acquire the slaveholding firm, cash out its hapless staff, and absorb its stock into your corporation.
				<<set $corpDivMenialDev += 5,
				$corpDivMenialSlaves += 5>>
			<<elseif _company1 == "entrapment">>
				You immediately acquire the telemarketing firm and clean out the deadwood, getting the business in Free Cities shape.
				<<set $corpDivLegalDev += 5>>
			<<elseif _company1 == "capture">>
				You immediately acquire the mercenary company and ease their transition to conflict zone slaving.
				<<set $corpDivExtraDev += 5>>
			<<elseif _company1 == "training">>
				The owners of the slave training firm are happy to hear that they'll be able to continue operations under the aegis of a better-run, richer corporation.
				<<set $corpDivTrainDev += 3,
				$corpDivTrainSlaves += 3>>
			<<elseif _company1 == "break">>
				You quickly staff the slave breaking facility with qualified personnel to make use of the new assets.
				<<set $corpDivBreakDev += 5,
				$corpDivBreakSlaves += 5>>
			<<elseif _company1 == "arcade">>
				The old owner wishes his slaves luck under the new management, not knowing your plans for the place. A new sex arcade under your corporate umbrella will open shortly.
				<<set $corpDivArcadeDev += 5,
				$corpDivArcadeSlaves += 5>>
			<<elseif _company1 == "dairy">>
				You acquire the farm and your new slaves for the corporation. The family is not happy with your plans, but their approval is not required, you care only for their fluids.
				<<set $corpDivDairyDev += 3,
				$corpDivDairySlaves += 3>>
			<<elseif _company1 == "whore">>
				Without delay you contact the madam and seal the deal before anyone else can make an offer. She's surprised by your speed, but happily signs over the brothel.
				<<set $corpDivWhoreDev += 3,
				$corpDivWhoreSlaves += 3>>
			<<else>>
				The surgeon decides to retire on the proceeds of the sale, wishing your corporation well. It was a smart decision; he can retire to the Free Cities on that sum of money, and remote surgery is killing surgeons' wages.
				<<set $corpDivSurgeryDev += 3,
				$corpDivSurgerySlaves += 3>>
			<</if>>
			<<set $corpCash -= 50000>>
		<</replace>>
	<</link>>
<</if>>


code:
:: Rename [nobr]

<<set $nextButton = "Back", $nextLink = "Slave Interact">>

<<if $activeSlave.slaveName === $oldName && $activeSlave.slaveSurname === $oldSurname>>
	<<goto "Slave Interact">>
<<else>>
/* First time renaming reaction */
<<if $activeSlave.slaveName === "" || ndef $activeSlave.slaveName>>
	$oldName needs to be called something on the records, so $oldName $he stays.
	<<set $activeSlave.slaveName = $oldName>>
<<elseif $activeSlave.fetish == "mindbroken">>
	$activeSlave.slaveName doesn't even recognize that $he's been renamed. It simply does not register.
<<elseif ($oldName != $activeSlave.birthName && $oldSurname != $activeSlave.birthSurname) && ($activeSlave.slaveName == $activeSlave.birthName || $activeSlave.slaveSurname == $activeSlave.birthSurname)>>
	$activeSlave.slaveName
	<<if $activeSlave.devotion > 50>>
		cheerfully accepts $his old name back.
	<<elseif $activeSlave.devotion >= -20>>
		obediently accepts $his old name back.
	<<elseif $activeSlave.devotion >= -50>>
		happily accepts $his original name.
	<<elseif $activeSlave.trust > 20>>
		scoffs at the notion that $he was ever anything other than <<= SlaveFullBirthName($activeSlave)>>, @@.orangered;weakening your control over $him.@@
		<<set $activeSlave.trust += 5>>
	<<else>>
		cautiously accepts the return of $his name.
	<</if>>
<<elseif $oldName == $activeSlave.birthName || $oldSurname == $activeSlave.birthSurname>>
	$activeSlave.slaveName
	<<if $activeSlave.devotion > 50>>
		accepts $his new name cheerfully. This attachment to you @@.hotpink; increases $his devotion.@@
		<<set $activeSlave.devotion += 4>>
	<<elseif $activeSlave.devotion >= -20>>
		obediently accepts $his new name. This surrender to you @@.hotpink; increases $his obedience.@@
		<<set $activeSlave.devotion += 4>>
	<<elseif $activeSlave.devotion >= -50>>
		reluctantly accepts $his new name.
	<<else>>
		angrily tries to resist $his new name, insisting that $his name is <<= SlaveFullBirthName($activeSlave)>>. This resistance @@.mediumorchid; increases $his rebelliousness.@@
		<<set $activeSlave.devotion -= 5>>
	<</if>>
<<else>>
	Since $activeSlave.slaveName has already had a new name <<if $activeSlave.devotion > 20>>given to<<else>>forced on<</if>> $him before, the mere fact of having it changed again doesn't really affect $him.
<</if>>

<<set _insultingName = 0>>
<<if $oldName != $activeSlave.slaveName && typeof $activeSlave.slaveName == "string">>
	<<set _toSearch = $activeSlave.slaveName.toLowerCase()>>
	<<for $i = 0; $i < setup.badWords.length; $i++>>
		<<if _toSearch.indexOf(setup.badWords[$i]) != -1>>
			<<set _insultingName = 1>>
			<<break>>
		<</if>>
	<</for>>
<</if>>
<<if !_insultingName>>
	<<if $oldSurname != $activeSlave.slaveSurname && typeof $activeSlave.slaveSurname == "string">>
		<<set _toSearch = $activeSlave.slaveSurname.toLowerCase()>>
		<<for $i = 0; $i < setup.badWords.length; $i++>>
			<<if _toSearch.indexOf(setup.badWords[$i]) != -1>>
				<<set _insultingName = 1>>
				<<break>>
			<</if>>
		<</for>>
	<</if>>
<</if>>
<<if _insultingName == 1>>
	<<if $activeSlave.fetish == "mindbroken">>
		$His new name would be insulting to a normal $girl, but $he dully accepts that it is an accurate description and goes about $his duties.
	<<elseif $activeSlave.devotion < -50>>
		Being given such a degrading name @@.mediumorchid;further increases $his hatred@@ of you.
		<<set $activeSlave.devotion -= 5>>
	<<elseif $activeSlave.devotion <= 50>>
		Being given such a degrading name @@.gold;terrifies $him,@@ since $he thinks it's fair warning for what $he'll suffer in the future.
		<<set $activeSlave.trust -= 5>>
	<</if>>
<</if>>

/* Wife's surname reaction */
<<if $oldSurname != $activeSlave.slaveSurname>>
<<if $activeSlave.relationship >= 5>>
	<<set _i = $slaveIndices[$activeSlave.relationshipTarget]>>
	<<if ndef _i>>@@.red;Error, relationshipTarget not found.@@<</if>>
	<<if $slaves[_i].slaveSurname>>
	<<if $activeSlave.slaveSurname == $slaves[_i].slaveSurname>>
		$He's touched that $he now shares a surname with $his wife $slaves[_i].slaveName $slaves[_i].slaveSurname, and is @@.mediumaquamarine;more confident than ever@@ that you intend to keep them together in marital bliss.
		<<set $activeSlave.trust += 5>>
	<<elseif $oldSurname == $slaves[_i].slaveSurname>>
		$He's concerned that $he no longer shares a surname with $his wife $slaves[_i].slaveName $slaves[_i].slaveSurname, and is @@.gold;very worried@@ that you might be considering splitting them up.
		<<set $activeSlave.trust -= 5>>
	<</if>>
	<</if>>
<</if>>
<</if>>

/* PC's surname reaction */
<<if $oldSurname != $activeSlave.slaveSurname>>
<<if $activeSlave.relationship == -3>>
	<<if $PC.surname>>
	<<if $activeSlave.fetish == "mindbroken">>
		Names are meaningless to $him and it is unlikely $he'll remember it.
	<<elseif $activeSlave.devotion+$activeSlave.trust >= 175>>
		<<if $activeSlave.slaveSurname == $PC.surname>>
			<<if $activeSlave.amp <= 0>>
				When you tell $him that $he's to be known as $activeSlave.slaveName $activeSlave.slaveSurname now, $he starts to cry. $He tries to get $himself under control and thank you as best $he can, wiping at the tears running down $his $activeSlave.skin cheeks, but $he can't seem to stop weeping as $he thanks you over and over. $He's a sex slave, your property, and it's understandable that some doubts about the permanence of $his place as your slave wife. This has @@.mediumaquamarine;helped reassure $him,@@ and explains the strength of $his emotional reaction. The next time you make love to $him, $he @@.hotpink;presses $himself as close to you as $he can,@@ eager to drink in as much of your presence as $he can get.
			<<else>>
				$He's @@.hotpink;deeply touched@@ that $he now shares a surname with you, and has @@.mediumaquamarine;an additional source of confidence@@ that $he'll remain your amputee slave wife.
			<</if>>
			<<set $activeSlave.devotion += 5, $activeSlave.trust += 5>>
		<<elseif $oldSurname == $PC.slaveSurname>>
			$He's devastated that you'd rename $him something other than your name. $He's @@.gold;terrified@@ that you intend to discard $him as your slave wife, and @@.mediumorchid;saddened@@ that you would take away something that was precious to $him.
			<<set $activeSlave.devotion -= 5, $activeSlave.trust -= 5>>
		<</if>>
	<<elseif $activeSlave.devotion < -20 && $activeSlave.trust > 20>>
		<<if $activeSlave.slaveSurname == $PC.surname>>
			When you tell $him that $he's to be known as $activeSlave.slaveName $activeSlave.slaveSurname now, $he shows no reaction. You already took everything from $him, what's a name at this point?
		<<elseif $oldSurname == $PC.slaveSurname>>
			$He doesn't care about losing your surname at first, but it quickly sets in that $he may have @@.gold;pushed $his position too far.@@
			<<set $activeSlave.trust -= 20>>
		<</if>>
	<<elseif $activeSlave.devotion < -20>>
		<<if $activeSlave.slaveSurname == $PC.surname>>
			When you tell $him that $he's to be known as $activeSlave.slaveName $activeSlave.slaveSurname now, $he pleads with you not to steal $his name. It matters little to you, and $he is forced to @@.hotpink;accept your will.@@
			<<set $activeSlave.devotion += 5>>
		<<elseif $oldSurname == $PC.slaveSurname>>
			$He's @@.mediumorchid;happy@@ to no longer have to share a name with $his tormentor, but the bliss doesn't last long as @@.gold;dread@@ quickly sets in about what this may mean.
			<<set $activeSlave.devotion += 5, $activeSlave.trust -= 10>>
		<</if>>
	<<else>>
		<<if $activeSlave.slaveSurname == $PC.surname>>
			When you tell $him that $he's to be known as $activeSlave.slaveName $activeSlave.slaveSurname now, $he nods with approval feeling @@.mediumaquamarine;that $he may hold at least some value in your eyes.@@
			<<set $activeSlave.trust += 5>>
		<<elseif $oldSurname == $PC.slaveSurname>>
			$He accepts that you'd rename $him something other than your name. $He's @@.gold;a little scared@@ that you intend to discard $him as your slave wife, or worse, but realizes this was not only a possibility, but likely.
			<<set $activeSlave.trust -= 5>>
		<</if>>
	<</if>>
	<</if>>
<</if>>
<</if>>

<</if>> /* close new name check */


code:
:: Rep Budget [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", _arcologyCosts = 0>>

<<set $lastWeeksRepIncome.Total = 0>>
<<set $lastWeeksRepExpenses.Total = 0>>
<<set $lastWeeksRepIncome.Total = hashSum($lastWeeksRepIncome)>>
<<set $lastWeeksRepExpenses.Total = hashSum($lastWeeksRepExpenses)>>

<<if def $lastWeeksRepProfits.Total>>
	<<set $lastWeeksRepProfits.Total = 0>>
<</if>>

//Reputation is a difficult thing to quantify, <<= properTitle()>>. Here you see an overview of topics that interest people in the arcology, and in turn, reflect on your own reputation. The more symbols you see in a category, the more impact that category is having on your reputation lately.//

<<if $lineSeparations == 0>>
<<else>>
<</if>>

//Your weekly reputation changes are as follows://

/* Table of Totals */
<<if ndef $lastWeeksRepIncome>>
	Financial data currently unavailable.
<<else>>

<>

Penthouse

		Income
		Expense
		Totals

	<<print budgetLine("fucktoy", "Fucktoys")>>

	<<print budgetLine("publicServant", "Public servants")>>

	<<print budgetLine("gloryhole", "Free glory holes")>>

	<<print budgetLine("concubine", "Concubine")>>

	<<print budgetLine("headGirl", "Head girl")>>

	<<print budgetLine("bodyguard", "Bodyguard")>>

	<<print budgetLine("recruiter", "Recruiter")>>

Structures
		/* TODO: using h2s doesn't fit in with the rest of the game */

	<<print budgetLine("arcade", "[[$arcadeNameCaps|Arcade][$nextButton = \"Back to Budget\", $nextLink = \"Rep Budget\"]] ($arcadeSlaves slaves)")>>

	<<print budgetLine("gloryholeArcade", "Free arcade")>>

	<<print budgetLine("brothel", "[[$brothelNameCaps|Brothel][$nextButton = \"Back to Budget\", $nextLink = \"Rep Budget\"]] ($brothelSlaves slaves)")>>

	<<print budgetLine("club", "[[$clubNameCaps|Club][$nextButton = \"Back to Budget\", $nextLink = \"Rep Budget\"]] ($clubSlaves slaves)")>>

	<<print budgetLine("publicServantClub", "Club servants")>>

	<<print budgetLine("clubAds", "[[Club ads|Club Advertisement][$nextButton = \"Back to Budget\", $nextLink = \"Rep Budget\"]]")>>

	<<if $club > 0>>

	<</if>>

	<<print budgetLine("pit", "[[$pitNameCaps|Pit][$nextButton = \"Back to Budget\", $nextLink = \"Rep Budget\"]] ($fighterIDs.length slaves)")>>

	<<print budgetLine("servantsQuarters", "[[Servants' Quarters][$nextButton = \"Back to Budget\", $nextLink = \"Rep Budget\"]] ($servantsQuartersSlaves slaves)")>>

	<<print budgetLine("spa", "[[$spaNameCaps|Spa][$nextButton = \"Back to Budget\", $nextLink = \"Rep Budget\"]] ($spaSlaves slaves)")>>

	<<print budgetLine("architecture", "[[Architecture|Manage Arcology][$nextButton = \"Back to Budget\", $nextLink = \"Rep Budget\"]]")>>

Slaves

	<<print budgetLine("slavesViewOfPC", "Slave trust and devotion")>>

	<<print budgetLine("prestigiousSlave", "Prestigious slaves")>>

	<<print budgetLine("porn", "Porn")>>

	<<print budgetLine("slaveTransfer", "Selling/buying major slaves")>>

	<<print budgetLine("babyTransfer", "Slave surgery")>>

	<<print budgetLine("birth", "Birth")>>

	<<print budgetLine("retirement", "Slave retirement")>>

	<<print budgetLine("vignette", "Vignettes")>>

	<<print budgetLine("fuckdolls", "Free Fuckdolls")>>

Policies

	<<print budgetLine("policies", "Capital expenses")>>

	<<print budgetLine("capEx", "[[Policies|Policies][$nextButton = \"Back to Budget\", $nextLink = \"Rep Budget\"]] and [[Edicts|edicts][$nextButton = \"Back to Budget\", $nextLink = \"Rep Budget\"]]")>>

	<<print budgetLine("futureSocieties", "[[Society shaping|Future Society][$nextButton = \"Back to Budget\", $nextLink = \"Rep Budget\"]]")>>

	<<print budgetLine("food", "Food")>>

Forces

	<<print budgetLine("specialForces", "Special forces")>>

	<<print budgetLine("peacekeepers", "Peacekeepers")>>

	<<print budgetLine("war", "Conflict")>>

Finance

	<<print budgetLine("personalBusiness", "Personal business")>>

	<<print budgetLine("PCappearance", "Your appearance")>>

	<<print budgetLine("PCactions", "Your actions")>>

	<<print budgetLine("PCRelationships", "Your skills")>>

	<<print budgetLine("SlaveRelationships", "Slave relationships")>>

	<<print budgetLine("event", "Events")>>

	<<print budgetLine("multiplier", "Reputation decay")>>

	<<print budgetLine("overflow", "Some of your reputation gains are no doubt \"wasted,\" since it's impossible to be more well known.")>>

	<<print budgetLine("cheating", "You cheated")>>

		Tracked totals

			<<print repFormat(Math.trunc($lastWeeksRepIncome.Total))>>

			<<print repFormat(Math.trunc($lastWeeksRepExpenses.Total))>>

			<<set $lastWeeksRepProfits.Total = ($lastWeeksRepIncome.Total + $lastWeeksRepExpenses.Total)>>
			/* each "profit" item is calculated on this sheet, and there's two ways to generate a profit total: the difference of the income and expense totals, and adding all the profit items. If they aren't the same, I probably forgot to properly add an item's profit calculation to this sheet.*/
			<<if $lastWeeksRepProfits.Total != hashSum($lastWeeksRepProfits) - $lastWeeksRepProfits.Total>>/* The profits object includes the total number of profits, so we have to subtract it back out */
				<<print (num(Math.trunc(hashSum($lastWeeksRepProfits)-$lastWeeksRepProfits.Total)))>>

				@@.red;Fix profit calc
@@
			<</if>>
			<<print repFormat(Math.trunc($lastWeeksRepProfits.Total))>>

		Last week actuals

		<<if ($rep-$repLastWeek) > 0>>
				<<print repFormat($rep-$repLastWeek)>>
			<<else>>
				@@.red;<<print repFormat($rep-$repLastWeek)>>@@
			<</if>>

	<<if ($rep-$repLastWeek) == $lastWeeksRepProfits.Total>>

			@@.green;The books are balanced, <<= properTitle()>>!@@

	<<else>>

			Transaction tracking off by:

				<<print repFormat(Math.trunc(($rep-$repLastWeek) - $lastWeeksRepProfits.Total))>>

	<</if>>

<</if>>

<<if ndef $lastWeeksRepErrors>>
	<<set $lastWeeksRepErrors = "Errors: ">>
<</if>>

<<if $lastWeeksRepErrors !== "Errors: ">>
	<<link "Reset">>
		<<set $lastWeeksRepErrors = "Errors: ">>
	<</link>>
	@@.red;<<print $lastWeeksRepErrors>>@@
<</if>>