code:
:: RE AWOL [nobr]

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

Human soldiers are superior to drones in a number of ways - they have the capability for suspicion, the ability to understand human interactions, and are impervious to the ever-present threat of cyber-warfare. That said, a crucial failing of any sentient warrior is their agency.

On this particular evening, you find your work interrupted by an urgent alert from $assistantName.
<<if $assistant > 0>>
	"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, one of the $mercenariesTitle has gone AWOL." She pauses before continuing. "She's taken a number of weapons with her."
<<else>>
	It informs you that one of the $mercenariesTitle has disappeared, seemingly taking with her a small stash of weapons.
<</if>>

Your window of opportunity to act is closing. If you have plans for punishing this dereliction from your authority, they must be set in motion now.

<<link "Let them go">>
	<<replace "#result">>
		You inform your personal assistant that you aren't planning to take any action. By the next morning, word has spread to the rest of your arcology that crossing you is apparently permissible and your @@.red;reputation has suffered@@ as a result.
		<<set $rep -= 1000>>
	<</replace>>
<</link>>

<<link "Let your mercenaries handle her">>
	<<replace "#result">>
		<<if random(1,100) > 50>>
			Despite the trouble she has caused you, the culmination of this mercenary's wanton flight from the rest of the $mercenariesTitle is decidedly an anti-climax. The last you hear of the matter is chorus of grim grunts and nods as your mercenaries file back into the arcology. The matter is done.
		<<else>>
			Your mercenaries return to tell you that they could not find the mutineer. It could be that she managed to escape beyond their reach or that one among your 'loyal' retainers allowed her to flee your judgement, but alas there is little that can be done to remedy the issue now. Still, aside from a slight grumbling within the arcology, few fault you for allowing the $mercenariesTitle to recapture one of their own - even if they failed to do so.
		<</if>>
	<</replace>>
<</link>>

<<if $securityForceActive == 1>>
	<<link "Let your $securityForceName handle her">>
		<<replace "#result">>
				You take a tablet and send The Colonel a notice about the mutinous mercenary. When you have the majority of the pertinent details committed to text, all that remains is to decide the fate of your quarry.

					<<link "You want her dead">>
						<<replace "#SFresult">>
							Despite the trouble she has caused you, the culmination of this mercenary's wanton flight from the rest of the $mercenariesTitle is decidedly anti-climatic. The last you hear of her is in the footnote of one of your daily reports, with some minute yet suitably gory pictures as an accompaniment. When the stolen weapons are returned to their rightful place in your arcology, the unfortunate matter is concluded once and for all. @@.green;Your reputation improves@@, a result of the fear of crossing you that your result have inspired. Also @@.green;Archology prospertiy improves@@, a result of showing your citizens that you are willing and able to deal with such matters in-house.
							<<set $rep += 1000,$arcologies[0].prosperity += 2>>
							<<if $arcologies[0].prosperity += 2 > $AProsperityCap>>
							<<set $arcologies[0].prosperity = $AProsperityCap>>
							<</if>>
						<</replace>>
					<</link>>

					<<link "You want her alive">>
						<<replace "#SFresult">>
							It doesn't take long for a squad of $securityForceName, to track her down. Soon you have the troublesome turncoat before you in chains.

								<<link "Enslave her">>
									<<replace "#aliveresult">>
										Despite the trouble she has caused you, you manage to complete the legalities and biometric scanning quickly and without incident. Of course, this is in large part due to the fact that the would-be mutineer is of course restrained. Based on the accounts of her captors and the numerous injuries evident amongst them, she is likely to be violent when she is finally released.

										<<if $pedo_mode == 1>>
											<<set $activeSlaveOneTimeMinAge = 21>>
										<<else>>
											<<set $activeSlaveOneTimeMinAge = 38>>
										<</if>>
										<<set $activeSlaveOneTimeMaxAge = 43>>
										<<set $one_time_age_overrides_pedo_mode = 1>>
										<<include "Generate XX Slave">>
										<<set $activeSlave.origin = "You sentenced her to enslavement as a punishment for dereliction of her duty to you as a mercenary and for theft.">>
										<<set $activeSlave.career = "a soldier">>
										<<set $activeSlave.devotion = random(-75,-60)>>
										<<set $activeSlave.trust = random(-15,0)>>
										<<set $activeSlave.health = random(60,80)>>
										<<set $activeSlave.muscles = 50>>
										<<set $activeSlave.weight = random(-10,10)>>
										<<set $activeSlave.eyes = 1>>
										<<set $activeSlave.anus = 0>>
										<<set $activeSlave.analSkill = 0>>
										<<set $activeSlave.whoreSkill = 0>>
										<<set $activeSlave.combatSkill = 1>>
										<<set $activeSlave.behavioralFlaw = "arrogant">>
										<<set $activeSlave.sexualFlaw = "hates men">>
										<<set $activeSlave.hStyle = "shaved into a mohawk">>
										<<set $activeSlave.customTat = "She has a number of tattoos from a variety of mercenary companies.">>
										<<include "New Slave Intro">>
									<</replace>>
								<</link>>

								<<link "Flog her in public then exile her from the arcology">>
									<<replace "#aliveresult">>
										An example must be made. There is a binding contract between you and your $mercenariesTitle, and this woman attempted to undermine it for her own selfish profit. The protesting bitch is stripped and flogged on the promenade before being escorted bleeding from the arcology. The public @@.green;approves of this harshness.@@ In addition @@.green;Archology prospertiy improves@@, a result of showing your citizens that you are willing and able to deal with such matters in-house.
										<<set $rep += 1000,$arcologies[0].prosperity += 2>>
										<<if $arcologies[0].prosperity += 2 > $AProsperityCap>>
										<<set $arcologies[0].prosperity = $AProsperityCap>>
										<</if>>
									<</replace>>
								<</link>>

							 /* closes aliveresult */
						<</replace>> /* SFresult */
					<</link>> /* want her alive */

				 /* closes SFresult */
		<</replace>> /* result */
	<</link>>
<</if>>
<<if $cash < 5000>>

	//You lack the necessary funds to put out a bounty.//
<<else>> /* cash >= 5000 */

	<<link "Put out a bounty on her head">>
		<<replace "#result">>
			You take a tablet and draft a bounty notice for the mutinous mercenary. When you have the majority of the pertinent details committed to text, all that remains is to decide the fate of your quarry.

				<<link "You want her dead">>
					<<replace "#bountyresult">>
						Despite the trouble she has caused you, the culmination of this mercenary's wanton flight from the rest of the $mercenariesTitle is decidedly an anti-climax. The last you hear of her is in the footnote of one of your daily reports, with some minute yet suitably gory pictures as an accompaniment. When the stolen weapons are returned to their rightful place in your arcology, the unfortunate matter is concluded once and for all. @@.green;Your reputation improves@@, a result of the fear of crossing you that your unpleasantness has inspired.
						<<set $rep += 1000, $cash -= 5000>>
					<</replace>>
				<</link>>

				<<link "You want her alive">>
					<<replace "#bountyresult">>
						It doesn't take long for some hired guns, motivated by the bounty, to track her down. Soon you have the troublesome turncoat before you in chains.

							<<link "Enslave her">>
								<<replace "#aliveresult">>
									Despite the trouble she has caused you, you manage to complete the legalities and biometric scanning quickly and without incident. Of course, this is in large part due to the fact that the would-be mutineer is of course restrained. Based on the accounts of her captors and the numerous injuries evident amongst them, she is likely to be violent when she is finally released.

									<<if $pedo_mode == 1>>
										<<set $activeSlaveOneTimeMinAge = 21>>
									<<else>>
										<<set $activeSlaveOneTimeMinAge = 38>>
									<</if>>
									<<set $activeSlaveOneTimeMaxAge = 43>>
									<<set $one_time_age_overrides_pedo_mode = 1>>
									<<include "Generate XX Slave">>
									<<set $activeSlave.origin = "You sentenced her to enslavement as a punishment for dereliction of her duty to you as a mercenary and for theft.">>
									<<set $activeSlave.career = "a soldier">>
									<<set $activeSlave.devotion = random(-75,-60)>>
									<<set $activeSlave.trust = random(-15,0)>>
									<<set $activeSlave.health = random(60,80)>>
									<<set $activeSlave.muscles = 50>>
									<<set $activeSlave.weight = random(-10,10)>>
									<<set $activeSlave.eyes = 1>>
									<<set $activeSlave.anus = 0>>
									<<set $activeSlave.analSkill = 0>>
									<<set $activeSlave.whoreSkill = 0>>
									<<set $activeSlave.combatSkill = 1>>
									<<set $activeSlave.behavioralFlaw = "arrogant">>
									<<set $activeSlave.sexualFlaw = "hates men">>
									<<set $activeSlave.hStyle = "shaved into a mohawk">>
									<<set $activeSlave.customTat = "She has a number of tattoos from a variety of mercenary companies.">>
									<<include "New Slave Intro">>
									<<set $cash -= 5000>>
								<</replace>>
							<</link>>

							<<link "Flog her in public then exile her from the arcology">>
								<<replace "#aliveresult">>
									An example must be made. There is a binding contract between you and your $mercenariesTitle, and this woman attempted to undermine it for her own selfish profit. The protesting bitch is stripped and flogged on the promenade before being escorted bleeding from the arcology. The public @@.green;approves of this harshness.@@
									<<set $rep += 1000, $cash -= 5000>>
								<</replace>>
							<</link>>

						 /* closes aliveresult */
					<</replace>> /* bountyresult */
				<</link>> /* want her alive */

			 /* closes bountyresult */
		<</replace>> /* result */
	<</link>> // It will cost ¤5000 to put out a bounty on her.//
<</if>> /* cash >= 5000 */

 /* closes result */


code:
:: RE boomerang [nobr]

<<set $nextButton = "Continue", $nextLink = "RIE Eligibility Check", $returnTo = "RIE Eligibility Check", $showEncyclopedia = 1, $encyclopedia = "Enslaving People">>

<<set $activeSlave = $boomerangSlave, $boomerangSlave = 0, _weeks = $boomerangWeeks, $boomerangWeeks = 0, _buyer = $boomerangBuyer, $boomerangBuyer = 0>>

Your work is interrupted by $assistantName with an alert from the entrance to the penthouse.
<<if $assistant>>
	"<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," she says, "you're going to want to see this." She
<<else>>
	It's got the incident flagged as not fitting into any of the usual categories of disturbance, and requests your attention. It
<</if>>
brings up the relevant feeds. There's a naked body crumpled pathetically against one wall of the entryway, beneath the communications panel. It's $activeSlave.slaveName<<if $activeSlave.slaveSurname>> $activeSlave.slaveSurname<</if>>, who you sold _weeks weeks ago. She's looking up into one of the cameras plaintively.
<<Enunciate $activeSlave>>
"Plea<<s>>e take me back," she whispers, not wanting to draw the attention of passersby, and knowing that her faint words will be picked up and amplified for you.

<<set $activeSlave.collar = "none", $activeSlave.choosesOwnClothes = 0, $activeSlave.clothes = "no clothing", $activeSlave.buttplug = "none", $activeSlave.vaginalAccessory = "none", $activeSlave.dickAccessory = "none">>
<<set $activeSlave.health = random(-40,-25)>>
<<if $activeSlave.preg > 0>>
	<<set $activeSlave.preg += _weeks>>
	<<set $activeSlave.pregWeek += _weeks>>
	<<if $activeSlave.preg > 40>>
		<<set $activeSlave.preg = -1, $activeSlave.birthsTotal += $activeSlave.pregType, $activeSlave.pregType = 0, $activeSlave.pregSource = 0, $activeSlave.pregWeek = 0, $activeSlave.pregKnown = 0>>
	<</if>>
	<<SetBellySize $activeSlave>>
<</if>>
<<if ($activeSlave.hStyle != "shaved" && $activeSlave.bald != 1)>>
	<<if ($activeSlave.hLength < 150)>>
		<<set $activeSlave.hLength += _weeks>>
	<</if>>
<</if>>
<<if $seeAge != 0>>
	<<for _weeks > 0>>
		<<set $activeSlave.birthWeek++>>
		<<if $activeSlave.birthWeek >= 52>>
			<<set $activeSlave.birthWeek = 0>>
			<<if $seeAge == 1>>
				<<set $activeSlave.physicalAge += 1, $activeSlave.actualAge += 1, $activeSlave.visualAge += 1>>
				<<set $activeSlave.ovaryAge += either(.8, .9, .9, 1, 1, 1, 1.1)>>
				<<if $activeSlave.physicalAge <= 18 && $loliGrow == 1>>
					<<PhysicalDevelopment $activeSlave>>
				<</if>>
			<</if>>
		<</if>>
		<<set _weeks-->>
	<</for>>
<</if>>

<<switch _buyer>>
<<case "buttbreaker">>
	"All my Ma<<s>>ter cares about i<<s>> raping my a<<ss>> until I <<s>>cream. I can't get u<<s>>ed to it. I'm loo<<s>>e and ruined, but he ju<<s>>t u<<s>>e<<s>> a dildo big enough to hurt me." She's sitting over on one buttock, and shifts uncomfortably.
	<<set $activeSlave.anus = 4>>
	<<set $activeSlave.sexualFlaw = "hates anal">>
<<case "factory farm" "free range" "pastoralist arcology" "D hucow" "cow trainer" "D milky herm">>
	<<switch _buyer>>
	<<case "free range">>
		"The ni<<c>>e free range dairy you <<s>>old me to failed, and a horrible factory farm bought everyone. It's horrible." The
	<<case "pastoralist arcology">>
		"After they finished showing me off, they just hooked me up to a milking machine and forgot about me." You sold her to a Pastoralist arcology as a prize heifer; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation. The
	<<case "D hucow">>
		"My new owner got bored of me as a human cow, and he wa<<s>> in debt, <<s>>o he re<<s>>old me to a dairy. A horrible dairy." The
	<<case "cow trainer">>
		"On<<c>>e the trainer was <<s>>ati<<s>>fied with my tit<<s>>, he re<<s>>old me to a dairy. A horrible dairy." The
	<<case "D milky herm">>
		"I got re<<s>>old me to a dairy. A horrible dairy. They <<s>>aid I'm valuable becau<<s>>e I give two kind<<s>> of milk." The
	<<default>>
		You sold her to a factory farm, and the
	<</switch>>
	effects of living there have changed her body greatly. It's surprising she managed to make it up here at all. "Plea<<s>>e," she begs. "I d-don't want to <<s>>pend the r-re<<s>>t of my life being raped by a machine."
	<<if $activeSlave.amp == 0>>She shifts uncomfortably on her feet. The soles of the feet are a convenient place to beat a whore, since it's agonizingly painful, doesn't bruise badly, and won't inconvenince a slave that spends all her time kneeling or lying down.<</if>>
	<<set $activeSlave.anus = 4>>
	<<set $activeSlave.lactation = 2, $activeSlave.lactationAdaptation = 100>>
	<<set $activeSlave.boobs = Math.clamp($activeSlave.boobs+2000+50*random(-20,20),0,10000)>>
	<<set $activeSlave.boobShape = "saggy">>
	<<if $activeSlave.ovaries>><<set $activeSlave.preg = random(5,_week-1), $activeSlave.pregtype = random(2,4), $activeSlave.vagina = 4, $activeSlave.pregWeek = $activeSlave.preg, $activeSlave.pregKnown = 1>><<SetBellySize $activeSlave>><</if>>
	<<if $activeSlave.balls>>
		<<set $activeSlave.balls = Math.clamp($activeSlave.balls+random(1,2),0,10)>>
		<<if $activeSlave.dick>><<set $activeSlave.dick = Math.clamp($activeSlave.dick+random(1,2),0,10)>><</if>>
	<</if>>
	<<set $activeSlave.intelligence = Math.clamp($activeSlave.intelligence-2,-3,3)>>
<<case "volume breeder" "preg fetishist">>
	<<switch _buyer>>
	<<case "preg fetishist">>
		"My ni<<c>>e Ma<<s>>ter had a d-debt. And he had to <<s>>ell me t-to a volume breeder. I wa<<s>> pregnant when I got there b-but they <<s>>-<<s>>tarted o-over." She swallows.
	<<default>>
		She tearfully describes life at a volume breeder like the one you sold her to.
	<</switch>>
	"They ran an IV line into me and then put me in a cage with a male <<s>>lave who raped me for a week. Then they <<s>>witched me into a <<s>>maller cage and forgot about me. I can feel my belly <<s>>welling. It'<<s>> horrible."
	<<set $activeSlave.preg = _week-1, $activeSlave.vagina = 4, $activeSlave.pregWeek = $activeSlave.preg, $activeSlave.pregKnown = 1>>
	<<if $seeHyperPreg == 1>>
		<<set $activeSlave.pregtype = random(10,40)>>
	<<else>>
		<<set $activeSlave.pregtype = 5>>
	<</if>>
	<<SetBellySize $activeSlave>>
<<case "pain fetishist">>
	"They whip me. A-actually," she sniffles, "I'm glad when they whip me b-becau<<s>>e e-everything el<<s>>e they d-do is w-wor<<s>>e. The only break I get i-i<<s>> when I'm hurt bad and th-they have to f-fix me." After all, you did sell her into a life as a pain slave.
	<<set $activeSlave.behavioralFlaw = "odd", $activeSlave.sexualFlaw = "apathetic">>
	<<set $activeSlave.health = random(-85,-75)>>
<<case "sadism fetishist">>
	"I-it'<<s>> t-too much." She shudders. You sold her to a sadist who planned to use her to abuse other slaves. "I c-can't d-do it anymore. I u<<s>>ed to fanta<<s>>i<<z>>e about d-doing h-horrible thing<<s>>, but, but, the <<s>>creaming." She squeezes her eyes shut. "If I don't do it I'll h-have it d-done t-to me."
	<<set $activeSlave.behavioralFlaw = "odd", $activeSlave.sexualFlaw = "apathetic">>
	<<set $activeSlave.fetish = "none", $activeSlave.fetishStrength = 0>>
<<case "dom fetishist">>
	"I," she mutters, and then loses her way. "I lo<<s>>t," she grates out after a while. "I wa<<s>> <<s>>uppo<<s>>ed to be the Head Girl after you <<s>>old me. But a new girl came, and, and she'<<s>> the Head Girl now." She looks down. "It should have been me."
	<<set $activeSlave.behavioralFlaw = "hates women">>
<<case "sub fetishist">>
	"I thought I'd be happy to be a <<s>>ub forever." You sold her to a determined dom, extreme even by Free Cities standards. "But, but, I haven't, um, had a break <<s>>in<<c>>e I left. I never talk. I never, well, I never do anything. I ju<<s>>t obey." She looks down. "I'm going in<<s>>ane."
	<<set $activeSlave.behavioralFlaw = "odd", $activeSlave.sexualFlaw = "apathetic">>
	<<set $activeSlave.fetish = "none", $activeSlave.fetishStrength = 0>>
<<case "supremacist arcology">>
	"It wa<<s>> horrible." You sold her to a Supremacist arcology; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation. "The thing<<s>> they made me do to other girl<<s>> ju<<s>>t because of who they were." She swallows. "I tried not to. And they punished me."
	<<set $activeSlave.behavioralFlaw = "odd", $activeSlave.sexualFlaw = "hates men">>
<<case "subjugationist arcology">>
	"They were breeding me with idiot<<s>>." You sold her to a Subjugationist arcology; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation. "I d-don't want thi<<s>> pregnan<<c>>y."
	<<set $activeSlave.preg = _week-1, $activeSlave.pregtype = random(2,4), $activeSlave.pregWeek = $activeSlave.preg, $activeSlave.pregKnown = 1>>
	<<SetBellySize $activeSlave>>
<<case "gender radicalist arcology">>
	"They <<if $activeSlave.balls>> cut my ball<<s>> off and then<</if>> j-ju<<s>>t kind of t-turned me loo<<s>>e in the corridor<<s>>," she moans. You sold her to a Gender Radicalist arcology. "Naked, <<s>>o everyone could u<<s>>e my a<<ss>>. Plea<<s>>e, I don't want to be an entire arcology'<<s>> bitch."
	<<set $activeSlave.balls = 0>>
	<<if $activeSlave.dick>><<set $activeSlave.dick = Math.clamp($activeSlave.dick-random(1,2),0,10)>><</if>>
<<case "gender fundamentalist arcology">>
	"It wa<<s>> horrible." You sold her to a Gender Fundamentalist arcology; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation. "I'm, I'm, not an idiot. At lea<<s>>t, not ju<<s>>t becau<<s>>e I'm a girl."
	<<set $activeSlave.behavioralFlaw = "odd", $activeSlave.sexualFlaw = "hates men">>
<<case "paternalist arcology">>
	"It wa<<s>> horrible." You sold her to a Paternalist arcology, but she explains the apparent contradiction. "The arcology got a new owner." She shudders. "I gue<<ss>> the ni<<c>>e one wa<<s>> weak, and, and the new one i<<s>> changing thing<<s>>. There'<<s>> cage<<s>>, and <<s>>pike<<s>>, and whip<<s>>, and rape." It's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation.
	<<set $activeSlave.behavioralFlaw = "odd", $activeSlave.sexualFlaw = "hates men">>
<<case "degradationist arcology">>
	"It wa<<s>> horrible." You sold her to a Degradationist arcology; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation.
	<<if $activeSlave.ovaries>>
		<<set $activeSlave.ovaries = 0, $activeSlave.preg = 0, $activeSlave.pregType = 0, $activeSlave.vagina = 4, $activeSlave.pregWeek = 0, $activeSlave.pregKnown = 0>>
		<<SetBellySize $activeSlave>>
		"They f-fixed me, t-to '<<s>>ave on maintenan<<c>>e of my cunt,'
	<<elseif $activeSlave.balls>>
		<<set $activeSlave.balls = 0, $activeSlave.anus = 4>>
		"They c-cut my b-ball<<s>> off, to 'keep me do<<c>>ile,'
	<<else>>
		<<set $activeSlave.anus = 4>>
		"They whipped me,
	<</if>>
	and then u<<s>>ed me to <<s>>ati<<s>>fy labor menial<<s>>. Ten an hour."
	<<set $activeSlave.behavioralFlaw = "odd", $activeSlave.sexualFlaw = "hates men">>
<<case "slimness enthusiast arcology">>
	"It wa<<s>> horrible." You sold her to a pleasant Slimness Enthusiast arcology, but somehow she's acquired grotesque implants. "The arcology got a new owner." She shudders. "I gue<<ss>> the ni<<c>>e one wa<<s>> weak, and, and the new one i<<s>> changing thing<<s>>. Sh-she l-like<<s>> t-to ruin the <<s>>lim one<<s>>." It's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation.
	<<set $activeSlave.boobsImplant = 200*random(2,4), $activeSlave.boobs += $activeSlave.boobsImplant>>
	<<set $activeSlave.buttImplant = random(2,4), $activeSlave.butt = Math.clamp($activeSlave.butt+$activeSlave.buttImplant,0,10)>>
	<<set $activeSlave.lipsImplant = 10*random(1,3), $activeSlave.lips = Math.clamp($activeSlave.lips+$activeSlave.lipsImplant,0,100)>>
<<case "asset expansionist arcology">>
	"It wa<<s>> horrible." You sold her to a Asset Expansionist arcology; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation.
	<<if $activeSlave.hips > 0>>
		<<set $activeSlave.butt = Math.clamp($activeSlave.butt+random(2,4),0,10)>>
		"They <<s>>aid, <<s>>in<<c>>e I've got broad hip<<s>>, I'd be a 'butt<<s>>lave'." The meaning is obvious; her ass has grown unbelievably.
	<<else>>
		<<set $activeSlave.boobs = Math.clamp($activeSlave.boobs+50*random(20,40),0,10000)>>
		"They <<s>>aid they'd <<s>>tart with my boob<<s>>." It's true; they've grown unbelievably.
	<</if>>
	She shivers. "The <<s>>ide effect<<s>> are terrible. I can't <<s>>leep. I can barely eat. They had to feed me with a tube."
	<<set $activeSlave.behavioralFlaw = "anorexic">>
<<case "transformation fetishist arcology">>
	"It wa<<s>> horrible." You sold her to a Transformation Fetishist arcology; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation. "They were giving me new boob implant<<s>> every two week<<s>>. I ran away before another <<s>>et. I c-couldn't take any more <<s>>-<<s>>urgery."
	<<set $activeSlave.boobsImplant = 200*random(9,12), $activeSlave.boobs += $activeSlave.boobsImplant>>
<<case "physical idealist arcology">>
	"It wa<<s>> horrible." You sold her to a Physical Idealist arcology; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation. "It should have been called a <<S>>teroid Enthu<<s>>ia<<s>>t arcology." She shivers. "The <<s>>ide effect<<s>> are terrible. I can't <<s>>leep. I can barely eat. They had to feed me with a tube."
	<<set $activeSlave.muscles = 100, $activeSlave.weight = random(-85,-75)>>
	<<set $activeSlave.behavioralFlaw = "anorexic">>
<<case "chattel religionist arcology">>
	"It wa<<s>> horrible." You sold her to a Chattel Religionist arcology; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation. "There were, um, cult<<s>> there, along with the Faith.  They were going to devote me to <<s>>omething called <<S>>he Who Thir<<s>>t<<s>>. Nobody ever hear<<s>> of girl<<s>> after that."
	<<set $activeSlave.behavioralFlaw = "odd", $activeSlave.sexualFlaw = "crude", $activeSlave.behavioralQuirk = "devout">>
<<case "roman revivalist arcology">>
	"It wa<<s>> horrible." You sold her to a Roman Revivalist arcology; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation. "I had to kill a girl," she adds in a small voice. "In the arena." Then, even more quietly: "I had to kill, um, girl<<s>>. I, I can't. Couldn't. Not again."
	<<set $activeSlave.behavioralFlaw = "odd", $activeSlave.sexualFlaw = "crude", $activeSlave.combatSkill = 1>>
<<case "aztec revivalist arcology">>
	"It wa<<s>> horrible." You sold her to an Aztec Revivalist arcology; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation. "They told me by blood would feed the <<S>>un." She shudders. "I, they, um, do that to hundred<<s>> of girl<<s>>. I had to help."
	<<set $activeSlave.behavioralFlaw = "odd", $activeSlave.sexualFlaw = "apathetic">>
<<case "egyptian revivalist arcology">>
	"It wa<<s>> horrible." You sold her to an Egyptian Revivalist arcology; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation. "My new owner wa<<s>> old, and he wa<<s>> really into <<s>>ome of the tomb <<s>>tuff. If he died, I'd have been buried with him."
<<case "body purist arcology">>
	"It wa<<s>> horrible." You sold her to a pleasant Body Purist arcology, but somehow she's acquired grotesque implants. "The arcology got a new owner." She shudders. "I gue<<ss>> the ni<<c>>e one wa<<s>> weak, and, and the new one i<<s>> changing thing<<s>>. Sh-she l-likes t-to ruin the pure one<<s>>." It's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation.
	<<set $activeSlave.boobsImplant = 200*random(2,4), $activeSlave.boobs += $activeSlave.boobsImplant>>
	<<set $activeSlave.buttImplant = random(2,4), $activeSlave.butt = Math.clamp($activeSlave.butt+$activeSlave.buttImplant,0,10)>>
	<<set $activeSlave.lipsImplant = 10*random(1,3), $activeSlave.lips = Math.clamp($activeSlave.lips+$activeSlave.lipsImplant,0,100)>>
<<case "trainer staffing" "D milf staffing">>
	"I'm a good <<s>>lave trainer, ju<<s>>t like you <<s>>old me to be. Too good." Her eyes look hollow. "I can't get what I'm doing to the<<s>>e girl<<s>> out of my head. Every young girl I meet, I get to know her and under<<s>>tand her. And then I break her down and turn her into a brainle<<ss>> little fuckpuppet." She swallows. "I can't. Not anymore."
	<<set $activeSlave.fetish = "dom", $activeSlave.fetishStrength = 100>>
	<<set $activeSlave.behavioralFlaw = "arrogant", $activeSlave.sexualFlaw = "crude">>
<<case "teaching trainer">>
	"I'm ju<<s>>t a mannequin now," she <<say>>s hollowly. Her buyer planned to use her as a teaching tool. "There'<<s>> nothing. No joy, no fun. Ju<<s>>t the same thing, over, and over. In<<s>>ide me."
	<<set $activeSlave.fetish = "sub", $activeSlave.fetishStrength = 100>>
	<<set $activeSlave.behavioralFlaw = "hates penetration", $activeSlave.sexualFlaw = "apathetic">>
<<case "implanting trainer">>
	"I d-don't want to be c-cut again," she <<say>>s hollowly. Her buyer planned to use her as a surgical teaching tool. "E-every time I'm healed, they implant me again. B-bigger."
	<<set $activeSlave.boobsImplant = 200*random(8,12), $activeSlave.boobs += $activeSlave.boobsImplant>>
	<<set $activeSlave.buttImplant = random(2,4), $activeSlave.butt = Math.clamp($activeSlave.butt+$activeSlave.buttImplant,0,10)>>
	<<set $activeSlave.lipsImplant = 10*random(1,3), $activeSlave.lips = Math.clamp($activeSlave.lips+$activeSlave.lipsImplant,0,100)>>
<<case "purifying trainer">>
	"It w-wa<<s>>n't like I thought it would be," she <<say>>s. "The trainer you <<s>>old me to took out my implant<<s>>. B-but then they <<s>>aid my boob<<s>> had to be rebuilt, only with drug<<s>> thi<<s>> time." She shivers. "The <<s>>ide effect<<s>> are terrible. I can't <<s>>leep. I can barely eat. They had to feed me with a tube."
	<<set $activeSlave.boobs -= $activeSlave.boobsImplant, $activeSlave.boobsImplant = 0>>
	<<set $activeSlave.butt -= $activeSlave.buttImplant, $activeSlave.buttImplant = 0>>
	<<set $activeSlave.lips -= $activeSlave.lipsImplant, $activeSlave.lipsImplant = 0>>
	<<set $activeSlave.boobs = Math.clamp($activeSlave.boobs+50*random(20,40),0,10000)>>
<<case "D startled the witch">>
	You sold her to a buyer interested in her because of her sharp teeth, among other things. "It wa<<s>> horrible," she whispers. Then she gags, dry heaves, and vomits slightly. She wipes her mouth with the back of her hand, staring upward vacantly. "Horrible."
	<<set $activeSlave.behavioralFlaw = "odd", $activeSlave.sexualFlaw = "crude">>
<<case "slimming trainer">>
	"It's horrible." You sold her to a trainer who specializes in slimming slaves down, and if anything, they seem to have gone too far. She's emaciated. "I'm h-hungry all the time, and when I'm not p-perfect, I d-don't get to eat at all."
	<<set $activeSlave.boobs = Math.clamp($activeSlave.boobs-50*random(5,10),0,10000)>>
	<<set $activeSlave.butt = Math.clamp($activeSlave.butt-random(1,2),0,10)>>
	<<set $activeSlave.waist = Math.clamp($activeSlave.waist-random(20,50),-100,100)>>
	<<set $activeSlave.weight = -100>>
<<case "broadening trainer" "D cannibal" "hedonistic decadence arcology">>
	<<switch _buyer>>
	<<case "D cannibal">>
		"M-my new owner i<<s>> going t-to do <<s>>omething horrible to me. H-he keep<<s>> me in a tiny cage and f-feed<<s>> me, and I have to <<s>>tay <<s>>till and eat or I'll <<s>>poil the meat." You did sell her to a citizen widely rumored to be a cannibal. She whispers, "I'm going to die."
	<<case "hedonistic decadence arcology">>
		You sold her to a Hedonistic arcology; it's nothing short of incredible that she managed to get back here. She must have sold and traded herself without hesitation. "It'<<s>> horrible." You sold her to an arcology that loves fattening slaves up, and if anything, they seem to have gone too far too fast. She's bloated, and her stomach is distended. "T-they beat me if I ever <<s>>topped eating, and they fed my butt too. I'm gro<<ss>> and ugly. Even when they mounted me, they'd <<s>>till <<s>>hove food down my throat."
	<<default>>
		"It'<<s>> horrible." You sold her to a trainer who specializes in fattening slaves up, and if anything, they seem to have gone too far. She's bloated, and her stomach is distended. "T-they beat me if I ever <<s>>top eating, and they feed my butt too. I'm gro<<ss>> and ugly."
	<</switch>>
	<<set $activeSlave.boobs = Math.clamp($activeSlave.boobs+50*random(5,10),0,10000)>>
	<<set $activeSlave.butt = Math.clamp($activeSlave.butt+random(1,2),0,10)>>
	<<set $activeSlave.waist = Math.clamp($activeSlave.waist-random(20,50),-100,100)>>
	<<set $activeSlave.weight = Math.clamp($activeSlave.weight+random(50,100),-100,200)>>
<<case "clipping trainer">>
	"All I do i<<s>> <<s>>uck dick<<s>> and get fucked in the butt." You sold her to a trainer who specializes in clipping and improving overly masculine slaves, and she's definitely more feminine, if bitterly unhappy. "They're going to <<s>>ell me to a bitch brothel <<s>>oon, I know it. Plea<<s>>e, nobody'<<s>> even <<s>>aid anything to me other than '<<s>>uck my cock' or 'bend over bitch' in week<<s>>."
	<<set $activeSlave.boobsImplant = 200*random(2,4), $activeSlave.boobs += $activeSlave.boobsImplant>>
	<<set $activeSlave.buttImplant = random(1,2), $activeSlave.butt = Math.clamp($activeSlave.butt+$activeSlave.buttImplant,0,10)>>
	<<set $activeSlave.lipsImplant = 10*random(1,2), $activeSlave.lips = Math.clamp($activeSlave.lips+$activeSlave.lipsImplant,0,100)>>
	<<set $activeSlave.waist = Math.clamp($activeSlave.waist+random(20,50),-100,100)>>
	<<set $activeSlave.balls = 0, $activeSlave.scrotum = 0, $activeSlave.dick = Math.clamp($activeSlave.dick-random(1,2),0,10)>>
	<<set $activeSlave.behavioralFlaw = "hates men", $activeSlave.sexualFlaw = "hates anal">>
	<<if $activeSlave.faceShape == "masculine">><<set $activeSlave.faceShape = "androgynous">><</if>>
<<case "reassignment trainer">>
	"I m-mi<<ss>> my dick." You sold her to a trainer who specializes in gender reassignment, and she's definitely more feminine, if bitterly unhappy. "P-plea<<s>>e, even if you won't f-fix me, plea<<s>>e take me back. I'll b-be a <<s>>ex <<s>>lave, I ju<<s>>t don't want to be a woman."
	<<set $activeSlave.boobsImplant = 200*random(2,4), $activeSlave.boobs += $activeSlave.boobsImplant>>
	<<set $activeSlave.buttImplant = random(1,2), $activeSlave.butt = Math.clamp($activeSlave.butt+$activeSlave.buttImplant,0,10)>>
	<<set $activeSlave.lipsImplant = 10*random(1,2), $activeSlave.lips = Math.clamp($activeSlave.lips+$activeSlave.lipsImplant,0,100)>>
	<<set $activeSlave.waist = Math.clamp($activeSlave.waist+random(20,50),-100,100)>>
	<<set $activeSlave.balls = 0, $activeSlave.scrotum = 0, $activeSlave.dick = 0, $activeSlave.vagina = 3>>
	<<set $activeSlave.behavioralFlaw = "hates men", $activeSlave.sexualFlaw = "hates penetration">>
	<<if $activeSlave.faceShape == "masculine">><<set $activeSlave.faceShape = "androgynous">><</if>>
<<case "arcade">>
	"Take me back, or kill me," she <<say>>s. You sold her to an arcade, and it's surprising she managed to make it up here at all. "Plea<<s>>e," she begs. "I will do literally anything. I c-can feel my<<s>>elf going c-cra<<z>>y. I'd rather die."
	<<set $activeSlave.anus = 4>>
	<<if $activeSlave.vagina != -1>><<set $activeSlave.vagina = 4>><</if>>
	<<set $activeSlave.intelligence = Math.clamp($activeSlave.intelligence-2,-3,3)>>
	<<set $activeSlave.behavioralFlaw = "odd", $activeSlave.sexualFlaw = "apathetic">>
<<case "harvester">>
	"I'm ju<<s>>t kept in a pen unle<<ss>> they're d-doing <<s>>urgery on me." It's not surprising; you did sell her to an organ farm. What's unexpected is that she's still alive. They must be removing the less essential parts gradually. "I'm going to die," she <<say>>s hollowly. "Next <<s>>urgery, I won't wake up."
	<<set $activeSlave.balls = 0, $activeSlave.ovaries = 0, $activeSlave.preg = -2, $activeSlave.pregType = 0, $activeSlave.pregWeek = 0, $activeSlave.pregKnown = 0>>
	<<SetBellySize $activeSlave>>
	<<set $activeSlave.behavioralFlaw = "hates men", $activeSlave.sexualFlaw = "crude">>
<<case "D butt bury">>
	"My kind butt loving Ma<<s>>ter had to <<s>>ell me, and the brothel who bought me u<<s>>e<<s>> my behind a<<s>> an adverti<<s>>ement." She shifts uncomfortably. "I can barely feel my anu<<s>>."
	<<set $activeSlave.anus = 4>>
	<<set $activeSlave.behavioralFlaw = "hates men", $activeSlave.sexualFlaw = "hates anal">>
<<case "D shorty breeder">>
	"My kind Ma<<s>>ter had to <<s>>ell me, and the brothel who bought me got rid of hi<<s>>, um, they got rid of my pregnan<<c>>y, and now I'm ju<<s>>t a short <<s>>lut."
	<<set $activeSlave.behavioralFlaw = "hates men", $activeSlave.sexualFlaw = "crude">>
<<case "fuckdoll">>
	Her appearance is surprising; you sold her to a dealer who planned to encase her in a fuckdoll suit and thereby transform her into a living sex toy. Apparently they decided to extract a bit of fun out of her first. "I've b-been chained up in their b-bathroom ever <<s>>in<<c>>e you <<s>>old me," she <<say>>s hollowly. "They're g-getting bored of me."
	<<set $activeSlave.behavioralFlaw = "hates men", $activeSlave.sexualFlaw = "hates penetration">>
<<case "stuffer chef">>
	"They fini<<s>>hed." Her appearance is not that surprising; you sold her to a chef who enjoyed stuffing her face till she was bloated. Apparently he sold her off after she got too fat for his stuffings to show. "He <<s>>tretched my belly out <<s>>o much and when I got <<s>>o fat he couldn't <<s>>ee a differen<<c>>e with hi<<s>> fea<<s>>t<<s>>, he got rid of me." She lowers her arms, allowing her grotesquely sagging belly to hang free. "I'm gro<<ss>>. I'm fat, <<s>>aggy, and gro<<ss>>."
	<<set $activeSlave.boobs = Math.clamp($activeSlave.boobs+50*random(5,10),0,10000)>>
	<<set $activeSlave.butt = Math.clamp($activeSlave.butt+random(1,2),0,10)>>
	<<set $activeSlave.waist = Math.clamp($activeSlave.waist-random(20,50),-100,100)>>
	<<set $activeSlave.weight = Math.clamp($activeSlave.weight+random(50,100),-100,200)>>
	<<set $activeSlave.bellySag = 80>>
	<<set $activeSlave.behavioralFlaw = "anorexic">>
<<default>>
	<<switch _buyer>>
	<<case "housekeeper">>
		"My kind Ma<<s>>ter pa<<ss>>ed away, and hi<<s>> heir <<s>>old me
	<<case "nice brothel">>
		"The ni<<c>>e brothel you <<s>>old me to failed, and their girl<<s>> went
	<<case "virgin trader">>
		"After I couldn't pa<<ss>> a<<s>> a virgin any more, they <<s>>old me
	<<case "D virgin asspussy">>
		"My new owner loved my a<<ss>>pu<<ss>>y becau<<s>>e my front hole was virgin. B-but i-it got b-broken by accid-dent, I <<s>>wear, and then he <<s>>old me
	<<default>>
		"Plea<<s>>e. I've been re<<s>>old
	<</switch>>
	to a sh-shitty brothel on the lower level<<s>>. It'<<s>> h-horrible there. I live in a tiny little room, and the only people I ever <<s>>ee ju<<s>>t fuck me and leave. N-nobody ever t-talk<<s>> to me. And they beat me."
	<<if $activeSlave.amp == 0>>She shifts uncomfortably on her feet. The soles of the feet are a convenient place to beat a whore, since it's agonizingly painful, doesn't bruise badly, and won't inconvenince a slave that spends all her time kneeling or lying down.<</if>>
	<<set $activeSlave.anus = 3>>
	<<if $activeSlave.vagina > -1>><<set $activeSlave.vagina = 3>><</if>>
	<<set $activeSlave.sexualFlaw = either("hates oral", "hates anal", "hates penetration")>>
<</switch>>

<br><br>
It isn't obvious how she managed to escape, though no doubt you could review the arcology surveillance logs and find out. For right now, though, the question is what to do with her.
<<if $activeSlave.trust > 95>>
	"Plea<<s>>e," she sobs, breaking down at last. "I th-thought I w-wa<<s>> a g-good girl. T-take me b-back and I'll p-pretend I n-never left. I'll d-do anything you a<<s>>k. I'll worship the ground you walk on. Plea<<s>>e."
	<<set $activeSlave.devotion = 100>>
<<elseif $activeSlave.intelligence < 0>>
	"Plea<<s>>e," she sobs, breaking down at last. "I d-don't know where el<<s>>e to go." That much you believe; she's an idiot.
<<else>>
	"I know I'll be caught," she sobs, breaking down at last. "I know you'd f-find me. <<S>>o I came here. Plea<<s>>e." She's right about that much. This is literally the only chance she has of getting away from her current owners.
<</if>>

<<set $contractCost = 5000>>
<<slaveCost $activeSlave>>
<<set $slaveCost -= $contractCost>>

<br><br>

<<set $saleDescription = 1, $applyLaw = 0>><<include "Long Slave Description">>

<br><br>

<span id="result">
<<link "Return her">>
	<<set $rep += Math.trunc($slaveCost/10)>>
	<<replace "#result">>
		$activeSlave.slaveName keeps waiting, but the doors to the penthouse never open. When her owners arrive a few minutes later to collect her, she cries harder, but does not resist. Her weeping has the peculiar ring of utter hopelessness as they restrain her and drag her off. A few minutes after that, you receive a businesslike note @@.green;expressing gratitude@@ for your assistance in this matter.
		<<set $boomerangStats = 0>>
	<</replace>>
<</link>>
<<if $cash >= $contractCost>>
<br><<link "Obfuscate her appearance and re-enslave her">>
	<<set $cash -= $contractCost>>
	<<if $familyTesting == 1>>
		<<if $boomerangStats.PCpregSource > 0 && $PC.preg > 0 && $PC.pregSource == 0>>
			<<set $PC.pregSource = $activeSlave.ID>>
		<</if>>
		<<if $boomerangStats.PCmother > 0>>
			<<set $PC.mother = $activeSlave.ID>>
		<</if>>
		<<if $boomerangStats.PCfather > 0>>
			<<set $PC.father = $activeSlave.ID>>
		<</if>>
		<<for _reb = 0; _reb < $slaves.length; _reb++>>
			<<if $boomerangStats.boomerangMother.includes($slaves[_reb].ID)>>
				<<set $slaves[_reb].mother = $activeSlave.ID>>
			<</if>>
			<<if $boomerangStats.boomerangFather.includes($slaves[_reb].ID)>>
				<<set $slaves[_reb].father = $activeSlave.ID>>
			<</if>>
			<<if $boomerangStats.boomerangPregSources.includes($slaves[_reb].ID) && $slaves[_reb].preg > 0 && $slaves[_reb].pregSource == 0>>
				<<set $slaves[_reb].pregSource = $activeSlave.ID>>
			<</if>>
		<</for>>
		<<if $incubator > 0>>
			<<for _reb = 0; _reb < $tanks.length; _reb++>>
				<<if $boomerangStats.boomerangMotherTank.includes($tanks[_reb].ID)>>
					<<set $tanks[_reb].mother = $activeSlave.ID>>
				<</if>>
				<<if $boomerangStats.boomerangFatherTank.includes($tanks[_reb].ID)>>
					<<set $tanks[_reb].father = $activeSlave.ID>>
				<</if>>
			<</for>>
		<</if>>
	<<else>>
		<<if $boomerangStats.boomerangPregSources.length > 0>>
			<<for _reb = 0; _reb < $slaves.length; _reb++>>
				<<if $boomerangStats.boomerangPregSources.includes($slaves[_reb].ID) && $slaves[_reb].preg > 0 && $slaves[_reb].pregSource == 0>>
					<<set $slaves[_reb].pregSource = $activeSlave.ID>>
				<</if>>
			<</for>>
		<</if>>
	<</if>>
	<<set $boomerangStats = 0>>
	<<replace "#result">>
		The penthouse opens, and $activeSlave.slaveName stumbles inside, sobbing her thanks. She's immediately conducted to the autosurgery for some quick cosmetic surgery, while you and $assistantName do the necessary work to falsify the arcology records and conceal her origins. Even so, it would probably be wise to keep her off public assignments for a while. In no time at all, she's standing in front of your desk like any other new slave. She waits obediently, knowing that it's in her best interests not to mention anything out of the ordinary.
	<<include "New Slave Intro">>
	<</replace>>
<</link>> //This will cost in ¤$contractCost.//
<br><<link "Sell her immediately">>
	<<set $cash += $slaveCost>>
	<<replace "#result">>
		The penthouse opens, and $activeSlave.slaveName stumbles inside, sobbing her thanks. She's immediately conducted to the autosurgery for some quick cosmetic surgery, while you and $assistantName do the necessary work to falsify the arcology records and conceal her origins. Before she's even out from under anaesthesia, she's bundled off into one of the hundreds of slave shipments that move between arcologies every day. This time she'll be sold far enough away that no matter how much of an escape artist she is, you won't be seeing any more of her. She can whine elsewhere.
		<<set $boomerangStats = 0>>
	<</replace>>
<</link>> //This will bring in ¤$slaveCost.//
<<else>>
	//You lack the necessary funds to enslave her.//
<</if>>
</span>

license: mit


code:
:: RE brothel function [nobr]

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

$brothelNameCaps is a reputable establishment in $arcologies[0].name, a veritable bedrock to sexual life in your arcology. As is befitting of its position, requests to rent out your brothel for one function or another come across your desk with some regularity. On this particular day, $assistantName has laid out a number of potential clients for your perusal. Given the importance of $brothelNameCaps in the arcology's sex trade, it would be unwise to indulge more than one of these requests at this time.

One request comes to you written on a letterhead featuring the logo of a fellow arcology owner. She describes her husband's preference for your hard working brothel whores, whom he patronizes on his regular business trips to your arcology. Such indulgences have been a distraction to her husband of late, and she has dispatched him to undertake a task in your arcology that simply cannot go poorly. With this in mind, she beseeches you to close down your brothel for a single day out of solidarity for a fellow arcology owner - and for the significant sum of 10000¤.

Another of these bids for your brothel comes in the form of a curious video call. The video comes from an infamous lothario in your arcology, a seducer of powerful and prominent women citizens. Indeed, the recording was surreptitiously recorded in the bedroom of one such influential woman, with the casanova describing his request in hushed tones while his wealthy host minces about unknowingly in the background. He explains that he is finally ready to hang up his coat and end his days of debauchery and copious casual sex, but that he would like to do so by engaging in a full day of indulgence at $brothelNameCaps.

The last of these requests comes in the form of a letter, stamped with the herald of a prominent arcology family. It seems the eldest son of the family, known to you largely as a spoiled child riding on the coattails of his parents, is about to reach the age of majority. At his behest, his parents have contacted you to reserve your brothel for a day so that their son may become a man in true Free Cities fashion - amongst a roil of writhing flesh and wanton debauchery.

<<link "Acquiesce to the arcology owner's request">>
	<<replace "#result">>
	Though you close down $brothelNameCaps for a day, it's far from a day off for your hard-working brothel girls. In the absence of the convenient center for the sale of sexual services that a brothel represents, you disperse them onto the streets to sell their bodies the old fashioned way. At the end of the day you receive a brief message of gratitude from your fellow arcology owner while your girls @@.hotpink;appreciate the opportunity to stretch their legs on the street@@ for a change of pace.
	<<for $i = 0; $i < $slaves.length; $i++>>
		<<if $slaves[$i].assignment == "work in the brothel">>
		<<set $slaves[$i].devotion += 4>>
		<</if>>
	<</for>>
	<<set $cash += 10000>>
	<</replace>>
<</link>> //This will earn you ¤10000//

<<link "Give this lady-killing rake a proper send off into retirement">>
	<<replace "#result">>
	Though a citizen he may be, this serial seducer may have more notches on his proverbial bedpost than even your oldest slaves. Though you are not present to view his mastery of the sexual craft first-hand, the dreamy fucked-out looks of exhaustion and gratified satisfaction painting every single one of your girls' faces at the end of the day speak volumes. Indeed, all of your brothel slaves with any room for improvement in their whoring skills @@.green;learn from his skillful coupling,@@ while even those with nothing to learn from him @@.hotpink;gain confidence@@ from the intensity of their sexual congress.
	<<for $i = 0; $i < $slaves.length; $i++>>
		<<if $slaves[$i].assignment == "work in the brothel">>
		<<if $slaves[$i].whoreSkill < 100>>
		<<set $slaves[$i].whoreSkill += 10>>
		<<else>>
		<<set $slaves[$i].devotion += 4>>
		<</if>>
		<</if>>
		<<if canDoVaginal($slaves[$i]) && canDoAnal($slaves[$i])>>
		<<set $slaves[$i].vaginalCount += 3>>
		<<set $vaginalTotal += 3>>
		<<set $slaves[$i].analCount += 3>>
		<<set $analTotal += 3>>
		<<elseif canDoAnal($slaves[$i])>>
		<<set $slaves[$i].analCount += 5>>
		<<set $analTotal += 5>>
		<<else>>
		<<set $slaves[$i].oralCount += 10>>
		<<set $oralTotal += 10>>
		<</if>>
	<</for>>
	<<set $cash += 2000>>
	<</replace>>
<</link>> //This will earn you ¤2000//

<<link "Welcome the boy into manhood in Free Cities fashion">>
	<<replace "#result">>
	Though he was but a boy yesterday, none can say that this newly made man entered his manhood with anything less than a sterling display of enthusiasm and virility, though he is somewhat lacking in general technique. Nevertheless, any man able to fuck his way through an entire brothel of sex slaves and back again is clearly capable of bearing the mantle of citizenry in $arcologies[0].name. The story of a boy entering manhood in such a spectacular manner spreads rapidly and reflects well in the court of @@.green;public opinion,@@ with many citizens recalling their own passage past the age of majority. However, a lifetime of indulgence and spoiling have rendered this new citizen unable to understand the concept of being refused - not that your slaves could refuse him, in any case. His rough treatment has left your poor slave whores @@.red;battered@@ by his brutally selfish lovemaking.
	<<for $i = 0; $i < $slaves.length; $i++>>
		<<if $slaves[$i].assignment == "work in the brothel">>
		<<set $slaves[$i].health -= 5>>
		<</if>>
		<<if canDoVaginal($slaves[$i]) && canDoAnal($slaves[$i])>>
		<<set $slaves[$i].vaginalCount += 1>>
		<<set $vaginalTotal += 1>>
		<<set $slaves[$i].analCount += 1>>
		<<set $analTotal += 1>>
		<<elseif canDoAnal($slaves[$i])>>
		<<set $slaves[$i].analCount += 2>>
		<<set $analTotal += 2>>
		<<else>>
		<<set $slaves[$i].oralCount += 4>>
		<<set $oralTotal += 4>>
		<</if>>
	<</for>>
	<<set $cash += 1000>>
	<<set $rep += 500>>
	<</replace>>
<</link>> //This will earn you ¤1000//


code:
:: RE busy arcade [silently nobr]

<<set $activeSlave = $slaves.find(function(s) { return s.assignment == "be confined in the arcade" && s.amp != 1 && s.fetish != "mindbroken"; })>>

<<if (ndef $activeSlave)>>
	<<goto "RIE Eligibility Check">>
<<else>>
	<<goto "RE busy arcade workaround">>
<</if>>


code:
:: RE busy arcade workaround [nobr]

<<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "RIE Eligibility Check">>

Slaves in your arcade are not immured in the facility permanently, since holding them in one position at all times would negatively impact their health. They are released to exercise, eat, bathe, and sleep, though for nothing else. You occasionally inspect them when they do so, to see that their harsh lives are not inappropriately difficult for them. One day when you are doing so, <<EventNameLink $activeSlave>> flings herself on the ground in front of you the instant she sees you.

Facing the ground, <<if !canTalk($activeSlave)>>she gestures with shaking hands that she cannot take any more. She begs you abjectly to let her out of the arcade and promises to be a perfect sex slave if you do.<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>she lisps through tears, <<else>>she sobs, <</if>>"<<Master>>, plea<<s>>e. I can't take any more of thi<<s>>. Plea<<s>>e let me out. I'll do anything, <<Master>>. I'll love you forever, <<Master>> - ju<<s>>t don't make me go back in<<s>>ide that wall."

<<link "Accept her pledge">>
	<<replace "#name">>
	$activeSlave.name
	<</replace>>
	<<replace "#result">>
	When you accept, $activeSlave.slaveName looks up at you in incomprehension, expecting you to correct yourself or reveal that this is a cruel trick. When you do neither, she scrabbles spastically to your feet, kisses them as she cries, and then clings to your knees, sobbing. She is so relieved by this reprieve that she is now on the cusp of @@.hotpink;devotion to you,@@ and will obey out of near-paralytic fear of being sent back to the arcade.
	<<set $activeSlave.devotion = 45>>
	<<removeJob $activeSlave "be confined in the arcade">>
	<</replace>>
<</link>>

<<link "Refuse">>
	<<replace "#name">>
	$activeSlave.name
	<</replace>>
	<<replace "#result">>
	She did not really expect mercy, but her sobs take on a distinctly dark tone of hopelessness at your refusal. As you personally immure her in the arcade for another day of endless dick, you wonder whether she'll damage her throat with all the commotion she's making. Several of the other arcade slaves glance dully over at the noise. Then, they look away.
	<</replace>>
<</link>>


code:
:: RE busy brothel [nobr]

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

$brothelNameCaps is well staffed, and does a busy trade in flesh 24 hours a day. With so many sex slaves in the Free Cities, brothels occupy a functional, nearly mechanical part of the sexual landscape. Free citizens and sometimes even favored slaves visit the brothel, select from the available merchandise, relieve their sexual needs, and leave. Affection, companionship, and emotional needs are available elsewhere.

Of course, $brothelName is the best establishment of its kind in the arcology. Citizens who patronize it can expect themselves to be very well looked after by skilled slaves. The quality of the merchandise, the efficiency with which it is delivered, and the cleanliness and reputation of the premises @@.green;reflect well on you,@@<<set $rep += 100>> so much so that you could leverage this bustling sexual commerce in many ways.

<<link "Surprise the hardworking whores with a day of rest">>
	<<replace "#result">>
	The problem with assembly-line sex is that it has a tendency to destroy any sense of intimacy or fun. So, you make some simple preparations and close the brothel for a day, hiring some freelancers to cover. All your slave whores are allowed to sleep late, and then spend the day with you playing games and enjoying light amusements. The girls are surprised by your generosity, but they have fun. Many of the games are sexually themed. One day of giggling and squealing can't completely reverse the transactionalization of sex for them, but they @@.hotpink;appreciate the effort.@@
	<<for $i = 0; $i < $slaves.length; $i++>>
		<<if $slaves[$i].assignment == "work in the brothel">>
		<<set $slaves[$i].devotion += 4>>
		<</if>>
	<</for>>
	<<set $cash -= 1000>>
	<</replace>>
<</link>> //This will cost ¤1000//

<<link "Hire an expert hooker to give lessons">>
	<<replace "#result">>
	The citizen streetwalker has had her day. A few of the cleverest have avoided being driven into poverty, either by becoming madams or by finding a way to build a new career serving the slave brothel industry. One of these is touring the city, offering her long sexual experience in seminars for slave prostitutes. Her services are not cheap, but it rapidly becomes clear that they are worth it. She is a grey-haired but still elegant woman with deep crow's feet and a smoker's voice. She is not only a sexual master, but a hardbitten and comprehensively experienced businesswoman. All of your brothel slaves with any room for improvement in their whoring skills @@.green;learn from her lessons,@@ while those who have nothing to learn @@.hotpink;gain confidence@@ from her praise.
	<<for $i = 0; $i < $slaves.length; $i++>>
		<<if $slaves[$i].assignment == "work in the brothel">>
		<<if $slaves[$i].whoreSkill < 100>>
		<<set $slaves[$i].whoreSkill += 10>>
		<<else>>
		<<set $slaves[$i].devotion += 4>>
		<</if>>
		<</if>>
	<</for>>
	<<set $cash -= 2000>>
	<</replace>>
<</link>> //This will cost ¤2000//

<<link "Eliminate prices for one morning to promote the brothel">>
	<<replace "#result">>
	The news that sex will be free at the brothel travels like wildfire. Security measures are necessary to control the throng that spends the entire day entering and leaving the brothel, though as the day goes on the crowds thin. By midmorning, all the holes on offer are so fucked out that only those who fetishize that sort of thing stick around. The brothel is a real seminal sewer by noon, and it smells like it. Nevertheless, free sex is a short route to @@.green;public approval,@@ though you do miss a morning's fees. The poor slave whores are @@.red;fairly battered@@ by so much wear and tear in so little time.
	<<for $i = 0; $i < $slaves.length; $i++>>
		<<if $slaves[$i].assignment == "work in the brothel">>
		<<set $slaves[$i].health -= 10>>
		<</if>>
		<<if ($slaves[$i].vagina > -1) && ($slaves[$i].vaginalAccessory != "chastity belt")>>
		<<set $slaves[$i].vaginalCount += 5>>
		<<set $vaginalTotal += 5>>
		<<set $slaves[$i].analCount += 5>>
		<<set $analTotal += 5>>
		<<else>>
		<<set $slaves[$i].analCount += 10>>
		<<set $analTotal += 10>>
		<</if>>
		<<set $slaves[$i].oralCount += 10>>
		<<set $oralTotal += 10>>
	<</for>>
	<<set $cash -= 2000>>
	<<set $rep += 200>>
	<</replace>>
<</link>> //This will cost ¤2000//


code:
:: RE busy club

<<nobr>>

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

<</nobr>>\
\
The original designers of the modern arcology did not realize how inseparable from slavery their work would become. The club at the social heart of $arcologies[0].name was not meant as a center of the more friendly kind of sexual slavery, but that is what it has become. Free whores of the highest quality work there, and they are accompanied by a flock of your slaves who have simple orders to dance, add cheer, and perform sexual favors wherever they can.

Offering slaves for free sex would become unmanageable if the club where your public servants work was open to the unwashed masses, but it is not. The arcology is already selective, and only good citizens can party, dance, and fuck the night away in $clubName. The upper classes @@.green;recognize your contributions@@<<set $rep += 100>> to arcology culture, which you could probably parlay into an even greater benefit.
\
<span id="result">
<<link "Sponsor a special event in the club">>
	<<replace "#result">>
	The Free Cities are new, and so is their culture. There are new traditions, new expectations, and now, new holidays. One morning, the upper classes of the arcology are surprised and gratified to find that the club has been specially decorated, and all the club sluts are nude. The floor of the club is typically meant for dirty dancing and some light sex, not public penetrative intercourse. Not today; today is special. The festivities @@.green;greatly improve your renown;@@ you have set a high bar for what a wealthy arcology owner should do.
	<<set $cash -= 2000>>
	<<set $rep += 500>>
	<</replace>>
<</link>> //This will cost ¤2000//
<<link "Host a business exposition">>
	<<replace "#result">>
	With the world economy in a perilous state, the Free Cities are one of the few remaining areas where innovation and new business opportunities still appear. The novel markets associated with the slave trade only reinforce this trend, offering a cornucopia of opportunities for the clear-eyed investor with liquid assets. Every other week there is news of a new fortune being made from smart investments in leather, in human growth hormones, or in psychoactive drugs. You host an exposition for slave services centered on the club, with your slaves serving as greeters who are eager to ensure that all the little wants of visiting notables are thoroughly satisfied. The optimistic outlook projected by this event @@.green;improves $arcologies[0].name's business prospects@@ and even @@.green;reflects well on you personally.@@
	<<set $cash -= 5000>>
	<<set $arcologies[0].prosperity += 2>>
	<<set $rep += 500>>
	<</replace>>
<</link>> //This will cost ¤5000//
</span>


code:
:: RE busy dairy

<<nobr>>

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

<</nobr>>\
\
$dairyNameCaps is working away steadily. Its high-quality product @@.green;reflects well on you,@@<<set $rep += 100>> you muse one day as you inspect the premises. The gentle pneumatic sounds of the milkers and the whimpers of the cows being milked are a pleasant background for the thought.

Even with high doses of modern drugs, human cows simply do not produce a very high volume of milk. This isn't much of a business problem, since it just means that the product can be sold at a high price. However, some of the more grandiose ideas about how to use milk have had to wait until you have enough cows producing enough milk to make them possible.
\
<span id="result">
<<link "Share a milk bath with the cows">>
	<<replace "#result">>
	Milk is a fashionable skin treatment in the Free Cities, and many of the cows fetishize their breasts and their milk. Many of them giggle with delight when you bring them all into a large spa room with a huge tub full of their fresh milk. A pittance will be lost from sales, but it's hard to think of such things when swimming and splashing in warm, nutty mother's milk with so many huge-breasted slaves, many of whom are milking themselves into the bath. Some of the older ones relax and luxuriate, gently milking themselves and masturbating or each other, according to taste. The younger cows prefer to rub themselves against you, taking turns being fucked. Regardless, they all @@.hotpink;appreciate such a special experience.@@
	<<for $i = 0; $i < $slaves.length; $i++>>
		<<if $slaves[$i].assignment == "work in the dairy">>
		<<set $slaves[$i].devotion += 4>>
		<<if ($slaves[$i].vagina > -1) && ($slaves[$i].vaginalAccessory != "chastity belt")>>
		<<set $slaves[$i].vaginalCount += 1>>
		<<set $vaginalTotal += 1>>
		<<else>>
		<<set $slaves[$i].analCount += 1>>
		<<set $analTotal += 1>>
		<</if>>
		<<set $slaves[$i].oralCount += 1>>
		<<set $oralTotal += 1>>
		<</if>>
	<</for>>
	<<set $cash -= 1000>>
	<</replace>>
<</link>> //This will cost ¤1000//
<<if $club != 0>>\
<<link "Add fresh milk to the club for a day to advertise">>
	<<replace "#result">>
	Sexual sights and sounds are all over the arcology. Nevertheless, passersby on the club are surprised to find one morning that a previously normal screen advertising your brand of milk has a luscious pair of breasts protruding through it at head height. The advertisement encourages anyone to try a free sample. The slaves constantly rotate, pressing fresh tits through the gap for public suckling. It is @@.green;generally agreed that your product is of the finest quality@@ and you even have enquiries about how it might be exported outside the arcology, should you manage to increase production.
	<<set $cash -= 2000>>
	<<set $rep += 500>>
	<</replace>>
<</link>> //This will cost ¤2000//
<</if>>\
<<if ($cumSlaves >= 5) && ($activeSlave.fetish != "cumslut")>>
	<<link "Cum in, milk out">>
		<<replace "#result">>
		As a promotional gimmick, you announce with considerable fanfare a special, experimental brand of milk, available at the normal price for a short time only. The milk will be unique in that it will be from cows fed mostly on slaves' cum; the cockmilked slaves will in turn be given as much milk as possible to produce a 'pure slave product,' recursively. The sad realities of nutrition stop it from being much more than a marketing ploy, but it's certainly a @@.green;successful@@ attempt to spark discussion.
	<<set $rep += 1000>>
	<<set $cash -= 1000>>
		<</replace>>
	<</link>> //This will cost ¤1000//
<</if>>
</span>


code:
:: RE busy servants quarters [nobr]

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

Your penthouse is very well staffed with servants. The trend in modern buildings is to design around automatic cleaning systems. Dusting, mopping, and polishing are no longer really necessary when machines that do them more cheaply and thoroughly than any human are readily available. Keeping slaves to clean is an ostentation, and visitors to your quarters are often @@.green;surprised and gratified@@ to see a sex slave working away in the old way.<<set $rep += 100>>

The busy servants' quarters are a reservoir of slaves that can be used for almost any whim that occurs to you.

<<link "Share the servants' quarters with your more favored slaves">>
	<<replace "#result">>

	The poor slaves in the servants' quarters are lower than almost any others, and they know it. Unfortunately for them, they're about to spend a long weekend knowing it unusually well. Sleeping time is usually nearly inviolate; you are the only person in the penthouse who is permitted to wake a sleeping slave for any but emergency reasons. Not now. You haunt the servants' quarters, using and abusing at will, and encourage your better slaves to follow your example. They quickly take the opportunity to be better than someone for once, and compete with each other in sexual harassment of the servants. They @@.hotpink;appreciate@@ having @@.mediumorchid;targets@@ for their frustrations.
	<<for $i = 0; $i < $slaves.length; $i++>>
		<<if $slaves[$i].assignment != "work in servants' quarters">>
		<<set $slaves[$i].devotion += 4>>
			<<set $slaves[$i].oralCount += 3>>
			<<set $oralTotal += 3>>
		<</if>>
		<<if $slaves[$i].assignment == "work in servants' quarters">>
		<<set $slaves[$i].devotion -= 5>>
		<<if ($slaves[$i].vagina > -1) && ($slaves[$i].vaginalAccessory != "chastity belt")>>
			<<set $slaves[$i].vaginalCount += 1>>
			<<set $vaginalTotal += 1>>
		<<else>>
			<<set $slaves[$i].analCount += 1>>
			<<set $analTotal += 1>>
		<</if>>
			<<set $slaves[$i].oralCount += 5>>
			<<set $oralTotal += 5>>
		<</if>>
	<</for>>
	<</replace>>
<</link>>


code:
:: RE citizen hookup [nobr]

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

<<set _FS = []>>
<<if $arcologies[0].FSSubjugationist != "unset">>
	<<set _FS.push("Subjugationist")>>
<</if>>
<<if $arcologies[0].FSSupremacist != "unset">>
	<<set _FS.push("Supremacist")>>
<</if>>
<<if $arcologies[0].FSGenderRadicalist != "unset">>
	<<set _FS.push("Gender Radicalist")>>
<<elseif $arcologies[0].FSGenderFundamentalist != "unset">>
	<<set _FS.push("Gender Fundamentalist")>>
<</if>>
<<if $arcologies[0].FSRepopulationFocus != "unset">>
	<<set _FS.push("Repopulationist")>>
<<elseif $arcologies[0].FSRestart != "unset">>
	<<set _FS.push("Eugenics")>>
<</if>>
<<if $arcologies[0].FSPaternalist != "unset">>
	<<set _FS.push("Paternalist")>>
<<elseif $arcologies[0].FSDegradationist != "unset">>
	<<set _FS.push("Degradationist")>>
<</if>>
<<if $arcologies[0].FSBodyPurist != "unset">>
	<<set _FS.push("Body Purist")>>
<<elseif $arcologies[0].FSTransformationFetishist != "unset">>
	<<set _FS.push("Transformation Fetishist")>>
<</if>>
<<if $arcologies[0].FSYouthPreferentialist != "unset">>
	<<set _FS.push("Youth Preferentialist")>>
<<elseif $arcologies[0].FSMaturityPreferentialist != "unset">>
	<<set _FS.push("Maturity Preferentialist")>>
<</if>>
<<if $arcologies[0].FSSlimnessEnthusiast != "unset">>
	<<set _FS.push("Slimness Enthusiast")>>
<<elseif $arcologies[0].FSAssetExpansionist != "unset">>
	<<set _FS.push("Asset Expansionist")>>
<</if>>
<<if $arcologies[0].FSPastoralist != "unset">>
	<<set _FS.push("Pastoralist")>>
<</if>>
<<if $arcologies[0].FSPhysicalIdealist != "unset">>
	<<set _FS.push("Physical Idealist")>>
<<elseif $arcologies[0].FSHedonisticDecadence != "unset">>
	<<set _FS.push("Hedonistic")>>
<</if>>
<<if $arcologies[0].FSChattelReligionist != "unset">>
	<<set _FS.push("Chattel Religionist")>>
<</if>>
<<if $arcologies[0].FSRomanRevivalist != "unset">>
	<<set _FS.push("Roman Revivalist")>>
<<elseif $arcologies[0].FSAztecRevivalist != "unset">>
	<<set _FS.push("Aztec Revivalist")>>
<<elseif $arcologies[0].FSEgyptianRevivalist != "unset">>
	<<set _FS.push("Egyptian Revivalist")>>
<<elseif $arcologies[0].FSEdoRevivalist != "unset">>
	<<set _FS.push("Edo Revivalist")>>
<<elseif $arcologies[0].FSArabianRevivalist != "unset">>
	<<set _FS.push("Arabian Revivalist")>>
<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
	<<set _FS.push("Chinese Revivalist")>>
<</if>>
<<if _FS.length > 0>>
	<<set _FS = _FS.random()>>
<<else>>
	<<set _FS = "none">>
<</if>>

At night, the best living areas in the arcology offer a constant melange of selective entertainments. There's a perpetual social scrum of who is to be invited to what going on, and you occupy a preeminent place atop it, mostly aloof from the struggles of your citizens for recognition and influence. You're invited to almost everything, since everyone who lives here knows the value of being in favor with the owner of the arcology. Invitations to your parties, of course, are some of the most valuable social currency in the arcology and one of $assistantName's most important duties is to help you manage them without wasting your valuable time. It's not actually necessary for you to attend your own parties, since almost everyone will be glad to be seen in the entertainment area of the penthouse whether or not the propriet<<if $PC.title == 1>>or<<else>>ress<</if>> is actually present.

But tonight, you've put in an appearance. Your citizens are drinking your <<if $arcologies[0].FSPastoralist != "unset">>milk<<elseif $arcologies[0].FSRestart != "unset">>finest alcohol<<else>>alcohol<</if>> and eating your food, though of course they helped pay for it through their rent. They're performing a complex dance of social dominance, and it all radiates around you, with complex unspoken rules of collective approval governing which citizens cycle past you for a word, and for how long. During a low point in the ebb and flow, a
<<switch _FS>>
<<case "Supremacist" "Subjugationist">>
	pretty, racially pure young woman
<<case "Gender Radicalist">>
	beautiful young futa
<<case "Gender Fundamentalist">>
	good-looking young lady
<<case "Repopulationist">>
	<<if $arcologies[0].FSRepopulationFocusLaw == 1>>
		heavily pregnant, young lady
	<<else>>
		pretty, fertile young women with wide, child bearing hips
	<</if>>
<<case "Eugenics">>
	stunningly gorgeous woman
<<case "Paternalist">>
	pretty, cheerful young woman
<<case "Degradationist">>
	confident girl
<<case "Body Purist">>
	clean-looking young woman
<<case "Transformation Fetishist">>
	nicely augmented girl
<<case "Youth Preferentialist">>
	<<if $minimumSlaveAge < 13>>
		adorable little loli
	<<elseif $minimumSlaveAge < 18>>
		pretty teenage girl
	<<else>>
		nice looking girl
	<</if>>
<<case "Maturity Preferentialist">>
	attractive, mature woman
<<case "Slimness Enthusiast">>
	slim young thing
<<case "Asset Expansionist">>
	curvaceous young woman
<<case "Pastoralist">>
	hot little lady
<<case "Physical Idealist">>
	hot little amazon
<<case "Hedonistic">>
	plump little cutey
<<case "Chattel Religionist">>
	pretty, devout-looking young woman
<<case "Roman Revivalist">>
	proper young Roman lady
<<case "Aztec Revivalist">>
	natural Aztec beauty
<<case "Egyptian Revivalist">>
	pretty, sun-kissed lady
<<case "Edo Revivalist">>
	proper Edo lady
<<case "Arabian Revivalist">>
	pretty Arabian princess
<<case "Chinese Revivalist">>
	pretty Chinese lady
<<default>>
	pretty young woman
<</switch>>
sidles up to you. She begins to introduce herself, but one of the advantages of your connection to the arcology is that you always know who everyone is, and you greet her by name, which people have never learned not to be impressed by. She gushes about some of your recent <<if _FS != "none">>_FS <</if>>actions, displaying an unusual grasp of what you've been planning. Despite her sincere interest, she's obviously got something else on her mind.

She's yours for the taking, if you want her, and if her praise and proximity weren't enough to make that clear, she manages to
<<switch _FS>>
<<case "Supremacist" "Subjugationist">>
	give you an excellent view straight down her ethnically superior cleavage, straining against the top of her fashionable dress.
<<case "Gender Radicalist">>
	simultaneously give you an excellent view straight down her cleavage, and bring the material of her sheer dress tight across her legs in a way that outlines her dick.
<<case "Gender Fundamentalist">>
	press her flirting as far she can decorously take it, batting her eyes at you coquettishly.
<<case "Repopulationist">>
	<<if $arcologies[0].FSRepopulationFocusLaw == 1>>
		lean back just far enough that her full term, triplets rounded middle splits the front of her overly tight dress.
	<<else>>
		press her hips up against your own, before leaning in and whispering "I'm ripe for breeding right now."
	<</if>>
<<case "Eugenics">>
	give you an excellent view straight down her perfect cleavage, straining against the top of her name-brand dress.
<<case "Paternalist">>
	brush her breasts against your arm, presuming on the egalitarian nature of your Paternalist society to flirt a little aggressively.
<<case "Degradationist">>
	raise one shoulder far enough that her breast on that side pulls its nipple just clear of her tight leather dress, revealing a spiked piercing.
<<case "Body Purist">>
	arch her back with such warm propinquity that her natural breasts almost spill out of her tight little dress, and actually reveal the upper edges of their areolae.
<<case "Transformation Fetishist">>
	pop her huge fake boobs entirely out of her tight little evening dress without even using her hands.
<<case "Youth Preferentialist">>
	perfectly balance her youthful, innocent appeal with the proper decorum between you and a citizen.
<<case "Maturity Preferentialist">>
	perfectly balance her matronly, sensual appeal with the proper decorum between you and a citizen.
<<case "Slimness Enthusiast">>
	turn from side to side as she flirts with you in a way that shows off the coquettish forum under her tight dress to great effect.
<<case "Asset Expansionist">>
	arch her back with such warm propinquity that her huge breasts spill out of her tight little dress, springing clear to offer themselves glorious and nude.
<<case "Pastoralist">>
	let you know that she's almost entirely milk-fed, while giving you quite an eyeful of her straining cleavage.
<<case "Physical Idealist">>
	get a pretty good flex going without being obvious about it, outlining her abs against the sheer midsection of her tight dress.
<<case "Hedonistic">>
	lean her chubby body back far enough to pop the buttons off her top and allow her ample breasts and armful of a belly to hang free.
<<case "Chattel Religionist">>
	assume just a hint of a Chattel Religionist devotional pose used to request penetration. It's heavy flirting, of a modern religious sort.
<<case "Roman Revivalist">>
	hint that her pudicitia, that is her purity, would be if anything enhanced by sexual commerce with someone as powerful as you.
<<case "Aztec Revivalist">>
	hint that her devotion, which is the most important thing, cannot be besmirched by tasting your divine power.
<<case "Egyptian Revivalist">>
	hint that she would like nothing better than to bask in the pharaonic light in the arcology, very close to its source, while loosening her linen dress a little.
<<case "Edo Revivalist">>
	allude to the refined pleasures, while assuming a slightly less dignified posture in her gorgeous kimono.
<<case "Arabian Revivalist">>
	reference young Scheherazade and mighty Shahryar in a way that suggests she's quite willing to play the former.
<<case "Chinese Revivalist">>
	allude to the divinity that resides with the powerful, implying that she'd very much like to come closer to it.
<<default>>
	flirt with you quite hard without crossing any lines between a citizen and an arcology owner.
<</switch>>
She's clearly attracted to you; even the most consummate actress would have difficulty fooling you, and her breath is a little quick, her pupils are a bit dilated, and she's blushing cutely. But she's no fool, either. A casual liaison with <<PCTitle>>$PCTitle would be a tremendous social boost for her.

<<link "Keep aloof without offending her">>
	<<replace "#result">>
	You thank her for her praise, weighting the words in just the right way to communicate that you consider her flirtations worthy compliments, and nothing more. She understands immediately, communicating acceptance and pleasure at her own daring with nothing more than a thankful look in your eyes. This is how you approach matters like this. You are the ruler of this place and it behooves you to maintain a balance atop all your citizens without showing any susceptibility to solicitation. A little incident like this has little effect on its own, but your habit of maintaining proper reserve creates a reputation for judiciousness that @@.green;businesspeople consider attractive for arcology investment.@@
	<<set $arcologies[0].prosperity += 3>>
	<</replace>>
<</link>>

<<link "To them that hath, it shall be given">>
	<<replace "#result">>
	You're not exactly starved for casual sex, but you've never thought there was any such thing as too much of a good thing. You place a <<if $PC.title == 1>>masculine<<else>>feminine<</if>> hand against the small of her back, feeling the warmth of her through the material of her evening wear. You hear a slight gasp from her as she realizes that her gambit has succeeded with more immediate effect than she expected. She shivers with anticipation as you steer her back through a side door, making a discreet exit towards your private suite.
	<<if $Concubine != 0>><<if $Concubine.intelligence > 1>>
		$Concubine.slaveName is there, of course, and she instantly sees that her continued presence for a menage a trois is wanted by both you and your guest.
	<</if>><</if>>
	Your guest restrains her eager praise now that you're in private, but her wide-eyed appreciation of your domain is compliment enough. Once in your suite, she strips, revealing
	<<switch _FS>>
	<<case "Supremacist" "Subjugationist">>
		her fresh, pure body.
	<<case "Gender Radicalist">>
		perky young breasts, a pretty pussy, and a stiff dick above it.
	<<case "Gender Fundamentalist">>
		perky young breasts and an elegantly coiffed strip of hair that perfectly highlights her demure pussy.
	<<case "Repopulationist">>
		<<if $arcologies[0].FSRepopulationFocusLaw == 1>>
			an inexperience body undergoing its very first pregnancy. She's taken good care of herself; not a single stretchmark can be seen across the proportionatly giant belly.
		<<else>>
			an inexperienced body, but one with potential for becoming quite fecund.
		<</if>>
	<<case "Eugenics">>
		a near flawless body; the only distinguishable mark on it: a small tattoo of a prestigious school.
	<<case "Paternalist">>
		a nice young body, with all the little attractions and flaws of a free girl's.
	<<case "Degradationist">>
		a taut body covered in dominant tattoos and spiky piercings.
	<<case "Body Purist">>
		a delectably curvaceous young body unmarred by any trace of surgical intervention.
	<<case "Transformation Fetishist">>
		a massive fake bubble butt to go with her fake boobs.
	<<case "Youth Preferentialist">>
		that her whole body looks fresh, untouched, and quite young.
	<<case "Maturity Preferentialist">>
		a big pair of motherly tits, generous hips, a broad ass, and total self confidence.
	<<case "Slimness Enthusiast">>
		perky little breasts, a smooth waist, trim hips, and a cute little ass.
	<<case "Asset Expansionist">>
		an inhumanly enormous ass to match her similarly improbable boobs.
	<<case "Pastoralist">>
		amply milk-fed assets.
	<<case "Physical Idealist">>
		the dimples that form on the sides of her cute buttocks when she flexes.
	<<case "Hedonistic">>
		well-fed and delightfully jiggly assets.
	<<case "Chattel Religionist">>
		a fresh and ready body, adorned here and there with sensual devotional jewelry.
	<<case "Roman Revivalist">>
		a graceful, milk-pale vision of classical beauty.
	<<case "Aztec Revivalist">>
		a strong, tight, bronze body.
	<<case "Egyptian Revivalist">>
		a perfect expanse of smooth, warm, tanned skin.
	<<case "Edo Revivalist">>
		a graceful form so perfectly pale that her face requires almost no whitening at all.
	<<case "Arabian Revivalist">>
		a nubile young body perfectly formed for a Sultan's bed.
	<<case "Chinese Revivalist">>
		a pretty young body that would not look out of place in an Imperial bed.
	<<default>>
		a hot young body.
	<</switch>>
	Citizens like her often appreciate a good hard fuck, since regular submission to a pounding from sex slaves would be a scandal. There's little opprobium waiting for you if it's known you had her, though, and she's deliciously eager as you press her down onto the bed<<if $PC.dick == 0>> and pull on your usual harness<</if>>. She ruts herself hard back against you as you thrust into her, moaning, and after a short while she begs for it even harder, so you flip her over and mount her like a bitch, making her scream.
	<<if $Concubine != 0>><<if $Concubine.intelligence > 1>>
		The view of your conquest's rutting back is nice, of course, but after enjoying it for a few moments you pull $Concubine.slaveName in and kiss your favorite deeply, playing with her as you fuck.
	<</if>><</if>>
	When your guest is finally spent, she showers, dresses, and leaves discreetly, offering you a proper thank you. This is the kind of thing that @@.green;builds a lasting reputation@@ in the Free Cities.
	<<set $rep += 1000>>
	<<if _FS == "Repopulationist" && $PC.dick == 1 && $arcologies[0].FSRepopulationFocusLaw == 0 && (random(1,100) > 40)>>
		<<set $desc = "a tasteful morning-after message, with attached positive pregnancy test, from a pretty " + _FS + " citizen you bred">>
		<<set $trinkets.push($desc)>>
	<<elseif _FS != "none">>
		<<set $desc = "a tasteful morning-after message from a pretty " + _FS + " citizen">>
		<<set $trinkets.push($desc)>>
	<<else>>
		<<set $trinkets.push("a tasteful morning-after message from a pretty citizen")>>
	<</if>>
	<</replace>>
<</link>>
<<if _FS != "none">>

<<link "Emphasize her societal style with exhibitionism">>
	<<replace "#result">>
	You turn to face her straight on, and something about the look in your eye fills her with mixed apprehension and anticipation. You agree with her banter and praise her for being so forward-thinking, before transitioning to more direct praise of her style and then her body. You're speaking in a tone that cuts through the room, and by the time you kiss your willing conquest, there's not a person in the room who isn't paying attention. They all understand the message: this gathering is turning into something else, now. Those few who aren't willing to fuck in public withdraw, and everyone who didn't come with a sexual partner sends urgent messages to have appropriate slaves brought from their apartments. You make out with her for a while, letting everyone make arrangements, and then pull her clothes off, making sure her
	<<switch _FS>>
	<<case "Supremacist" "Subjugationist">>
		superior body
		<<if _FS == "Supremacist">>
			<<set $arcologies[0].FSSupremacist += 5>>
		<<else>>
			<<set $arcologies[0].FSSubjugationist += 5>>
		<</if>>
	<<case "Gender Radicalist">>
		tits and stiff dick
		<<set $arcologies[0].FSGenderRadicalist += 5>>
	<<case "Gender Fundamentalist">>
		femininity
		<<set $arcologies[0].FSGenderFundamentalist += 5>>
	<<case "Repopulationist">>
		<<if $arcologies[0].FSRepopulationFocusLaw == 1>>
			fecund body
		<<else>>
			ready-to-be-bred body
		<</if>>
		<<set $arcologies[0].FSRepopulationFocus += 5>>
	<<case "Eugenics">>
		perfect body
		<<set $arcologies[0].FSRestart += 5>>
	<<case "Paternalist">>
		appealing body
		<<set $arcologies[0].FSPaternalist += 5>>
	<<case "Degradationist">>
		dominant form
		<<set $arcologies[0].FSDegradationist += 5>>
	<<case "Body Purist">>
		natural body
		<<set $arcologies[0].FSBodyPurist += 5>>
	<<case "Transformation Fetishist">>
		fake butt
		<<set $arcologies[0].FSTransformationFetishist += 5>>
	<<case "Youth Preferentialist">>
		young body
		<<set $arcologies[0].FSYouthPreferentialist += 5>>
	<<case "Maturity Preferentialist">>
		mature body
		<<set $arcologies[0].FSMaturityPreferentialist += 5>>
	<<case "Slimness Enthusiast">>
		slender body
		<<set $arcologies[0].FSSlimnessEnthusiast += 5>>
	<<case "Asset Expansionist">>
		curvaceous form
		<<set $arcologies[0].FSAssetExpansionist += 5>>
	<<case "Pastoralist">>
		milk-fed assets
		<<set $arcologies[0].FSPastoralist += 5>>
	<<case "Physical Idealist">>
		muscular body
		<<set $arcologies[0].FSPhysicalIdealist += 5>>
	<<case "Hedonistic">>
		plump body
		<<set $arcologies[0].FSHedonisticDecadence += 5>>
	<<case "Chattel Religionist">>
		divine sexuality
		<<set $arcologies[0].FSChattelReligionist += 5>>
	<<case "Roman Revivalist">>
		elegant form
		<<set $arcologies[0].FSRomanRevivalist += 5>>
	<<case "Aztec Revivalist">>
		well-built form
		<<set $arcologies[0].FSAztecRevivalist += 5>>
	<<case "Egyptian Revivalist">>
		beautiful tanned body
		<<set $arcologies[0].FSEgyptianRevivalist += 5>>
	<<case "Edo Revivalist" "Arabian Revivalist" "Chinese Revivalist">>
		graceful form
		<<if _FS == "Edo Revivalist">>
			<<set $arcologies[0].FSEdoRevivalist += 5>>
		<<elseif _FS == "Arabian Revivalist">>
			<<set $arcologies[0].FSArabianRevivalist += 5>>
		<<else>>
			<<set $arcologies[0].FSChineseRevivalist += 5>>
		<</if>>
	<<default>>
		hot young body
	<</switch>>
	is obvious to everyone. The message is clear, and your guest of honor is the center of attention as you take her there in view of the arcology's leading citizens. Naturally, the story percolates, making it clear that there's nothing you won't do to @@.green;further acceptance of _FS principles.@@
	<</replace>>
<</link>>
<</if>>


code:
:: RE devotees [nobr]

<<set $nextButton = "Continue">>
<<set $nextLink = "RIE Eligibility Check">>
<<set _i = $slaves.findIndex(function(s) { return s.ID == $devotedSlaves[0].ID; })>>
<<set _j = $slaves.findIndex(function(s) { return s.ID == $devotedSlaves[1].ID; })>>
<<set _k = $slaves.findIndex(function(s) { return s.ID == $devotedSlaves[2].ID; })>>
<<set _l = $slaves.findIndex(function(s) { return s.ID == $devotedSlaves[3].ID; })>>

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

        <<SlaveArt $slaves[_i] 2 0>>

        <<SlaveArt $slaves[_j] 2 0>>

        <<SlaveArt $slaves[_k] 2 0>>

        <<SlaveArt $slaves[_l] 2 0>>

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

You have a mature, well-trained household of slaves. $slaves[_i].slaveName, $slaves[_j].slaveName, $slaves[_k].slaveName, and $slaves[_l].slaveName are all devoted to you. There are all manner of ways you could display this coterie of loyal sex slaves to show off your wealth and power.

<<link "See an operetta with four attendants">>
	<<replace "#result">>
	<<PCTitle>>
	You reserve a box at an upcoming operetta; classical Italian music is enjoying a renaissance these days. The doormen at the fashionable opera house promptly widen the velvet ropes so that you and your party may proceed unimpeded. Their quick thinking is necessary, since there are five of you walking sedately up the steps: you in the middle, impeccable in <<if $PC.title == 1>>gentleman's evening wear, complete with gloves and cane<<else>>a fine and noble lady's tuxedo<</if>>; and $slaves[_i].slaveName, $slaves[_j].slaveName, $slaves[_k].slaveName, and $slaves[_l].slaveName, all dressed in the gorgeous fashion of the seventeenth century, all plunging necklines, piled hair, and ruffled petticoats. The splendid master of ceremonies clears his throat and announces in a sonorous voice, "$PCTitle." The ostentation @@.green;turns every head and catches every eye.@@
	<<set $rep += 500>>
	<</replace>>
<</link>>

<<link "Visit a casino in good company">>
	<<replace "#result">>
	The croupiers, bouncers and regulars down at the nearest casino hardly know what to think when you appear with a chit full of cash and twice as many girls as you have arms. You live the night big, starting at the poker table with so many tits and asses on display behind you that, @@.yellowgreen;baby, you make a killing.@@ $slaves[_i].slaveName, $slaves[_j].slaveName, $slaves[_k].slaveName, and $slaves[_l].slaveName quickly catch the rhythm of the place: slaves can get away with a little more in the smoky, whiskey soaked, money tinted atmosphere, and they @@.hotpink;enjoy themselves immensely.@@ They flirt, flash, giggle, kiss each other, and generally destroy the concentration of everyone within twenty yards - except you. Ring-a-ding-ding.
	<<set $slaves[_i].devotion += 4>>
	<<set $slaves[_j].devotion += 4>>
	<<set $slaves[_k].devotion += 4>>
	<<set $slaves[_l].devotion += 4>>
	<<set $cash += random(30,100)*10>>
	<</replace>>
<</link>>


code:
:: RE FSEgyptianRevivalist acquisition
/* Written and coded by Boney M */
<<nobr>>

<<set $nextButton = "Continue">>
<<set $nextLink = "RIE Eligibility Check">>
<<set $returnTo = "RIE Eligibility Check">>
<<set $showEncyclopedia = 1>><<set $encyclopedia = "Enslaving People">>

<<set $contractCost = 3000>>
<<include "Generate New Slave">>
<<set $activeSlave.origin = "She offered herself to you for enslavement hoping you would preserve her incestuous relationship with her sibling.">>
<<set $activeSlave.devotion = random(5,15)>>
<<set $activeSlave.trust = random(-15,-5)>>
<<set $activeSlave.actualAge = random(21,29)>>
<<set $activeSlave.visualAge = $activeSlave.actualAge>>
<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
<<set $activeSlave.ovaryAge = $activeSlave.actualAge>>
<<set $activeSlave.health = random(-20,0)>>
<<slaveCost $activeSlave>>
<<set $slaveCost -= 3000>>
<<if $familyTesting == 1>>
	<<set $activeSlave.mother = $missingParentID>>
	<<set $missingParentID-->>
	<<set $activeSlave.father = $missingParentID>>
	<<set $activeSlave.canRecruit = 0>>
	<<set $missingParentID-->>
<<else>>
	<<set $activeSlave.relation = "sister">>
	<<set $activeSlave.relationTarget = $activeSlave.ID + 1000>>
<</if>>
<<set $activeSlave.relationship = 4>>
<<set $activeSlave.relationshipTarget = $activeSlave.ID + 1000>>

<<if ($activeSlave.dick > 0) && ($activeSlave.balls == 0)>><<set $activeSlave.balls = random(1,5)>><</if>>

<</nobr>>\
\
You receive so many messages, as a noted titan of the new Free Cities world, that $assistantName has to be quite draconian in culling them. She lets only the most important through to you. One category of message that always gets through regardless of content, though, is requests for voluntary enslavement. As the new world takes shape, they've become less rare than they once were.

This call is coming from a public kiosk, which is usually an indication that the person on the other end is a transient individual who has decided to take slavery over homelessness. In this case, however, the story is more unusual - the callers seem stressed, but otherwise normal. They haltingly and quietly explain, with many nervous glances off-camera to ensure they are not overheard, that they are both siblings and lovers, and their attempts to keep the truth of the nature of their relationship from their friends, family, and society at large have failed. They had heard of $arcologies[0].name's reverence for incestuous relationships, and have managed to talk themselves into the questionable conclusion that their only chance to be together was for them to sell themselves to someone who would not just accept but encourage their incest - namely, you.

//Enslaving them will cost ¤<<print $contractCost>>. Selling them immediately will bring in approximately ¤<<print $slaveCost*2>>.//

<<include "Long Slave Description">>\

<span id="result">
<<if $cash >= $contractCost>>\
[[Enslave the pair|RE FSEgyptianRevivalist acquisition workaround][$sibling = $activeSlave, $cash -= ($contractCost)]]
<<else>>\
	//You lack the necessary funds to enslave them.//
<</if>>\
</span>


code:
:: RE FSEgyptianRevivalist acquisition workaround

/* Written and coded by Boney M */
They arrive hand-in-hand and don't let go of each other until the end of the enslavement process, and even after they break their grip and undress at your instruction, their eyes never stray far from each other. With a closer look at them, their blood relation is as obvious as their infatuation with one another. No wonder they couldn't keep it a secret.

<<AddSlave $sibling>>

<<set _secondSlave = clone($activeSlave)>>

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

<<set _secondSlave.ID = $activeSlave.ID + 1000>>
<<set _secondSlave.devotion += random (-1, 1)>>
<<set _secondSlave.trust += random (-1, 1)>>
<<set _secondSlave.oldDevotion = $activeSlave.devotion>>
<<set _secondSlave.actualAge -= random (2,5)>>
<<set _secondSlave.visualAge = _secondSlave.actualAge>>
<<set _secondSlave.physicalAge = _secondSlave.actualAge>>
<<set _secondSlave.ovaryAge = _secondSlave.actualAge>>
<<set _secondSlave.birthWeek = random(0,51)>>
<<if $familyTesting == 0>>
	<<set _secondSlave.relation = "sister">>
	<<set _secondSlave.relationTarget = $activeSlave.ID>>
<</if>>
<<set _secondSlave.relationship = 4>>
<<set _secondSlave.relationshipTarget = $activeSlave.ID>>

<<set _secondSlave.hStyle = either("ass-length", "long", "shoulder-length", "short", "very short", "shaved bald")>>
<<if (_secondSlave.actualAge <= 22)>>
	<<set _secondSlave.career = setup.youngCareers.random()>>
<<elseif (_secondSlave.intelligenceImplant == 1)>>
	<<set _secondSlave.career = setup.educatedCareers.random()>>
<<else>>
	<<set _secondSlave.career = setup.uneducatedCareers.random()>>
<</if>>

<<if (random(1,4) > 1) && (random(1,99) < $seeDicks)>>

<<if ($activeSlave.dick > 0) && ($activeSlave.vagina < 0)>>
	<<set _secondSlave.dick = 0>>
	<<set _secondSlave.foreskin = 0>>
	<<set _secondSlave.scrotum = 0>>
	<<set _secondSlave.balls = 0>>
	<<set _secondSlave.vagina = 1>>
	<<set _secondSlave.clit = either(0, 0, 0, 0, 0, 0, 1, 1, 2)>>
	<<set _secondSlave.labia = either(0, 0, 0, 1, 1, 1, 1, 2, 2, 3)>>
	<<set _secondSlave.preg = -1>>
	<<set _secondSlave.ovaries = 1>>
	<<set _secondSlave.face = Math.trunc(_secondSlave.face+20,-100,100)>>
	<<set _secondSlave.boobs += either(0, 100, 200, 300, 400)>>
	<<set _secondSlave.butt += either(0, 1, 1, 2)>>
	<<set _secondSlave.earPiercing = either(0,1)>>
	<<set _secondSlave.nosePiercing = either(0,0,0,1)>>
	<<set _secondSlave.eyebrowPiercing = either(0,0,0,0,0,1)>>
	<<set _secondSlave.clitPiercing = either(0,0,0,0,0,1)>>
	<<set _secondSlave.lipsPiercing = either(0,0,0,0,0,1)>>
	<<set _secondSlave.navelPiercing = either(0,0,0,1)>>
	<<set _secondSlave.nipplesPiercing = either(0,0,0,1)>>
<<elseif ($activeSlave.dick == 0) && ($activeSlave.vagina >= 0)>>
	<<set _secondSlave.dick = either(1, 2, 2, 2, 3, 3, 3, 4, 4, 5)>>
	<<set _secondSlave.balls = either(1, 2, 2, 2, 3, 3, 3, 4, 4, 5)>>
	<<set $activeSlave.vagina = 1>>
	<<set _secondSlave.vagina = -1>>
	<<set _secondSlave.clit = 0>>
	<<set _secondSlave.labia = 0>>
	<<set _secondSlave.preg = -2>>
	<<set _secondSlave.ovaries = 0>>

	<<set _secondSlave.face = Math.trunc(_secondSlave.face-20,-100,100)>>
	<<set _secondSlave.boobs -= either(0, 100, 200, 300, 400)>>
	<<set _secondSlave.butt -= either(0, 1, 1, 2)>>

	<<set _secondSlave.earPiercing = either(0,0,0,1)>>
	<<set _secondSlave.nosePiercing = either(0,0,0,0,1)>>
	<<set _secondSlave.eyebrowPiercing = either(0,0,0,0,0,1)>>
	<<set _secondSlave.dickPiercing = either(0,0,0,0,0,1)>>
	<<set _secondSlave.lipsPiercing = either(0,0,0,0,0,1)>>
	<<set _secondSlave.navelPiercing = either(0,0,0,0,1)>>
	<<set _secondSlave.nipplesPiercing = either(0,0,0,0,1)>>
<<elseif $activeSlave.dick > 0>>
	<<if random(1, 3) == 1>>
		<<set _secondSlave.anus = 1>>
	<<else>>
		<<set $activeSlave.anus = 1>>
	<</if>>
<</if>>

<<if _secondSlave.vagina == 0>>
	<<set _secondSlave.vagina = 1>>
<</if>>
<<if (_secondSlave.dick > 0) && (_secondSlave.balls == 0)>>
	<<set _secondSlave.balls = random(1,5)>>
<</if>>

<</if>>

<<AddSlave _secondSlave>>