code:
:: Degrading Name

<<silently>>

<<if $activeSlave.fuckdoll > 0>>
	<<set $activeSlave.slaveName to "Fuckdoll No. " + random(1000,9999)>>
<<elseif ($activeSlave.assignment == "work in the dairy") && ($dairyRestraintsSetting >= 2)>>
	<<set $activeSlave.slaveName to "Bioreactor No. " + random(1000,9999)>>
<<else>>

<<set $prefixes to []>>

<<if ($seeRace == 1)>>
<<if ($activeSlave.race is "white")>>
	<<set $prefixes.push("White", "Pale")>>
<<elseif ($activeSlave.race is "asian")>>
	<<set $prefixes.push("Asian", "Yellow")>>
<<elseif ($activeSlave.race is "latina")>>
	<<set $prefixes.push("Latina", "Brown")>>
<<elseif ($activeSlave.race is "black")>>
	<<set $prefixes.push("Black", "Dark")>>
<<elseif ($activeSlave.race is "pacific islander")>>
	<<set $prefixes.push("Islander", "Sea")>>
<<elseif ($activeSlave.race is "southern European")>>
	<<set $prefixes.push("Mediterranean", "Olive")>>
<<elseif ($activeSlave.race is "amerindian")>>
	<<set $prefixes.push("Indian", "Reservation")>>
<<elseif ($activeSlave.race is "semitic")>>
	<<set $prefixes.push("Semitic")>>
<<elseif ($activeSlave.race is "middle eastern")>>
	<<set $prefixes.push("Arab", "Sand")>>
<<elseif ($activeSlave.race is "indo-aryan")>>
	<<set $prefixes.push("Indian", "Brown")>>
<<elseif ($activeSlave.race is "mixed race")>>
	<<set $prefixes.push("Mulatto", "Mutt")>>
<</if>>
<</if>>

<<if ($activeSlave.eyes is -2)>>
	<<set $prefixes.push("Blind", "Sightless", "Eyeless")>>
<</if>>

<<if ($activeSlave.boobs < 500) && ($activeSlave.butt < 3)>>
	<<set $prefixes.push("Girly", "Thin", "Slim")>>
<</if>>
<<if ($activeSlave.anus > 2) || ($activeSlave.vagina > 2)>>
	<<set $prefixes.push("Gape", "Slit", "Wideopen", "Hallway")>>
<</if>>
<<if ($activeSlave.anus > 0)>>
	<<set $prefixes.push("Butt", "Anus", "Backdoor", "Butthole", "Asshole")>>
<</if>>
<<if ($activeSlave.vagina > 0)>>
	<<set $prefixes.push("Cunt", "Pussy", "Vagina")>>
<</if>>
<<if ($activeSlave.boobs < 500) && ($activeSlave.butt < 3) && ($activeSlave.dick > 0)>>
	<<set $prefixes.push("Trap", "Sissy", "Bottom", "Bitch")>>
<</if>>
<<if ($activeSlave.boobs > 500) && ($activeSlave.butt > 3) && ($activeSlave.dick > 0)>>
	<<set $prefixes.push("Futa", "She", "Trans")>>
<</if>>
<<if ($activeSlave.weight > 30)>>
	<<set $prefixes.push("Fat", "Chubby", "Whale")>>
<<elseif ($activeSlave.weight <= -30)>>
	<<set $prefixes.push("Skinny", "Bony", "Rail")>>
<</if>>
<<if ($activeSlave.muscles > 30)>>
	<<set $prefixes.push("Ripped", "Strong", "Huge")>>
<</if>>
<<if ($activeSlave.energy > 95)>>
	<<set $prefixes.push("Fuck", "Nympho", "Fuckaddict", "Sexaddict")>>
<</if>>
<<if ($activeSlave.fetish is "buttslut") && ($activeSlave.fetishKnown == 1)>>
	<<set $prefixes.push("Anal", "Butthole", "Sodomy")>>
<</if>>
<<if ($activeSlave.fetish is "cumslut") && ($activeSlave.fetishKnown == 1)>>
	<<set $prefixes.push("Cum", "Suck", "Sucker")>>
<</if>>
<<if ($activeSlave.fetish is "humiliation") && ($activeSlave.fetishKnown == 1)>>
	<<set $prefixes.push("Public", "Rape", "Showgirl")>>
<</if>>
<<if ($activeSlave.fetish is "submissive") && ($activeSlave.fetishKnown == 1)>>
	<<set $prefixes.push("Bottom", "Rape", "Fuckee")>>
<</if>>
<<if ($activeSlave.fetish is "dom") && ($activeSlave.fetishKnown == 1)>>
	<<set $prefixes.push("Top", "Dom", "Fucker")>>
<</if>>
<<if ($activeSlave.fetish is "masochist") && ($activeSlave.fetishKnown == 1)>>
	<<set $prefixes.push("Pain", "Rape", "Struggle")>>
<</if>>
<<if ($activeSlave.fetish is "pregnancy") && ($activeSlave.fetishKnown == 1)>>
	<<set $prefixes.push("Breeder", "Mommy", "Fertile")>>
<</if>>
<<if ($activeSlave.fetish is "boobs") && ($activeSlave.fetishKnown == 1)>>
	<<set $prefixes.push("Titty", "Boob", "Boobie", "Tit")>>
<</if>>
<<if (($activeSlave.boobs*$activeSlave.lactation) > 1000)>>
	<<set $prefixes.push("Cow", "Creamy", "Milky")>>
<</if>>
<<if ($activeSlave.oralSkill <= 30) && ($activeSlave.analSkill <= 30)>>
	<<set $prefixes.push("Cheap", "Gutter", "Fail")>>
<</if>>
<<if ($activeSlave.nipples != "tiny") && ($activeSlave.nipples != "cute")>>
	<<set $prefixes.push("Nipples", "Pointy", "Titclit")>>
<</if>>
<<if ($activeSlave.areolae > 2)>>
	<<set $prefixes.push("Headlights", "Areolas")>>
<</if>>
<<if ($activeSlave.lips > 40)>>
	<<set $prefixes.push("Lippy", "Plush", "Pillow")>>
<</if>>
<<if ($activeSlave.labia > 1)>>
	<<set $prefixes.push("Flower", "Lip", "Curtain")>>
<</if>>
<<if ($activeSlave.visualAge > 35)>>
	<<set $prefixes.push("Old", "Cougar", "MILF")>>
<</if>>
<<if ($activeSlave.visualAge < 25)>>
	<<set $prefixes.push("Young", "Girly", "Thin")>>
<</if>>
<<if ($activeSlave.amp == 1)>>
	<<set $prefixes.push("Amp", "Stumpy")>>
<</if>>
<<if ($activeSlave.boobsImplant > 1000) || ($activeSlave.buttImplant > 3)>>
	<<set $prefixes.push("Fake", "Plastic", "Silicone")>>
<</if>>
<<if ($activeSlave.dick > 5) && ($activeSlave.balls > 5)>>
	<<set $prefixes.push("Daddy", "Potent", "Cannon")>>
<</if>>
<<if $activeSlave.breedingMark == 1>>
	<<set $prefixes.push("Breeder", "Oven", "Womb")>>
<</if>>
<<if ($activeSlave.pregType >= 50) && ($activeSlave.preg > 30)>>
	<<set $prefixes.push("Nursery", "Seeded", "Burst", "Factory")>>
<</if>>
<<if ($activeSlave.pregType >= 10) && ($activeSlave.preg > 20)>>
	<<set $prefixes.push("Squirmy", "Bulgey", "Balloon")>>
<</if>>
<<if ($activeSlave.preg > 5)>>
	<<set $prefixes.push("Preg", "Belly", "Mommy")>>
<</if>>
<<if ($activeSlave.dick > 4)>>
	<<set $prefixes.push("Hung", "Dangle", "Cock", "Dick")>>
<</if>>
<<if ($activeSlave.dick > 0) && ($activeSlave.balls == 0)>>
	<<set $prefixes.push("Soft", "Gelded", "Cut")>>
<</if>>
<<if ($activeSlave.dick > 0) && ($activeSlave.balls > 0)>>
	<<set $prefixes.push("Hard", "Stiff", "Erect")>>
<</if>>
<<if ($activeSlave.dick == 1)>>
	<<set $prefixes.push("Tiny", "Micro", "Bitch")>>
<</if>>
<<if ($activeSlave.boobs >= 800)>>
	<<set $prefixes.push("Boob", "Boobs", "Titty")>>
<</if>>
<<if ($activeSlave.butt > 5)>>
	<<set $prefixes.push("Ass", "Butt", "Bottom")>>
<</if>>
<<if ($activeSlave.vagina == 0)>>
	<<set $prefixes.push("Virgin")>>
<</if>>
<<if ($activeSlave.height >= 185)>>
	<<set $prefixes.push("Top", "Tower", "Tall")>>
<</if>>
<<if ($activeSlave.height < 150)>>
	<<set $prefixes.push("Bottom", "Short", "Stumpy")>>
<</if>>
<<if ($activeSlave.whoreSkill > 30)>>
	<<set $prefixes.push("Street", "Whore", "Money")>>
<</if>>
<<if ($activeSlave.entertainSkill > 30)>>
	<<set $prefixes.push("Easy", "Slut", "Club")>>
<</if>>
<<if ($activeSlave.oralSkill > 30)>>
	<<set $prefixes.push("Throat", "Suck", "Tonsil")>>
<</if>>
<<if ($activeSlave.vaginalSkill > 30)>>
	<<set $prefixes.push("Pussy", "Kegel", "Channel")>>
<</if>>
<<if ($activeSlave.analSkill > 30)>>
	<<set $prefixes.push("Asspussy", "Anal", "Sphincter")>>
<</if>>
<<if ($activeSlave.intelligence > 0)>>
	<<set $prefixes.push("Smart", "Bright", "Clever")>>
<<elseif ($activeSlave.intelligence > 0)>>
	<<set $prefixes.push("Dumb", "Stupid", "Retarded", "Cretin")>>
<</if>>
<<if ($activeSlave.intelligenceImplant == 1)>>
	<<set $prefixes.push("Books", "College", "Graduate")>>
<</if>>
<<if ($activeSlave.vagina == 1) && ($activeSlave.vaginalSkill <= 10)>>
	<<set $prefixes.push("Tight", "New", "Fresh")>>
<</if>>
<<if ($activeSlave.anus == 1) && ($activeSlave.analSkill <= 10)>>
	<<set $prefixes.push("Tightbutt", "Tightass")>>
<</if>>
<<if ($activeSlave.devotion < -75)>>
	<<set $prefixes.push("Angry", "Cage", "Biter")>>
<<elseif ($activeSlave.devotion < -50)>>
	<<set $prefixes.push("Cell", "Cuffs")>>
<<elseif ($activeSlave.devotion < -20)>>
	<<set $prefixes.push("Bag", "Box")>>
<<elseif ($activeSlave.devotion <= 20)>>
	<<set $prefixes.push("Whiner", "Sad")>>
<</if>>
<<if ($activeSlave.trust < -50)>>
	<<set $prefixes.push("Sobber", "Screamer")>>
<<elseif ($activeSlave.trust < -20)>>
	<<set $prefixes.push("Weeper", "Crying")>>
<<elseif ($activeSlave.trust < 20)>>
	<<set $prefixes.push("Tears", "Begging")>>
<</if>>

<<set $suffixes to ["bitch", "slut", "whore", "slave", "puppet", "hole", "butt", "tit", "thing", "object", "tool", "toy", "fuck", "ass", "face"]>>

<<if ($activeSlave.visualAge <= 25)>>
	<<set $suffixes.push("girl")>>
<<elseif ($activeSlave.visualAge > 30)>>
	<<set $suffixes.push("MILF", "cougar", "mother")>>
<</if>>
<<if ($activeSlave.vagina > -1)>>
	<<set $suffixes.push("cunt", "pussy")>>
<</if>>
<<if ($activeSlave.dick > 0)>>
	<<if ($activeSlave.balls == 0)>>
	<<set $suffixes.push("gelding", "sissy", "trap")>>
	<<elseif ($activeSlave.boobs < 500)>>
	<<set $suffixes.push("sissy", "trap")>>
	<<else>>
	<<set $suffixes.push("futa", "pole")>>
	<</if>>
<</if>>

<<if ($activeSlave.assignment is "guard you")>>
	<<set $activeSlave.slaveName to either("Guard", "Battle")>>
<<elseif ($activeSlave.assignment is "recruit girls")>>
	<<set $activeSlave.slaveName to either("Cam", "Recruiter")>>
<<elseif ($activeSlave.assignment is "be the Madam")>>
	<<set $activeSlave.slaveName to either("Pimp", "Madam")>>
<<elseif ($activeSlave.assignment is "be the DJ")>>
	<<set $activeSlave.slaveName to either("Bass", "Booth")>>
<<elseif ($activeSlave.assignment is "be the Milkmaid")>>
	<<set $activeSlave.slaveName to either("Farm", "Dairy")>>
<<elseif ($activeSlave.assignment is "be the Collectrix")>>
	<<set $activeSlave.slaveName to either("Milker", "Fucker")>>
<<elseif ($activeSlave.assignment is "be your Head Girl")>>
	<<set $activeSlave.slaveName to either("Chief", "Head")>>
<<elseif ($activeSlave.assignment is "be the Schoolteacher")>>
	<<set $activeSlave.slaveName to either("Teacher", "Classroom")>>
<<elseif ($activeSlave.assignment is "be the Attendant")>>
	<<set $activeSlave.slaveName to either("Spa", "Bath")>>
<<elseif ($activeSlave.assignment is "be the Wardeness")>>
	<<set $activeSlave.slaveName to either("Jail", "Prison")>>
<<elseif ($activeSlave.assignment is "be your concubine")>>
	<<set $activeSlave.slaveName to either("Bed", "Master")>>
<<else>>
	<<set $activeSlave.slaveName to $prefixes.random()>>
<</if>>

<<set $seed to $suffixes.random()>>

<<if $seed is $activeSlave.slaveName.toLowerCase()>>
	<<goto "Degrading Name">>
<</if>>

<<set $activeSlave.slaveName to $activeSlave.slaveName+$seed>>

<</if>>

<</silently>>


code:
:: Description Options [nobr]

<<set $nextButton to "Back to Main">>
<<set $nextLink to "Main">>

//These options will affect both the long form description of each slave and the miniscenes available from the main menu.//

<<if $showSexualHistory == 1>>
	Sexual histories are @@color:green;SHOWN.@@ //[[Hide|Description Options][$showSexualHistory to 0]]//
<<else>>
	Sexual histories are @@color:red;HIDDEN.@@ //[[Show|Description Options][$showSexualHistory to 1]]//
<</if>>

<<if $showBodyMods == 1>>
	Cosmetic body mods are @@color:green;SHOWN.@@ //[[Hide|Description Options][$showBodyMods to 0]]//
<<else>>
	Cosmetic body mods are @@color:red;HIDDEN.@@ //[[Show|Description Options][$showBodyMods to 1]]//
<</if>>

<<if $showImplantEffects == 1>>
	The effects of implants are @@color:green;SHOWN.@@ //[[Hide|Description Options][$showImplantEffects to 0]]//
<<else>>
	The effects of implants are @@color:red;HIDDEN.@@ //[[Show|Description Options][$showImplantEffects to 1]]//
<</if>>

<<if $showClothing == 1>>
	Clothing is mostly @@color:green;SHOWN.@@ //[[Hide|Description Options][$showClothing to 0]]//
<<else>>
	Clothing is mostly @@color:red;HIDDEN.@@ //[[Show|Description Options][$showClothing to 1]]//
<</if>>

Detailed slave age information is
<<if $showAgeDetail == 1>>
	@@color:green;SHOWN.@@ //[[Hide|Description Options][$showAgeDetail to 0]]//
<<else>>
	@@color:red;HIDDEN.@@ //[[Show|Description Options][$showAgeDetail to 1]]//
<</if>>

Approximate height is
<<if $showHeightCMs == 1>>
	@@color:green;SHOWN.@@ //[[Hide|Description Options][$showHeightCMs to 0]]//
<<else>>
	@@color:red;HIDDEN.@@ //[[Show|Description Options][$showHeightCMs to 1]]//
<</if>>

Volume, in CCs, of breasts is
<<if $showBoobCCs == 1>>
	@@color:green;SHOWN.@@ //[[Hide|Description Options][$showBoobCCs to 0]]//
<<else>>
	@@color:red;HIDDEN.@@ //[[Show|Description Options][$showBoobCCs to 1]]//
<</if>>

<<if $seeDicks != 0>>

Approximate sizes of dicks and balls are
<<if $showDickCMs == 1>>
	@@color:green;SHOWN.@@ //[[Hide|Description Options][$showDickCMs to 0]]//
<<else>>
	@@color:red;HIDDEN.@@ //[[Show|Description Options][$showDickCMs to 1]]//
<</if>>
<</if>>

Attractiveness and Sexual scores are
<<if $showScores == 1>>
	@@color:green;SHOWN.@@ //[[Hide|Description Options][$showScores to 0]]//
<<else>>
	@@color:red;HIDDEN.@@ //[[Show|Description Options][$showScores to 1]]//
<</if>>

repo_name: shoku/fc


code:
:: Discard Confirm

This will permanently remove $activeSlave.slaveName from the game, and you will not receive any money for her. This is primarily intended as a way to rid yourself of bugged slaves. Are you certain?

[[Discard her|Slave Sold]]

[[Cancel|Slave Interact]]


code:
:: Dispensary [nobr]

<<set $nextButton to "Back">>
<<set $nextLink to "Main">>
<<set $showEncyclopedia to 1>><<set $encyclopedia to "The Pharmaceutical Fab.">>

<<if $dispensaryUpgrade == 0>>
//The pharmaceutical fabricator is running smoothly. It can cheaply replicate complex medications, and has already cut the cost of drugs for your slaves by a fourth. It can easily produce advanced drugs should you obtain the data necessary to create them.//
<<else>>
//The pharmaceutical fabricator is running smoothly. It can cheaply and quickly replicate complex medications, and has already cut the cost of drugs for your slaves in half. It can easily produce advanced drugs should you obtain the data necessary to create them.//
<</if>>

<<if ($dispensaryUpgrade == 0)>>

<<if ($rep > 5000)>>
	[[Upgrade the pharmaceutical fabricator|Dispensary][$cash -= Math.trunc(30000*$upgradeMultiplierArcology), $dispensaryUpgrade to 1, $drugsCost to $drugsCost/2]]
	//Costs ¤<<print Math.trunc(30000*$upgradeMultiplierArcology)>>//

    //Will improve production efficiency further decreasing costs.//
<<else>>
	//You lack the reputation to obtain cutting-edge pharmaceutical fabricator upgrades//
<</if>>
<</if>>

<<if ($organFarmUpgrade < 3) && ($rep <= 10000*$upgradeMultiplierMedicine)>>
	//You lack the reputation to access experimental organ farm parts//
<<elseif $dispensaryUpgrade == 0 && $organFarmUpgrade == 2>>
	//The fabricator must updgraded before it can be fitted with perfected organ farm parts//
<<elseif $organs.length > 0>>
	//The organ farm can not be upgraded while it is use//
<<elseif ($organFarmUpgrade == 2) && ($rep > 10000*$upgradeMultiplierMedicine)>>
	[[Upgrade to the organ farm to the cutting edge model|Dispensary][$cash -= 150000*$upgradeMultiplierMedicine, $organFarmUpgrade to 3]]
	//Costs ¤<<print 150000*$upgradeMultiplierMedicine>>//

    //Will allow the organ farm to rapidly grow organs without risk to the implantee's health.//
<<elseif ($organFarmUpgrade == 1) && ($rep > 10000*$upgradeMultiplierMedicine)>>
	[[Upgrade the organ farm with an experimental growth accelerator|Dispensary][$cash -= 50000*$upgradeMultiplierMedicine, $organFarmUpgrade to 2]]
	//Costs ¤<<print 50000*$upgradeMultiplierMedicine>>//

    //Will allow the organ farm to quickly grow organs. Implanted organs may cause health issues.//
<<elseif ($organFarmUpgrade == 0) && ($rep > 10000*$upgradeMultiplierMedicine)>>
	[[Upgrade the fabricator with an experimental organ farm|Dispensary][$cash -= 50000*$upgradeMultiplierMedicine, $organFarmUpgrade to 1]]
	//Costs ¤<<print 50000*$upgradeMultiplierMedicine>>//

    //Will allow the fabrication of tailored organs using the autosurgery.//
<</if>>

<<if ($organFarmUpgrade > 0) && ($rep > 1000*$upgradeMultiplierMedicine)>>
	[[Upgrade the organ farm with a repository of animal samples|Dispensary][$cash -= 5000*$upgradeMultiplierMedicine, $animalParts to 1]]
	//Costs ¤<<print 50000*$upgradeMultiplierMedicine>>//

    //Will allow the fabrication of tailored animal organs using the autosurgery.//

<</if>>
<<if $organFarmUpgrade > 2>>
	The fabricator is capable of rapidly growing organs.
<<elseif $organFarmUpgrade > 1>>
	The fabricator is capable of quickly growing organs, though not without side effects.
<<elseif ($organFarmUpgrade > 0)>>
	The fabricator is capable of growing organs.
<</if>>
<<if $animalParts > 1>>
	The organ farm have been upgraded to grow animal organs.
<</if>>
<<if $organs.length > 0>>
It is currently working on the following organs:
	<<for $i to 0; $i < $organs.length; $i++>>
	<<for $j to 0; $j < $slaves.length; $j++>>
		<<if $slaves[$j].ID == $organs[$i].ID>>

		$slaves[$j].slaveName's $organs[$i].type,
		<<if $organs[$i].weeksToCompletion <= 0>>
			ready for implantation.
		<<else>>
			<<if $organFarmUpgrade == 1>><<print $organs[$i].weeksToCompletion>><<elseif $organFarmUpgrade == 2>><<print Math.trunc($organs[$i].weeksToCompletion/2)>><<elseif $organFarmUpgrade == 3>><<print Math.trunc($organs[$i].weeksToCompletion/4)>><</if>> weeks from completion.
		<</if>>
		<<break>>
		<</if>>
	<</for>>
	<</for>>
<</if>>

The fabricator is producing
<<if $injectionUpgrade == 0>>
	standard growth hormones.
	<<if $rep > 6000>>
		[[Purchase data on prototype growth hormone tests|Dispensary][$cash -= 25000*$upgradeMultiplierMedicine, $injectionUpgrade to 1]]
		//Costs ¤<<print 25000*$upgradeMultiplierMedicine>>//

    //Should improve the reliability of growth injections of all kinds.//
	<<else>>
		//You lack the reputation to obtain prototype medicines//
	<</if>>
<<elseif $injectionUpgrade == 1>>
	prototype growth hormones.
	<<if $rep > 10000>>
		[[Upgrade the fabricator to customize each slave's growth hormones|Dispensary][$cash -= 50000*$upgradeMultiplierMedicine, $injectionUpgrade to 2]]
		//Costs ¤<<print 50000*$upgradeMultiplierMedicine>>//

    //Should improve the reliability of growth injections of all kinds.//
	<<else>>
		//You lack the reputation to obtain prototype fabricator upgrades//
	<</if>>
<<elseif $injectionUpgrade is 2>>
	prototype growth hormones.
	<<if $rep > 14000>>
		[[Upgrade the fabricator with prototype biomechanical microfactories|Dispensary][$cash -= 100000*$upgradeMultiplierMedicine, $injectionUpgrade to 3]]
		//Costs ¤<<print 100000*$upgradeMultiplierMedicine>>//

    //Should improve the reliability of growth injections of all kinds.//
	<<else>>
		//You lack the reputation to obtain prototype biomechanical microfactories//
	<</if>>
<<else>>
	the world's most effective growth hormones.
<</if>>

The fabricator is producing
<<if $hormoneUpgradeMood == 0>>
	standardized hormone replacement therapies.
	<<if $rep > 2000>>
		[[Upgrade for individualized therapy|Dispensary][$cash -= 10000*$upgradeMultiplierMedicine, $hormoneUpgradeMood to 1]]
		//Costs ¤<<print 10000*$upgradeMultiplierMedicine>>//

    //Should eliminate the occasional moodiness caused by generalized therapy.//
	<<else>>
		//You lack the reputation to obtain advanced drug manufacturing components//
	<</if>>
<<else>>
	individualized hormone replacement therapies.
<</if>>

The hormone replacement therapies
<<if $hormoneUpgradePower == 0>>
	are traditional: they're formulated to mimic natural hormones.
	<<if $rep > 4000>>
		[[Purchase data on advanced HRT|Dispensary][$cash -= 25000*$upgradeMultiplierMedicine, $hormoneUpgradePower to 1]]
		//Costs ¤<<print 25000*$upgradeMultiplierMedicine>>//

    //Should increase the power of hormone therapies.//
	<<else>>
		//You lack the reputation to obtain prototype medicines//
	<</if>>
<<else>>
	are advanced: they're formulated to improve on natural hormones.
<</if>>

The hormone replacement therapies
<<if $hormoneUpgradeShrinkage == 0>>
	are broad-spectrum.
	<<if $rep > 4000>>
		[[Purchase data on targeted HRT|Dispensary][$cash -= 25000*$upgradeMultiplierMedicine, $hormoneUpgradeShrinkage to 1]]
		//Costs ¤<<print 25000*$upgradeMultiplierMedicine>>//

    //Should reduce atrophy of organs corresponding to original sex.//
	<<else>>
		//You lack the reputation to obtain prototype medicines//
	<</if>>
<<else>>
	are targeted, reducing atrophy of organs corresponding to original sex.
<</if>>

<<if $precociousPuberty == 1>>

<<if ($pubertyHormones == 0) && ($rep <= 4500*$upgradeMultiplierMedicine)>>
	//You lack the reputation to fund forced puberty drugs//
<<elseif ($pubertyHormones == 0) && ($rep > 4500*$upgradeMultiplierMedicine)>>
	[[Fund research into powerful hormonal injections to jumpstart puberty|Dispensary][$cash -= 30000*$upgradeMultiplierMedicine, $pubertyHormones = 1]]
	//Costs ¤<<print 30000*$upgradeMultiplierMedicine>>//

    //Will allow the production of powerful hormonal drugs designed to force a slave through puberty without regard for side effects. //
<<elseif ($pubertyHormones == 1)>>
	The fabricator is producing extra strong hormonal drugs designed to force a slave through puberty.
<</if>>
<</if>>

<<if $feeder == 1>>
<<if ($dietXXY == 0) && ($rep <= 3500*$upgradeMultiplierMedicine)>>
	//You lack the reputation to fund research into hermaphrodite hormones//
<<elseif ($dietXXY == 0) && ($rep > 3500*$upgradeMultiplierMedicine)>>
	[[Fund research into developing hermaphrodite hormone therapies|Dispensary][$cash -= 10000*$upgradeMultiplierMedicine, $dietXXY = 1]]
	//Costs ¤<<print 10000*$upgradeMultiplierMedicine>>//

    //Will allow for specially balanced meals to be served in the cafeteria designed to promote both halves of a herm's sexuality. //
<<elseif ($dietXXY == 1)>>
	The fabricator is producing meals to be served in the cafeteria designed to promote both halves of a herm's sexuality.
<</if>>
<<else>>
	The feeders are incapable of modifying slave diets well enough to adjust hormones for hermaphrodite meals.
<</if>>

<<if $cumProDiet == 0>>
	[[Purchase recipes to encourage cum production|Dispensary][$cash -= 5000*$upgradeMultiplierMedicine, $cumProDiet to 1]]
	//Costs ¤<<print 5000*$upgradeMultiplierMedicine>>//

    //Will allow for specially designed meals to be served in the cafeteria to promote cum production.//
<<elseif $cumProDiet == 1>>
	The fabricator is producing meals to be served in the cafeteria designed to promote cum production.
<</if>>

<<if ($curativeUpgrade == 0) && ($rep > 6000*$upgradeMultiplierMedicine)>>
	[[Purchase data on advanced curatives|Dispensary][$cash -= 25000*$upgradeMultiplierMedicine, $curativeUpgrade to 1]]
	//Costs ¤<<print 25000*$upgradeMultiplierMedicine>>//

    //Should improve the effectiveness of curative treatment.//
<<elseif ($curativeUpgrade == 1)>>
	The fabricator is producing highly effective curative cocktails.
<</if>>

<<if ($aphrodisiacUpgrade == 0) && ($rep > 6000*$upgradeMultiplierMedicine)>>
	[[Purchase data on aphrodisiac withdrawal treatment|Dispensary][$cash -= 10000*$upgradeMultiplierMedicine, $aphrodisiacUpgrade to 1]]
	//Costs ¤<<print 10000*$upgradeMultiplierMedicine>>//

    //Should prevent most negative effects of withdrawal.//
<<elseif ($aphrodisiacUpgrade == 1)>>
	The fabricator is producing a substitute that will protect slaves from aphrodisiac withdrawal.
<</if>>

<<if ($superFertilityDrugs == 0) && ($rep > 2500*$upgradeMultiplierMedicine) && $seeHyperPreg == 1>>
	[[Purchase data on powerful fertility drugs|Dispensary][$cash -= 20000*$upgradeMultiplierMedicine, $superFertilityDrugs to 1]]
	//Costs ¤<<print 20000*$upgradeMultiplierMedicine>>//

    //Should improve the likelihood of conception and multiples. //
<<elseif ($superFertilityDrugs == 1)>>
	The fabricator is producing highly effective fertility agents. There is a warning present involving overdosing and instances of ten or more children.
<</if>>

<<if ($healthyDrugsUpgrade == 0)>>
	<<if (($organFarmUpgrade == 1) && ($injectionUpgrade != 0) && ($curativeUpgrade == 1) && ($aphrodisiacUpgrade == 1))>>
	<<if ($rep >= 15000*$upgradeMultiplierMedicine)>>
		[[Fund research into drug formulations without negative physical side effects|Dispensary][$cash -= 500000*$upgradeMultiplierMedicine,$healthyDrugsUpgrade to 1]] //Costs ¤<<print 500000*$upgradeMultiplierMedicine>>. Will prevent the negative side effects of excessive drug usage on your slaves.//
	<<else>>
		// You lack the reputation to access the technology necessary to develop advanced drug formulations. //
	<</if>>
	<<else>>
	// You must purchase all other upgrades before developing advanced drug formulations. //
	<</if>>
<<else>>
	The fabricator has been upgraded to optimize the structures of your other drugs, eliminating their negative side effects.
<</if>>
/* Code [draft] contributed by Anon1888 */

<<if ($arcologies[0].FSBodyPuristLaw == 1)>>
	//The pharmaceutical fabricator is working with your body purist arcology to reduce long term drug side effects.//
<</if>>

<<if ($ImplantProductionUpgrade == 0) && ($rep <= 2000*$upgradeMultiplierMedicine)>>
	//You lack the reputation to access experimental implant manufacturer parts//
<</if>>

<<if ($ImplantProductionUpgrade == 0) && ($rep > 2000*$upgradeMultiplierMedicine)>>
    [[Upgrade the fabricator with an experimental implant manufacturer|Dispensary][$cash -= 20000*$upgradeMultiplierMedicine, $ImplantProductionUpgrade to 1]]
	//Costs ¤<<print 20000*$upgradeMultiplierMedicine>>//

    //Will allow the fabrication of special implants using the autosurgery.//
<<elseif ($ImplantProductionUpgrade > 0)>>
	The fabricator is capable of crafting special implants.
<</if>>

<<if $ImplantProductionUpgrade == 1 && $seeHyperPreg == 1 && $seeExtreme == 1>>
<<if ($permaPregImplant == 0) and ($rep <= 4000*$upgradeMultiplierMedicine)>>
	//You lack the reputation to access experimental pregnancy generator schematics//
<</if>>

<<if ($permaPregImplant == 0) && ($rep > 4000*$upgradeMultiplierMedicine)>>
    [[Purchase schematics for an experimental implantable pregnancy generator|Dispensary][$cash -= 30000*$upgradeMultiplierMedicine, $permaPregImplant to 1]]
	//Costs ¤<<print 30000*$upgradeMultiplierMedicine>>//

    //Will allow the fabrication of implants that force perpetual pregnancy.//
<<elseif ($permaPregImplant > 0)>>
	The fabricator is capable of crafting pregnancy generators.
<</if>>
<</if>>

<<if $ImplantProductionUpgrade == 1>>
<<if ($bellyImplants == 0) && ($rep <= 2000*$upgradeMultiplierMedicine)>>
	//You lack the reputation to access experimental fillable abdominal implants//
<</if>>

<<if ($bellyImplants == 0) && ($rep > 2000*$upgradeMultiplierMedicine)>>
    [[Purchase schematics for fillable abdominal implants|Dispensary][$cash -= 20000*$upgradeMultiplierMedicine, $bellyImplants to 1]]
	//Costs ¤<<print 20000*$upgradeMultiplierMedicine>>//

    //Will allow the fabrication of fillable abdominal implants using the autosurgery.//
<<elseif ($bellyImplants > 0)>>
	The fabricator is capable of crafting fillable abdominal implants.
<</if>>
<</if>>

<<if $ImplantProductionUpgrade == 1>>
<<if ($bellyImplants == 1) && ($cervixImplants != 1) && ($rep <= 6000*$upgradeMultiplierMedicine)>> /* show only after belly implants already researched */
	//You lack the reputation to access schematics far experimental cervix filter micropumps for abdominal implants//
<</if>>

<<if ($bellyImplants == 1) && ($cervixImplants != 1) && ($rep >6000*$upgradeMultiplierMedicine)>> /* nanotech like technology much more impressive and costly than simple implant */
    [[Purchase schematics for fillable abdominal implants|Dispensary][$cash -= 70000*$upgradeMultiplierMedicine, $cervixImplants to 1]]
	//Costs ¤<<print 70000*$upgradeMultiplierMedicine>>//

    //Will allow the fabrication of cervix filter micropumps for fillable abdominal implants using the autosurgery.//
<<elseif ($cervixImplants > 0)>>
	The fabricator is capable of crafting cervix filter micropumps for fillable abdominal implants.
<</if>>
<</if>>

__Societal Focused Research__

<<if $arcologies[0].FSGenderRadicalistDecoration == 100 && $organFarmUpgrade == 1>>
<<if ($arcologies[0].FSGenderRadicalistResearch == 0)>>
	<<if ($rep >= 10000*$upgradeMultiplierMedicine)>>
	  [[Fund research into developing male pregnancy methods|Dispensary][$cash -= 50000*$upgradeMultiplierMedicine,$arcologies[0].FSGenderRadicalistResearch to 1]] //Costs ¤<<print 50000*$upgradeMultiplierMedicine>>. Will allow cloning and production of anal uteri and ovaries.//
	<<else>>
	  // You lack the reputation to access the research necessary to develop anal uteri and ovaries. //
	<</if>>
<<else>>
  The organ farm has been upgraded with schematics for modified uteri and ovaries.
<</if>>
<</if>>

<<if ($ImplantProductionUpgrade == 1) and ($arcologies[0].FSTransformationFetishistDecoration >= 100)>>
<<if ($arcologies[0].FSTransformationFetishistResearch == 0) and ($rep <= 5000*$upgradeMultiplierMedicine)>>
	//You lack the reputation to access experimental gigantic implants and elasticizing filler//
<</if>>
<<if ($arcologies[0].FSTransformationFetishistResearch == 0) and ($rep > 5000*$upgradeMultiplierMedicine) and ($arcologies[0].FSTransformationFetishistDecoration >= 100)>>
    [[Purchase data on gigantic implants and elasticizing filler|Dispensary][$cash -= 20000*$upgradeMultiplierMedicine, $arcologies[0].FSTransformationFetishistResearch to 1]]
	//Costs ¤<<print 20000*$upgradeMultiplierMedicine>>//

    //Will allow the fabrication of gigantic implants using the autosurgery and filler capable of overfilling existing fillable implants.//
<<elseif ($arcologies[0].FSTransformationFetishistResearch > 0)>>
	The fabricator is capable of crafting gigantic implants and elasticizing filler designed to overfill existing implants.
<</if>>
<</if>>

<<if $arcologies[0].FSAssetExpansionistDecoration == 100>>
<<if ($arcologies[0].FSAssetExpansionistResearch == 0)>>
	<<if ($rep >= 5000*$upgradeMultiplierMedicine)>>
	  [[Fund research into drug formulations for growth without limit|Dispensary][$cash -= 30000*$upgradeMultiplierMedicine,$arcologies[0].FSAssetExpansionistResearch to 1]] //Costs ¤<<print 30000*$upgradeMultiplierMedicine>>. Will allow creation of drugs to push assets to unthinkable sizes.//
	<<else>>
	  // You lack the reputation to access the research necessary to develop advanced growth drug formulations. //
	<</if>>
<<else>>
  The fabricator has been upgraded to manufacture extremely powerful growth drugs.
<</if>>
<</if>>

<<if $arcologies[0].FSYouthPreferentialistDecoration == 100>>
<<if ($arcologies[0].FSYouthPreferentialistResearch == 0)>>
	<<if ($rep >= 5000*$upgradeMultiplierMedicine)>>
	  [[Fund research into skin care designed to reverse the effects of aging|Dispensary][$cash -= 30000*$upgradeMultiplierMedicine,$arcologies[0].FSYouthPreferentialistResearch to 1]] //Costs ¤<<print 30000*$upgradeMultiplierMedicine>>. Will allow creation of beauty creams designed to make slaves look young again.//
	<<else>>
	  // You lack the reputation to access the research necessary to develop beauty creams designed to make slaves look young again. //
	<</if>>
<<else>>
  The fabricator has been upgraded to manufacture extremely effective beauty creams designed to combat aging.
<</if>>
<</if>>


code:
:: DJ Select

<<nobr>>
<<set $nextButton to "Back">>
<<set $nextLink to "Club">>
<<set $showEncyclopedia to 1>><<set $encyclopedia to "DJs">>

<<for _i to 0; _i < $slaves.length; _i++>>
<<if $DJ.ID == $slaves[_i].ID>>
	''__@@color:pink;$slaves[_i].slaveName@@__'' is serving as your DJ.
	<<set $slaves[_i].assignment to "be the DJ">>
	<<set $slaves[_i].assignmentVisible to 0>>

She will headline entertainment in $clubName.
	<<break>>
<</if>>
<</for>>
<<if ($DJ == 0)>>
	You have not selected a DJ.
<</if>>

''Appoint a DJ from your devoted slaves:''
<<display "Slave Summary">>

[[None|DJ Workaround][$DJ to 0]]
<</nobr>>


code:
:: DJ Workaround

<<for $i to 0; $i < $slaves.length; $i++>>
	<<if ($slaves[$i].assignment is "be the DJ") && ($slaves[$i].ID != $DJ.ID)>>
		<<set $slaves[$i].assignment to "rest">>
		<<set $slaves[$i].assignmentVisible to 1>>
		<<break>>
	<</if>>
	<</for>>

	<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $DJ.ID == $slaves[$i].ID>>
		<<if $slaves[$i].ID is $personalAttention>>
		<<if $PC.career == "escort">>
		<<set $personalAttention to "whoring">>
		<<elseif $PC.career == "servant">>
		<<set $personalAttention to "upkeep">>
		<<else>>
		<<set $personalAttention to "business">>
		<</if>>
		<</if>>
		<<set $slaves[$i].assignment to "be the DJ">>
		<<if $slaves[$i].choosesOwnClothes == 1>><<display "SA chooses own clothes">><</if>>
		<<set $slaves[$i].assignmentVisible to 0>>
		<<set $slaves[$i].sentence to 0>>
		<<set $slaves[$i].livingRules to "luxurious">>
		<<if $slaves[$i].ID is $HeadGirl.ID>>
			<<set $HeadGirl to 0>>
		<</if>>
		<<if $slaves[$i].ID is $Recruiter.ID>>
			<<set $Recruiter to 0>>
		<</if>>
		<<if $slaves[$i].ID is $Bodyguard.ID>>
			<<set $Bodyguard to 0>>
		<</if>>
		<<break>>
	<</if>>
	<</for>>

<<goto "Club">>