code:
:: Cellblock [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $returnTo = "Cellblock", $showEncyclopedia = 1, $encyclopedia = "Cellblock", $cellblockSlaves = $CellBiIDs.length>>

<<if $cellblockName != "the Cellblock">>
	<<set $cellblockNameCaps = $cellblockName.replace("the ", "The ")>>
<</if>>
<<cellblockAssignmentFilter>>
$cellblockNameCaps
<<switch $cellblockDecoration>>
<<case "Roman Revivalist">>
	is designed to resemble the holding pens beneath the old Coliseum. Whenever there's a fight in the arcology, screens in each cell helpfully keep inmates informed of what awaits (otherwise) useless slaves.
<<case "Aztec Revivalist">>
	is designed to frighten the prisoners to submission. All the cells look to the center of the facility, where a sacrificial altar stands, adorned with ceremonial <<if $arcologies[0].FSPaternalist != "unset">>ropes and penetrators<<else>>knives, ropes and blunt instruments<</if>>.
<<case "Egyptian Revivalist">>
	uses the climate of Egypt as an additional source of discomfort. The air here is hot and dry, and inmates can easily imagine themselves confined in mud brick cells in a baking desert.
<<case "Edo Revivalist">>
	is furnished in a severely medieval Japanese style. There is one refinement, but it's of exquisite cruelty. At the end of the hall, there's a fountain with a traditional bamboo boar scarer. As it fills with water, it tips against a stone with a thunk... thunk... thunk... thunk...
<<case "Arabian Revivalist">>
	is furnished as imagined Arabian slave pens, all set around a central pillar. This pillar is capped by shackles, so that slaves can be bound by their hands and whipped on the backs, buttocks, and thighs in clear view of all their fellow chattel.
<<case "Chinese Revivalist">>
	is furnished in a severely medieval Chinese style. There is one refinement, but it's of exquisite cruelty. Somewhere out of sight, water is dripping into an urn, drop by drop... drop... drop... drop...
<<case "Chattel Religionist">>
	is built of cold stone. Most of the cells are unfurnished little cubes inside which the only bed is the bare floor. A few are smaller still, so that the inmates can neither stand nor lie flat.
<<case "Degradationist">>
	is a nightmare. Everything is made of metal, and almost everything menaces with spikes of steel. Inmates must carefully avoid the walls of their own cells if they wish to avoid being stabbed.
<<case "Asset Expansionist">>
	is a straightforward prison, with one exception. Each cell features a screen displaying plans for its inmate's expansion. Day and night, inmates are confronted with the sight of themselves transformed.
<<case "Transformation Fetishist">>
	is a straightforward prison, with one exception. Each cell features a screen displaying plans for its inmate's expansion. Day and night, inmates are confronted with the sight of themselves transformed.
<<case "Gender Radicalist">>
	is a straightforward prison, with one exception. Each cell features a screen displaying plans for its inmate's bimbofication. Day and night, inmates are confronted with the sight of themselves dyed, pierced, tattooed, gaped, filled with implants, or all of these.
<<case "Gender Fundamentalist">>
	is a block of barred cells whose sides, offering a clear view of the whole prison, provide much menace. Anyone who abuses an inmate does so in full view of every other slave here, keeping the jailbirds in a state of constant fear that they're next.
<<case "Physical Idealist">>
	is a block of barred cells whose sides, offering a clear view of the whole prison, provide much menace. Anyone who rapes an inmate does so in full view of every other slave here, keeping the bitches in a state of constant fear that their asses are next.
<<case "Supremacist">>
	is a straightforward prison whose menace is provided by context that, although subtle, adds up to a nightmare. Everyone outside the cells is $arcologies[0].FSSupremacistRace, and everyone inside them is not. The darkness of history is palpable here.
<<case "Subjugationist">>
	is a straightforward prison whose menace is provided by context that, although subtle, adds up to a nightmare. The inmates inside the cells are $arcologies[0].FSSubjugationistRace, and everyone outside them is not. The darkness of history is palpable here.
<<case "Repopulation Focus">>
	is a straightforward prison, with two exceptions. One cell style features a screen displaying plans for its inmate's impregnation, the other is covered with mirrors for its inmate to watch her pregnancy grow. Day and night, inmates are confronted with the sight of themselves transformed.
<<case "Eugenics">>
	is designed to make very clear to its inmates that they are subhuman. Many screens showcasing their inadequacy intermingled with propaganda play on nonstop loops.
<<case "Paternalist">>
	is a prison, but a modern and scientific one. The cells, the common areas, and even the color of the walls are all carefully designed to communicate the feeling that inmates can better themselves.
<<case "Pastoralist">>
	requires its inmates to drink as much breast milk as they can hold. This sounds like a small thing, but for an unbroken slave, conquering the revulsion of drinking another girl's milk is an important step.
<<case "Maturity Preferentialist">>
	is subtly designed to make very clear to its inmates that they are sex objects. Many screens showing pornography make it clear to the maturest girl here that she's still an object of lust, and will be used to slake others' pleasure.
<<case "Youth Preferentialist">>
	is subtly designed to make the breadth of sex acts performed in the arcology clear to its inmates. A cacophony of pornography makes clear to the most innocent inmate that her pussy is a fuck hole, her mouth is a fuck hole, her anus is a fuck hole, and, in fact, all three can be fuck holes at once.
<<case "Body Purist">>
	requires its inmates to drink as much filtered water as they can, all the time. This sounds like a petty thing, but most inmates are very aware that they're being flushed out. Cleaned. It is an oddly menacing thought.
<<case "Slimness Enthusiast">>
	is torture for chubby slaves. Fat bitches that pass through here soon learn that they're going to be slim and pretty one day, but that it isn't going to be much fun getting there.
<<case "Hedonistic">>
	is torture for thin slaves. The first thing they notice is the heavily reinforced cot they will reside upon. The second is the feeding tube that will be anchored in their stomach for the duration of their stay. Slaves imprisoned here will have their body stuffed to capacity with concentrated slave food, ensuring a plump, docile slave by the end of their sentence.
<<default>>
	could be mistaken for a modern prison. A close inspection, however, reveals restraints in each cell that will hold inmates in sexually compromising positions, and compliance systems to force them to place their wrists and ankles in them.
<</switch>>

<<if $cellblockSlaves > 2>>
	$cellblockNameCaps is full of slaves, though it's difficult to tell at first. In many of the cells, a scene of loneliness and misery may be witnessed, but not one sound escapes them in fear of the punishment that would follow.
<<elseif $cellblockSlaves > 0>>
	$cellblockNameCaps holds a few slaves, though it's difficult to tell at first. In several of the cells, a scene of loneliness and misery may be witnessed, but not one sound escapes them in fear of the punishment that would follow.
<<elseif $Wardeness != 0>>
	$Wardeness.slaveName is alone in the cellblock, and seems rather lonely without anyone to oppress.
<<else>>
	None of your slaves are confined in the cellblock. [[Decommission the cellblock|Main][$cellblock = 0, $cellblockDecoration = "standard", $cellblockUpgrade = 0]]
<</if>>

<<if $cellblockSlaves > 0>>
	<<if $Wardeness != 0>><<set _X = 1>><<else>><<set _X = 0>><</if>>
	<<set _NewPop = $cellblockSlaves+$dormitoryPopulation+_X>>
	<<link "Remove all slaves" "Cellblock">>
		<<if $Wardeness != 0>>
			<<= assignJob($Wardeness, "rest")>>
		<</if>>
		<<for $cellblockSlaves > 0>>
			<<= assignJob($slaves[$slaveIndices[$CellBiIDs[0]]], "stay confined")>>
		<</for>>
	<</link>>
	<<if _NewPop > $dormitory>>
		@@.red;Dormitory capacity will be exceeded.@@
	<</if>>
<</if>>

<<set _Tmult0 = Math.trunc($cellblock*1000*$upgradeMultiplierArcology)>>

$cellblockNameCaps has room for $cellblock slaves to be kept in close confinement. Currently $cellblockSlaves <<if $cellblockSlaves == 1>>is<<else>>are<</if>> kept in close confinement.
[[Expand the cellblock|Cellblock][cashX(forceNeg(_Tmult0), "capEx"), $cellblock += 5, $PC.engineering += .1]] //Costs <<print cashFormat(_Tmult0)>>//

<<if $cellblockUpgrade == 1>>
	Its compliance systems have been upgraded to allow slaves no mental respite, painstakingly correcting the tiniest misbehaviors to soften flaws into quirks at the cost of considerable anguish to inmates denied any rest from correction.
<<else>>
	<<set _Tmult1 = Math.trunc(20000*$upgradeMultiplierArcology)>>
	Its compliance systems are standard. [[Upgrade them to soften slave flaws|Cellblock][cashX(forceNeg(_Tmult1), "capEx"), $cellblockUpgrade = 1]] //Costs <<print cashFormat(_Tmult1)>>//
<</if>>

<<if $Wardeness != 0 && canPenetrate($Warden)>>
<<setLocalPronouns $Wardeness>>

	<<if $cellblockWardenCumsInside == 1>>
		$Warden.slaveName is permitted to cum inside $his inmates when $he disciplines them.
		<<link "Forbid $him from cumming inside" "Cellblock">><<set $cellblockWardenCumsInside = 0>><</link>>
	<<else>>
		$Warden.slaveName is not permitted to cum inside $his inmates.
		<<link "Let $him cum inside" "Cellblock">><<set $cellblockWardenCumsInside = 1>><</link>> //May result in pregnancies//
	<</if>>
<</if>>

<<if $Wardeness != 0>>
	<<set $Flag = 2>>
	<<include "Slave Summary">>
<<else>>
	You do not have a slave serving as a Wardeness. [[Appoint one|Wardeness Select]]
<</if>>

<<if ($cellblock <= $cellblockSlaves)>>
	''$cellblockNameCaps is full and cannot hold any more slaves''
<<elseif ($slaves.length > $cellblockSlaves)>>
	<<link "''Send a resistant slave to be broken in $cellblockName''">>
		<<replace #ComingGoing>>
			<<resetAssignmentFilter>>
			<<set $Flag = 0>>
			<<include "Slave Summary">>
		<</replace>>
	<</link>>
<</if>>

<<if $cellblockSlaves > 0>>
	| <<link "''Let a slave out of $cellblockName''">>
		<<replace #ComingGoing>>
			<<cellblockAssignmentFilter>>
			<<set $Flag = 1>>
			<<include "Slave Summary">>
			<<resetAssignmentFilter>>
		<</replace>>
	<</link>>
<<else>>

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

<<assignmentFilter>>

	<<cellblockAssignmentFilter>>
	<<set $Flag = 1>>
	<<include "Slave Summary">>
	<<resetAssignmentFilter>>

Rename $cellblockName: <<textbox "$cellblockName" $cellblockName "Cellblock">> //Use a noun or similar short phrase//


code:
:: Cellblock Report [nobr]

<<SlaveSort $CellBiIDs>>
<<set _DL = $CellBiIDs.length, $cellblockSlaves = _DL, _SL = $slaves.length, _brokenSlaves = 0, _idleBonus = 0, _softenedQuirks = 0, _trustMalus = 0, _FLsFetish = 0>>

<<if $cellblockDecoration != "standard">>
	<<set _devBonus = 1>>
<<else>>
	<<set _devBonus = 0>>
<</if>>

<<if ($Wardeness != 0)>>
	<<set _FLs = $slaveIndices[$Wardeness.ID]>>
	<<setLocalPronouns $Wardeness>>

	<<if ($slaves[_FLs].health < -80)>>
		<<set $slaves[_FLs].health += 20>>
	<<elseif ($slaves[_FLs].health < -40)>>
		<<set $slaves[_FLs].health += 15>>
	<<elseif ($slaves[_FLs].health < 0)>>
		<<set $slaves[_FLs].health += 10>>
	<<elseif ($slaves[_FLs].health < 90)>>
		<<set $slaves[_FLs].health += 7>>
	<</if>>
	<<if ($slaves[_FLs].devotion <= 60)>>
		<<set $slaves[_FLs].devotion += 2>>
	<</if>>
	<<set $slaves[_FLs].devotion += _devBonus>>
	<<if $slaves[_FLs].trust < 60>>
		<<set $slaves[_FLs].trust += 3>>
	<</if>>
	<<if ($slaves[_FLs].livingRules != "luxurious")>>
		<<set $slaves[_FLs].livingRules = "luxurious">>
	<</if>>
	<<if $slaves[_FLs].fetishStrength <= 95>>
		<<if $slaves[_FLs].fetish != "sadist">>
			<<if fetishChangeChance($slaves[_FLs]) > random(0,100)>>
				<<set _FLsFetish = 1, $slaves[_FLs].fetishKnown = 1, $slaves[_FLs].fetish = "sadist">>
			<</if>>
		<<elseif $slaves[_FLs].fetishKnown == 0>>
			<<set _FLsFetish = 1, $slaves[_FLs].fetishKnown = 1>>
		<<else>>
			<<set _FLsFetish = 2, $slaves[_FLs].fetishStrength += 4>>
		<</if>>
	<</if>>
	<<set $Wardeness = $slaves[_FLs]>>
	<<if ($Wardeness.energy > 95) || ($Wardeness.fetish == "sadist")>>
		<<set _devBonus++, _trustMalus++, _idleBonus++>>
	<</if>>
	    <<= SlaveFullName($Wardeness)>> is serving as the Wardeness.
	<<if $Wardeness.relationship == -3 && $Wardeness.devotion > 50>>
		<<set _devBonus++, _trustMalus++, _idleBonus++>>
		As your wife, $he tries $his best to break the disobedient slaves to your will.
	<</if>>
	<<if (_FLsFetish == 1)>>
		One day $he demands obedience. The next day $he strikes a slave when it isn't given. The next, $he seems more excited than embarrassed when beating a prisoner. Soon, $he's looking for an excuse to punish. $He's @@.pink;become more of a sadist.@@
	<<elseif (_FLsFetish == 2)>>
		Being not only allowed but encouraged to get off while punishing prisoners @@.lightsalmon;deepens $his sadism.@@
	<</if>>
	<<if setup.wardenessCareers.includes($Wardeness.career)>>
		<<set _devBonus++, _trustMalus++, _idleBonus++>>
		$He has experience with detecting security issues and grinding down potential miscreants from $his life before $he was a slave, making $him more effective.
	<<elseif $Wardeness.skillWA >= $masteredXP>>
		<<set _devBonus++, _trustMalus++, _idleBonus++>>
		$He has experience with detecting security issues and grinding down potential miscreants from working for you, making $him more effective.
	<<else>>
		<<set $slaves[_FLs].skillWA += random(1,Math.ceil(($Wardeness.intelligence+$Wardeness.intelligenceImplant)/15) + 8)>>
	<</if>>
	<<if $Wardeness.fetish == "sadist">>
		$He uses the prisoners to gratify $his sadism, terrifying them and quickly breaking their resistance.
	<<elseif $Wardeness.energy > 95>>
		$He is so sexually depraved that $he constantly molests the prisoners, breaking them to a life of servitude.
	<</if>>
	<<if $Wardeness.sexualFlaw == "malicious">>
		<<set _devBonus++, _trustMalus += 2, _idleBonus += 2>>
		Sexual abuse of prisoners has become an end for $him, not a means. $He inspires $his prisoners to do everything possible to qualify to get away from $him, even as $he slowly grinds away their interest in sex to do it.
	<</if>>
	<<if ($Wardeness.dick > 2) && (canPenetrate($Wardeness))>>
		<<set _devBonus++, _trustMalus++, _idleBonus++>>
		$His molestation of the prisoners is more varied and effective because $he has a dick to fuck them with.
	<</if>>
	<<if ($Wardeness.muscles > 35)>>
		<<set _devBonus++, _trustMalus++, _idleBonus++>>
		$He is strong enough to restrain anyone that tries anything with $his own hands.
	<</if>>
	<<if ($Wardeness.devotion > 95)>>
		<<set _devBonus++, _trustMalus++, _idleBonus++>>
		$His devotion to you is so absolute that $he sees breaking bitches for your service as a noble calling.
	<</if>>
	<<for _dI = 0; _dI < _DL; _dI++>>
		<<set $i = $slaveIndices[$CellBiIDs[_dI]]>>
		<<if $Wardeness.rivalryTarget == $slaves[$i].ID>>
			$He greatly enjoys breaking $his <<print rivalryTerm($Wardeness)>>, $slaves[$i].slaveName's will.
			<<set $slaves[$i].devotion++, $slaves[$i].trust -= 3>>
			<<if random(1,100) > 30>>
				<<set $Wardeness.rivalry++, $slaves[_FLs].rivalry++, $slaves[$i].rivalry++>>
			<</if>>
		<<elseif $Wardeness.relationshipTarget == $slaves[$i].ID>>
			$He hates having to break $his <<print relationshipTerm($Wardeness)>>, $slaves[$i].slaveName, but $his devotion to you wins out in the end.
			<<set $slaves[$i].devotion++, $slaves[$i].trust -= 3>>
			<<if random(1,100) >= 50>>
				$His and $slaves[$i].slaveName's relationship has been shattered by these events.
				<<set $Wardeness.relationship = 0, $Wardeness.relationshipTarget = 0, $slaves[_FLs].relationship = 0, $slaves[_FLs].relationshipTarget = 0, $slaves[$i].relationship = 0, $slaves[$i].relationshipTarget = 0>>
			<</if>>
		<<elseif $familyTesting == 1 && areRelated($Wardeness, $slaves[$i])>>
			<<setLocalPronouns $slaves[$i] 2>>
			$He shows $his <<print relativeTerm($Wardeness.ID,$slaves[$i].ID)>> $slaves[$i].slaveName no mercy, making sure _he2 understands _his2 place.
			<<set $slaves[$i].devotion++, $slaves[$i].trust-->>
		<<elseif $Wardeness.relationTarget == $slaves[$i].ID && $familyTesting == 0>>
			<<setLocalPronouns $slaves[$i] 2>>
			$He shows $his $slaves[$i].relation $slaves[$i].slaveName no mercy, making sure _he2 understands _his2 place.
			<<set $slaves[$i].devotion++, $slaves[$i].trust-->>
		<</if>>
	<</for>>
	<<if (_DL < $cellblock)>>
		<<set _seed = random(1,10)+(($cellblock-_DL)*(random(150,170)+(_idleBonus*10)))>>
		<<run cashX(_seed, "cellblock", $Wardeness)>>

    Since $he doesn't have enough prisoners to manage to keep $him busy, $he works on citizens' slaves, earning @@.yellowgreen;<<print cashFormat(_seed)>>.@@
	<</if>>
	<<if (_DL > 0)>>

<</if>>
<</if>>

<<if (_DL > 0)>>
	    <<if (_DL == 1)>>''One slave is being confined in $cellblockName until they are willing to obey.''<<else>>''_DL slaves are being confined in $cellblockName until they are willing to obey.''<</if>>
<</if>>

<<if ($Wardeness != 0)>>
	<<set $i = _FLs>> /* apply following SA passages to facility leader */
	<<if $showEWD != 0>>

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

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

		<</if>>
		/* 000-250-006 */
		''__@@.pink;<<= SlaveFullName($slaves[$i])>>@@__'' is serving as the Wardeness in $cellblockName.

		<<= saChoosesOwnClothes($slaves[$i])>>
		<<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>>
		<<set _chosenClothes = saChoosesOwnClothes($slaves[$i])>>
		<<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>>
	<<set $Wardeness = $slaves[_FLs]>>
<</if>>

<<for _dI = 0; _dI < _DL; _dI++>>
	<<set $i = $slaveIndices[$CellBiIDs[_dI]]>>
	<<setLocalPronouns $slaves[$i]>>
	<<if ($slaves[$i].devotion <= 20)>>
		<<if ($slaves[$i].trust >= -20)>>
			<<if (($slaves[$i].hears == -1 && $slaves[$i].earwear != "hearing aids") || ($slaves[$i].hears == 0 && $slaves[$i].earwear == "muffling ear plugs") ||($slaves[$i].hears == -2))>>
				<<set $slaves[$i].devotion -= 2, $slaves[$i].trust -= 2>>
			<<else>>
				<<set $slaves[$i].devotion -= 4, $slaves[$i].trust -= 4>>
			<</if>>
		<<else>>
			<<set $slaves[$i].devotion++>>
		<</if>>
	<</if>>
	<<switch $cellblockDecoration>>
	<<case "Paternalist">>
		<<set $slaves[$i].livingRules = "normal">>
		<<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>>
	<<case "Pastoralist">>
		<<set $slaves[$i].livingRules = "spare">>
		<<if $slaves[$i].inflation == 0>>
			<<if $slaves[$i].pregKnown == 0 && $slaves[$i].bellyImplant < 1500>>
				<<set $slaves[$i].inflation = 2, $slaves[$i].inflationType = "milk", $slaves[$i].inflationMethod = 1>>
			<<else>>
				<<set $slaves[$i].inflation = 1, $slaves[$i].inflationType = "milk", $slaves[$i].inflationMethod = 1>>
			<</if>>
			<<run SetBellySize($slaves[$i])>>
		<</if>>
	<<case "Hedonistic">>
		<<set $slaves[$i].livingRules = "spare">>
		<<if $slaves[$i].weight < 200>>
			<<set $slaves[$i].weight += 3>>
		<</if>>
		<<if $slaves[$i].muscles > -100>>
			<<set $slaves[$i].muscles -= 2>>
		<</if>>
		<<if $slaves[$i].inflation == 0>>
			<<if $slaves[$i].pregKnown == 0 && $slaves[$i].bellyImplant < 1500>>
				<<set $slaves[$i].inflation = 3, $slaves[$i].inflationType = "food", $slaves[$i].inflationMethod = 1>>
			<<else>>
				<<set $slaves[$i].inflation = 1, $slaves[$i].inflationType = "food", $slaves[$i].inflationMethod = 1>>
			<</if>>
			<<run SetBellySize($slaves[$i])>>
		<</if>>
	<<default>>
		<<set $slaves[$i].livingRules = "spare">>
		<<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>>
	<</switch>>
	<<if $cellblockUpgrade == 1>>
		<<if ($slaves[$i].behavioralFlaw != "none") && ($slaves[$i].behavioralQuirk == "none")>>
			<<run SoftenBehavioralFlaw($slaves[$i])>>
			<<set $slaves[$i].devotion -= 10, _softenedQuirks++>>
		<<elseif ($slaves[$i].sexualFlaw != "none") && ($slaves[$i].sexualQuirk == "none")>>
			<<run SoftenSexualFlaw($slaves[$i])>>
			<<set $slaves[$i].devotion -= 10, _softenedQuirks++>>
		<</if>>
	<</if>>
	<<set $slaves[$i].devotion += _devBonus, $slaves[$i].trust -= _trustMalus>>
	<<if ($Wardeness != 0) && ($Wardeness.sexualFlaw == "malicious") && ($slaves[$i].energy >= 2)>>
		<<set $slaves[$i].energy -= 2>>
	<</if>>
	<<if ($slaves[$i].health < -80)>>
		<<set $slaves[$i].health += 20>>
	<<elseif ($slaves[$i].health < -40)>>
		<<set $slaves[$i].health += 15>>
	<<elseif ($slaves[$i].health < 0)>>
		<<set $slaves[$i].health += 10>>
	<<elseif ($slaves[$i].health < 40)>>
		<<set $slaves[$i].health += 7>>
	<<elseif ($slaves[$i].health < 100)>>
		<<set $slaves[$i].health += 3>>
	<</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 $cellblockName.
		<</if>>

    $He <<= saStayConfined($slaves[$i])>>

		<<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 chooses own job">>
		<<set _dump = saStayConfined($slaves[$i])>>
		<<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 (_softenedQuirks) || (_brokenSlaves)>>

	<<if (_softenedQuirks > 0)>>
		$cellblockNameCaps's advanced compliance systems successfully softened
		<<if (_softenedQuirks == 1)>>
			one slave's mental flaw into an @@.green;appealing quirk,@@ though the constant correction caused them @@.mediumorchid;considerable anguish.@@
		<<else>>
			_softenedQuirks slaves' mental flaws into @@.green;appealing quirks,@@ though the constant correction caused them @@.mediumorchid;considerable anguish.@@
		<</if>>
	<</if>>
	<<if (_brokenSlaves > 0)>>
		<<if (_brokenSlaves == 1)>>
			One slave is now willing to @@.hotpink;do as they're told@@ and has been released.
		<<else>>
			_brokenSlaves slaves are now willing to @@.hotpink;do as they're told@@ and have been released.
		<</if>>
		<<if $cellblockDecoration != "standard">>

    $cellblockNameCaps's $cellblockDecoration atmosphere @@.hotpink;had an impact on them while they were@@ imprisoned.
		<</if>>
	<</if>>
<</if>>
<<if _DL > 0 || $Wardeness != 0>>

<</if>>

repo_name: oxone/fc


code:
:: Change Language [nobr]

<<set $nextButton = "Confirm changes", $nextLink = "Manage Arcology">>

<<set $revivalistLanguage = 0>>
<<if $arcologies[0].FSRomanRevivalist != "unset">>
	<<if $language != "Latin">>
	<<set $revivalistLanguage = "Latin">>
	<</if>>
<<elseif $arcologies[0].FSAztecRevivalist != "unset">>
	<<if $language != "Nahuatl">>
	<<set $revivalistLanguage = "Nahuatl">>
	<</if>>
<<elseif $arcologies[0].FSEgyptianRevivalist != "unset">>
	<<if $language != "Ancient Egyptian">>
	<<set $revivalistLanguage = "Ancient Egyptian">>
	<</if>>
<<elseif $arcologies[0].FSEdoRevivalist != "unset">>
	<<if $language != "Japanese">>
	<<set $revivalistLanguage = "Japanese">>
	<</if>>
<<elseif $arcologies[0].FSArabianRevivalist != "unset">>
	<<if $language != "Arabic">>
	<<set $revivalistLanguage = "Arabic">>
	<</if>>
<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
	<<if $language != "Chinese">>
	<<set $revivalistLanguage = "Chinese">>
	<</if>>
<</if>>

The lingua franca of the arcology is ''$language''.

//Changing the lingua franca of the arcology is a difficult process. Doing so will slightly reduce the arcology's prosperity due to the difficulty changing languages will impose on businesses. It will also cost <<print cashFormat(500)>> for each mentally competent slave you own, since it will be necessary to build time into their schedules for them to learn basic commands in the new language. Slaves' starting fluency in the new language will depend on their intelligence, nationality, education, and in some cases, ethnicity. Previous linguistic experience will not be saved, meaning that repeated language changes will wipe out slaves' previous language skills.//

Select a custom language to be applied: <<textbox "$seed" $seed "Change Language">> //A single capitalized word is recommended.//

<<if $language != "English">>

<<link "English">>
	<<replace "#result">>
	<<set $language = "English">>
	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
	<<for _cl = 0; _cl < $slaves.length; _cl++>>
		<<if $slaves[_cl].fetish != "mindbroken">>
			<<run nationalityToAccent($slaves[_cl])>>
			<<if ($slaves[_cl].accent >= 3)>>
				<<if ($slaves[_cl].intelligence+$slaves[_cl].intelligenceImplant+100) > random(0,100)>>
					<<set $slaves[_cl].accent -= 1>>
				<</if>>
			<</if>>
			<<run cashX(-500, "capEx")>>
		<</if>>
	<</for>>

//Language changed.//
	<</replace>>
	<</link>>
<</if>>
<<if $language != "Spanish">>

<<link "Spanish">>
	<<replace "#result">>
	<<set $language = "Spanish">>
	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
	<<for _cl = 0; _cl < $slaves.length; _cl++>>
		<<if $slaves[_cl].fetish != "mindbroken">>
			<<run nationalityToAccent($slaves[_cl])>>
			<<if ($slaves[_cl].accent >= 3)>>
				<<if ($slaves[_cl].intelligence+$slaves[_cl].intelligenceImplant+100) > random(0,100)>>
					<<set $slaves[_cl].accent -= 1>>
				<</if>>
			<</if>>
			<<run cashX(-500, "capEx")>>
		<</if>>
	<</for>>

//Language changed.//
	<</replace>>
	<</link>>
<</if>>
<<if $language != "Portuguese">>

<<link "Portuguese">>
	<<replace "#result">>
	<<set $language = "Portuguese">>
	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
	<<for _cl = 0; _cl < $slaves.length; _cl++>>
		<<if $slaves[_cl].fetish != "mindbroken">>
			<<run nationalityToAccent($slaves[_cl])>>
			<<if ($slaves[_cl].accent >= 3)>>
				<<if ($slaves[_cl].intelligence+$slaves[_cl].intelligenceImplant+100) > random(0,100)>>
					<<set $slaves[_cl].accent -= 1>>
				<</if>>
			<</if>>
			<<run cashX(-500, "capEx")>>
		<</if>>
	<</for>>

//Language changed.//
	<</replace>>
	<</link>>
<</if>>
<<if $language != "Arabic">>

<<link "Arabic">>
	<<replace "#result">>
	<<set $language = "Arabic">>
	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
	<<for _cl = 0; _cl < $slaves.length; _cl++>>
		<<if $slaves[_cl].fetish != "mindbroken">>
			<<run nationalityToAccent($slaves[_cl])>>
			<<if ($slaves[_cl].accent >= 3)>>
				<<if ($slaves[_cl].intelligence+$slaves[_cl].intelligenceImplant+100) > random(0,100)>>
					<<set $slaves[_cl].accent -= 1>>
				<</if>>
			<</if>>
			<<run cashX(-500, "capEx")>>
		<</if>>
	<</for>>

//Language changed.//
	<</replace>>
	<</link>>
<</if>>
<<if $language != "Chinese">>

<<link "Chinese">>
	<<replace "#result">>
	<<set $language = "Chinese">>
	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
	<<for _cl = 0; _cl < $slaves.length; _cl++>>
		<<if $slaves[_cl].fetish != "mindbroken">>
			<<run nationalityToAccent($slaves[_cl])>>
			<<if ($slaves[_cl].accent >= 3)>>
				<<if ($slaves[_cl].intelligence+$slaves[_cl].intelligenceImplant+100) > random(0,100)>>
					<<set $slaves[_cl].accent -= 1>>
				<</if>>
			<</if>>
			<<run cashX(-500, "capEx")>>
		<</if>>
	<</for>>

//Language changed.//
	<</replace>>
	<</link>>
<</if>>
<<if $language != $seed>>

<<link "Apply custom language">>
	<<replace "#result">>
	<<set $language = $seed>>
	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
	<<for _cl = 0; _cl < $slaves.length; _cl++>>
		<<if $slaves[_cl].fetish != "mindbroken">>
			<<run nationalityToAccent($slaves[_cl])>>
			<<if ($slaves[_cl].accent >= 3)>>
				<<if ($slaves[_cl].intelligence+$slaves[_cl].intelligenceImplant+100) > random(0,100)>>
					<<set $slaves[_cl].accent -= 1>>
				<</if>>
			<</if>>
			<<run cashX(-500, "capEx")>>
		<</if>>
	<</for>>

//Language changed.//
	<</replace>>
	<</link>>
<</if>>
<<if $revivalistLanguage != 0>>

<<link "Match language to Revivalist future society">>
	<<replace "#result">>
	<<set $language = $revivalistLanguage>>
	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
	<<for _cl = 0; _cl < $slaves.length; _cl++>>
		<<if $slaves[_cl].fetish != "mindbroken">>
			<<run nationalityToAccent($slaves[_cl])>>
			<<if ($slaves[_cl].accent >= 3)>>
				<<if ($slaves[_cl].intelligence+$slaves[_cl].intelligenceImplant+100) > random(0,100)>>
					<<set $slaves[_cl].accent -= 1>>
				<</if>>
			<</if>>
			<<run cashX(-500, "capEx")>>
		<</if>>
	<</for>>

//Language changed.//
	<</replace>>
	<</link>> //Failing to take this step will retard adoption of Revivalism//
<</if>>


code:
:: Clinic [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $returnTo = "Clinic", $showEncyclopedia = 1, $encyclopedia = "Clinic", $clinicSlaves = $CliniciIDs.length>>

<<if $clinicName != "the Clinic">>
	<<set $clinicNameCaps = $clinicName.replace("the ", "The ")>>
<</if>>
<<clinicAssignmentFilter>>
$clinicNameCaps
<<switch $clinicDecoration>>
<<case "Roman Revivalist">>
	is open and airy; a breeze wafts through the space, and Roman theories on natural cleanliness are very much on display.
<<case "Aztec Revivalist">>
	is open and airy; a light hint of herbs and natural oil permeates the air. Everything is incredibly sterile, especially the blood management equipment.
<<case "Egyptian Revivalist">>
	is open and airy; clean rushes are strewn across the floor, making a gentle susurration when anyone crosses the space.
<<case "Edo Revivalist">>
	is clean and spartan to the point of featurelessness. Spotless tatami mats cover the floor, and partitions divide the space into cubicles.
<<case "Arabian Revivalist">>
	is open and airy; a thin trail of smoke wafts through the space on a gentle breeze, coming from a brazier burning incense.
<<case "Chinese Revivalist">>
	is open and airy; a thin trail of smoke wafts through the space on a gentle breeze, coming from a brazier burning medicinal herbs.
<<case "Chattel Religionist">>
	is open and airy; shaded beams of sunlight shine through skylights to bathe each bed in a pool of healing warmth.
<<case "Degradationist">>
	is clean and cold, all scrubbed tile and cool steel. The beds have prominent restraint attachment points to force patients into any position desired.
<<case "Repopulation Focus">>
	is warm and inviting, with wide corridors and ample seating for its pregnant clientele. All the equipment is designed to accommodate heavily pregnant women.
<<case "Eugenics">>
	is warm and inviting on one side, cold and utilitarian on the other. Only the toys of the elite are allowed the best of care.
<<case "Asset Expansionist">>
	is utilitarian, without any concession to style. Every available <<if $showInches == 2>>inch<<else>>centimeter<</if>> of space is used for equipment specialized to support growth.
<<case "Transformation Fetishist">>
	is utilitarian, without any concession to style. Every available <<if $showInches == 2>>inch<<else>>centimeter<</if>> of space is used for equipment specialized to support radical surgery.
<<case "Gender Radicalist">>
	is comfortable and feminine. Its curving walls and soft colors are designed to present slaves coming out of anesthesia with an impression of girlishness.
<<case "Gender Fundamentalist">>
	is comfortable and feminine. Its curving walls and soft colors are designed to keep slaves here for their female health nice and comfortable.
<<case "Physical Idealist">>
	is utilitarian, without any concession to style. Every available <<if $showInches == 2>>inch<<else>>centimeter<</if>> of space is used for some piece of equipment useful in making the human body faster or stronger.
<<case "Supremacist">>
	is clean and cold, all scrubbed tile and cool steel. The only hint of its radical uses are the pseudoscientific racialist charts on the walls.
<<case "Subjugationist">>
	is clean and cold, all scrubbed tile and cool steel. The only hint of its radical uses are the pseudoscientific racialist charts on the walls.
<<case "Paternalist">>
	is warm and inviting, with curved walls and warm colors designed to put patients at their ease. Each bed is well provided with entertainment options.
<<case "Pastoralist">>
	is utilitarian, without any concession to style. Every available <<if $showInches == 2>>inch<<else>>centimeter<</if>> of space is used for equipment specialized for human veterinary medicine.
<<case "Maturity Preferentialist">>
	is comfortable and soothing, with curved walls and cool colors designed to keep patients relaxed. Each bed is provided with refined yet invariably pornographic entertainment options.
<<case "Youth Preferentialist">>
	is bright and cheerful, with curved walls and pastel colors designed to keep patients in good spirits. Each bed is provided with light entertainment options.
<<case "Body Purist">>
	is utilitarian, without any concession to style. Every available <<if $showInches == 2>>inch<<else>>centimeter<</if>> of space is filled with equipment designed to make medicine as low-impact as possible.
<<case "Slimness Enthusiast">>
	is warm and inviting, with curved walls and warm colors designed to put patients at their ease. Each bed is well provided with entertainment options.
<<case "Hedonistic">>
	is warm and comfortable, with extra wide, soft, heated beds and ample morphine. Pleasant smells are pumped into the recovery wards, plenty of entertainment is available and chubby nurse in a too small dress with a big bowl of slave food is only a button press away. It can be quite difficult to convince patients to leave.
<<default>>
	is a well-equipped modern medical facility. Each patient has her own area, with heavy automation to provide her treatment without any human intervention at all.
<</switch>>

<<if $clinicSlaves > 2>>
	$clinicNameCaps is busy. Patients occupy many of the beds; most are alert, but a few are dozing under medication designed to promote healing through deep rest.
<<elseif $clinicSlaves > 0>>
	$clinicNameCaps is sparsely populated. Patients occupy a few of the beds; most are alert, but a few are dozing under medication designed to promote healing through deep rest.
<<elseif $Nurse != 0>>
	$Nurse.slaveName is alone in the clinic, and has nothing to do but keep the place spotlessly clean and ready for its next patients.
<<else>>
	$clinicNameCaps is empty and quiet. [[Decommission the Clinic|Main][$clinic = 0, $clinicDecoration = "standard", $clinicUpgradeScanner = 0, $clinicUpgradeFilters = 0, $clinicUpgradePurge = 0, $clinicInflateBelly = 0, $clinicSpeedGestation = 0]]
<</if>>

<<if $clinicSlaves > 0>>
	<<if $Nurse != 0>><<set _X = 1>><<else>><<set _X = 0>><</if>>
	<<set _NewPop = $clinicSlaves+$dormitoryPopulation+_X>>
	<<link "Remove all slaves" "Clinic">>
		<<if $Nurse != 0>>
			<<= assignJob($Nurse, "rest")>>
		<</if>>
		<<for $clinicSlaves > 0>>
			<<= assignJob($slaves[$slaveIndices[$CliniciIDs[0]]], "rest")>>
		<</for>>
	<</link>>
	<<if _NewPop > $dormitory>>
		@@.red;Dormitory capacity will be exceeded.@@
	<</if>>
<</if>>

<<set _Tmult0 = Math.trunc($clinic*1000*$upgradeMultiplierArcology)>>

$clinicNameCaps has room to support $clinic slaves while they receive treatment. Currently $clinicSlaves slave<<if $clinicSlaves == 1>> is<<else>>s are<</if>> receiving treatment.
[[Expand the clinic|Clinic][cashX(forceNeg(_Tmult0), "capEx"), $clinic += 5, $PC.engineering += .1]] //Costs <<print cashFormat(_Tmult0)>>//

<<if $clinicUpgradeScanner == 1>>
	$clinicNameCaps's scanners have been upgraded with a sampling system that can estimate carcinogenic damage to a slave's body.
<<else>>
	<<set _Tmult1 = Math.trunc(10000*$upgradeMultiplierArcology)>>
	It mounts powerful medical scanning technology. [[Upgrade the scanners to help detect genomic damage|Clinic][cashX(forceNeg(_Tmult1), "capEx"), $clinicUpgradeScanner = 1]] //Costs <<print cashFormat(_Tmult1)>>//
<</if>>

<<if $clinicUpgradeFilters == 1>>
	<<if $clinicUpgradePurge == 1>>
		The entire floor beneath $clinicName is occupied by a huge filtration plant that constantly cycles out the patients' blood to remove impurities. The blood is intensely cleaned to greatly decrease the presence of impurities at the cost of compatibility. Patients will likely be ill for the duration of the treatment.
	<<else>>
		<<set _Tmult3 = Math.trunc(150000*$upgradeMultiplierArcology)>>
		The entire floor beneath $clinicName is occupied by a huge filtration plant that constantly cycles out the patients' blood to remove impurities. [[Increase the effectiveness of the impurity purging|Clinic][cashX(forceNeg(_Tmult3), "capEx"), $clinicUpgradePurge = 1]] //Costs <<print cashFormat(_Tmult3)>> and may cause health problems in slaves//
	<</if>>
	<<if $Nurse == 0>>

However, without a nurse in attendance, the @@.yellow;blood treatment equipment remains idle.@@
	<</if>>
<<else>>
	<<set _Tmult2 = Math.trunc(50000*$upgradeMultiplierArcology)>>
	It includes standard dialysis equipment. [[Install advanced blood treatment equipment to help address drug side effects|Clinic][cashX(forceNeg(_Tmult2), "capEx"), $clinicUpgradeFilters = 1]] //Costs <<print cashFormat(_Tmult2)>>//
<</if>>

<<if $bellyImplants == 1 && $Nurse == 0>>
	A resident nurse could be used to safely regulate the rate a slave's fillable belly implant for maximum size with minimum health loss.
<<elseif $bellyImplants == 1 && $clinicInflateBelly == 1>>
	$clinicNameCaps is useful for keeping slaves healthy during long term procedures. Slaves in $clinicName with inflatable belly implants will be filled during their time under $Nurse.slaveName's supervision to maximize growth with minimized health complications. [[Do not fill belly implants|Clinic][$clinicInflateBelly = 0]]
<<elseif $bellyImplants == 1 && $Nurse != 0 && $clinicInflateBelly != 1>>
	$clinicNameCaps is useful for keeping slaves healthy during long term procedures. $Nurse.slaveName can supervise weekly filling regiments for clinic slaves with fillable belly implants during their stay to maximize growth with minimal health complications. [[Fill belly implants|Clinic][$clinicInflateBelly = 1]]
<</if>>

<<if $pregSpeedControl == 1 && $Nurse == 0>>
	A resident nurse could be used to supervise patients under rapid gestation agents while minimizing strain and health complications.
<<elseif $pregSpeedControl == 1 && $clinicSpeedGestation == 1>>
	It's exceedingly dangerous to speed up gestation without constant supervision. In $clinicName, $Nurse.slaveName will monitor slaves on rapid gestation agents; making sure the growing patients' food demands are met, monitoring their skin and womb and, if need be, perform an emergency c-section should the need arise. [[Limit rapid gestation agents to selected slaves only|Clinic][$clinicSpeedGestation = 0]]
<<elseif $pregSpeedControl == 1 && $Nurse != 0 && $clinicSpeedGestation != 1>>
	$clinicNameCaps is currently not applying rapid gestation agents to pregnant patients. Only individually selected slaves will undergo this procedure [[Speed up gestation for all pregnant patients|Clinic][$clinicSpeedGestation = 1]]
<</if>>

<<if $Nurse != 0>>
	<<set $Flag = 2>>
	<<include "Slave Summary">>
<<else>>
	You do not have a slave serving as a clinical Nurse. [[Appoint one|Nurse Select]]
<</if>>

<<if ($clinic <= $clinicSlaves)>>
	''$clinicNameCaps is full and cannot hold any more slaves''
<<elseif ($slaves.length > $clinicSlaves)>>
	<<link "''Send a slave to get treatment in $clinicName''">>
		<<replace #ComingGoing>>
			<<resetAssignmentFilter>>
			<<set $Flag = 0>>
			<<include "Slave Summary">>
		<</replace>>
	<</link>>
<</if>>

<<if $clinicSlaves > 0>>
	| <<link "''Take a slave out of $clinicName''">>
		<<replace #ComingGoing>>
			<<clinicAssignmentFilter>>
			<<set $Flag = 1>>
			<<include "Slave Summary">>
			<<resetAssignmentFilter>>
		<</replace>>
	<</link>>
<<else>>

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

<<assignmentFilter>>

	<<clinicAssignmentFilter>>
	<<set $Flag = 1>>
	<<include "Slave Summary">>
	<<resetAssignmentFilter>>

Rename $clinicName: <<textbox "$clinicName" $clinicName "Clinic">> //Use a noun or similar short phrase//


code:
:: Clinic Report [nobr]

<<SlaveSort $CliniciIDs>>
<<set _DL = $CliniciIDs.length, $clinicSlaves = _DL, _SL = $slaves.length, _healthBonus = 0, _idleBonus = 0, _FLsFetish = 0, _restedSlaves = 0>>

<<if $clinicDecoration != "standard">>
	<<set _devBonus = 1>>
<<else>>
	<<set _devBonus = 0>>
<</if>>

<<if $Nurse != 0>>
	<<set _FLs = $slaveIndices[$Nurse.ID]>>

	<<if ($slaves[_FLs].health < 100)>>
		<<set $slaves[_FLs].health += 20>>
	<</if>>
	<<if ($slaves[_FLs].devotion <= 60)>>
		<<set $slaves[_FLs].devotion++>>
	<</if>>
	<<if $slaves[_FLs].trust < 60>>
		<<set $slaves[_FLs].trust++>>
	<</if>>

	<<if $slaves[_FLs].livingRules != "luxurious">>
		<<set $slaves[_FLs].livingRules = "luxurious">>
	<</if>>

	<<set $slaves[_FLs].devotion += _devBonus>>
	<<if $slaves[_FLs].fetishStrength <= 95>>
		<<if $slaves[_FLs].fetish != "dom">>
			<<if fetishChangeChance($slaves[_FLs]) > random(0,100)>>
				<<set _FLsFetish = 1, $slaves[_FLs].fetishKnown = 1, $slaves[_FLs].fetish = "dom">>
			<</if>>
		<<elseif $slaves[_FLs].fetishKnown == 0>>
			<<set _FLsFetish = 1, $slaves[_FLs].fetishKnown = 1>>
		<<else>>
			<<set _FLsFetish = 2, $slaves[_FLs].fetishStrength += 4>>
		<</if>>
	<</if>>
	<<set $Nurse = $slaves[_FLs]>>
	<<setLocalPronouns $Nurse>>
	    <<= SlaveFullName($Nurse)>> is serving as the clinical nurse.
	<<if $Nurse.relationship == -3 && $Nurse.devotion > 50>>
		$He does $his best to be a caring and nurturing wife.
		<<set _healthBonus += 2>>
	<</if>>
	<<if (_FLsFetish == 1)>>
		$His job involves giving naked sex slaves orders for their own good. Even though most of these commands are medical rather than sexual, $he can be forgiven for not always seeing the difference, and @@.lightsalmon;becomes more dominant.@@
	<<elseif (_FLsFetish == 2)>>
		Every new patient in the clinic is a new target for $his authority. @@.lightsalmon;$He becomes more dominant.@@
	<</if>>
	<<if setup.nurseCareers.includes($Nurse.career)>>
		$He has experience with medicine from $his life before $he was a slave, and can often recognize conditions before even the medical scanners can.
		<<set _idleBonus++, _healthBonus++>>
	<<elseif $Nurse.skillNU >= $masteredXP>>
		$He has experience with medicine from working for you, and can often recognize conditions before even the medical scanners can.
		<<set _idleBonus++, _healthBonus++>>
	<<else>>
		<<set $slaves[_FLs].skillNU += random(1,Math.ceil(($Nurse.intelligence+$Nurse.intelligenceImplant)/15) + 8)>>
	<</if>>
	<<if ($Nurse.fetish == "dom")>>
		$He raps out commands with the confidence of long and partly sexual experience, so patients are inclined to follow even unpleasant medical instructions.
		<<set _idleBonus++, _healthBonus++>>
	<</if>>
	<<if ($Nurse.muscles > 5)>>
		$He's strong enough to gently but firmly restrain resistant slaves, allowing $him to be sparing with the inescapable but less healthy restraints.
		<<set _idleBonus++>>
	<</if>>
	<<if ($Nurse.intelligence+$Nurse.intelligenceImplant > 50)>>
		The diagnostic equipment is state-of-the-art, but $he's smart and perceptive enough that on occasion, $he can add meaningfully to its medical scans.
		<<set _idleBonus++, _healthBonus++>>
	<</if>>
	<<if ($Nurse.face > 40)>>
		Patients rarely object to seeing $his gorgeous face hovering over them.
		<<set _idleBonus++, _devBonus++>>
	<</if>>
	<<if ($Nurse.muscles > 5) || ($slaves[_FLs].devotion >= 60)>>
		<<set _healthBonus++>>
	<</if>>
	<<for _dI = 0; _dI < _DL; _dI++>>
		<<set $i = $slaveIndices[$CliniciIDs[_dI]]>>
		<<if $Nurse.rivalryTarget == $slaves[$i].ID>>
			<<setLocalPronouns $slaves[$i] 2>>
			$He purposefully neglects the needs of $his <<print rivalryTerm($Nurse)>>, $slaves[$i].slaveName, hindering _his2 recovery and deepening their dislike for each other.
			<<set $slaves[$i].devotion--, $slaves[$i].trust--, $slaves[$i].health -= 3>>
			<<if random(1,100) > 65>>
				<<set $Nurse.rivalry++, $slaves[_FLs].rivalry++, $slaves[$i].rivalry++>>
			<</if>>
		<<elseif $Nurse.relationshipTarget == $slaves[$i].ID>>
			<<setLocalPronouns $slaves[$i] 2>>
			$He dedicates most of $his attention to $his <<print relationshipTerm($Nurse)>>, $slaves[$i].slaveName, making sure _he2 has everything _he2 needs and more. This lavish attention detracts from $his overall effectiveness.
			<<set _idleBonus -= 3, $slaves[$i].devotion++, $slaves[$i].trust++, $slaves[$i].health += 3>>
		<<elseif $familyTesting == 1 && areRelated($Nurse, $slaves[$i]) > 0>>
			$He makes sure to spend extra time caring for $his <<print relativeTerm($Nurse.ID,$slaves[$i].ID)>>, $slaves[$i].slaveName.
			<<set $slaves[$i].trust++, $slaves[$i].health++>>
		<<elseif $Nurse.relationTarget == $slaves[$i].ID && $familyTesting == 0>>
			$He makes sure to spend extra time caring for $his $slaves[$i].relation, $slaves[$i].slaveName.
			<<set $slaves[$i].trust++, $slaves[$i].health++>>
		<</if>>
		<<switch $slaves[$i].prestigeDesc>>
		<<case "She is a famed Free Cities whore, and commands top prices.">>
			<<setLocalPronouns $slaves[$i] 2>>
			$He does $his best to aid the famous whore, $slaves[$i].slaveName, making sure to pay special attention to _his2 worn holes.
			<<set $slaves[$i].health += 2>>
		<<case "She is a famed Free Cities slut, and can please anyone.">>
			<<setLocalPronouns $slaves[$i] 2>>
			$He does $his best to aid the famous entertainer, $slaves[$i].slaveName, making sure _he2 can show off as soon as possible.
			<<set $slaves[$i].health += 2>>
		<<case "She is remembered for winning best in show as a cockmilker.">>
			<<setLocalPronouns $slaves[$i] 2>>
			<<if ($slaves[$i].balls > 4) && ($slaves[$i].dick != 0)>>
				$He does $his best to aid the dribbling $slaves[$i].slaveName, paying special attention to _his2 huge cock and balls as well as making sure to milk _his2 <<if canAchieveErection($slaves[$i])>>erect <</if>>dick hourly.
				<<set $slaves[$i].health += 4>>
				<<if (random(1,100) > 65) && (($Nurse.fetish == "none") || ($Nurse.fetish == "cumslut"))>>
					<<if $Nurse.fetish == "none">>
						<<set $Nurse.fetish = "cumslut", $slaves[_FLs].fetish = "cumslut">>
					<<else>>
						<<set $Nurse.fetishStrength += 4, $slaves[_FLs].fetishStrength += 4>>
					<</if>>
				<</if>>
			<</if>>
		<<case "She is remembered for winning best in show as a dairy cow.">>
			<<setLocalPronouns $slaves[$i] 2>>
			<<if ($slaves[$i].lactation > 0) && (($slaves[$i].boobs-$slaves[$i].boobsImplant) > 6000)>>
				$He does $his best to aid the leaking $slaves[$i].slaveName, paying special attention to _his2 huge breasts as well as making sure to milk _him2 hourly.
				<<set $slaves[$i].health += 4, $slaves[$i].lactationDuration = 2, $slaves[$i].boobs -= $slaves[$i].boobsMilk, $slaves[$i].boobsMilk = 0>>
				<<if (random(1,100) > 65) && (($Nurse.fetish == "none") || ($Nurse.fetish == "boobs"))>>
					<<if $Nurse.fetish == "none">>
						<<set $Nurse.fetish = "boobs", $slaves[_FLs].fetish = "boobs">>
					<<else>>
						<<set $Nurse.fetishStrength += 4, $slaves[_FLs].fetishStrength += 4>>
					<</if>>
				<</if>>
			<</if>>
		<<case "She is remembered for winning best in show as a breeder.">>
			<<setLocalPronouns $slaves[$i] 2>>
			<<if $slaves[$i].bellyPreg >= 1500>>
				$He does $his best to aid the pregnant $slaves[$i].slaveName, paying special attention to _his2 swollen belly and the welfare of the life within.
				<<set $slaves[$i].health += 6>>
			<<elseif $slaves[$i].ovaries == 1 || $slaves[$i].mpreg == 1>>
				$He does $his best to aid the breeder $slaves[$i].slaveName, paying special attention to _his2 fertility and reproductive organs.
				<<set $slaves[$i].health += 4>>
			<<else>>
				$He lays out plans on how to restore the breeder $slaves[$i].slaveName to _his2 former gravid glory.
			<</if>>
		<</switch>>
		<<if $slaves[$i].bellyImplant > -1 && $clinicInflateBelly == 1>>
			<<setLocalPronouns $slaves[$i] 2>>

''@@.pink;$slaves[$i].slaveName@@'' spent a lot of time during the week under IV-like stands with bags of inert filler steadily flowing into _his2 belly implant, slowly pushing _his2 belly further and further out. Careful attention, along with several drug injections, were used to make sure _his2 body was able to safely adjust to the implant's rapid growth.
			<<set $slaves[$i].bellyImplant += 5000, $slaves[$i].health -= 10>>
			<<if ($slaves[$i].devotion > 50)>>
				<<set $slaves[$i].devotion += 4, $slaves[$i].trust += 3>>
			<<elseif ($slaves[$i].devotion >= -20)>>
				<<set $slaves[$i].trust -= 5>>
			<<else>>
				<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 10>>
			<</if>>
			<<if $slaves[$i].bellyImplant > ($arcologies[0].FSTransformationFetishistResearch ? 800000 : 130000)>>
				<<set $slaves[$i].bellyImplant = ($arcologies[0].FSTransformationFetishistResearch ? 800000 : 130000)>>
				_He2 is filled to the maximum that _his2 implant can stand.
			<</if>>
		<</if>>
		<<if $slaves[$i].pregKnown == 1 && $slaves[$i].preg < $slaves[$i].pregData.normalBirth && $slaves[$i].pregControl == "speed up">>
			<<setLocalPronouns $slaves[$i] 2>>

''@@.pink;$slaves[$i].slaveName@@'' spends most of _his2 time on bedrest being filled with rapid gestation agents and concentrated slave food. All _he2 can do is <<if $slaves[$i].amp != 1 && canSee($slaves[$i])>>watch and feel _his2 belly pushing further and further out with life<<elseif $slaves[$i].amp != 1>>watch _his2 belly bulging further and further out with life<<elseif !canSee($slaves[$i])>>feel _his2 belly pushing further and further out with life beneath _his2 fingers<<else>>feel the every growing pressure inside _his2 abdomen<</if>>. Careful attention, along with numerous drug injections, are used to make sure _his2 body is able to safely adjust to _his2 pregnancy's rapid growth.
			<<set $slaves[$i].health -= 10>>
			<<if ($slaves[$i].devotion > 50)>>
				<<set $slaves[$i].devotion += 2, $slaves[$i].trust += 1>>
			<<elseif ($slaves[$i].devotion >= -20)>>
				<<set $slaves[$i].trust -= 5>>
			<<else>>
				<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 10>>
			<</if>>
			<<if $slaves[$i].preg >= $slaves[$i].pregData.minLiveBirth && $slaves[$i].pregControl == "speed up">>
				<<set $slaves[$i].pregControl = "none">>
				''@@.pink;$slaves[$i].slaveName's@@'' child is ready to pop out of _his2 womb, ''@@.yellow;_his2 course of rapid gestation agents is finished''.
			<</if>>
		<<elseif $slaves[$i].preg > 2 && $slaves[$i].pregKnown == 0>>
			During $his tests, $he discovers that $slaves[$i].slaveName @@.lime;is pregnant.@@
			<<set $slaves[$i].pregKnown = 1>>
		<</if>>
	<</for>>
	<<if (_DL < $clinic)>>
		<<set _seed = random(1,10)+(($clinic-_DL)*(random(150,170)+(_idleBonus*10)))>>
		<<run cashX(_seed, "clinic", $Nurse)>>

    Since $he doesn't have enough girls to occupy all $his time, the clinic takes in citizens' slaves on a contract basis and $he helps them too, earning @@.yellowgreen;<<print cashFormat(_seed)>>.@@
	<</if>>
	<<if (_DL > 0)>>

<</if>>
<</if>>

<<if (_DL > 0)>>
	    <<if (_DL == 1)>>''There is one slave receiving treatment in the clinic.''<<else>>''There are _DL slaves receiving treatment in the clinic.''<</if>>
<</if>>

<<if ($Nurse != 0)>>
	<<set $i = _FLs>> /* apply following SA passages to facility leader */
	<<if $showEWD != 0>>

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

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

		<</if>>
		/* 000-250-006 */
		''__@@.pink;<<= SlaveFullName($slaves[_FLs])>>@@__'' is serving as the clinical nurse.

		<<= saChoosesOwnClothes($slaves[$i])>>
		<<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>>
		<<set _chosenClothes = saChoosesOwnClothes($slaves[$i])>>
		<<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>>
	<<set $Nurse = $slaves[_FLs]>>
<</if>>

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

	<<if $slaves[$i].devotion < 45>>
		<<set $slaves[$i].devotion += 4>>
	<</if>>
	<<set $slaves[$i].devotion += _devBonus>>
	<<if $slaves[$i].trust < 45>>
		<<set $slaves[$i].trust += 4>>
	<</if>>
	<<if $slaves[$i].health < 90>>
		<<set $slaves[$i].health += 10 + ($curativeUpgrade * 10) + _healthBonus>>
	<</if>>

	<<switch $clinicDecoration>>
	<<case "Repopulation Focus" "Eugenics" "Gender Radicalist" "Gender Fundamentalist" "Paternalist" "Maturity Preferentialist" "Youth Preferentialist" "Slimness Enthusiast" "Hedonistic">>
		<<set $slaves[$i].livingRules = "luxurious">>
	<<case "Roman Revivalist" "Aztec Revivalist" "Egyptian Revivalist" "Arabian Revivalist" "Chinese Revivalist" "Chattel Religionist" "Edo Revivalist">>
		<<set $slaves[$i].livingRules = "normal">>
	<<default>>
		<<set $slaves[$i].livingRules = "spare">>
	<</switch>>

	<<if ($Nurse != 0)>>
		<<if ($clinicSpeedGestation == 1) && ($slaves[$i].pregKnown == 1)>>
			<<set $slaves[$i].pregControl = "speed up">>
		<</if>>
		<<if ($slaves[$i].chem > 10) && ($clinicUpgradeFilters == 1)>>
			<<set $slaves[$i].chem -= 5 + (50 * $clinicUpgradePurge)>>
			<<if $clinicUpgradePurge == 1 && $slaves[$i].health > -50>>
				<<set $slaves[$i].health = -50>>
			<</if>>
			<<set $slaves[$i].chem = Math.max($slaves[$i].chem, 0)>>
		<</if>>
		<<if $slaves[$i].lactation == 1>>
			<<set $slaves[$i].boobs -= $slaves[$i].boobsMilk, $slaves[$i].boobsMilk = 0>>
		<</if>>
	<</if>>
	<<if ($slaves[$i].health <= 40)>>
	<<elseif ($Nurse != 0) && ($slaves[$i].chem > 15) && ($clinicUpgradeFilters == 1)>>
	<<elseif ($Nurse != 0) && ($slaves[$i].pregKnown == 1) && ($clinicSpeedGestation >= 0 || $slaves[$i].pregControl == "speed up")>>
	<<elseif ($Nurse != 0) && ($slaves[$i].pregAdaptation*1000 < $slaves[$i].bellyPreg || $slaves[$i].preg > $slaves[$i].pregData.normalBirth/1.33)>>
	<<elseif ($Nurse != 0) && ($clinicInflateBelly > 0) && ($slaves[$i].bellyImplant >= 0) && ($slaves[$i].bellyImplant <= ($arcologies[0].FSTransformationFetishistResearch ? 800000 : 130000))>>
	<<else>>

''__@@.pink;$slaves[$i].slaveName@@__'' has been returned to health<<if ($Nurse != 0) && ($clinicUpgradeFilters == 1)>> and purity<</if>>, so @@.yellow;$his assignment has defaulted to rest.@@
		<<= removeJob($slaves[$i], "get treatment in the clinic")>>
		<<set _restedSlaves++, _dI--, _DL-->>
		<<continue>>
	<</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 receiving treatment in $clinicName.
		<</if>>

    She <<= saRest($slaves[$i])>>

		<<= saChoosesOwnClothes($slaves[$i])>>
		<<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 chooses own job">>
		<<set _dump = saRest($slaves[$i])>>
		<<set _chosenClothes = saChoosesOwnClothes($slaves[$i])>>
		<<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 (_restedSlaves > 0)>>

	<<if (_restedSlaves == 1)>>
		One slave has
	<<else>>
		_restedSlaves slaves have
	<</if>>
	been returned to @@.green;health<<if ($Nurse != 0) && ($clinicUpgradeFilters == 1)>> and purity<</if>>@@ and will be released from the clinic before the end of the week.
	<<if $clinicDecoration != "standard">>

    $clinicNameCaps's $clinicDecoration atmosphere @@.hotpink;had an impact on them while they were@@ getting treatment.
	<</if>>
<</if>>
<<if _DL > 0 || $Nurse != 0>>

<</if>>


code:
:: Club [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $returnTo = "Club", $showEncyclopedia = 1, $encyclopedia = "Club", $clubSlaves = $ClubiIDs.length>>

<<if $clubName != "the Club">>
	<<set $clubNameCaps = $clubName.replace("the ", "The ")>>
<</if>>
<<clubAssignmentFilter>>
$clubNameCaps
<<switch $clubDecoration>>
<<case "Roman Revivalist">>
	is decorated like a Roman villa's entertainment rooms. There is a lot of white stone, plaster, and terracotta.
<<case "Aztec Revivalist">>
	is decorated with obsidian figures inserted in the lime walls and giant oak pillars that give a homey feeling to the otherwise cold building.
<<case "Egyptian Revivalist">>
	is decorated like a room in an ancient Egyptian palace. There are columns of warm stone and pools of clear water full of aquatic plants.
<<case "Edo Revivalist">>
	is furnished as an Edo period theater. Performances of the traditional Japanese arts can be seen here, though more modern dancing happens in the evenings. In either case, geisha girls are present and willing.
<<case "Arabian Revivalist">>
	is designed like an open plaza in an Arabian palace, with a raised stage in the center for erotic dancing. Diaphanous, flowing curtains billow across the space, dispersing the narcotic smoke billowing from a score of hookahs.
<<case "Chinese Revivalist">>
	is furnished as an old Chinese disorderly house. It's intentionally packed in so that closeness and good cheer is obligatory here; prominent citizens share tables while their hangers-on jostle for room.
<<case "Chattel Religionist">>
	isn't a religious establishment, but it almost looks like one. It's clean and proper, with beams of natural light that come down to highlight holy sex slaves' bodies.
<<case "Degradationist">>
	has a perverted, debauched appearance. The décor is utilitarian so it can be cleaned easily, and the reason is obvious. Many patrons have brought their own slaves to publicly rape here.
<<case "Repopulation Focus">>
	has a gaudy appearance. There are lots of deep soft chairs for pregnant patrons and slaves to rest in and screens showing girls with large bellies lining the walls.
<<case "Eugenics">>
	has a gaudy appearance. There are screens lining the walls discouraging unprotected slave sex. The real action happens in the several exclusive rooms reserved for society's best.
<<case "Asset Expansionist">>
	has a gaudy appearance. There are a lot of neon lights and there are screens everywhere, showing off big tits and plush asses.
<<case "Transformation Fetishist">>
	has a gaudy appearance. There are a lot of neon lights and there are screens everywhere, showing off huge fake tits and plastic dick sucking lips.
<<case "Gender Radicalist">>
	has a gaudy appearance. There are a lot of neon lights and there are screens everywhere, showing closeups of cocks fucking every imaginable orifice.
<<case "Gender Fundamentalist">>
	has an old world appearance, a decidedly throwback atmosphere harking back to the glory days of cultures past.
<<case "Physical Idealist">>
	isn't a gym, but it smells like one. The dancing is rough and competitive, and the drinks are rich with protein.
<<case "Supremacist">>
	is decorated like an upper-class gentleman's club in the old countries of $arcologies[0].FSSupremacistRace people.
<<case "Subjugationist">>
	is decorated like an upper-class gentleman's club in the old countries which favored $arcologies[0].FSSubjugationistRace slaves.
<<case "Paternalist">>
	is handsome and well-kept, even romantic. Though the slaves here are sex slaves, every provision is made to encourage them to enjoy themselves.
<<case "Pastoralist">>
	is decorated to resemble a frontier disorderly house. The drinks are pounded straight, and there's a set of swinging doors for bad men to part dramatically as they enter.
<<case "Maturity Preferentialist">>
	is surprisingly elegant. The music consists of refined remixes of traditional dance music, offering slaves and citizens the chance to dance beautifully together.
<<case "Youth Preferentialist">>
	is deafeningly loud. There's a bright light show running, offering staccato glimpses of the scene out on the dance floor.
<<case "Body Purist">>
	is gorgeous, decorated and kept in the height of fashionable night establishment style. The music is cutting edge and everything and everyone is elegant.
<<case "Slimness Enthusiast">>
	is distinctly gaudy, with lots of sugary drinks on offer. The music and décor are of a decidedly bubblegum quality.
<<case "Hedonistic">>
	has a gaudy appearance. The dance floor is extra large to accommodate its extra wide dancers, though bodies grinding against each other is an inevitability. Plenty of roomy, comfortable booths encircle the room for an exhausted citizen to relax with his plush dance partner, and a wide selection of greasy food accompanies the drinks. <<if $arcologies[0].FSHedonisticDecadenceResearch == 1>>Platters of food are complementary for feeding slaves<<else>>Feeders are available in the booths to feed tired slaves<</if>> while they get fondled.
<<default>>
	is set up in an uncomplicated way. There's a bar for drinks, a dance floor for slave girls, and private rooms for slave sex.
<</switch>>

<<if $clubAdsSpending > 0>>
	Screens outside the entrance are showing softcore music videos to advertise $clubNameCaps.
	<<if $clubAdsOld == 1>>
		The featured strippers are all MILFs.
	<<elseif $clubAdsOld == -1>>
		The featured strippers are all nice and young.
	<<elseif $clubAdsOld == -2>>
		The featured strippers are all teenagers.
	<<elseif $clubAdsOld == -3>>
		The featured strippers are all lolis.
	<<else>>
		The featured strippers vary in age.
	<</if>>
	<<if $clubAdsStacked == 1>>
		Lots of bouncing breasts and butts
	<<elseif $clubAdsStacked == -1>>
		Lots of trim breasts and shapely butts
	<<else>>
		A variety of breast and butt sizes and shapes
	<</if>>
	are on display, and
	<<if $clubAdsImplanted == 1>>
		most of these are augmented by implants.
	<<elseif $clubAdsImplanted == -1>>
		they're all natural.
	<<else>>
		some are augmented by implants.
	<</if>>
	<<if $clubAdsPreg == 1>>
		Most of strippers have firm, rounded bellies.
	<<elseif $clubAdsPreg == -1>>
		Most of the strippers have firm, flat bellies.
	<<else>>
		Some of the strippers are pregnant.
	<</if>>
	<<if $clubAdsModded == 1>>
		Everything is heavily pierced and tattooed.
	<<elseif $clubAdsModded == -1>>
		Everything is free of tattoos and piercings.
	<<else>>
		Some of these assets are tattooed and pierced, and some aren't.
	<</if>>
	The strippers get naked quickly, and show off
	<<if $clubAdsXX == 1>>
		their pussies and assholes.
	<<elseif $clubAdsXX == -1>>
		their assholes.
	<<else>>
		their holes.
	<</if>>
	The ads are shown across the arcology.
	<<if ($clubAdsXX == 1) && ($clubAdsImplanted == 1) && ($clubAdsStacked == 1)>>
		As a result, $clubName is known as the place to spend a night partying with<<if ($clubAdsPreg == 1)>>pregnant<</if>> bimbos.
	<<elseif ($clubAdsXX == 1) && ($clubAdsOld == 1)>>
		As a result, $clubName is known as the place to spend a night partying with<<if ($clubAdsPreg == 1)>>pregnant<</if>> MILFs.
	<<elseif ($clubAdsStacked == 1) && ($clubAdsOld == -3)>>
		As a result, $clubName is known as the place to spend a night partying with<<if $clubAdsPreg == 1>> pregnant<</if>><<if $clubAdsStacked == 1>> oppai<</if>> lolis.
	<<elseif ($clubAdsXX == 1) && ($clubAdsPreg == 1)>>
		As a result, $clubName is known as the place to spend a night partying with pregnant sluts.
	<<elseif ($clubAdsXX == -1) && ($clubAdsStacked == 1)>>
		As a result, $clubName is known as the place to spend a night partying with shemales.
	<<elseif ($clubAdsXX == -1) && ($clubAdsStacked == -1)>>
		As a result, $clubName is known as the place to spend a night partying with traps.
	<</if>>
<</if>>

<<if $clubSlaves > 2>>
	$clubNameCaps is dotted with pretty, flirtatious slaves, stripping on stages, serving drinks, and dancing. They're very willing to suck patrons off in the open or give a public handjob, and there are little private rooms for them to use when engaging in heavier intercourse.
<<elseif $clubSlaves > 0>>
	There are a few pretty, flirtatious slaves, stripping on stages, serving drinks, and dancing. They're very willing to suck patrons off in the open or give a public handjob, and there are little private rooms for them to use when engaging in heavier intercourse.
<<elseif $DJ != 0>>
	<<setLocalPronouns $DJ>>
	$clubNameCaps is doing business normally, without a complement of sex slaves to spice things up. $DJ.slaveName is alone in $clubName, and can accomplish little by $himself.
<<else>>
	$clubNameCaps is doing business normally, without a complement of sex slaves to spice things up.
	<<link "Decommission the club" "Main">>
		<<set $club = 0, $clubDecoration = "standard", $clubUpgradePDAs = 0, $clubAdsSpending = 0>>
		<<set _club = $sectors.findIndex(function(s) { return s.type == "Club"; })>>
		<<if _club != -1>>
			<<set $sectors[_club].type = "Shops">>
		<</if>>
	<</link>>
<</if>>

<<if $clubSlaves > 0>>
	<<if $DJ != 0>><<set _X = 1>><<else>><<set _X = 0>><</if>>
	<<set _NewPop = $clubSlaves+$dormitoryPopulation+_X>>
	<<link "Remove all slaves" "Club">>
		<<if $DJ != 0>>
			<<= assignJob($DJ, "rest")>>
		<</if>>
		<<for $clubSlaves > 0>>
			<<= assignJob($slaves[$slaveIndices[$ClubiIDs[0]]], "serve the public")>>
		<</for>>
	<</link>>
	<<if _NewPop > $dormitory>>
		@@.red;Dormitory capacity will be exceeded.@@
	<</if>>
<</if>>

<<if $clubSlaves > 2>>
<<switch $clubDecoration>>
<<case "Chattel Religionist">>
	From one of the private rooms, praying interspersed with the slap of leather on flesh can be heard.
<<case "Degradationist">>
	Agonized screaming can be heard from one of the private rooms.
<<case "Repopulation Focus">>
	A wet slapping sound is coming from one of the private rooms, the kind of sound made by mammary intercourse with very milky breasts. Occasionally crying can be heard from one of the rooms specially designed for patrons wishing to assfuck a slave as she gives birth.
<<case "Eugenics">>
	The slight sounds of whispering can be heard emanating from one of the restricted rooms.
<<case "Asset Expansionist">>
	A wet slapping sound is coming from one of the private rooms, the kind of sound made by mammary intercourse with very large breasts.
<<case "Transformation Fetishist">>
	A wet slapping sound is coming from one of the private rooms, the kind of sound made by mammary intercourse with very large fake breasts.
<<case "Gender Radicalist">>
	Uncomfortable moaning from one of the private rooms suggests that a slave inside is taking a painfully large cock up her tight butt.
<<case "Gender Fundamentalist">>
	The unmistakable sound of vigorous vaginal intercourse can be heard from one of the private rooms.
<<case "Physical Idealist">>
	Bestial grunting can be heard from one of the private rooms.
<<case "Supremacist">>
	The sound of a beating, interspersed with desperate begging, can be heard from one of the private rooms.
<<case "Subjugationist">>
	The sound of a beating, interspersed with desperate begging, can be heard from one of the private rooms.
<<case "Paternalist">>
	The unmistakable sound of a slave experiencing an authentic orgasm can be heard from one of the private rooms.
<<case "Body Purist">>
	The faint but unmistakable sound of a slave trying to keep quiet while orgasming can be heard from one of the private rooms.
<<case "Slimness Enthusiast">>
	The faint but unmistakable sound of a shrill climax can be heard from one of the private rooms.
<<case "Pastoralist">>
	A faint gushing sound is audible from one of the private rooms.
<<case "Roman Revivalist">>
	A business meeting is just audible from one of the private rooms; only an occasional moan indicates that the businessmen are enjoying a couple of serving girls at the same time.
<<case "Aztec Revivalist">>
	A muffled <<if $arcologies[0].FSPaternalist != "unset">>moan<<else>>scream<</if>>, followed by the sounds of liquid gently dripping on the stone floors denote the goings-on in the building.
<<case "Egyptian Revivalist">>
	The smell of incense and the sounds of sex are drifting out of the private rooms.
<<case "Edo Revivalist">>
	The faint but unmistakable sound of a slave trying to keep quiet while orgasming can be heard from one of the private rooms.
<<case "Arabian Revivalist">>
	The faint sound of multiple slaves pleasuring a single patron can be heard from one of the private rooms.
<<case "Chinese Revivalist">>
	The faint but unmistakable sound of a slave trying to keep quiet while orgasming can be heard from one of the private rooms.
<<case "Maturity Preferentialist">>
	The faint sound of a well traveled slave showing off her experience can be heard from one of the private rooms.
<<case "Youth Preferentialist">>
	The faint but unmistakable sound of a shrill climax can be heard from one of the private rooms.
<<case "Hedonistic">>
	The sound of fat bodies fucking while feeding each other can be heard from one of the private rooms.
<<default>>
	The faint but unmistakable sound of a shrill climax can be heard from one of the private rooms.
<</switch>>
<</if>>

<<set _Tmult0 = Math.trunc($club*1000*$upgradeMultiplierArcology)>>

There are rooms off $clubName to support slaves as they work as club sluts. They can support $club slaves. Currently $clubSlaves <<if $clubSlaves == 1>>is<<else>>are<</if>> serving in $clubName.
[[Expand the club|Club][cashX(forceNeg(_Tmult0), "capEx"), $club += 5, $PC.engineering += .1]] //Costs <<print cashFormat(_Tmult0)>> and will increase upkeep costs//

<<if $clubUpgradePDAs == 1>>
	$clubNameCaps has been wired for unobtrusive personal data assistants to let your sluts pass tips about enslaveable people to your recruiter.
<<else>>
	<<set _Tmult1 = Math.trunc(10000*$upgradeMultiplierArcology)>>
	The rooms are standard. [[Upgrade them with PDAs to help your recruiter|Club][cashX(forceNeg(_Tmult1), "capEx"), $clubUpgradePDAs = 1]] //Costs <<print cashFormat(_Tmult1)>> and will increase upkeep costs//
<</if>>

<<if $DJ != 0>>

	<<if $DJignoresFlaws != 1>>
		$DJ.slaveName will attempt to fix flaws in <<print $clubName>>'s sluts. [[Ignore flaws|Club][$DJignoresFlaws = 1]]
	<<else>>
		$DJ.slaveName has been instructed to ignore flaws in <<print $clubName>>'s sluts. [[Fix flaws|Club][$DJignoresFlaws = 0]]
	<</if>>
<</if>>

<<if $clubAdsSpending > 0>>
	$clubNameCaps is the subject of an active ad campaign.
<<else>>
	$clubNameCaps is not being advertised.
<</if>>
<<link "Manage club advertisements" "Club Advertisement">><<set $nextLink = passage()>><<set $nextButton = "Back">><</link>>

<<ClubStatistics 1>>

<<if $DJ != 0>>
	<<set $Flag = 2>>
	<<include "Slave Summary">>
<<else>>
	You do not have a slave serving as a DJ. [[Appoint one|DJ Select]]
<</if>>

<<if ($club <= $clubSlaves)>>
	''$clubNameCaps is full and cannot hold any more slaves''
<<elseif ($slaves.length > $clubSlaves)>>
	<<link "''Send a slave to slut around $clubName''">>
		<<replace #ComingGoing>>
			<<resetAssignmentFilter>>
			<<set $Flag = 0>>
			<<include "Slave Summary">>
		<</replace>>
	<</link>>
<</if>>

<<if $clubSlaves > 0>>
	| <<link "''Bring a slave out of $clubName''">>
		<<replace #ComingGoing>>
			<<clubAssignmentFilter>>
			<<set $Flag = 1>>
			<<include "Slave Summary">>
			<<resetAssignmentFilter>>
		<</replace>>
	<</link>>
<<else>>

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

<<assignmentFilter>>

	<<clubAssignmentFilter>>
	<<set $Flag = 1>>
	<<include "Slave Summary">>
	<<resetAssignmentFilter>>

Rename $clubName: <<textbox "$clubName" $clubName "Club">> //Use a noun or similar short phrase//


code:
:: Club Advertisement [nobr]

<<switch $clubDecoration>>
<<case "Roman Revivalist">>
	$clubNameCaps is decorated like a Roman villa's entertainment rooms. There is a lot of white stone, plaster, and terracotta.
<<case "Aztec Revivalist">>
	$clubNameCaps is decorated with obsidian figures inserted in the lime walls and giant oak pillars that give a homey feeling to the otherwise cold building.
<<case "Egyptian Revivalist">>
	$clubNameCaps is decorated like a room in an ancient Egyptian palace. There are columns of warm stone and pools of clear water full of aquatic plants.
<<case "Edo Revivalist">>
	$clubNameCaps is furnished as an Edo period theater. Performances of the traditional Japanese arts can be seen here, though more modern dancing happens in the evenings. In either case, geisha girls are present and willing.
<<case "Arabian Revivalist">>
	$clubNameCaps is designed like an open plaza in an Arabian palace, with a raised stage in the center for erotic dancing. Diaphanous, flowing curtains billow across the space, dispersing the narcotic smoke billowing from a score of hookahs.
<<case "Chinese Revivalist">>
	$clubNameCaps is furnished as an old Chinese disorderly house. It's intentionally packed in so that closeness and good cheer is obligatory here; prominent citizens share tables while their hangers-on jostle for room.
<<case "Chattel Religionist">>
	$clubNameCaps isn't a religious establishment, but it almost looks like one. It's clean and proper, with beams of natural light that come down to highlight holy sex slaves' bodies.
<<case "Degradationist">>
	$clubNameCaps has a perverted, debauched appearance. The décor is utilitarian so it can be cleaned easily, and the reason is obvious. Many patrons have brought their own slaves to publicly rape here.
<<case "Repopulation Focus">>
	$clubNameCaps has a gaudy appearance. There are lots of deep soft chairs for pregnant patrons and slaves to rest in and screens showing girls with large bellies lining the walls.
<<case "Eugenics">>
	$clubNameCaps has a gaudy appearance. There are screens lining the walls discouraging unprotected slave sex. The real action happens in the several exclusive rooms reserved for society's best.
<<case "Asset Expansionist">>
	$clubNameCaps has a gaudy appearance. There are a lot of neon lights and there are screens everywhere, showing off big tits and plush asses.
<<case "Transformation Fetishist">>
	$clubNameCaps has a gaudy appearance. There are a lot of neon lights and there are screens everywhere, showing off huge fake tits and plastic dick sucking lips.
<<case "Gender Radicalist">>
	$clubNameCaps has a gaudy appearance. There are a lot of neon lights and there are screens everywhere, showing closeups of cocks fucking every imaginable orifice.
<<case "Gender Fundamentalist">>
	$clubNameCaps has an old world appearance, a decidedly throwback atmosphere harking back to the glory days of cultures past.
<<case "Physical Idealist">>
	$clubNameCaps isn't a gym, but it smells like one. The dancing is rough and competitive, and the drinks are rich with protein.
<<case "Supremacist">>
	$clubNameCaps is decorated like an upper-class gentleman's club in the old countries of $arcologies[0].FSSupremacistRace people.
<<case "Subjugationist">>
	$clubNameCaps is decorated like an upper-class gentleman's club in the old countries which favored $arcologies[0].FSSubjugationistRace slaves.
<<case "Paternalist">>
	$clubNameCaps is handsome and well-kept, even romantic. Though the slaves here are sex slaves, every provision is made to encourage them to enjoy themselves.
<<case "Body Purist">>
	$clubNameCaps is gorgeous, decorated and kept in the height of fashionable night establishment style. The music is cutting edge and everything and everyone is elegant.
<<case "Slimness Enthusiast">>
	$clubNameCaps is distinctly gaudy, with lots of sugary drinks on offer. The music and décor are of a decidedly bubblegum quality.
<<case "Pastoralist">>
	$clubNameCaps is decorated to resemble a frontier disorderly house. The drinks are pounded straight, and there's a set of swinging doors for bad men to part dramatically as they enter.
<<case "Maturity Preferentialist">>
	$clubNameCaps is surprisingly elegant. The music consists of refined remixes of traditional dance music, offering slaves and citizens the chance to dance beautifully together.
<<case "Youth Preferentialist">>
	$clubNameCaps is deafeningly loud. There's a bright light show running, offering staccato glimpses of the scene out on the dance floor.
<<case "Hedonistic">>
	$clubNameCaps has a gaudy appearance. The dance floor is extra large to accommodate its extra wide dancers, though bodies grinding against each other is an inevitability. Plenty of roomy, comfortable booths encircle the room for an exhausted citizen to relax with his plush dance partner, and a wide selection of greasy food accompanies the drinks. <<if $arcologies[0].FSHedonisticDecadenceResearch == 1>>Platters of food are complementary for feeding slaves<<else>>Feeders are available in the booths to feed tired slaves<</if>> while they get fondled.
<</switch>>

<<if $clubAdsSpending > 0>>
	Screens outside the entrance are showing softcore music videos to advertise $clubName.
	<<if $clubAdsOld == 1>>
	The featured strippers are all MILFs.
	<<elseif $clubAdsOld == -1>>
	The featured strippers are all nice and young.
	<<elseif $clubAdsOld == -2>>
	The featured strippers are all teenagers.
	<<elseif $clubAdsOld == -3>>
	The featured strippers are all lolis.
	<<else>>
	The featured strippers vary in age.
	<</if>>
	<<if $clubAdsStacked == 1>>
	Lots of bouncing breasts and butts
	<<elseif $clubAdsStacked == -1>>
	Lots of trim breasts and shapely butts
	<<else>>
	A variety of breast and butt sizes and shapes
	<</if>>
	are on display, and
	<<if $clubAdsImplanted == 1>>
	most of these are augmented by implants.
	<<elseif $clubAdsImplanted == -1>>
	they're all natural.
	<<else>>
	some are augmented by implants.
	<</if>>
	<<if $clubAdsPreg == 1>>
		Most of strippers have firm, rounded bellies.
	<<elseif $clubAdsPreg == -1>>
		Most of the strippers have firm, flat bellies.
	<<else>>
		Some of the strippers are pregnant.
	<</if>>
	<<if $clubAdsModded == 1>>
	Everything is heavily pierced and tattooed.
	<<elseif $clubAdsModded == -1>>
	Everything is free of tattoos and piercings.
	<<else>>
	Some of these assets are tattooed and pierced, and some aren't.
	<</if>>
	The strippers get naked quickly, and show off
	<<if $clubAdsXX == 1>>
	their pussies and assholes.
	<<elseif $clubAdsXX == -1>>
	their assholes.
	<<else>>
	their holes.
	<</if>>
<</if>>

<<if $clubAdsSpending >= 5000>>
	Advertisements based on these scenes run constantly in media across $arcologies[0].name, and there's an active merchandising campaign underway to promote your club and its girls.
<<elseif $clubAdsSpending >= 4000>>
	Advertisements based on these scenes run constantly in media across $arcologies[0].name.
<<elseif $clubAdsSpending >= 3000>>
	Advertisements based on these scenes are run in media across $arcologies[0].name.
<<elseif $clubAdsSpending >= 2000>>
	Advertisements based on these scenes run regularly in arcology media.
<<elseif $clubAdsSpending >= 1000>>
	Advertisements based on these scenes run occasionally in arcology media.
<<else>>
	$arcologies[0].name has a robust internal media that could be used to bring patrons into the club.
<</if>>

You are spending <<print cashFormat($clubAdsSpending)>> each week to advertise $clubName.

<<if $clubAdsSpending > 900>>
	<<link "Decrease">><<set $clubAdsSpending -= 1000>><<goto "Club Advertisement">><</link>> |
<<else>>
	Decrease |
<</if>>
<<if $clubAdsSpending < 5000>>
	<<link "Increase">><<set $clubAdsSpending += 1000>><<goto "Club Advertisement">><</link>>
<<else>>
	Increase
<</if>>

__Design Club Ad Campaign__ //Will replace relevant variety bonuses//

Asset size:
<<if $clubAdsStacked != 1>><<link "Stacked">><<set $clubAdsStacked = 1>><<goto "Club Advertisement">><</link>> | <<else>>Stacked | <</if>>
<<if $clubAdsStacked != -1>><<link "Slim">><<set $clubAdsStacked = -1>><<goto "Club Advertisement">><</link>> | <<else>>Slim | <</if>>
<<if $clubAdsStacked != 0>><<link "Variety">><<set $clubAdsStacked = 0>><<goto "Club Advertisement">><</link>><<else>>Variety<</if>>

Asset origin:
<<if $clubAdsImplanted != 1>><<link "Implants">><<set $clubAdsImplanted = 1>><<goto "Club Advertisement">><</link>> | <<else>>Implants | <</if>>
<<if $clubAdsImplanted != -1>><<link "All natural">><<set $clubAdsImplanted = -1>><<goto "Club Advertisement">><</link>> | <<else>>All natural | <</if>>
<<if $clubAdsImplanted != 0>><<link "Variety">><<set $clubAdsImplanted = 0>><<goto "Club Advertisement">><</link>><<else>>Variety<</if>>

Body mods:
<<if $clubAdsModded != 1>><<link "Modded">><<set $clubAdsModded = 1>><<goto "Club Advertisement">><</link>> | <<else>>Modded | <</if>>
<<if $clubAdsModded != -1>><<link "Unmodded">><<set $clubAdsModded = -1>><<goto "Club Advertisement">><</link>> | <<else>>Unmodded | <</if>>
<<if $clubAdsModded != 0>><<link "Variety">><<set $clubAdsModded = 0>><<goto "Club Advertisement">><</link>><<else>>Variety<</if>>

Age:
<<if $clubAdsOld != 1>><<link "MILF">><<set $clubAdsOld = 1>><<goto "Club Advertisement">><</link>> | <<else>>MILF | <</if>>
<<if $clubAdsOld != -1>><<link "Young">><<set $clubAdsOld = -1>><<goto "Club Advertisement">><</link>> | <<else>>Young | <</if>>
<<if $minimumSlaveAge < 18>>
<<if $clubAdsOld != -2>><<link "Teen">><<set $clubAdsOld = -2>><<goto "Club Advertisement">><</link>> | <<else>>Teen | <</if>>
<</if>>
<<if $minimumSlaveAge < 13>>
<<if $clubAdsOld != -3>><<link "Loli">><<set $clubAdsOld = -3>><<goto "Club Advertisement">><</link>> | <<else>>Loli | <</if>>
<</if>>
<<if $clubAdsOld != 0>><<link "Variety">><<set $clubAdsOld = 0>><<goto "Club Advertisement">><</link>> <<else>>Variety<</if>>

<<if $seePreg != 0>>
Pregnancy:
<<if $clubAdsPreg != 1>><<link "Gravid">><<set $clubAdsPreg = 1>><<goto "Club Advertisement">><</link>> | <<else>>Gravid | <</if>>
<<if $clubAdsPreg != -1>><<link "None">><<set $clubAdsPreg = -1>><<goto "Club Advertisement">><</link>> | <<else>>None | <</if>>
<<if $clubAdsPreg != 0>><<link "Variety">><<set $clubAdsPreg = 0>><<goto "Club Advertisement">><</link>><<else>>Variety<</if>>

<</if>>

<<if $seeDicks != 0>>
	Genitalia:
	<<if $clubAdsXX != 1>><<link "Pussies">><<set $clubAdsXX = 1>><<goto "Club Advertisement">><</link>> | <<else>>Pussies | <</if>>
	<<if $clubAdsXX != -1>><<link "Dicks">><<set $clubAdsXX = -1>><<goto "Club Advertisement">><</link>> | <<else>>Dicks | <</if>>
	<<if $clubAdsXX != 0>><<link "Variety">><<set $clubAdsXX = 0>><<goto "Club Advertisement">><</link>> <<else>>Variety<</if>>

<</if>>