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 */

<<SlaveTitle $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">>
		<<set _sins.push("slave molestation")>>
	<</if>>
	<</if>>
<</if>>

<<EventNameLink $activeSlave>>

<<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 her pussy. You run across the aftermath of one such incident as
<<case "chatting">>
	can be overly chatty with other slaves, and often makes herself late for her next task by losing herself in gossip. You happen to appear after she's been late as
<<case "dawdling">>
	is sometimes late to her 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 she's been late as
<<case "slave refusal">>
	lacks the sexual energy to be at home among your slaves, since her peers can demand sex from her whenever they want it. She 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. Her need for release pushes her to overstep her bounds. You come upon the aftermath of an example of her sexual aggressiveness as
<<default>>
	ERROR: bad sin
<</switch>>

<<if $HeadGirl != 0>>$HeadGirl.slaveName<<else>>$assistantName<</if>> is <<if $activeSlave.standardPunishment == "situational">>assessing an appropriate punishment<<else>>sentencing her to her standard punishment, <<switch $activeSlave.standardPunishment>><<case "confinement">>several hours in confinement<<case "whipping">>a whipping<<case "chastity">>several hours in chastity<</switch>><</if>>. <<if ($HeadGirl != 0) || ($assistant != 0)>>She<<else>>It<</if>> immediately defers to you, should you wish to take over.

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

<<case "confinement">>

<<link "Confine her firmly but fairly">>
	<<replace "#name">>$activeSlave.slaveName<</replace>>
	<<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. She obeys,
	<<if $activeSlave.devotion > 20>>
		knowing she deserves punishment and eager to get it over with.
	<<elseif $activeSlave.trust < -20>>
		if only out of terror, knowing she'll make her situation far worse if she 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 her to the wall, preventing her from doing anything to relieve boredom in the tiny space. You restate the rule she broke, state the length of her punishment, and remonstrate firmly with her before closing the door. As it shuts on her, plunging her into darkness, you hear <<if canTalk($activeSlave)>>her 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 her out after a reasonable time, and she exits the soft little cell @@.mediumaquamarine;with relief.@@
	<<set $activeSlave.trust += 4>>
	<</replace>>
<</link>>

<<link "Confine her cruelly">>
	<<replace "#name">>$activeSlave.slaveName<</replace>>
	<<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. She begins to cry when she sees it,
	<<if $activeSlave.devotion > 20>>
		but obediently gets inside, not wanting her punishment to be extended. Her obedience notwithstanding,
	<<elseif $activeSlave.trust < -20>>
		but desperately hurries to get inside, terrified that you might extend her sentence. Her obedience notwithstanding,
	<<else>>
		making no move towards it. She knows that active resistance will merely extend her sentence, and lets you stuff her sobbing body inside. Once she's in,
	<</if>>
	<<if canTalk($activeSlave)>>she begs tearfully<<elseif $activeSlave.voice != 0>>she tries frantically to beg<<else>>she uses her hands to supplicate you<</if>> as you close the lid with exquisite slowness. The harshest thing you do is keep silent, not giving her any indication of when she's getting out. When you finally let her out, she'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 her a solid whipping">>
	<<replace "#name">>$activeSlave.slaveName<</replace>>
	<<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 her to place her hands in one of them, and she
	<<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 her from hurriedly obeying. She knows that resistance will earn her more strokes.
	<<else>>
		breaks down and makes no move to obey, but does not resist as you take her 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 her toes. She struggles a little to find her balance, and is distracted when the first stroke lands on her $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 her to count, and she <<if canTalk($activeSlave)>>gasps "one" through her agony<<elseif $activeSlave.voice != 0>>grunts once, doing her best<<else>>sticks up one finger despite her restrained hands<</if>>. You flog her bottom until it's pleasantly warm to the touch, and then let her down. She's @@.mediumaquamarine;relieved@@ at your moderation.
	<<set $activeSlave.trust += 4>>
	<</replace>>
<</link>>

<<link "Confine her cruelly">>
	<<replace "#name">>$activeSlave.slaveName<</replace>>
	<<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 her to place her hands in one of them, and she
	<<if $activeSlave.devotion > 20>>
		sobs with fear but obeys, despite something in your tone that makes her knees go weak with terror.
	<<elseif $activeSlave.trust < -20>>
		starts to cry but doesn't let that stop her from hurriedly obeying. She stumbles once, something in your tone that making her knees go weak with terror.
	<<else>>
		breaks down and makes no move to obey, but does not resist as you take her wrists in your hands and hoist her into the restraints.
	<</if>>
	The shackles can be moved up or down, and you move them down, forcing the weeping slave to spread her legs. You let her anticipate the pain for a long time before you start whipping her 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 her feel the whip on her thighs, calves and flanks before placing strokes against her <<if $activeSlave.scrotum > 0>>poor ballsack<<elseif $activeSlave.dick > 0>>poor penis<<else>>poor pussy<</if>>. She loses all control, <<if canTalk($activeSlave)>>shamelessly begging for mercy<<elseif $activeSlave.voice != 0>>sobbing and moaning incoherently<<else>>rasping pathetic little sobs past her mute throat<</if>>. When you're done, she's @@.gold;almost crazy with fear@@ of future whippings.
	<<set $activeSlave.trust -= 6>>
	<</replace>>
<</link>>

<<case "chastity">>

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

<<link "Torment her with vibration">>
	<<replace "#name">>$activeSlave.slaveName<</replace>>
	<<replace "#result">>
	Since you use chastity as a punishment, you're accustomed to using your office for supervising sexual denial. You order her to place her 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 her with a set of smart vibrators. The first is attached <<if $activeSlave.dick > 0>>to her dickhead<<else>>against her clit<</if>>,
	<<else>>
		Her smart piercing makes the next step easy. She gets three vibrators in total:
	<</if>>
	the second <<if $activeSlave.vagina > 0>>comfortably fills her pussy<<elseif $activeSlave.vagina > 0>>rests against her virgin pussy without breaking her virtue<<else>>is a nice little bullet vibe for her soft perineum<</if>>, and the third <<if $activeSlave.anus > 0>>is, of course, a vibrating plug for her asspussy<<else>>rests against her unfucked rosebud without penetrating it<</if>>.
	Then you walk away, setting the vibrators to bring her to the edge of orgasm and keep her there. The effect is almost instant, and as you go she 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 her down, she's unsteady on her 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 her ass">>
	<<replace "#name">>$activeSlave.slaveName<</replace>>
	<<replace "#result">>
	Deciding that the most appropriate punishment is some corrective assrape, you shove the slave to her knees and stuff <<if $PC.dick == 1>>your cock<<else>>a formidable dildo<</if>> up her
	<<if $activeSlave.anus > 2>>
		big butthole. It slides right in, the slave's relaxed sphincter offering no resistance. Announcing that you'll find her limits, wherever they are, you insert fingers until she's cruelly stretched and you're almost jerking <<if $PC.dick == 1>>yourself<<else>>the phallus<</if>> off inside her.
	<<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 her hard, much harder than she can comfortably take it up the ass.
	<<else>>
		tight hole. Her poor little anus doesn't want to let you in, but you force yourself in anyway, making the slave wriggle desperately beneath you as she feels the invading phallus force her anal ring to accommodate its girth.
	<</if>>
	You tell her that many slaves enjoy anal, and that if she's a good $desc, she can too, but that it's against the rules for her to show reluctance to be assfucked. The slave below you is too discomfited by anal pain to respond coherently, but she gets the message. She'll be @@.hotpink;better about submitting@@ in the future, but due to the connection between sex and punishment she'll be @@.red;a little less eager for sex,@@ especially anal.
	<<set $activeSlave.analCount += 1>>
	<<set $analTotal += 1>>
	<<set $activeSlave.devotion += 4>>
	<<set $activeSlave.energy -= 2>>
	<</replace>>
<</link>>

<<case "vaginal reluctance">>

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

<<case "chatting">>

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

<<case "dawdling">>

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

<<case "slave refusal">>

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

<<case "slave molestation">>

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

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


code:
:: RecETS workaround [nobr]

<<switch $RecETSevent>>

<<case "addict mother daughter">>

Despite herself, she sobs with relief when you agree. She offers to <<if $PC.dick == 1>>suck you off<<else>>eat you out<</if>> while you complete the necessary legalities, but instead you idly place a big dose of aphrodisiac on your desk and tell her to wait quietly. After ten minutes of careful manipulation, she's signed away both her own freedom and her daughter's without realizing it, in return for the drug. She's masturbating furiously on a chair when her daughter arrives. She immediately realizes what's happened and her eyes fill with all-consuming hatred, but she can't stop rubbing.

Unsurprisingly the daughter is an addict too, and before long she's given her signature and is sitting on a different chair on a strong dose of aphrodisiacs. <<if $activeSlave.dick > 0>>Mother and daughter crank it desperately,<<else>>Mother and daughter schlick themselves desperately,<</if>> sobbing in despair as you hurry to complete the nastily complex paperwork. This is going to be fun.

<<set $activeSlave.origin = "You tricked her mother into selling her into slavery to clear addiction debts.">>
<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.devotion += 10>>
<<set $activeSlave.trust += 10>>
<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
<<set $activeSlave.boobs -= 100>>
<<set $activeSlave.butt -= 1>>
<<if $activeSlave.vagina > -1>><<set $activeSlave.vagina = 1>><</if>>
<<set $activeSlave.anus = 1>>
<<set $activeSlaveOneTimeMaxAge = Math.min(22, Math.max($minimumSlaveAge, $activeSlave.actualAge - 11))>>
<<set $activeSlaveOneTimeMinAge = Math.min(Math.max(15, $minimumSlaveAge), $activeSlaveOneTimeMaxAge)>>
<<if $pedo_mode == 1>><<set $activeSlaveOneTimeMinAge = $minimumSlaveAge>><</if>>
<<set $activeSlave.actualAge = random($activeSlaveOneTimeMinAge, $activeSlaveOneTimeMaxAge)>>
<<if $familyTesting == 1>>
	<<set $activeSlave.mother = $activeSlave.ID - 1000>>
<<else>>
	<<set $activeSlave.relation = "daughter">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.visualAge = $activeSlave.actualAge>>
<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>

<<case "posh mother daughter">>

You press your thumb down on your desk interface and then tell her to read the display, strip, and show you her body. She knits her brow in confusion and begins to curse at you but reads anyway. Comprehension dawns on her and she stares you in the eye for a long moment - and then drops to her knees and begins to beg for her daughter's freedom. She knows the Free Cities well enough to be unsurprised when you ignore her completely. She stands and sadly strips off her blouse and slacks. Following orders, she rotates slowly for you. Then, she bends over facing away from you and spreads her buttocks to display her holes. Unsurprisingly, she's got a well-used pussy but has clearly never taken it up the ass. That will change.

Her daughter walks in angrily demanding to know why you called her here. She sees her mother kneeling naked next to you, hears the hiss-click of the door closing and locking behind her, and makes the connection far too late to run. She begins to scream at both you and her mother at the top of her lungs, and manages to keep up an impressive volume until you get her gagged. Her mother does not move to interfere as you strip and bind her daughter's struggling body.

<<set $activeSlave.origin = "You acquired her along with her mother when the family business failed.">>
<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.devotion -= 25>>
<<set $activeSlave.trust -= 10>>
<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
<<set $activeSlave.boobs -= 400>>
<<set $activeSlave.boobsImplant = 0>>
<<set $activeSlave.butt -= 1>>
<<set $activeSlave.vagina = 1>>
<<set $activeSlave.anus = 0>>
<<set $activeSlave.vaginalSkill = 0>>
<<set $activeSlaveOneTimeMaxAge = Math.max($minimumSlaveAge,Math.min(19, ($activeSlave.actualAge - Math.min(11, $fertilityAge))))>>
<<set $activeSlaveOneTimeMinAge = Math.min(18, $activeSlaveOneTimeMaxAge)>>
<<if $pedo_mode == 1>><<set $activeSlaveOneTimeMinAge = $minimumSlaveAge>><</if>>
<<set $activeSlave.actualAge = random($activeSlaveOneTimeMinAge, $activeSlaveOneTimeMaxAge)>>
<<if $familyTesting == 1>>
	<<set $activeSlave.mother = $activeSlave.ID - 1000>>
<<else>>
	<<set $activeSlave.relation = "daughter">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.visualAge = $activeSlave.actualAge>>
<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>

<<case "mismatched pair">>

The poor sissy isn't happy to become a slave, but she's clearly relieved to be away from her sister. The bitch isn't likely to have an easy time; the sale didn't clear her from debt. $activeSlave.slaveName describes her basic sexual experience, which includes a lot of sucking and anal whoring. Without more ado she moves from practical sexual slavery at the hands of her sister to actual sexual slavery.

Her sister-pimp walks in angrily demanding to know why you called her here. She sees her sissy sister kneeling naked next to you, hears the hiss-click of the door closing and locking behind her, and makes the connection far too late to run. She begins to scream at both you and her sister at the top of her lungs, and manages to keep up an impressive volume until you get her gagged. Her sister does not move to interfere as you strip and bind the struggling body. In fact, as you get the gag in place, she begins to laugh an unstable, cracking laugh that degenerates into sobbing.

<<set $activeSlave.origin = "You acquired her along with her sissy sister due to her inexperience as a madam.">>
<<set $activeSlave.career = "her sister's pimp">>
<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.devotion -= 50>>
<<set $activeSlave.trust -= 10>>
	<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
<<set $activeSlave.anus = 0>>
<<set $activeSlave.vagina = 1>>
<<set $activeSlave.preg = -1>>
<<set $activeSlave.dick = 0>>
<<set $activeSlave.scrotum = 0>>
<<set $activeSlave.ovaries = 1>>
<<set $activeSlave.balls = 0>>
<<set $activeSlave.vaginalSkill = 0>>
<<set $activeSlave.oralSkill = 0>>
<<set $activeSlave.analSkill = 0>>
<<set $activeSlave.behavioralFlaw = "arrogant">>
<<set $activeSlave.sexualFlaw = "hates penetration">>
<<set $activeSlave.boobs = either(400,500)>>
<<set $activeSlave.boobsImplant = 0>>
<<set $activeSlave.butt = either(2,3)>>
<<if $activeSlave.actualAge > 12>>
<<set $activeSlave.actualAge = 16>>
<<else>>
<<set $activeSlave.actualAge += 4>>
<</if>>
<<set $activeSlave.visualAge = $activeSlave.actualAge>>
<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>
<<if $familyTesting == 1>>
<<else>>
	<<set $activeSlave.relation = "sister">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.rivalry = 3>>
<<set $activeSlave.rivalryTarget = $activeSlave.ID - 1000>>

<<case "incest mother son">>

The son cheers happily and hugs his relieved mother. She leans in and kisses him deeply. They ought to be an interesting addition to your penthouse.

<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.career = "a student">>
<<set $activeSlave.actualAge -= 18>>
<<if $activeSlave.actualAge > 20>>
	<<if $potencyAge >= $minimumSlaveAge>>
		<<set $activeSlave.actualAge = random($potencyAge, 20)>>
	<<else>>
		<<set $activeSlave.actualAge = random($minimumSlaveAge, 20)>>
	<</if>>
<</if>>
<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
<<set $activeSlave.visualAge = $activeSlave.actualAge>>
<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>
<<set $activeSlave.genes = "XY">>
<<ResyncHeight $activeSlave>>
<<set $activeSlave.vagina = -1>>
<<set $activeSlave.pubertyXX = 0>>
<<set $activeSlave.pubertyXY = 1>>
<<set $activeSlave.preg = 0>>
<<set $activeSlave.pregKnown = 0>>
<<set $activeSlave.pregWeek = 0>>
<<set WombFlush($activeSlave)>>
<<SetBellySize $activeSlave>>
<<set $activeSlave.dick = 2>>
<<set $activeSlave.foreskin = 3>>
<<set $activeSlave.ovaries = 0>>
<<set $activeSlave.balls = 2>>
<<set $activeSlave.scrotum = 2>>
<<set $activeSlave.prostate = 1>>
<<set $activeSlave.clit = 0>>
<<set $activeSlave.vaginalSkill = 0>>
<<set $activeSlave.faceShape = "cute">>
<<set $activeSlave.boobs = 0>>
<<set $activeSlave.pregType = 0>>
<<set $activeSlave.pregSource = 0>>
<<set $activeSlave.birthsTotal = 0>>
<<set $activeSlave.lactation = 0>>
<<set $activeSlave.anus = 0>>
<<set $activeSlave.butt -= 2>>
<<set $activeSlave.behavioralQuirk = "none">>
<<set $activeSlave.sexualQuirk = "perverted">>
<<if $familyTesting == 1>>
	<<set $activeSlave.mother = $activeSlave.ID - 1000>>
<<else>>
	<<set $activeSlave.relation = "daughter">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 3>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "incest father daughter">>

The daughter cheers happily and hugs her relieved father. He leans in and kisses her deeply. They ought to be an interesting addition to your penthouse.

<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.career = "a student">>
<<set $activeSlave.actualAge -= 18>>
<<if $activeSlave.actualAge > 20>>
	<<if $potencyAge >= $minimumSlaveAge>>
		<<set $activeSlave.actualAge = random($potencyAge, 20)>>
	<<else>>
		<<set $activeSlave.actualAge = random($minimumSlaveAge, 20)>>
	<</if>>
<</if>>
<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
<<set $activeSlave.visualAge = $activeSlave.actualAge>>
<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>
<<set $activeSlave.genes = "XX">>
<<ResyncHeight $activeSlave>>
<<set $activeSlave.pubertyXX = 1>>
<<set $activeSlave.pubertyXY = 0>>
<<set $activeSlave.vagina = 3>>
<<set $activeSlave.preg = 30>>
<<set $activeSlave.dick = 0>>
<<set $activeSlave.ovaries = 1>>
<<set $activeSlave.balls = 0>>
<<set $activeSlave.scrotum = 0>>
<<set $activeSlave.clit = 1>>
<<set $activeSlave.prostate = 0>>
<<set $activeSlave.vaginalSkill = 50>>
<<set $activeSlave.boobs = (random(3,6)*100)>>
<<set $activeSlave.pregType = 1>>
<<set $activeSlave.pregKnown = 1>>
<<set $activeSlave.pregWeek = $activeSlave.preg>>
<<SetBellySize $activeSlave>>
<<set $activeSlave.pregSource = $activeSlave.ID - 1000>>
<<set $activeSlave.faceShape = "cute">>
<<set $activeSlave.behavioralQuirk = "none">>
<<set $activeSlave.sexualQuirk = "perverted">>
<<if $familyTesting == 1>>
	<<set $activeSlave.father = $activeSlave.ID - 1000>>
<<else>>
	<<set $activeSlave.relation = "daughter">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 3>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "incest brother sister">>

They cheer happily and hug each other tightly. They ought to be an interesting addition to your penthouse.

<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.actualAge -= 2>>
<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
<<set $activeSlave.visualAge = $activeSlave.actualAge>>
<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>
<<set $activeSlave.genes = "XY">>
<<ResyncHeight $activeSlave>>
<<set $activeSlave.vagina = -1>>
<<set $activeSlave.pubertyXX = 0>>
<<set $activeSlave.pubertyXY = 1>>
<<set $activeSlave.preg = 0>>
<<set $activeSlave.pregKnown = 0>>
<<set $activeSlave.pregWeek = 0>>
<<set WombFlush($activeSlave)>>
<<SetBellySize $activeSlave>>
<<set $activeSlave.dick = 2>>
<<set $activeSlave.foreskin = 2>>
<<set $activeSlave.ovaries = 0>>
<<set $activeSlave.balls = 2>>
<<set $activeSlave.scrotum = 2>>
<<set $activeSlave.prostate = 1>>
<<set $activeSlave.clit = 0>>
<<set $activeSlave.vaginalSkill = 0>>
<<set $activeSlave.faceShape = "masculine">>
<<set $activeSlave.boobs = 0>>
<<set $activeSlave.pregType = 0>>
<<set $activeSlave.pregSource = 0>>
<<set $activeSlave.lactation = 0>>
<<set $activeSlave.anus = 0>>
<<set $activeSlave.pubicHStyle = "bushy">>
<<set $activeSlave.behavioralQuirk = "none">>
<<set $activeSlave.sexualQuirk = "perverted">>
<<set $activeSlave.clothes = "conservative clothing">>
<<if $familyTesting == 1>>
<<else>>
	<<set $activeSlave.relation = "sister">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 3>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "incest sister sister">>

They cheer happily and hug each other tightly. They ought to be an interesting addition to your penthouse.

<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.actualAge -= 2>>
<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
<<set $activeSlave.visualAge = $activeSlave.actualAge>>
<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>
<<ResyncHeight $activeSlave>>
<<set $activeSlave.pubicHStyle = "shaved">>
<<if $familyTesting == 1>>
<<else>>
	<<set $activeSlave.relation = "sister">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 3>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "incest brother brother">>

They hug each other tightly as the older brother slips a hand down his younger's pants. They ought to be an interesting addition to your penthouse.

<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.actualAge -= 2>>
<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
<<set $activeSlave.visualAge = $activeSlave.actualAge>>
<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>
<<ResyncHeight $activeSlave>>
<<set $activeSlave.pubicHStyle = "shaved">>
<<set $activeSlave.dick += 2>>
<<set $activeSlave.balls += 2>>
<<set $activeSlave.scrotum = $activeSlave.balls>>
<<if $activeSlave.foreskin>>
	<<set $activeSlave.foreskin = $activeSlave.dick>>
<</if>>
<<if $familyTesting == 1>>
<<else>>
	<<set $activeSlave.relation = "sister">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 3>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "incest twin sister">>

They cheer happily and hug each other tightly. They ought to be an interesting addition to your penthouse.

<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<ResyncHeight $activeSlave>>
<<if $familyTesting == 1>>
<<else>>
	<<set $activeSlave.relation = "sister">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 3>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "incest twin brother">>

They hug each other tightly as the they slip a hand down the other's pants. They ought to be an interesting addition to your penthouse.

<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<ResyncHeight $activeSlave>>
<<if $familyTesting == 1>>
<<else>>
	<<set $activeSlave.relation = "sister">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 3>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "incest twins mixed">>

They cheer happily and hug each other tightly. They ought to be an interesting addition to your penthouse.

<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.genes = "XY">>
<<ResyncHeight $activeSlave>>
<<set $activeSlave.vagina = -1>>
<<set $activeSlave.pubertyXX = 0>>
<<set $activeSlave.pubertyXY = 1>>
<<set $activeSlave.dick = 2>>
<<set $activeSlave.foreskin = 2>>
<<set $activeSlave.ovaries = 0>>
<<set $activeSlave.balls = 2>>
<<set $activeSlave.scrotum = 2>>
<<set $activeSlave.prostate = 1>>
<<set $activeSlave.clit = 0>>
<<set $activeSlave.vaginalSkill = 0>>
<<set $activeSlave.faceShape = "masculine">>
<<set $activeSlave.boobs = 0>>
<<set $activeSlave.lactation = 0>>
<<set $activeSlave.anus = 0>>
<<set $activeSlave.pubicHStyle = "bushy">>
<<set $activeSlave.behavioralQuirk = "none">>
<<set $activeSlave.sexualQuirk = "perverted">>
<<set $activeSlave.clothes = "conservative clothing">>
<<if $familyTesting == 1>>
<<else>>
	<<set $activeSlave.relation = "sister">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 3>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "incest mother daughter">>

The daughter cheers happily and hugs her relieved mother. She leans in and kisses her deeply. They ought to be an interesting addition to your penthouse.

<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.career = "a student">>
<<set $activeSlave.actualAge -= 18>>
<<if $activeSlave.actualAge > 20>>
	<<if $potencyAge >= $minimumSlaveAge>>
		<<set $activeSlave.actualAge = random($potencyAge, 20)>>
	<<else>>
		<<set $activeSlave.actualAge = random($minimumSlaveAge, 20)>>
	<</if>>
<</if>>
<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
<<set $activeSlave.visualAge = $activeSlave.actualAge>>
<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>
<<ResyncHeight $activeSlave>>
<<set $activeSlave.vagina = 0>>
<<if $activeSlave.actualAge < $fertilityAge>>
	<<set $activeSlave.pubertyXX = 0>>
<</if>>
<<set $activeSlave.vagina = 0>>
<<set $activeSlave.birthsTotal = 0>>
<<set $activeSlave.vaginalSkill = 15>>
<<set $activeSlave.anus = 0>>
<<set $activeSlave.boobs -= 300>>
<<set $activeSlave.lactation = 0>>
<<set $activeSlave.boobsImplant = 0>>
<<set $activeSlave.butt -= 2>>
<<if $familyTesting == 1>>
	<<set $activeSlave.mother = $activeSlave.ID - 1000>>
<<else>>
	<<set $activeSlave.relation = "daughter">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 3>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "incest father son">>

The father hugs his son tight and slips a hand down his pants. They ought to be an interesting addition to your penthouse.

<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.career = "a student">>
<<set $activeSlave.actualAge -= 18>>
<<if $activeSlave.actualAge > 20>>
	<<if $potencyAge >= $minimumSlaveAge>>
		<<set $activeSlave.actualAge = random($potencyAge, 20)>>
	<<else>>
		<<set $activeSlave.actualAge = random($minimumSlaveAge, 20)>>
	<</if>>
<</if>>
<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
<<set $activeSlave.visualAge = $activeSlave.actualAge>>
<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>
<<ResyncHeight $activeSlave>>
<<set $activeSlave.vagina = -1>>
<<if $activeSlave.actualAge < $potencyAge>>
	<<set $activeSlave.pubertyXY = 0>>
<</if>>
<<set $activeSlave.dick -= 2>>
<<set $activeSlave.balls -= 1>>
<<set $activeSlave.scrotum -= 1>>
<<if $familyTesting == 1>>
	<<set $activeSlave.mother = $activeSlave.ID - 1000>>
<<else>>
	<<set $activeSlave.relation = "daughter">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 3>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "matched pair">>

They giggle and kiss each other rather sexually, pressing their nearly identical bodies closely together so their hips and shapely buttocks hide any sign of their difference. They're clearly very well trained.

<<set $activeSlave.slaveName = $activeSlave.birthName>>
<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.vagina = 1>>
<<set $activeSlave.preg = -1>>
<<set $activeSlave.dick = 0>>
<<set $activeSlave.scrotum = 0>>
<<set $activeSlave.clit = 2>>
<<set $activeSlave.ovaries = 1>>
<<set $activeSlave.balls = 0>>
<<set $activeSlave.vaginalSkill = 15>>
<<set $activeSlave.boobsImplant = 0>>
<<set $activeSlave.buttImplant = 0>>
<<if $familyTesting == 1>>
<<else>>
	<<set $activeSlave.relation = "twin">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 2>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "identical pair">>

They giggle and kiss each other rather sexually, pressing their nearly identical bodies closely together. They're clearly very well trained.

<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<if $familyTesting == 1>>
<<else>>
	<<set $activeSlave.relation = "twin">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 2>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "identical herm pair">>

They giggle and kiss each other rather passionately, their miniskirts becoming pinned against their pregnancies by their stiffening pricks. They're very well trained but not very disciplined, though their pervertedness will be fun.

"You know we each are carrying the other's twins right?"

<<set $activeSlave.ID = $activeSlave.ID + 1000>>
<<set $activeSlave.pregSource = $activeSlave.ID - 1000>>
<<if $familyTesting == 1>>
<<else>>
	<<set $activeSlave.relation = "twin">>
	<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
<</if>>
<<set $activeSlave.relationship = 4>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID - 1000>>

<<case "desperate broodmother">>

You have the needy girl immediately bought to your penthouse where you help her laboring body into an available bed or inspection. She asks where her 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 her. She's a little depressed at the news, but understands your reasons. You take the opportunity to give her a good look over; she is really dilated! Apart from that, between all the births and dicks, her vagina is rather worn out, though she seems to understand how to use it. Her anus has also seen use, but not nearly as much.

You turn to the child clutching her mother's grotesque belly.

<<if random(1,100) > 50>> /*boy*/
	He is in better shape than his mother and tries to hide behind her belly when you look at him. He'll be broken into a good little girl for you soon enough.
	<<set $activeSlave.origin = "Her mother offered her to you as an incentive to take her in.">>
	<<set $activeSlave.slaveName = $activeSlave.birthName>>
	<<set $activeSlave.ID = $activeSlave.ID + 1000>>
	<<set $activeSlave.health = random(10,20)>>
	<<set $activeSlave.devotion -= 5>>
	<<set $activeSlave.trust -= 5>>
	<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
	<<set $activeSlave.genes = "XY">>
	<<set $activeSlave.preg = 0>>
	<<set $activeSlave.pregType = 0>>
	<<set $activeSlave.pregKnown = 0>>
	<<set $activeSlave.pregWeek = 0>>
	<<set WombFlush($activeSlave)>>
	<<SetBellySize $activeSlave>>
	<<set $activeSlave.labor = 0>>
	<<set $activeSlave.ovaries = 0>>
	<<set $activeSlave.birthsTotal = 0>>
	<<set $activeSlave.anus = 0>>
	<<set $activeSlave.vaginalSkill = 0>>
	<<set $activeSlave.whoreSkill = 0>>
	<<set $activeSlave.analSkill = 0>>
	<<set $activeSlave.weight = random(-80,-50)>>
	<<set $activeSlave.muscles = 0>>
	<<set $activeSlave.underArmHStyle = "bushy">>
	<<set $activeSlave.pubicHStyle = "bushy">>
	<<set $activeSlave.boobs = 0>>
	<<set $activeSlave.boobShape = "perky">>
	<<set $activeSlave.nipples = "tiny">>
	<<set $activeSlave.lactation = 0>>
	<<set $activeSlave.lactationAdaptation = 0>>
	<<set $activeSlave.hips = -2>>
	<<set $activeSlave.shoulders = -2>>
	<<set $activeSlave.waist = 0>>
	<<set $activeSlave.vaginaLube = 0>>
	<<set $activeSlave.butt = 0>>
	<<set $activeSlave.tired = 1>>
	<<set $activeSlave.fetish = "none">>
	<<set $activeSlave.fetishStrength = 0>>
	<<set $activeSlave.sexualFlaw = "none">>
	<<set $activeSlave.sexualQuirk = "none">>
	<<set $activeSlave.bellySag = 0>>
	<<set $activeSlave.bellySagPreg = 0>>
	<<set $activeSlave.pubertyXX = 0>>
	<<set $activeSlave.dick = 1>>
	<<set $activeSlave.foreskin = 1>>
	<<set $activeSlave.balls = 2>>
	<<set $activeSlave.scrotum = 3>>
	<<set $activeSlave.prostate = 1>>
	<<set $activeSlave.actualAge = 3>>
	<<if $familyTesting == 1>>
		<<set $activeSlave.mother = $activeSlave.ID - 1000>>
	<<else>>
		<<set $activeSlave.relation = "daughter">>
		<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
	<</if>>
	<<set $activeSlave.visualAge = $activeSlave.actualAge>>
	<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
	<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>
<<else>> /*girl*/
	She is in better shape than her mother and tries to hide behind her belly when you look at her. She'll be broken into a good little girl for you soon enough.
	<<set $activeSlave.origin = "Her mother offered her to you as an incentive to take her in.">>
	<<set $activeSlave.slaveName = $activeSlave.birthName>>
	<<set $activeSlave.ID = $activeSlave.ID + 1000>>
	<<set $activeSlave.health = random(10,20)>>
	<<set $activeSlave.devotion -= 5>>
	<<set $activeSlave.trust -= 5>>
	<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
	<<set $activeSlave.preg = 0>>
	<<set $activeSlave.pregType = 0>>
	<<set $activeSlave.labor = 0>>
	<<set $activeSlave.birthsTotal = 0>>
	<<set $activeSlave.anus = 0>>
	<<set $activeSlave.vaginalSkill = 0>>
	<<set $activeSlave.whoreSkill = 0>>
	<<set $activeSlave.analSkill = 0>>
	<<set $activeSlave.weight = random(-80,-50)>>
	<<set $activeSlave.muscles = 0>>
	<<set $activeSlave.underArmHStyle = "bushy">>
	<<set $activeSlave.pubicHStyle = "bushy">>
	<<set $activeSlave.boobs = 0>>
	<<set $activeSlave.boobShape = "perky">>
	<<set $activeSlave.nipples = "tiny">>
	<<set $activeSlave.lactation = 0>>
	<<set $activeSlave.lactationAdaptation = 0>>
	<<set $activeSlave.hips = -2>>
	<<set $activeSlave.shoulders = -2>>
	<<set $activeSlave.waist = 0>>
	<<set $activeSlave.vaginaLube = 0>>
	<<set $activeSlave.butt = 0>>
	<<set $activeSlave.tired = 1>>
	<<set $activeSlave.fetish = "none">>
	<<set $activeSlave.fetishStrength = 0>>
	<<set $activeSlave.sexualFlaw = "none">>
	<<set $activeSlave.sexualQuirk = "none">>
	<<set $activeSlave.bellySag = 0>>
	<<set $activeSlave.bellySagPreg = 0>>
	<<set $activeSlave.pubertyXX = 0>>
	<<set $activeSlave.vagina = 0>>
	<<set $activeSlave.pregKnown = 0>>
	<<set WombFlush($activeSlave)>>
	<<if $fertilityAge <= 3>>
		<<set $activeSlave.pubertyXX = 1>>
		<<set $activeSlave.preg = 6>>
		<<set $activeSlave.pregType = 1>>
		<<set $activeSlave.pregKnown = 1>>
		<<set $activeSlave.vagina = 1>>
		You notice her belly is slightly distended. It could be hunger, but upon closer inspection, you realize her hymen has been torn. She's likely been servicing men alongside her mother and has a bun in the oven too.
	<</if>>
	<<set $activeSlave.pregWeek = $activeSlave.preg>>
	<<SetBellySize $activeSlave>>
	<<set $activeSlave.actualAge = 3>>
	<<if $familyTesting == 1>>
		<<set $activeSlave.mother = $activeSlave.ID - 1000>>
	<<else>>
		<<set $activeSlave.relation = "daughter">>
		<<set $activeSlave.relationTarget = $activeSlave.ID - 1000>>
	<</if>>
	<<set $activeSlave.visualAge = $activeSlave.actualAge>>
	<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
	<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>
<</if>>

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

<<if $activeSlave.slaveSurname>><<set _familyName = $activeSlave.slaveSurname>><</if>>
<<set _familyBirthSurname = $activeSlave.birthSurname>>
<<NationalityToName $activeSlave>>
<<if _familyName>><<set $activeSlave.slaveSurname = _familyName>><</if>>
<<set $activeSlave.birthSurname = _familyBirthSurname>>

<<AddSlave $activeSlave>>

<<switch $RecETSevent>>
	<<case "incest mother son" "incest father daughter" "incest brother sister" "incest sister sister" "incest brother brother" "incest mother daughter" "incest father son" "incest twin sister" "incest twins mixed" "incest twin brother">>
		<<include "newSlaveIncestSex">>
	<<default>>
		/* do nothing */
<</switch>>

repo_name: Drosil/fc

license: mit


code:
:: Recruiter Select [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $showEncyclopedia = 1, $encyclopedia = "Recruiter">>
<<showallAssignmentFilter>>
<<if ($Recruiter != 0)>>
	''__@@.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, she has no target for Ambassadorial duties. Select an influence target to apply her 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 $servantsQuarters>><<set _idleTarget++>><</if>>
<<if $masterSuite>><<set _idleTarget++>><</if>>
<<if $schoolroom>><<set _idleTarget++>><</if>>
<<if $spa>><<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]]

<<assignmentFilter>>

	<<showallAssignmentFilter>>
	<<include "Slave Summary">>
	<<resetAssignmentFilter>>


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("revel", "antislavery terrorism", "tainted drugs", "new free city", "speculation", "medical breakthrough")>>
<<else>>
	<<set $REM = either("bankruptcy", "refugee boat", "arcology change", "war", "empty prisons", "unemployment")>>
<</if>>

<<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 girl forward.
	<<case "shemale">>You recognize her function by her glasses and because her bimbo cock softens, halfway, while she addresses you on economic matters.
	<<case "amazon">>She illustrates a small group of gossiping tribeswomen that fades away as she 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," she stage whispers. <<if $assistantName == "your personal assistant">>Your regular assistant<<else>>$assistantName<</if>> rolls her eyes.
	<<case "hypergoddess">>The demigoddess portrait arrives in a glittery cloud of dust, wearing winged shoes and a noticeable roundness in her middle.
	<<case "loli">>The chubby, glasses-wearing loli arrives holding a neatly folded note addressed to you.
	<<case "preggololi">>The chubby, glasses-wearing loli arrives holding a hastily written note addressed to you. She seems kind of winded, with a suspicious stain in her panties under her 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">>Her symbol lights up in regular green pulses while she waits for your attention.
	<<case "angel">>The short haired angel lands before you, a rolled piece of parchment under her arm.
	<<case "cherub">>The short haired cherub flutters before you holding a rolled piece of parchment in her hands.
	<<case "incubus">>The regular incubus stands behind and prods the human girl forward with her dick.
	<<case "succubus">>The regular succubus stands behind and pushes the human boy forward.
	<<case "imp">>The short haired imp flaps before you holding a rolled piece of parchment in her hands.
	<<case "witch">>The apprentice's apprentice arrives before you; a message begins playing the moment she opens her mouth.
	<<case "ERROR_1606_APPEARANCE_FILE_CORRUPT">>The creature finishes forcing eggs into the human girl, leaving her 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">>She's looking unusually businesslike, with her tentacle hair restrained in a bun.
	<<case "loli">>She's looking unusually businesslike, withdrawn deep in thought.
	<<case "preggololi">>She's looking unusually businesslike, withdrawn deep in thought.
	<<case "shemale">>She's looking unusually businesslike, with her perpetually erect dick going untended, for once.
	<<case "amazon">>She's looking unusually businesslike, and is doing sums on a primitive little abacus.
	<<case "businesswoman">>She has a clipboard pressed against her generous bosom, and peers at you over the tops of her spectacles.
	<<case "fairy">>She's looking unusually businesslike, wearing a tiny business suit with an opening in the back for her wings to come out.
	<<case "pregnant fairy">>She's looking unusually businesslike, wearing a tiny business suit open in the front to let her swollen belly out and another opening in the back for her wings to come out.
	<<case "goddess" "hypergoddess">>She's looking unusually businesslike, with her hands clasped behind her back and pivoting one foot.
	<<case "schoolgirl">>She's looking unusually businesslike, and has a scribbled note in her hand.
	<<case "angel">>She's looking unusually businesslike; deep in thought with her hands together in front of her.
	<<case "cherub">>She's looking unusually businesslike, reading a newspaper titled "Heaven's Post".
	<<case "incubus">>She's looking unusually businesslike, with her typically erect dick flaccid for once.
	<<case "succubus">>She's looking unusually businesslike, wearing a slutty business suit, glasses and her hair in a tight bun. A slight buzzing can be heard from under her skirt.
	<<case "imp">>She's looking unusually businesslike, reading a list titled "Hell's Holes".
	<<case "witch">>She's looking unusually businesslike, nose first in an a book title "Economics and You".
	<<case "ERROR_1606_APPEARANCE_FILE_CORRUPT">>She's looking unusually businesslike, wearing an ill-fitted business suit. Her blouse buttons pop off as her belly swells grotesquely, before the object within her begins steadily moving upwards.
	<<default>>Her symbol spins for attention.
	<</switch>>
	"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, I have a news item that may be of business interest," she
	<<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 her 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 herself, and continues.
	<<case "succubus">>says between overly loud moans.
	<<case "witch">>states, finishes the page, and snaps her fingers. She grunts, reaches up her skirt and pulls out a message for you. Seems it didn't arrive as planned.
	<<case "ERROR_1606_APPEARANCE_FILE_CORRUPT">>says, her throat bulging as the egg containing the message passes out her 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. It spins for your attention. "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, I have a news item that may be of business interest," it says.
<</if>>

<<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 twenty 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 $slaveCostFactor += 0.1>>
<<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 twenty 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 $slaveCostFactor += 0.1>>
<<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 twenty 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 $slaveCostFactor += 0.1>>
<<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 thirty 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 $slaveCostFactor += 0.15>>
<<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 Seas 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 thirty 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 $slaveCostFactor += 0.15>>
<<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 thirty 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 $slaveCostFactor += 0.15>>
<<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 twenty 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 $slaveCostFactor -= 0.1>>
<<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 twenty 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 $slaveCostFactor -= 0.1>>
<<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 twenty 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 $slaveCostFactor -= 0.1>>
<<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 thirty 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 $slaveCostFactor -= 0.15>>
<<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 thirty 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 $slaveCostFactor -= 0.15>>
<<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 thirty 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 $slaveCostFactor -= 0.15>>
<</if>>


code:
:: REM merger [nobr]

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

<<set $slaveCompany = either("slaves", "capture", "entrapment")>>
<<set $trainingCompany = either("training", "drug", "surgical")>>

<<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. This week, there are not one but two troubled organizations you could easily fold into your corporation.

<<if $slaveCompany == "slaves">>
	The first is a minor slave holding 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 $slaveCompany == "entrapment">>
	The first is 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.
<<else>>
	The first is 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.
<</if>>

<<if $trainingCompany == "training">>
	The second is 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 $trainingCompany == "drug">>
	The second is a minor drug manufacturing concern. Their lab is highly mobile so as to be able to rapidly move across old world borders, one step ahead of drug control agencies. Their owner is looking to get out of the business after a profitable year, and is willing to sell his equipment and stock at very competitive prices.
<<else>>
	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>>

<<link "Absorb the first, slave-focused business">>
	<<replace "#result">>
	<<if $slaveCompany == "slaves">>
		You immediately acquire the slave holding firm, cash out its hapless staff, and absorb its stock into your corporation. Most of the bewildered merchandise doesn't even understand that they have a new owner. Your corporation gained a small amount of general assets and quite a few slaves.
		<<set $generalAssets += 1000>>
		<<set $slaveAssets += 5000>>
		<<set $corpPeopleEnslaved += 10>>
	<<elseif $slaveCompany == "entrapment">>
		You immediately acquire the telemarketing firm and clean out the deadwood, getting the business in Free Cities shape. Your corporation gained a small amount of general assets, a few slaves, and a large quantity of slave entrapment assets.
		<<set $generalAssets += 1000>>
		<<set $slaveAssets += 1000>>
		<<set $corpPeopleEnslaved += 2>>
		<<set $entrapmentAssets += 4000>>
	<<else>>
		You immediately acquire the mercenary company and ease their transition to conflict zone slaving. Your corporation gained a small quantity of general assets, a few slaves, and some powerful slave capture assets.
		<<set $generalAssets += 1000>>
		<<set $slaveAssets += 1000>>
		<<set $corpPeopleEnslaved += 2>>
		<<set $captureAssets += 4000>>
	<</if>>
	<<set $corpCash -= 50000>>
	<</replace>>
<</link>>

<<link "Absorb the second, improvement-focused business">>
	<<replace "#result">>
	<<if $trainingCompany == "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. Your corporation gained a small amount of general assets, a few slaves, and a large quantity of slave training assets.
		<<set $generalAssets += 1000>>
		<<set $slaveAssets += 1000>>
		<<set $corpPeopleEnslaved += 2>>
		<<set $trainingAssets += 4000>>
	<<elseif $trainingCompany == "drug">>
		The advanced mobile labs are across and into the Free Cities before anyone is the wiser, and not long after that they're turning out curatives and growth hormones. Your corporation gained a small amount of general assets, a few slaves, and a large quantity of drug-associated assets.
		<<set $generalAssets += 1000>>
		<<set $slaveAssets += 1000>>
		<<set $corpPeopleEnslaved += 2>>
		<<set $drugAssets += 4000>>
	<<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. Your corporation gained a small amount of general assets, a few slaves, and a large quantity of surgical assets.
		<<set $generalAssets += 1000>>
		<<set $slaveAssets += 1000>>
		<<set $corpPeopleEnslaved += 2>>
		<<set $surgicalAssets += 4000>>
	<</if>>
	<<set $corpCash -= 50000>>
	<</replace>>
<</link>>