code:
:: REFS [nobr]

/* This is one of several files that contains and organizes many different events.	*/
/*	genericPlotEvents.tw															*/
/*	PESS.tw: Player Event, Single Slave												*/
/*	PETS.tw: Player Event, Two Slaves												*/
/*	RECI.tw: Random Event, Check In													*/
/*	REFI.tw: Random Event, Fetish Interest											*/
/*	REFS.tw: Random Event, Future Societies											*/
/*	RESS.tw: Random Event, Single Slave												*/
/*	RESSTR.tw: Random Event, Single Slave (Test Realm, for debugging events)		*/
/*	RETS.tw: Random Event, Two Slaves												*/
/*																					*/
/* Events can also be in a dedicated *.tw file, formatted as follows:				*/
/*	jeXXXXX.tw: Justice Event														*/
/*	pXXXXXX.tw: Player event														*/
/*	peXXXXX.tw: Player Event focused on a slave										*/
/*	reXXXXX.tw: Random Event														*/
/*	resXXXX.tw: Random Event, School												*/
/*	seXXXXX.tw: Slave Event, focuses on slaves coming or going						*/
/*	securityForceXXXXX.tw: Special (Security) Force event							*/
/*																					*/
/* Some scenes are also stored in useGuard.tw, walkPast.tw, and toychest.tw			*/

<<if Array.isArray($REFSevent)>>
	<<if $cheatMode == 1>>
		<<set $nextButton = "Back", $nextLink = "Nonrandom Event", $returnTo = "Nonrandom Event">> /* if user just clicks spacebar */
		''A random future societies event would have been selected from the following:''

		<<for _i = 0; _i < $REFSevent.length; _i++>>
			<<print "[[$REFSevent[_i]|REFS][$REFSevent = $REFSevent[" + _i + "]]]">>

		<</for>>

[[Go Back to Random Nonindividual Event|Random Nonindividual Event][$activeSlave = 0]]
	<<else>>
		<<set $REFSevent = $REFSevent.random()>>
		<<goto "REFS">>
	<</if>>
<<else>>

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

<<switch $REFSevent>>

<<case "paternalist encounter">>
	<<set $activeSlaveOneTimeMaxAge = 22>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate New Slave">>
	<<set $activeSlave.origin = "She was taken into your custody from an abusive owner.">>
	<<set $activeSlave.devotion = random(0,25)>>
	<<set $activeSlave.trust = random(0,25)>>
	<<set $activeSlave.boobs = random(6,9)*50>>
	<<set $activeSlave.hips = random(-2,-1)>>
	<<set $activeSlave.butt = random(0,2)>>
	<<set $activeSlave.health = random(-30,-10)>>

<<case "degradationist encounter">>
	<<set $activeSlaveOneTimeMaxAge = 22>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate New Slave">>
	<<set $activeSlave.origin = "She was taken into your custody from an owner who treated her as an equal.">>
	<<set $activeSlave.devotion = random(0,50)>>
	<<set $activeSlave.trust = random(25,70)>>
	<<set $activeSlave.boobs = random(6,9)*50>>
	<<set $activeSlave.hips = random(-2,-1)>>
	<<set $activeSlave.butt = random(0,2)>>
	<<set $activeSlave.health = random(70,80)>>

<<case "transformation fetishism encounter">>
	<<set $activeSlaveOneTimeMaxAge = 22>>
	<<set $oneTimeDisableDisability = 1>>
	<<if $arcologies[0].FSSupremacistLawME == 1>>
		<<set $fixedRace = $arcologies[0].FSSupremacistRace>>
	<<elseif $arcologies[0].FSSubjugationistLawME == 1>>
		<<set _races = setup.filterRacesLowercase.filter(race => race !== $arcologies[0].FSSubjugationistRace)>>
		<<set $fixedRace = _races.random()>>
	<</if>>
	<<include "Generate XX Slave">>
	<<set $activeSlave.origin = "She was enslaved by you when you overcharged her for surgery.">>
	<<set $activeSlave.devotion = random(-70,-55)>>
	<<set $activeSlave.trust = random(-45,-25)>>
	<<set $activeSlave.health = random(10,20)>>
	<<set $activeSlave.boobs += 600>>
	<<set $activeSlave.boobsImplant = 600>>
	<<set $activeSlave.butt += 1>>
	<<set $activeSlave.buttImplant = 1>>
	<<set $activeSlave.lips += 10>>
	<<set $activeSlave.lipsImplant = 10>>

<<case "youth preferentialist encounter">>
	<<set $activeSlaveOneTimeMaxAge = 22>>
	<<set $oneTimeDisableDisability = 1>>
	<<if $arcologies[0].FSSupremacistLawME == 1>>
		<<set $fixedRace = $arcologies[0].FSSupremacistRace>>
	<<elseif $arcologies[0].FSSubjugationistLawME == 1>>
		<<set _races = setup.filterRacesLowercase.filter(race => race !== $arcologies[0].FSSubjugationistRace)>>
		<<set $fixedRace = _races.random()>>
	<</if>>
	<<include "Generate XX Slave">>
	<<set $activeSlave.origin = "She was enslaved by you when you purchased her debt.">>
	<<set $activeSlave.devotion = random(-55,0)>>
	<<set $activeSlave.trust = random(-45,0)>>
	/* Girlish */
	<<if $activeSlave.boobs > 450>>
		<<set $activeSlave.boobs = random(6,9)*50>>
	<</if>>
	<<set $activeSlave.hips = random(-2,-1)>>
	<<set $activeSlave.butt = random(0,2)>>
	<<set $activeSlave.weight = Math.min($activeSlave.weight, 10)>>
	<<set $activeSlave.waist = Math.min($activeSlave.waist, 0)>>
	<<set $activeSlave.muscles = Math.min($activeSlave.muscles, 30)>>

<<case "maturity preferentialist encounter">>
	<<set $activeSlaveOneTimeMinAge = 36>>
	<<set $activeSlaveOneTimeMaxAge = 42>>
	<<set $one_time_age_overrides_pedo_mode = 1>>
	<<set $oneTimeDisableDisability = 1>>
	<<if $arcologies[0].FSSupremacistLawME == 1>>
		<<set $fixedRace = $arcologies[0].FSSupremacistRace>>
	<<elseif $arcologies[0].FSSubjugationistLawME == 1>>
		<<set _races = setup.filterRacesLowercase.filter(race => race !== $arcologies[0].FSSubjugationistRace)>>
		<<set $fixedRace = _races.random()>>
	<</if>>
	<<include "Generate XX Slave">>
	<<set $activeSlave.origin = "She was enslaved by you when you purchased her debt.">>
	<<set $activeSlave.devotion = random(-90,-75)>>
	<<set $activeSlave.trust = random(-45,-25)>>
	<<set $activeSlave.health = random(10,20)>>
	<<set $activeSlave.birthsTotal = 2>>
	/* Plush */
	<<set $activeSlave.boobs = random(7,11)*100>>
	<<set $activeSlave.hips = random(1,2)>>
	<<set $activeSlave.butt = $activeSlave.hips + 2>>
	<<set $activeSlave.weight = random(10,40)>>
	<<set $activeSlave.waist = random(-10,10)>>
	<<set $activeSlave.muscles = Math.min($activeSlave.muscles, 30)>>

<<default>>
<</switch>>

<<if $activeSlave != 0 && def $activeSlave>>
	<<set $desc = SlaveTitle($activeSlave)>>
	<<run Enunciate($activeSlave)>>
	<<setLocalPronouns $activeSlave>>
<</if>>

<<switch $REFSevent>>

<<case "paternalist encounter">>

As a result of $arcologies[0].name's adoption of paternalism there has been a remarkable effect on relationships between slaves and owners, with the flourishing of mutual respect between the two forming the basis for social life in the arcology. However, not all citizens are so keen as to internalize the tenants of paternalism, whether out of prejudice, old habits or adherence to a more brutal style of slaveholding.

On one particular outing, you come across an elderly male citizen giving his young slave quite a thrashing in the street outside of a prominent apartment complex. From the skinned state of the poor $girl's knees and the cruel spiked collar about $his neck, it is clear that $his owner has been dragging $him about the arcology as if $he were a dog. To say nothing of this degrading treatment, beating of a slave in public is a fineable offense.

<<case "degradationist encounter">>

As a result of $arcologies[0].name's adoption of degradationism there has been a remarkable effect on the social status of slaves, with the continued reduction of slave rights taking center stage. However, not all citizens are so keen as to internalize the tenants of degradationism, whether out of misplaced compassion, old habits or adherence to the Old World style of relationships.

On one particular outing, you come across an elderly male citizen holding the hand of his young slave, seemingly on a date at one of the arcology's prominent promenades. From the ring on the $girl's finger and the modest neckline on $his clothing, it is clear that $his owner is treating $him as if $he is his wife. His obscene treatment of his slave has already drawn a large crowd of shocked onlookers.

<<case "physical idealist encounter">>

The notion of the physical ideal has taken $arcologies[0].name by storm and a number of enterprising citizens have been quick to respond by providing new services and businesses in response. One such innovation is the open air gym, a now common sight along $arcologies[0].name's many streets. Many citizens utilize such facilities to squeeze in an extra work-out on their daily commute, or in lieu of personal fitness facilities in their own homes.

While navigating your arcology on an outing, you find yourself coming across one of the arcology's finest open-air gyms, clearly marketed towards the wealthy citizen on the move. As impressive as the gold plated fitness equipment is, in amongst the power racks, dip bars and bench press stations is perhaps one of the most spectacular athletic specimens in the entire arcology. This female citizen has clearly embraced everything that $arcologies[0].name's physical idealism represents, molding herself into a rippling blend of broad shoulders, powerful muscles and a ripped stomach that would shame even the most well-built old world athlete.

<<case "pastoralist encounter">>

Pastoralism has taken $arcologies[0].name by storm and a number of enterprising citizens have been quick to respond by providing new services and businesses in response. One such innovation is a number of experimental new restaurants that incorporate human milk into their recipes, much to the delight of the citizenry. Such establishments have become a fashionable part of $arcologies[0].name's taste palate and new takes on the simple premise are common.

While navigating your arcology on an outing, you find yourself coming across one of the arcology's newest restaurants, a milkshake parlor that prides itself on deriving all of its dairy from human sources.

<<case "transformation fetishism encounter">>

As a result of $arcologies[0].name's adoption of transformation fetishism, a number of plastic surgery clinics, cosmetic surgeries and other transformative businesses have begun to crop up around the arcology's various promenades and shopping districts. The citizens of $arcologies[0].name have taken to the idea of altering their bodies with a gusto — though not all are so quick to adopt the trend just because it's in vogue.

On one particular outing, you come across a female citizen outside a surgery clinic staring pensively up at a poster advertising the variety of cosmetic procedures on offer in the institution. The citizen's expression is wistful, if somewhat grave, and at odds with the display above $him lit up with silicone breasts, plump bee-stung lips and fake asses. From $his unaltered appearance and simple garments, it is likely that she is not one of the arcology's wealthier denizens and thus is unable to shape $his body to $his heart's desire.

<<case "body purism encounter">>

As a result of $arcologies[0].name's adoption of body purism, a number of restorative spas, implant removal clinics and other cleansing businesses have begun to crop up around the arcology's various promenades and shopping districts. The citizens of $arcologies[0].name have taken to the idea of treating their bodies with sanctity — though not all are so quick to adopt the trend just because it's in vogue.

On one particular outing, you come across a female citizen outside a famous health spa staring pensively up at a poster advertising the variety of purification procedures on offer in the institution. The citizen's expression is wistful, if somewhat grave, and at odds with the display above $him lit up with pure unadulterated bodies, expensive health treatments and a plethora of natural cosmetic procedures. The citizen's clothes are ragged and sheer, revealing a number of implant scars around her bust and rear, likely from a costly attempt to render herself fashionable by having her prior implants removed. With such visible scarring, it is unlikely that she is one of the arcology's wealthier denizens, having paid the price to return her body to its natural, unimplanted state.

<<case "youth preferentialist encounter">>

Your excursions out of your penthouse and into the arcology as a whole often put you in close proximity with citizens from all levels of the social strata. After all, they themselves have their own lives to live within the walls of $arcologies[0].name.

On this particular outing you happen to cross paths with a nubile young woman, accompanied by $his father. From $his plain clothes and rudimentary makeup, it is readily apparent that $he is not one of the arcology's well-to-do inhabitants. $He recognizes you quickly and dips $his head in deference to your high status, <<if ($PC.visualAge >= 50)>>$his cheeks flushed in embarrassment and delight at an aged arcology owner's interest in a young $girl like $him.<<else>>$his expression awestruck by the presence of an arcology owner before $him.<</if>>

<<case "maturity preferentialist encounter">>

Your excursions out of your penthouse and into the arcology as a whole often put you in close proximity with citizens from all levels of the social strata. After all, they themselves have their own lives to live within the walls of $arcologies[0].name.

On this particular outing you happen to cross paths with a comely female citizen and $his two adult sons. From $his plain clothes and conspicuous lack of makeup, it is readily apparent that $he is not one of the arcology's well-to-do inhabitants. $He recognizes you quickly and dips $his head in deference to your high status, <<if ($PC.visualAge < 35)>>$his cheeks flushed in embarrassment and confusion at a young arcology owner's interest in an old lady like $him.<<else>>$his expression awestruck by the presence of an arcology owner before $him.<</if>>

<<default>>

ERROR: bad REFS event $REFSevent
<</switch>>

<<switch $REFSevent>>

<<case "paternalist encounter">>

<<link "Alert your drones and keep walking">>
	<<replace "#result">>
	You inform $assistantName that you have a slave beater in need of detainment by your security drones, then continue on your way confident in your knowledge that the citizen will soon be in custody.
	<</replace>>
<</link>>
<<if $cash >= 2000>>

<<link "Take the poor slave $girl into your custody">>
	<<replace "#result">>
	Confronting the citizen is simplicity in itself; he would not dare defy you under threat of arrest by your security drones and is unlikely to garner any sympathy from the public for his degradationist behaviors. As such, you are able to take civil ownership over the poor slave $girl and take $him into your care with only minimal compensation to the citizen. As you stride away from $his former owner with the $girl in your arms, $he leans over to plant a chaste kiss of thanks on your cheek.
	<<run cashX(-2000, "slaveTransfer", $activeSlave)>>
	<<include "New Slave Intro">>
	<</replace>>
<</link>> // Taking custody of the $girl will cost <<print cashFormat(2000)>>. //
<</if>>

<<link "Publicly confront the citizen">>
	<<replace "#result">>
	Your walk up to the citizen is not accompanied by shaking ground or tumultuous fanfare, yet the citizen looks as if death itself has come before him. You don't hurt him physically, instead chastising him publicly in front of his fellow peers who begin to cheer their agreement. You end your tirade of verbal abuse with a reminder that although the man is a citizen of your arcology, that does not give him the impunity to shirk the law. To make it clear his next offense will be his last, a brace of your security drones hover behind you threateningly. The crowd that gathered @@.green;approve of your rebuke of the citizen@@.
	<<run repX(500, "event")>>
	<</replace>>
<</link>>

<<case "degradationist encounter">>

<<link "Alert your drones and keep walking">>
	<<replace "#result">>
	You inform $assistantName that you have a slave lover in need of harassment by your security drones, then continue on your way. You did not instruct your drones to attack the obscene pair, as the scrutiny and public shame of a drone escort around the arcology are a more fitting punishment for a citizen and will perhaps encourage him to think twice before treating his slave as an equal.
	<</replace>>
<</link>>
<<if $cash >= 2000>>

<<link "Take the pampered slave $girl into your custody">>
	<<replace "#result">>
	Confronting the citizen is simplicity in itself; he would not dare defy you directly under threat of arrest by your security drones and is unlikely to garner any sympathy from the public for his disturbing actions. As such, you are able to take civil ownership over the slave $girl and claim $him for yourself with only token compensation to the citizen. As you stride away from $his former owner with the girl in your arms, $he clings to you with obvious naiveté for how you will treat $him. It's time $he learnt how slaves are treated in $arcologies[0].name.
	<<run cashX(-2000, "slaveTransfer", $activeSlave)>>
	<<include "New Slave Intro">>
	<</replace>>
<</link>> // Taking custody of the $girl will cost <<print cashFormat(2000)>>. //
<</if>>

<<link "Publicly confront the citizen">>
	<<replace "#result">>
	Your walk up to the citizen is not accompanied by shaking ground or tumultuous fanfare, yet the citizen looks as if death itself has come before him. You don't hurt him physically, instead chastising him publicly in front of his fellow peers who begin to cheer their agreement. You end your tirade of verbal abuse with a reminder that although the man is a citizen of your arcology, that does not give him the impunity to parade a slave around the arcology as if $he were his wife. To make it clear that you will not be so forgiving of his next transgression, a brace of your security drones hover behind you threateningly. The crowd that gathered @@.green;approve of your rebuke of the citizen@@.
	<<run repX(500, "event")>>
	<</replace>>
<</link>>

<<case "physical idealist encounter">>

<<link "Keep walking">>
	<<replace "#result">>
	The citizen is undoubtedly a uniquely athletic specimen, so you linger for a moment to appreciate the strength and vigor of her punishing physical routine. When you've had your fill, you move on towards your next appointment.
	<</replace>>
<</link>>
<<if $cash >= 1000>>

<<link "Offer to sponsor her for a promotional video">>
	<<replace "#result">>
	Despite her hulking, muscular exterior, the citizen proves to be a shrewd and capable advertisement executive as well. The two of you sit beside a hefty dumbbell rack for some time and together craft a simple promotional ad campaign featuring the herculean physical form of the citizen. Shooting the video is simple, footage of the citizen going about her various fitness routines is inspiring enough, and soon her every muscle and sinew is being broadcast across the world to laud the physical achievements of $arcologies[0].name. Your citizens are @@.green;filled with pride,@@ knowing the rest of the world was just awed by their pursuit of bodily perfection.
	<<run repX(1000, "event")>>
	<<run cashX(-1000, "event")>>
	<</replace>>
<</link>> // This will cost <<print cashFormat(1000)>>. //
<</if>>

<<link "Spend some time working out with her">>
	<<replace "#result">>
	The attendant of the gym is almost too stunned to charge you for entry, and indeed many citizens inside and outside the gym stop to watch you begin a work-out routine. The muscular citizen does not halt her own regime, of course, so you soon find yourself pumping iron and straining your muscles to the limit beside her.

	Your eyes lock somewhere in the midst of a particularly strenuous exercise, and what follows may be remembered in the annals of $arcologies[0].name history as the most erotic display of physical might ever recorded. Matching each other rep for rep, the gym is soon echoing with the grunts of both your exertions while your bodies grow slick with glistening sweat. When the last dumbbell is racked, the citizen merely nods her respect at you for matching her pursuit of the physical ideal, to the @@.green;delight of the watching citizenry@@.
	<<run repX(300, "event")>>
	<</replace>>
<</link>>

<<case "pastoralist encounter">>

<<link "Keep walking">>
	<<replace "#result">>
	The establishment is not the first of its kind in the arcology, but the idea seems to be popular enough with the citizenry to accommodate competition. When you've sated your curiosity perusing the courtesy menu by the door, you move on towards your next appointment.
	<</replace>>
<</link>>
<<if $cash >= 1000>>

<<link "Offer to sponsor the restaurant with an advertisement">>
	<<replace "#result">>
	You soon discover that the owner of the establishment is a matronly woman who sources her dairy from other mothers in the arcology, having found that new or expectant mothers are often in need of a revenue stream. The two of you sit at the counter for some time, though the owner often excuses herself for a milking in the back room, and together craft a simple promotional ad campaign featuring a simple slogan. Posters bearing the words "Got MILF?" soon grace the walls of $arcologies[0].name, and your citizens take to the idea of motherly milkshakes and admire your @@.green;marketing acumen@@.
	<<run repX(1000, "event")>>
	<<run cashX(-1000, "event")>>
	<</replace>>
<</link>> // This will cost <<print cashFormat(1000)>>. //
<</if>>

<<link "Have a shake">>
	<<replace "#result">>
	The owner of the parlor is so flattered by your patronage of her humble store that she not only provides your drink free of charge but even milks herself at the counter to personally provide the dairy for your shake. The shake's taste is rich, even creamy, with an overall sweet palate mixed with a slight nuttiness.

	Though you depart without officially sponsoring the milkshake parlor, your presence is endorsement enough to many citizens while others simply @@.green;appreciate you drinking amongst them@@.
	<<run repX(300, "event")>>
	<</replace>>
<</link>>

<<case "transformation fetishism encounter">>

<<link "Keep walking">>
	<<replace "#result">>
	It's unfortunate that this citizen is unable to realize $his dreams, but that's the way of the Free Cities. There are winners, and there are losers.
	<</replace>>
<</link>>
<<if $cash >= 1000>>

<<link "Pay for $his treatment">>
	<<replace "#result">>
	It takes a moment for you to convince the woman that you aren't playing some cruel joke on $him, but once you do $he practically squeals with joy as you take $him through the doors of the clinic and announce your intent to pay to give your loyal citizen the absolute transformative works. When you next see $him it's on a gurney as $he's wheeled out of the surgery, $his patient's gown jutting out from $his chest due to the size of $his new rack. Through swollen lips $he gushes to you about how great $he feels to finally be a veritable bimbo, and how $he's going to tell every citizen $he fucks in $arcologies[0].name @@.green;that they have you to thank for $his new body@@.
	<<run repX(1000, "event")>>
	<<run cashX(-1000, "event")>>
	<</replace>>
<</link>> // The treatment will cost <<print cashFormat(1000)>>. //
<</if>>

<<link "Offer to enhance $him in your remote surgery in exchange for a fuck">>
	<<replace "#result">>
	You make your presence known to citizen, and once the usual shock and disbelief have worn off the citizen rapidly agrees to your proposal. $He follows you back to the penthouse where you inform $assistantName that the citizen is to be given the works in the remote surgery. As the citizen passes through the doors to the surgery, $he turns and blows you a kiss of gratitude.

	When the citizen is later delivered to your private suite to uphold $his end of the bargain, $he does so as the veritable image of a perfect bimbo slut. In $his rush to come thank you for transforming $him from $his plain and plebian appearance $he has evidently neglected to clothe herself, so you can admire $his new firm tits, plump ass and bee-stung lips from the moment $he enters the room. Despite being fresh from surgery, $he's an exquisite fuck and an enthusiastic partner — citizens like $him often are, given that penetration from a slave would be a social suicide.
	<<if $cash >= 10000>>

		<<link "Enslave $him afterwards">>
			<<replace "#result2">>
			As your new playmate lies slumbering in bed, you consult with $assistantName as to the cost of the surgery conducted today. With some creative accounting, you settle the citizen's other outstanding debts and then arrange for $him to be charged a sum in excess of $his financial means for the surgery conducted on $him today. Of course, that was not what you agreed, but it was $his mistake for undergoing an expensive procedure without a formal contract. When $he awakens, though $he will retain $his new bimbo body, $he will be just another slave in your penthouse.
			<<run newSlave($activeSlave)>> /* skip New Slave Intro */
			<<run cashX(-10000, "event", $activeSlave)>>
			<</replace>>
		<</link>> // Purchasing $his outstanding debts will cost <<print cashFormat(10000)>>. //

	<</if>>
	<</replace>>
<</link>>

<<case "body purism encounter">>

<<link "Keep walking">>
	<<replace "#result">>
	It's unfortunate that this citizen is unable to realize her dreams, but that's the way of the Free Cities. There are winners, and there are losers.
	<</replace>>
<</link>>
<<if $cash >= 1000>>

<<link "Pay for a day of treatment for her">>
	<<replace "#result">>
	It takes a moment for you to convince the woman that you aren't playing some cruel joke on her, but once you do she practically squeals with joy as you take her through the doors of the spa and announce your intent to pay for a day of cleansing, pampering and luxury. When you next see her it's on a wallscreen television at your penthouse praising you profusely. The rejuvenated young woman has clearly spread word of your generosity @@.green;across $arcologies[0].name@@.
	<<run repX(1000, "event")>>
	<<run cashX(-1000, "event")>>
	<</replace>>
<</link>> // The treatment will cost <<print cashFormat(1000)>>. //
<</if>>
<<if ($Attendant != 0)>>

<<link "Give her a day of pampering with your attendant at your spa">>
	<<replace "#result">>
	You make your presence known to the citizen, and once the usual shock and disbelief have worn off it takes a moment to convince her that your offer of a cleansing experience in your spa is neither a cruel joke nor an underhanded attempt to enslave her. She follows you back to the penthouse where you inform your attendant that the citizen is to be sequestered in the spa for a day of pampering, cleansing and rejuvenation. As the citizen passes through the doors to the spa, she turns and blows you a kiss of gratitude.

	When you stop by the spa later in the day, you spot the citizen luxuriating in a hot bath with a number of colorful health products spread across every visible surface of her nude skin. From where you stand it is clear her eyes are closed in immense contentment, while her body floats relaxed and carefree in the bubbling water. When the citizen finally departs at the end of the a long day of purification in the spa, she thanks you profusely and promises to tell everyone she can of your @@.green;generosity@@.
	<<run repX(300, "event")>>
	<</replace>>
<</link>>
<</if>>

<<case "youth preferentialist encounter">>

<<link "Let them pass">>
	<<replace "#result">>
	You step aside gracefully and bow your head, while signifying to the $girl that you intend to allow $him to pass you. $He seems taken aback by your geniality, especially given the gulf in social standing between the two of you, and has to be chaperoned from your presence by $his father. Nonetheless, $he is struck by $his chance encounter with you and cannot stop recounting the story to all $his friends, soon @@.green;the anecdote has seized the imaginations of $arcologies[0].name's youthful, female citizens.@@
	<<run repX(100, "event")>>
	<</replace>>
<</link>>
<<if $cash >= 500>>

<<link "Fuck $him over dinner">>
	<<replace "#result">>
	It takes a moment for you to convince the young $girl and $his father that you aren't playing some cruel joke on them, but once you do $he enthusiastically agrees to be your companion for the evening. With a pretty young thing on your arm for the rest of the night, and $his father trailing behind the two of you at a respectful distance, you take $arcologies[0].name by storm amidst a flurry of speculative whispers and contemplative rumors. Later that night, you conclude your date with a pleasant meal at one of $arcologies[0].name's choicest restaurants with fine dining and even finer conversation. To the credit of $his father, he politely continues eating his dinner without batting an eye when you <<if $PC.dick == 0>>don a strap-on and <</if>>take his daughter over the dinner table. When you part ways, the young $girl is clearly smitten with you — so it's no wonder that by the next day the story of your encounter has @@.green;spread across $arcologies[0].name like wildfire@@.
	<<run repX(500, "event")>>
	<<run cashX(-500, "event")>>
	<</replace>>
<</link>> // This will cost <<print cashFormat(500)>>. //
<</if>>

<<link "Manipulate $him into having sex with you">>
	<<replace "#result">>
	It only takes a moment for $assistantName to uncover the father's financial records and the copious debt therein, and only another moment for you to browbeat the terrified father into allowing his daughter to sleep with you under threat of purchasing all their debt and summarily enslaving $him.

	Once you both retire to your private suite, you peel the girl's clothes off as easily as one might shed a gift of its wrapping. In the nude $his body is tastefully youthful, with narrow hips, firm breasts, and a delicate blush across $his shamefaced, rosy cheeks. Despite the circumstances of your sexual conquest of $him, $he seems to enjoy the fuck well enough by the sounds of $his frenzied moans — citizens like $him often do since sexual submission to a slave would be a crippling scandal to a prominent citizen, let alone one of $his diminished social stature.
	<<if $cash >= 10000>>

		<<link "Enslave $him afterwards">>
			<<replace "#result2">>
			After $he regains $his bearings from your sexual encounter, the girl slips on $his simple clothes and attempts to slink away from your private suite unobtrusively. $He makes it out the door before being confronted by a glowing array of wallscreen monitors, each displaying a visual representation of your purchase of $his father's considerable debt and subsequent enslavement of $him on the basis of that debt. Tears begin to stream down $his cheeks as $he sinks to $his knees, $his hopes of a long life without enslavement now dashed.

			<<run cashX(-10000, "event", $activeSlave)>>
			<<include "New Slave Intro">>
			<</replace>>
		<</link>> // Purchasing $his outstanding debts will cost <<print cashFormat(10000)>>. //

	<</if>>
	<</replace>>
<</link>>

<<case "maturity preferentialist encounter">>

<<link "Let them pass">>
	<<replace "#result">>
	You step aside gracefully and bow your head, while signifying to the older woman that you intend to allow $him to pass you. $He seems taken aback by your geniality, especially given the gulf in social standing between the two of you, and seems disproportionately flustered by your small show of civility. Nonetheless, $he is struck by $his chance encounter with you and cannot stop recounting the story to all $his friends, and soon @@.green;the anecdote has seized the imaginations of $arcologies[0].name's mature, female citizens@@.
	<<run repX(100, "event")>>
	<</replace>>
<</link>>
<<if $cash >= 500>>

<<link "Fuck $him over dinner">>
	<<replace "#result">>
	It takes a moment for you to convince the older $woman and $his sons that you aren't playing some cruel joke on them, but once you do $he enthusiastically agrees to be your companion for the evening. With a mature lady on your arm for the rest of the night, and $his sons trailing behind the two of you at a respectful distance, you take $arcologies[0].name by storm amidst a flurry of speculative whispers and contemplative rumors. Later that night, you conclude your date with a pleasant meal at one of $arcologies[0].name's choicest restaurants with fine dining and even finer conversation. To the credit of $his sons, they politely continue eating their dinner without batting an eye when you <<if $PC.dick == 0>>don a strap-on and <</if>>take their mother over the dinner table. When you part ways, the older $woman is clearly smitten with you — so it's no wonder that by the next day the story of your encounter has @@.green;spread across $arcologies[0].name like wildfire@@.
	<<run repX(500, "event")>>
	<<run cashX(-500, "event")>>
	<</replace>>
<</link>> // This will cost <<print cashFormat(500)>>. //
<</if>>

<<link "Manipulate $him into having sex with you">>
	<<replace "#result">>
	It only takes a moment for $assistantName to uncover the citizen's financial records and the copious debt therein, and only another moment for you to browbeat the terrified older women into sleeping with you under threat of purchasing all $his debt and summarily enslaving $him. $His sons, frightened into obedience by the possibility of losing their dear mother, take their cue to make themselves scarce during the encounter.

	Once you both retire to your private suite, you peel the mature citizen's clothes off as easily as one might shed a gift of its wrapping. In the nude $his body is tastefully plush, with wide hips, firm motherly breasts, and a delicate blush across $his shamefaced, plump cheeks. Despite the circumstances of your sexual conquest of $him, $he seems to enjoy the fuck well enough by the sounds of $his frenzied moans — citizens like $him often do since sexual submission to a slave would be a crippling scandal to a prominent citizen, let alone one of $his diminished social stature.
	<<if $cash >= 10000>>

		<<link "Enslave $him afterwards">>
			<<replace "#result2">>
			After $he regains $his bearings from your sexual encounter, the older woman slips on $his simple clothes and attempts to slink away from your private suite unobtrusively. $He makes it out the door before being confronted by a glowing array of wallscreen monitors, each displaying a visual representation of your purchase of $his considerable debt and subsequent enslavement of $him on the basis of that debt. Tears begin to stream down $his weathered cheeks as $he sinks to $his knees, $his hopes of making it through the breadth of $his long life without enslavement now dashed.

			<<run cashX(-10000, "event", $activeSlave)>>
			<<include "New Slave Intro">>
			<</replace>>
		<</link>> // Purchasing $his outstanding debts will cost <<print cashFormat(10000)>>. //

	<</if>>
	<</replace>>
<</link>>

<<default>>

ERROR: bad REFS event $REFSevent
<</switch>>

<</if>> /* CLOSES EVENT SELECTION */

repo_name: AnonDev/fc


code:
:: RESSTR [nobr]

/* This is one of several files that contains and organizes many different events.	*/
/*	genericPlotEvents.tw															*/
/*	PESS.tw: Player Event, Single Slave												*/
/*	PETS.tw: Player Event, Two Slaves												*/
/*	RECI.tw: Random Event, Check In													*/
/*	REFI.tw: Random Event, Fetish Interest											*/
/*	REFS.tw: Random Event, Future Societies											*/
/*	RESS.tw: Random Event, Single Slave												*/
/*	RESSTR.tw: Random Event, Single Slave (Test Realm, for debugging events)		*/
/*	RETS.tw: Random Event, Two Slaves												*/
/*																					*/
/* Events can also be in a dedicated *.tw file, formatted as follows:				*/
/*	jeXXXXX.tw: Justice Event														*/
/*	pXXXXXX.tw: Player event														*/
/*	peXXXXX.tw: Player Event focused on a slave										*/
/*	reXXXXX.tw: Random Event														*/
/*	resXXXX.tw: Random Event, School												*/
/*	seXXXXX.tw: Slave Event, focuses on slaves coming or going						*/
/*	securityForceXXXXX.tw: Special (Security) Force event							*/
/*																					*/
/* Some scenes are also stored in useGuard.tw, walkPast.tw, and toychest.tw			*/

<<if Array.isArray($RESSTRevent)>>
	<<set $activeSlave = $eventSlave>>
	<<if $cheatMode == 1>>
		<<set $nextButton = "Back", $nextLink = "Nonrandom Event", $returnTo = "Nonrandom Event">> /* if user just clicks spacebar */
		''A random event would have been selected from the following:''

		<<for _i = 0; _i < $RESSTRevent.length; _i++>>
			<<print "[[$RESSTRevent[_i]|RESSTR][$RESSTRevent = $RESSTRevent[" + _i + "]]]">>

		<</for>>

[[Go Back to Random Individual Event|Random Individual Event][$activeSlave = 0]]
	<<else>>
		<<set $RESSTRevent = $RESSTRevent.random()>>
		<<goto "RESSTR">>
	<</if>>
<<else>>

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

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

<<SlaveArt $activeSlave 2 0>>

	<<else>>

<<SlaveArt $activeSlave 2 0>>

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

	<<set $desc = SlaveTitle($activeSlave)>>
	<<run Enunciate($activeSlave)>>

	<<switch $RESSTRevent>>

	<<default>>

ERROR: bad RESSTR event $RESSTRevent
	<</switch>>

	<<switch $RESSTRevent>>

	<<default>>

ERROR: bad RESSTR event $RESSTRevent
	<</switch>>

	<<if $cheatMode == 1>>

DEBUG:     [[Go back to Nonrandom Event|Nonrandom Event][$activeSlave = 0, $eventSlave = 0]]
	<</if>>

<</if>> /* CLOSES EVENT SELECTION */


code:
:: Add custom descriptors [nobr]

<<set $nextButton = "Continue", $nextLink = "Rename">>
<<set $oldName = $activeSlave.slaveName, $oldSurname = $activeSlave.slaveSurname>>

You may enter custom descriptors for your slave's hair color, hair style, tattoos, or anything else here. After typing, press enter to commit your change. These custom descriptors will appear in descriptions of your slave, but will have no gameplay effect. Changing them is free.

<<if $activeSlave.devotion >= -50>>
	<<if $activeSlave.customTitle != "">>You have instructed $him to always refer to you as $activeSlave.customTitle, which, should $he lisp, comes out as $activeSlave.customTitleLisp<<else>>You expect $him to refer to you as all your other slaves do<</if>>.

	<<if $activeSlave.customTitle == "">>
		<<link "Set a custom title for $him to address you as">>
			<<replace "#result">>
				Custom title: <<textbox "$activeSlave.customTitle" $activeSlave.customTitle>>
				<<link "Apply">>
					<<replace "#result">>
						$He'll try $his best to call you $activeSlave.customTitle.
						<<set $activeSlave.customTitleLisp = lispReplace($activeSlave.customTitle)>>
					<</replace>>
				<</link>>
			<</replace>>
		<</link>>
	<<else>>
		$He's trying $his best to call you <<textbox "$activeSlave.customTitle" $activeSlave.customTitle>>

		<<link "Apply">>
			<<replace "#result">>
				$He'll try $his best to call you $activeSlave.customTitle.
				<<set $activeSlave.customTitleLisp = lispReplace($activeSlave.customTitle)>>
			<</replace>>
		<</link>> |
		<<link "Stop using a custom title">>
			<<replace "#result">>
				$He will no longer refer to you with a special title.
				<<set $activeSlave.customTitle = "">>
				<<set $activeSlave.customTitleLisp = "">>
			<</replace>>
		<</link>>
	<</if>>

<<else>>
	//You must break $his will further before $he will refer to you by a new title.<<if SlaveStatsChecker.checkForLisp($activeSlave)>><<if def $activeSlave.customTitleLisp && $activeSlave.customTitleLisp != "">> For now, $he intends to keep calling you "<<print $activeSlave.customTitleLisp>>".<</if>><<else>><<if def $activeSlave.customTitle && $activeSlave.customTitle != "">> For now, $he intends to keep calling you "<<print $activeSlave.customTitle>>".<</if>><</if>>//
<</if>>

<<if ((($activeSlave.devotion >= -50) || ($activeSlave.trust < -20)) && ($activeSlave.birthName != $activeSlave.slaveName)) || (($activeSlave.devotion > 20) || ($activeSlave.trust < -20))>>
	Change $his given name<<if $activeSlave.birthName != $activeSlave.slaveName>> ($his birth name was $activeSlave.birthName)<</if>>: <<textbox "$activeSlave.slaveName" $activeSlave.slaveName "Rename">>
	<<link "Restore $his birth name" "Rename">><<set $activeSlave.slaveName = $activeSlave.birthName>><</link>>
	<<if $arcologies[0].FSPastoralist != "unset">>
		<<if $activeSlave.lactation > 0>>
			| <<link "Give $him a random cow given name" "Rename">><<set $activeSlave.slaveName = setup.cowSlaveNames.random()>><</link>>
		<</if>>
	<</if>>
	<<if $arcologies[0].FSChattelReligionist != "unset">>
		| <<link "Give $him a random devotional given name" "Rename">><<set $activeSlave.slaveName = setup.chattelReligionistSlaveNames.random()>><</link>>
	<</if>>

	Change $his surname<<if $activeSlave.birthSurname != $activeSlave.slaveSurname>> ($his birth surname was $activeSlave.birthSurname)<</if>>:
	<<if $activeSlave.slaveSurname>>
		<<textbox "$activeSlave.slaveSurname" $activeSlave.slaveSurname "Rename">>
	<<else>>
		<<textbox "$activeSlave.slaveSurname" "" "Rename">>
	<</if>>
	<<link "Restore $his birth surname" "Rename">><<set $activeSlave.slaveSurname = $activeSlave.birthSurname>><</link>>
	<<if $activeSlave.slaveSurname>>
		| <<link "Take $his surname away" "Rename">><<set $activeSlave.slaveSurname = 0>><</link>>
	<</if>>
	<<if $activeSlave.relationship >= 5>>
		<<for _i = 0; _i < $slaves.length; _i++>>
			<<if $activeSlave.relationshipTarget == $slaves[_i].ID>>
				<<if $slaves[_i].slaveSurname>>
					<<if $activeSlave.slaveSurname != $slaves[_i].slaveSurname>>
						| <<link "Give $him $his wife's surname" "Rename">><<set $activeSlave.slaveSurname = $slaves[_i].slaveSurname>><</link>>
						<<break>>
					<</if>>
				<</if>>
			<</if>>
		<</for>>
	<</if>>
	<<if $activeSlave.relationship == -3>>
		<<if $PC.surname>>
			<<if $activeSlave.slaveSurname != $PC.surname>>
				| <<link "Give $him your surname" "Rename">><<set $activeSlave.slaveSurname = $PC.surname>><</link>>
			<</if>>
		<</if>>
	<</if>>
	<<if $arcologies[0].FSRomanRevivalist != "unset">>
		| <<link "Give $him a random full Roman name" "Rename">><<set $activeSlave.slaveName = setup.romanSlaveNames.random(), $activeSlave.slaveSurname = setup.romanSlaveSurnames.random()>><</link>>
	<<elseif $arcologies[0].FSAztecRevivalist != "unset">>
		| <<link "Give $him a random full Aztec name" "Rename">><<set $activeSlave.slaveName = setup.aztecSlaveNames.random(), $activeSlave.slaveSurname = 0>><</link>>
	<<elseif $arcologies[0].FSEgyptianRevivalist != "unset">>
		| <<link "Give $him a random full ancient Egyptian name" "Rename">><<set $activeSlave.slaveName = setup.ancientEgyptianSlaveNames.random(), $activeSlave.slaveSurname = 0>><</link>>
	<<elseif $arcologies[0].FSEdoRevivalist != "unset">>
		| <<link "Give $him a random full feudal Japanese name" "Rename">><<set $activeSlave.slaveName = setup.edoSlaveNames.random(), $activeSlave.slaveSurname = setup.edoSlaveSurnames.random()>><</link>>
	<</if>>
	<<if $arcologies[0].FSDegradationist > -1>>
		| <<link "Give $him a degrading full name" "Rename">><<run DegradingName($activeSlave)>><</link>>
	<</if>>
<<else>>
	//You must break $his will further before you can successfully force a new name on $him.//
<</if>>

<<switch $activeSlave.hStyle>>
<<case "tails" "dreadlocks" "cornrows">>
$His hair is in $activeSlave.hStyle.
<<case "ponytail">>
$His hair is in a $activeSlave.hStyle.
<<default>>
$His hair is $activeSlave.hStyle.
<</switch>>
Custom hair description: <<textbox "$activeSlave.hStyle" $activeSlave.hStyle "Add custom descriptors">>

    //For best results, use a short, uncapitalized and unpunctuated description; for example: 'back in a ponytail'//

$His hair is $activeSlave.hColor in color.
Custom hair color: <<textbox "$activeSlave.hColor" $activeSlave.hColor "Add custom descriptors">>

    //For best results, use a short, uncapitalized and unpunctuated description; for example: 'black with purple highlights'//

<<if $activeSlave.eyeColor != $activeSlave.origEye>>
	$He is wearing $activeSlave.eyeColor lenses.
<<else>>
	$He has $activeSlave.eyeColor eyes.
<</if>>
Custom eye color: <<textbox "$activeSlave.eyeColor" $activeSlave.eyeColor "Add custom descriptors">>

    //For best results, use a short, uncapitalized and unpunctuated description; for example: 'blue'//

Change $his custom tattoo: <<textbox "$activeSlave.customTat" $activeSlave.customTat "Add custom descriptors">>
    //For best results, use complete sentences; for example: 'She has blue stars tattooed along her cheekbones.'//

Change $his origin story: <<textbox "$activeSlave.origin" $activeSlave.origin "Add custom descriptors">>

    //For best results, use complete, capitalized and punctuated sentences; for example: 'She followed you home from the pet store.'//

Change $his custom description: <<textbox "$activeSlave.customDesc" $activeSlave.customDesc "Add custom descriptors">>

    //For best results, use complete, capitalized and punctuated sentences; for example: 'She has a beauty mark above her left nipple.'//

Change $his custom label: <<textbox "$activeSlave.customLabel" $activeSlave.customLabel "Add custom descriptors">>

    //For best results, use a short phrase; for example: 'Breeder.'//

<<if ndef $activeSlave.customImage>><<set $activeSlave.customImage = 0>><</if>>
Assign $him a custom image:
<<if $activeSlave.customImage != 0>>
	<<textbox "$activeSlave.customImage" $activeSlave.customImage "Add custom descriptors">>
<<else>>
	<<textbox "$activeSlave.customImage" "" "Add custom descriptors">>
<</if>>
<<link "Reset" "Add custom descriptors">><<set $activeSlave.customImage = 0, $activeSlave.customImageFormat = "png">><</link>>

    //File must be in// <tt><select id="customImageFormatSelector" style="border: none;"><option value="png">PNG</option><option value="jpg">JPG</option><option value="gif">GIF</option><option value="webm">WEBM</option></select></tt> //format. Place file in the \resources folder. Enter the filename without the extension. For example, for a file with the path// <tt>\bin\resources\headgirl.png</tt>, //enter //<tt>headgirl</tt>.
<>
<<if $seeImages == 1 && $imageChoice == 1>>

	<<if ndef $activeSlave.customHairVector>><<set $activeSlave.customHairVector = 0>><</if>>
	Assign $him a custom hair SVG image:
	<<if $activeSlave.customHairVector != 0>>
		<<textbox "$activeSlave.customHairVector" $activeSlave.customHairVector "Add custom descriptors">>
	<<else>>
		<<textbox "$activeSlave.customHairVector" "" "Add custom descriptors">>
	<</if>>
	<<link "Reset" "Add custom descriptors">><<set $activeSlave.customHairVector = 0>><</link>>
<</if>>


code:
:: Apartments [nobr]

<<set $nextButton = "Back", $nextLink = "Main">>

This is a sector of the arcology's living areas,
<<switch $sectors[$AS].type>>
<<case "Apartments">>
	occupied by citizens of varying wealth and social standing.
<<case "DenseApartments">>
	upgraded for dense occupancy by as many citizens as possible.
<<case "LuxuryApartments">>
	improved for occupancy by the Free Cities' wealthiest citizens.
<<default>>ERROR: bad sector type
<</switch>>

You control this part of the arcology and all these tenants pay you rent.
<<SectorSell>>

<<if $sectors[$AS].type != "DenseApartments">>

	[[Upgrade this sector of apartments for dense occupancy by as many citizens as possible|Main][cashX(forceNeg(Math.trunc(10000*$upgradeMultiplierArcology)), "capEx"), $sectors[$AS].type = "DenseApartments"]]
	//Costs <<print cashFormat(Math.trunc(10000*$upgradeMultiplierArcology))>>//
<</if>>

<<if $sectors[$AS].type != "LuxuryApartments">>

	[[Improve this sector of apartments for occupancy by the Free Cities' wealthiest citizens|Main][cashX(forceNeg(Math.trunc(10000*$upgradeMultiplierArcology)), "capEx"), $sectors[$AS].type = "LuxuryApartments"]]
	//Costs <<print cashFormat(Math.trunc(10000*$upgradeMultiplierArcology))>>//
<</if>>

<<if $sectors[$AS].type != "Apartments">>

	[[Return this sector to standard, mixed housing|Main][cashX(forceNeg(Math.trunc(10000*$upgradeMultiplierArcology)), "capEx"), $sectors[$AS].type = "Apartments"]]
	//Costs <<print cashFormat(Math.trunc(10000*$upgradeMultiplierArcology))>>//
<</if>>


code:
:: Arcade [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $returnTo = "Arcade", $showEncyclopedia = 1, $encyclopedia = "Arcade", $arcadeSlaves = $ArcadeiIDs.length>>

<<if $arcadeName != "the Arcade">>
	<<set $arcadeNameCaps = $arcadeName.replace("the ", "The ")>>
<</if>>
<<arcadeAssignmentFilter>>
$arcadeNameCaps
<<switch $arcadeDecoration>>
<<case "Roman Revivalist">>
	is built out as a Roman street restaurant, with the bar containing the inmates. Citizens can amuse themselves at either side of the bar while enjoying some wine and olives and talking over the day's events.
<<case "Aztec Revivalist">>
	is built out as an Aztec stone temple, with a short stone staircase to lead the people straight to the slaves waiting in front of the establishment. A small canal leads the shed blood to the back and out of the building.
<<case "Egyptian Revivalist">>
	is built to look like an ancient Egyptian temple, with a long altar of sacrifice serving as the wall in which the inmates are held. Incongruously, it's piled with fresh flowers.
<<case "Edo Revivalist">>
	is built to look like an Edo onsen, with discreet partitions allowing citizens a modicum of privacy as they use the services here. There are baths available so they can wash themselves afterward.
<<case "Arabian Revivalist">>
	is built to look like a fantastical Arabian dungeon, with the inmates kept in iron cages that hold their holes in place for use.
<<case "Chinese Revivalist">>
	is set up to look like a rough bar in an ancient Chinese city, with the inmates immured in the bar itself. Rowdy citizens can drink and fuck the holes here while shouting and boasting over the slaves' heads.
<<case "Chattel Religionist">>
	is well decorated with severe religious iconography, since this place is an acceptable if not respectable place for a citizen to find relief, so long as they keep the service of the slave they use here in mind.
<<case "Degradationist">>
	is nothing but a system of harnesses to hold slaves in the usual posture they would hold within a normal Free Cities sex arcade. This way, no iota of their degradation here is missed.
<<case "Asset Expansionist">>
	is constructed so that the slaves lie within the arcade facing up. The wall itself ends at waist height, so their breasts stick up to be groped while they are used from either end.
<<case "Repopulation Focus">>
	is constructed so that the slaves lie within the arcade facing up. A hole is situated above them, so that their belly has room to protrude upwards as they are fucked pregnant.
<<case "Eugenics">>
	is designed with built in dispensers for various prophylactics. Numerous reminders to not impregnate subhumans line the walls along with offers for patrons to join the ranks of the elite.
<<case "Transformation Fetishist">>
	reveals more of its inmates' bodies than the typical Free Cities sex arcade. There's no attempt to hide the feeding arrangements or injection lines, since transformation into a human sex toy is considered arousing here.
<<case "Gender Radicalist">>
	is built to reveal most of its inmate's bellies, butts, groins, and thighs. Whatever a slave here has between her legs, it's available to be fucked, played with, or abused.
<<case "Gender Fundamentalist">>
	is built to block the lower part of its inmates' butts from view and use. The slaves within are thus limited to their anuses for service here, but any slave can be disposed of in $arcadeName without offending fundamentalist sensibilities.
<<case "Physical Idealist">>
	logs customers' performance for their own athletic information. It keeps track of personal bests and all-time high scores, and pays out cash prizes to customers who fuck the holes faster, harder, or for longer than the previous record holder.
<<case "Supremacist">>
	is constructed so that the inmates' entire heads stick out of the mouth wall, though they're still masked and their jaws are held apart by ring gags. After all, seeing the anguish of the subhumans here is one of the main attractions.
<<case "Subjugationist">>
	is constructed so that the inmates' entire heads stick out of the mouth wall, though they're still masked and their jaws are held apart by ring gags. After all, seeing the anguish of the $arcologies[0].FSSubjugationistRace slaves here is one of the main attractions.
<<case "Paternalist">>
	is constructed so that nothing at all of the slaves is visible. The arcade is just a row of holes. In this way, good, paternalistic citizens can partake of a Free Cities sex arcade without being confronted with what they're doing.
<<case "Pastoralist">>
	is constructed so that the slaves lie within the arcade facing up. If a slave is lactating, her breasts are kept bare and under the maximum sustainable dose of lactation drugs, so that any penetration of her holes produces amusing squirts of milk.
<<case "Maturity Preferentialist">>
	is constructed so that nothing but the slaves' holes can be seen. This makes it possible to maintain the appearance of offering MILFs while using $arcadeName to get value out of useless young bitches' holes.
<<case "Youth Preferentialist">>
	is constructed so that nothing but the slaves' holes can be seen. This makes it possible to maintain the appearance of offering nothing but young slaves while using $arcadeName to get value out of old bitches' holes.
<<case "Body Purist">>
	is built out in such a way that much more of the slaves' rears and faces are visible than in a standard Free Cities sex arcade. This makes it much easier to check them for purity before using their holes.
<<case "Slimness Enthusiast">>
	is barely distinguishable from a standard Free Cities sex arcade. The difference is a fun one, though: since the butts sticking out of the wall are much skinnier than usual, there's no padding to get in the way of hilting oneself in the holes.
<<case "Hedonistic">>
	is built in such a way so that most of a slave's ass, thighs, breasts and belly are exposed for patrons to grope and fondle. Plenty of cup holders and surfaces are available to hold one's food and drink as they enjoy their hole of choice.
<<default>>
	is a standard Free Cities sex arcade: a pair of hallways extend away from the entrance, lined with doorless stalls like those in a public restroom. One hallway offers mouths, the other <<if $seeDicks != 100>>vaginas and <</if>>anuses.
<</switch>>

<<if $arcadeSlaves > 2>>
	It's busy. Customers are entering and exiting, leaving a few ¤ behind in the charge machines and loads of semen behind in the holes.
<<elseif $arcadeSlaves > 0>>
	It's understaffed; there are lines here and there for the few holes available.
<<else>>
	It's empty and quiet.
	<<link "Decommission the arcade" "Main">>
		<<set $arcade = 0, $arcadeUpgradeInjectors = 0, $arcadeUpgradeFuckdolls = 0, $arcadeUpgradeMenials = 0, $arcadeUpgradeCollectors = 0>>
		<<set _arc = $sectors.findIndex(function(s) { return s.type == "Arcade"; })>>
		<<if _arc != -1>>
			<<set $sectors[_arc].type = "Markets">>
		<</if>>
	<</link>>
<</if>>

<<if $arcadeSlaves > 0>>
	<<set _NewPop = $arcadeSlaves+$dormitoryPopulation>>
	<<link "Remove all slaves" "Arcade">>
		<<for $arcadeSlaves > 0>>
			<<= assignJob($slaves[$slaveIndices[$ArcadeiIDs[0]]], "work a glory hole")>>
		<</for>>
	<</link>>
	<<if _NewPop > $dormitory>>
		@@.red;Dormitory capacity will be exceeded.@@
	<</if>>
<</if>>

It can support $arcade inmates. Currently $arcadeSlaves <<if $arcadeSlaves == 1>>slave is<<else>>slaves are<</if>> incarcerated.
<<if ($arcade < $arcadeSlaves) && ($arcadeUpgradeFuckdolls == 1)>>
	@@.yellow;$arcadeNameCaps is overcrowded;@@ the least popular inmate will be converted to a standard Fuckdoll this week.
<</if>>
<<set _Tmult0 = Math.trunc($arcade*1000*$upgradeMultiplierArcology)>>
[[Expand the arcade|Arcade][cashX(forceNeg(_Tmult0), "capEx"), $arcade += 5]] //Costs <<print cashFormat(_Tmult0)>> and will increase upkeep costs//

<<set _Tmult1 = Math.trunc(10000*$upgradeMultiplierArcology)>>
<<if $arcadeUpgradeInjectors == 1>>
	It has been upgraded with aphrodisiac injection systems and electroshock applicators. If the aphrodisiacs fail to force an orgasm from an inmate, they are shocked to tighten their holes regardless.
<<elseif $arcadeUpgradeCollectors == 1>>
	It has been retrofitted to milk lactating slaves<<if $seeDicks != 0>> and cockmilk slaves capable of ejaculating<</if>>, though less efficiently than a dedicated facility.
<<else>>

It is a standard arcade. It can be upgraded to either maximize the pleasure of those that visit it at the expense of the health of the inmates, or to keep them healthy (if not happy) and milk them of useful fluids.

	[[Upgrade the arcade with invasive performance-enhancing systems|Arcade][cashX(forceNeg(_Tmult1), "capEx"), $arcadeUpgradeInjectors = 1]] | [[Retrofit the arcade to collect useful fluids|Arcade][cashX(forceNeg(_Tmult1), "capEx"), $arcadeUpgradeCollectors = 1]]

	//Choosing either upgrade will cost <<print cashFormat(_Tmult1)>> and will increase upkeep costs. They are mutually exclusive; only one can be chosen.//

<</if>>

<<if $arcologies[0].FSPaternalist == "unset">>

	<<if $arcadeUpgradeMenials == 1>>
		<<if $fuckdolls > 0>>
			Rows of menial Fuckdolls are shackled to the floor in positions that force them to present all their holes. Their latex-clad bodies struggle in their restraints when fucked, offering a different arcade experience.
		<<else>>
			In addition to the low walls that house inmates, there are also rows of simple shackles that allow menial Fuckdolls to be restrained here to add still more rapeable holes to $arcadeName's capacity. They're empty at present.
		<</if>>
	<<else>>
		There is no provision for menial Fuckdolls. [[Add shackles to restrain more holes|Arcade][cashX(forceNeg(_Tmult1), "capEx"), $arcadeUpgradeMenials = 1]] //Costs <<print cashFormat(_Tmult1)>>//
	<</if>>
<</if>>

$arcadeNameCaps is
<<if $arcadeUpgradeFuckdolls == 1>>
	equipped to convert surplus inmates into standard Fuckdolls.
<<else>>
	<<set _Tmult2 = Math.trunc(5000*$upgradeMultiplierArcology)>>
	not equipped to convert surplus inmates into standard Fuckdolls. [[Upgrade the arcade to create Fuckdolls|Arcade][cashX(forceNeg(_Tmult2), "capEx"), $arcadeUpgradeFuckdolls = 1]] //Costs <<print cashFormat(_Tmult2)>>//
<</if>>

<<ArcadeStatistics 1>>

	<button class="tablinks" onclick="opentab(event, 'assign')" id="tab assign">Assign a slave</button>
	<button class="tablinks" onclick="opentab(event, 'remove')" id="tab remove">Remove a slave</button>

		<<if $arcadeSlaves > 0>>
			<<arcadeAssignmentFilter>>
			<<set $Flag = 1>>
			<<include "Slave Summary">>
			<<resetAssignmentFilter>>
		<<else>>

//$arcadeNameCaps is empty for the moment.
 //
		<</if>>

		<<if ($arcade <= $arcadeSlaves) && $arcadeUpgradeFuckdolls == 0>>
			''$arcadeNameCaps is full and cannot hold any more slaves''
		<<elseif ($slaves.length > $arcadeSlaves)>>
			<<resetAssignmentFilter>>
			<<set $Flag = 0>>
			<<include "Slave Summary">>
		<</if>>

<<if ($tabChoice.Arcade == "assign")>>

<<else>>

<</if>>

Rename $arcadeName: <<textbox "$arcadeName" $arcadeName "Arcade">> //Use a noun or similar short phrase//


code:
:: Arcade Report [nobr]

<<SlaveSort $ArcadeiIDs>>
<<set _DL = $ArcadeiIDs.length, $arcadeSlaves = _DL, _SL = $slaves.length, _cockmilked = 0, _milked = 0, _milkprofits = 0, _profits = 0, _oldCash = 0, $boobsImplanted = 0, $prostatesImplanted = 0, $vasectomiesUndone = 0>>

<<set $facility = $facility || {}, $facility.arcade = initFacilityStatistics($facility.arcade)>>

    <<if (_DL > 1)>>''There are _DL inmates confined in $arcadeName.''<<else>>''There is one inmate confined in $arcadeName.''<</if>>
<<if ($arcologies[0].FSDegradationist > 20)>>
<<if $arcologies[0].FSDegradationistLaw == 1>>
	The tenants located near the arcade don't mind having it nearby, even though the crowd of menial slaves waiting their turn spills out into the hallway, 24 hours a day.
<<else>>
	The tenants located near the arcade don't mind having it nearby.
<</if>>
<<elseif ($arcologies[0].FSPaternalist > 20)>>
	Many of the better tenants located near the arcade consider it an @@.red;intolerable@@ establishment to have nearby.
<<else>>
	Some of the better tenants located near the arcade consider it an @@.red;obnoxious@@ establishment to have nearby.
<</if>>
<<if $arcadeDecoration != "standard">>

    $arcadeNameCaps's customers enjoy @@.green;getting off in $arcadeDecoration surroundings.@@
<</if>>

<<for _dI = 0; _dI < _DL; _dI++>>
	<<set $i = $slaveIndices[$ArcadeiIDs[_dI]]>>
	<<setLocalPronouns $slaves[$i]>>

	/* Perform facility based rule changes */
	<<set $slaves[$i].clothes = "no clothing">>
	<<if ($arcadeUpgradeInjectors == 1)>>
		<<if ($slaves[$i].health > -60)>>
			<<set $slaves[$i].health -= 10>>
		<<elseif ($slaves[$i].health > -80)>>
			<<set $slaves[$i].health -= 2>>
		<<else>>
			<<set $slaves[$i].health -= 1>>
		<</if>>
		<<set $slaves[$i].aphrodisiacs = 2, $slaves[$i].devotion -= 5, $slaves[$i].trust -= 10>>
	<<elseif ($arcadeUpgradeCollectors > 0)>>
		<<if ($slaves[$i].health > 20)>>
			<<set $slaves[$i].health -= 5>>
		<<elseif ($slaves[$i].health > -50)>>
			<<set $slaves[$i].health -= 3>>
		<<else>>
			<<set $slaves[$i].health -= 1>>
		<</if>>
		<<set $slaves[$i].trust -= 5>>
	<<else>>
		<<if ($slaves[$i].health > -20)>>
			<<set $slaves[$i].health -= 5>>
		<<elseif ($slaves[$i].health > -90)>>
			<<set $slaves[$i].health -= 1>>
		<</if>>
		<<set $slaves[$i].trust -= 5>>
	<</if>>
	<<if ($slaves[$i].muscles > -100)>>
		<<set $slaves[$i].muscles-->>
	<</if>>

	<<if $showEWD != 0>>

		/* 000-250-006 */
		<<if $seeImages && $seeReportImages>>

			<<SlaveArt $slaves[$i] 0 0>>

		<</if>>
		/* 000-250-006 */
		''__@@.pink;<<= SlaveFullName($slaves[$i])>>@@__''
		<<if $slaves[$i].choosesOwnAssignment == 2>>
			<<include "SA chooses own job">>
		<<else>>
			is confined in $arcadeName.
		<</if>>

    $He <<include "SA work a glory hole">>
	<<else>>
		<<silently>>
			<<include "SA chooses own job">>
			<<include "SA work a glory hole">>
		<</silently>>
	<</if>>
	<<if ($arcadeUpgradeCollectors > 0)>>
		<<if ($slaves[$i].vasectomy == 1)>>
			<<set $slaves[$i].vasectomy = 0, $slaves[$i].health -= 10, $vasectomiesUndone++>>
			<<run cashX(forceNeg($surgeryCost), "slaveSurgery", $slaves[$i])>>
		<<elseif ($slaves[$i].lactation < 2)>>
			<<set $slaves[$i].lactation = 2, $slaves[$i].health -= 10, $boobsImplanted++>>
			<<run cashX(forceNeg($surgeryCost), "slaveSurgery", $slaves[$i])>>
		<<elseif $slaves[$i].prostate == 1>>
			<<set $slaves[$i].prostate = 2, $slaves[$i].health -= 10, $prostatesImplanted++>>
			<<run cashX(forceNeg($surgeryCost), "slaveSurgery", $slaves[$i])>>
		<<elseif ($slaves[$i].lactation > 0) || ($slaves[$i].balls > 0)>>
			<<set _oldCash = $cash>>
			<<if $showEWD != 0>>

    $He <<include "SA get milked">>
			<<else>>
				<<silently>><<include "SA get milked">><</silently>>
			<</if>>
			<<set _milkprofits += $cash-_oldCash>>
			<<set _growth = 0>>
			<<if ($slaves[$i].boobs < 2000)>>
				<<set _growth = 100>>
			<<elseif ($slaves[$i].boobs < 5000)>>
				<<set _growth = 50>>
			<<elseif ($slaves[$i].boobs < 10000)>>
				<<set _growth = 25>>
			<</if>>
			<<if ($slaves[$i].geneMods.NCS == 1)>>
				/*
				** NCS will allow some growth for Arcade milking, but not as much as the Dairy.
				*/
				<<set _growth = Math.trunc(_growth/3.5)>>
			<</if>>
			<<set $slaves[$i].boobs += _growth>>
			<<if (($slaves[$i].balls > 0) && ($slaves[$i].balls < 10) && (random(1,100) > (40 + (10 * ($slaves[$i].balls + (2 * $slaves[$i].geneMods.NCS))))))>>
				<<set $slaves[$i].balls++>>
			<</if>>
			<<if (($slaves[$i].dick > 0) && ($slaves[$i].dick < 10) && (random(1,100) > (40 + (10 * $slaves[$i].dick + (2 * $slaves[$i].geneMods.NCS)))))>>
				<<set $slaves[$i].dick++>>
			<</if>>
			<<if ($slaves[$i].lactation > 0)>>
				<<set _milked++>>
			<</if>>
			<<if ($slaves[$i].balls > 0)>>
				<<set _cockmilked++>>
			<</if>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].inflation > 0)>>
		<<set $slaves[$i].inflation = 0, $slaves[$i].inflationType = "none", $slaves[$i].inflationMethod = 0, $slaves[$i].milkSource = 0>>
		<<run SetBellySize($slaves[$i])>>
	<</if>>
	<<if $showEWD != 0>>

		<<include "SA rules">>
		<<include "SA diet">>
		<<include "SA long term effects">>
		<<include "SA drugs">>
		<<include "SA relationships">>
		<<include "SA rivalries">>

<<include "SA devotion">>
	<<else>>
		<<silently>>
		<<include "SA rules">>
		<<include "SA diet">>
		<<include "SA long term effects">>
		<<include "SA drugs">>
		<<include "SA relationships">>
		<<include "SA rivalries">>
		<<include "SA devotion">>
		<</silently>>
	<</if>>
<</for>>

<<if _DL > 0>>

	<<if _milked == 1>>
		One of them is lactating and spends her time in $arcadeName being simultaneously milked and fucked.
	<<elseif _milked > 1>>
		_milked of them are lactating and spend their time in $arcadeName being simultaneously milked and fucked.
	<</if>>

	<<if $vasectomiesUndone>>
		<<if $vasectomiesUndone == 1>>
			One
		<<else>>
			$vasectomiesUndone
		<</if>>
		of them had severed vas deferens, so they were reattached to allow sperm through, costing @@.red;<<print cashFormat($surgeryCost*$vasectomiesUndone)>>.@@
	<</if>>
	<<if $boobsImplanted>>
		<<if $boobsImplanted == 1>>
			One of them was not lactating, so she was
		<<else>>
			$boobsImplanted of them were not lactating, so they were
		<</if>>
		implanted with long-acting lactation inducing drugs, costing @@.red;<<print cashFormat($surgeryCost*$boobsImplanted)>>.@@
	<</if>>
	<<if $prostatesImplanted>>
		<<if $prostatesImplanted == 1>>
			One of them was not producing the maximum possible amount of precum, so she was
		<<else>>
			$prostatesImplanted of them were not producing the maximum possible amount of precum, so they were
		<</if>>
		implanted with long-acting prostate stimulation drugs, costing @@.red;<<print cashFormat($surgeryCost*$prostatesImplanted)>>.@@
	<</if>>
	<<if _cockmilked == 1>>
		One of them retains testicles and is brutally cockmilked as she is used.
	<<elseif _cockmilked > 1>>
		_cockmilked of them retain testicles and are brutally cockmilked as they are used.
	<</if>>
	The arcade makes you @@.yellowgreen;<<print cashFormat(_profits)>>@@ from selling the inmates' holes<<if ($arcadeUpgradeCollectors > 0)>> and @@.yellowgreen;<<print cashFormat(_milkprofits)>>@@ from selling the fluids they produced<</if>> this week.
	<<if ($arcologies[0].FSDegradationist > 20)>>
	<<elseif ($arcologies[0].FSPaternalist > 20)>>
		<<run repX(forceNeg(Math.trunc(_profits/20)), "arcade")>>
	<<else>>
		<<run repX(forceNeg(Math.trunc(_profits/100)), "arcade")>>
	<</if>>
<</if>>

<<if ($arcadeUpgradeFuckdolls == 1) && (_DL > $arcade)>>
	<<set $activeSlave = 0, _Age = -1, _FD = -1, _MB = -1, _Con = -1>>
	<<for _dI = 0; _dI < _DL; _dI++>>
		<<if $slaves[$i].sentence == 0>> /* lets not convert slaves we are punishing into fuckdolls */
			<<set $i = $slaveIndices[$ArcadeiIDs[_dI]]>>
			<<if ($slaves[$i].fetish == "mindbroken")>>
				<<if ($slaves[$i].fuckdoll == 0)>>
					<<if ($slaves[$i].physicalAge > 35)>>
						<<set _Age = $i>>
						<<break>>
					<<elseif _FD == -1>>
						<<set _FD = $i>>
					<</if>>
				<<elseif _MB == -1>>
					<<if $slaves[$i].vagina >= 4 || $slaves[$i].anus >= 4>>
						<<set _Con = $i>>
					<<elseif $slaves[$i].physicalAge > 35>>
						<<set _Age = $i>>
					<<else>>
						<<set _MB = $i>>
					<</if>>
				<</if>>
			<<elseif _Con == -1>>
				<<if $slaves[$i].vagina >= 4 || $slaves[$i].anus >= 4>>
					<<set _Con = $i>>
				<<elseif $slaves[$i].physicalAge > 35>>
					<<set _Age = $i>>
				<</if>>
			<</if>>
		<</if>>
	<</for>>
	<<if _FD > -1>>
		<<set $activeSlave = $slaves[_FD]>>
	<<elseif _Con > -1>>
		<<set $activeSlave = $slaves[_Con]>>
	<<elseif _MB > -1>>
		<<set $activeSlave = $slaves[_MB]>>
	<<elseif _Age > -1>>
		<<set $activeSlave = $slaves[_Age]>>
	<</if>>
	<<if $activeSlave != 0>>
		<<setLocalPronouns $activeSlave>>

    $activeSlave.slaveName is low-quality and surplus to the needs of the arcade, so $he has been converted into a Fuckdoll.
		<<include "Remove activeSlave">>
		<<if $activeSlave == 0>> /% if not zero then technically there was an error INVALID SLAVE %/
			<<set $fuckdolls++, _SL-->>
		<</if>>
	<<else>>

    No slaves have failed quality inspection for fuckdoll conversion. $arcadeNameCaps will remain overcrowded this week.
	<</if>>
<</if>>

<<if _DL > 0>>

	<>

	<<ArcadeStatistics 0>>
	<<timed 50ms>>
		<<replace #arcadestats>>
			<<ArcadeStatistics 1>>
		<</replace>>
	<</timed>>

<</if>>