code:
:: Salon [nobr]

<<set $nextButton = "Continue">>
<<set $nextLink = "Slave Interact">>

<<set $showEncyclopedia = 1>><<set $encyclopedia = "The Auto Salon">>

$activeSlave.slaveName is seated in the auto salon. $pronounCap is awaiting your artistic pleasure.

<<if $activeSlave.origEye == "implant">>
	$pronounCap has artificial eyes, and $pronoun
	<<if $activeSlave.eyewear == "none">>
		has no eyewear.
	<<else>>
		is wearing $activeSlave.eyewear.
	<</if>>
	[[Cosmetic glasses|Salon][$activeSlave.eyewear = "glasses",$cash -= $modCost]]
	| [[None|Salon][$activeSlave.eyewear = "none"]]

<<elseif $activeSlave.eyes < -1>>
	$pronounCap is blind, and
	<<if $activeSlave.eyewear == "none">>
		has no eyewear.
	<<else>>
		is wearing $activeSlave.eyewear.
	<</if>>
	[[Cosmetic glasses|Salon][$activeSlave.eyewear = "glasses",$cash -= $modCost]]
	| [[Blurring glasses|Salon][$activeSlave.eyewear = "blurring glasses",$cash -= $modCost]]
	| [[Blurring contacts|Salon][$activeSlave.eyewear = "blurring contacts",$cash -= $modCost]]
	| [[None|Salon][$activeSlave.eyewear = "none"]]

     //Blurring options are annoying and impede performance on some assignments//
<<elseif $activeSlave.eyes > -1>>
	$possessiveCap vision is normal, and $pronoun
	<<if $activeSlave.eyewear == "none">>
		has no eyewear.
	<<else>>
		is wearing $activeSlave.eyewear.
	<</if>>
	[[Cosmetic glasses|Salon][$activeSlave.eyewear = "glasses",$cash -= $modCost]]
	| [[Blurring glasses|Salon][$activeSlave.eyewear = "blurring glasses",$cash -= $modCost]]
	| [[Blurring contacts|Salon][$activeSlave.eyewear = "blurring contacts",$cash -= $modCost]]
	| [[None|Salon][$activeSlave.eyewear = "none"]]

     //Blurring options are annoying and impede performance on some assignments//
<<else>>

	$pronounCap is nearsighted, and $pronoun
	<<if $activeSlave.eyewear == "none">>
		has no eyewear.
	<<else>>
		is wearing $activeSlave.eyewear.
	<</if>>
	[[Cosmetic glasses|Salon][$activeSlave.eyewear = "glasses",$cash -= $modCost]]
	| [[Corrective glasses|Salon][$activeSlave.eyewear = "corrective glasses",$cash -= $modCost]]
	| [[Corrective contacts|Salon][$activeSlave.eyewear = "corrective contacts",$cash -= $modCost]]
	| [[None|Salon][$activeSlave.eyewear = "none"]]

     //Nearsightedness will impede performance on some assignments//
<</if>>

<<if $activeSlave.origEye != "implant">>

	<<if $activeSlave.origEye != "none">>
		$possessiveCap eyes are $activeSlave.eyeColor.

		Give $possessive cosmetic contact lenses:
		<<if $activeSlave.origEye != $activeSlave.eyeColor>>

			[[Remove lenses|Salon][$activeSlave.eyeColor = $activeSlave.origEye]] |
		<</if>>
	<<else>>
		<<if $activeSlave.eyeColor == "empty">>
			$possessiveCap has no eyes.
		<<else>>
			$possessiveCap glass eyes are $activeSlave.eyeColor.
		<</if>>

		Choose what kind of eyes you want $possessive to have:
		<<if $activeSlave.eyeColor != "empty">>
			[[None|Salon][$activeSlave.eyeColor = "empty"]] |
		<</if>>
	<</if>>
	[[Blue|Salon][$activeSlave.eyeColor = "blue",$cash -= $modCost]]
	| [[Black|Salon][$activeSlave.eyeColor = "black",$cash -= $modCost]]
	| [[Brown|Salon][$activeSlave.eyeColor = "brown",$cash -= $modCost]]
	| [[Green|Salon][$activeSlave.eyeColor = "green",$cash -= $modCost]]
	| [[Turquoise|Salon][$activeSlave.eyeColor = "turquoise",$cash -= $modCost]]
	| [[Sky-blue|Salon][$activeSlave.eyeColor = "sky-blue",$cash -= $modCost]]
	| [[Hazel|Salon][$activeSlave.eyeColor = "hazel",$cash -= $modCost]]
	| [[Pale-grey|Salon][$activeSlave.eyeColor = "pale-grey",$cash -= $modCost]]
	| [[White|Salon][$activeSlave.eyeColor = "white",$cash -= $modCost]]
	| [[Pink|Salon][$activeSlave.eyeColor = "pink",$cash -= $modCost]]
	| [[Amber|Salon][$activeSlave.eyeColor = "amber",$cash -= $modCost]]
	| [[Red|Salon][$activeSlave.eyeColor = "red",$cash -= $modCost]]
	| [[Catlike|Salon][$activeSlave.eyeColor = "catlike",$cash -= $modCost]]
	| [[Serpent-like|Salon][$activeSlave.eyeColor = "serpent-like",$cash -= $modCost]]
	| [[Devilish|Salon][$activeSlave.eyeColor = "devilish",$cash -= $modCost]]
	| [[Demonic|Salon][$activeSlave.eyeColor = "demonic",$cash -= $modCost]]
	| [[Hypnotic|Salon][$activeSlave.eyeColor = "hypnotic",$cash -= $modCost]]
	| [[Heart-shaped|Salon][$activeSlave.eyeColor = "heart-shaped",$cash -= $modCost]]

     //Color settings will be applied in addition to eyewear choices.//
<<else>>
	$possessiveCap eyes are artificial and can't be set here.
<</if>>

<<if $activeSlave.makeup == 1>>
	$pronounCap's wearing minimal makeup.
<<elseif $activeSlave.makeup == 2>>
	$pronounCap's wearing expensive, luxurious makeup.
<<elseif $activeSlave.makeup == 3>>
	$possessiveCap makeup is color-coordinated with $possessive $activeSlave.hColor hair.
<<elseif $activeSlave.makeup == 4>>
	$pronounCap's wearing stereotypical, garish streetwalker makeup.
<<elseif $activeSlave.makeup == 11>>
	$pronounCap's wearing expensive, metallic makeup.
<<elseif $activeSlave.makeup == 12>>
	$possessiveCap metallic makeup is color-coordinated with $possessive $activeSlave.hColor hair.
<<elseif $activeSlave.lipsTat == "permanent makeup">>
	$possessiveCap face appears to bear very heavy, slutty makeup, but on closer inspection, the makeup is actually tattooed on.
<<else>>
	$possessiveCap face is makeup-free.
<</if>>

[[Makeup-free|Salon][$activeSlave.makeup = 0,$cash -= $modCost]]
| [[Nice makeup|Salon][$activeSlave.makeup = 1,$cash -= $modCost]]
| [[Gorgeous makeup|Salon][$activeSlave.makeup = 2,$cash -= $modCost]]
| [[Color-coordinate makeup with hair|Salon][$activeSlave.makeup = 3,$cash -= $modCost]]
| [[Metallic makeup|Salon][$activeSlave.makeup = 11,$cash -= $modCost]]
| [[Color-coordinate metallic makeup with hair|Salon][$activeSlave.makeup = 12,$cash -= $modCost]]
| [[Slutty makeup|Salon][$activeSlave.makeup = 4,$cash -= $modCost]]

<<if $activeSlave.amp == 1>>
	$pronounCap has no hands, and thus, no nails.
<<elseif $activeSlave.nails == 1>>
	$possessiveCap nails are long and elegant.
<<elseif $activeSlave.nails == 2>>
	$possessiveCap nails are color-coordinated with $possessive $activeSlave.hColor hair.
<<elseif $activeSlave.nails == 3>>
	$possessiveCap nails are sharp and claw-like.
<<elseif $activeSlave.nails == 4>>
	$possessiveCap nails are bright and glittery.
<<elseif $activeSlave.nails == 11>>
	$possessiveCap nails are shiny and metallic.
<<elseif $activeSlave.nails == 12>>
	$possessiveCap nails are shiny, mettalic and color-coordinated with $possessive $activeSlave.hColor hair.
<<elseif $activeSlave.nails == 5>>
	$possessiveCap nails are long and garish, streetwalker-style.
<<else>>
	$possessiveCap nails are neatly clipped.
<</if>>

<<if $activeSlave.amp != 1>>
[[Clip nails|Salon][$activeSlave.nails = 0,$cash -= $modCost]]
| [[Extend nails|Salon][$activeSlave.nails = 1,$cash -= $modCost]]
| [[Color-coordinate nails with hair|Salon][$activeSlave.nails = 2,$cash -= $modCost]]
| [[Sharp, claw-like nails|Salon][$activeSlave.nails = 3,$cash -= $modCost]]
| [[Bright, glittery nails|Salon][$activeSlave.nails = 4,$cash -= $modCost]]
| [[Shiny, metallic nails|Salon][$activeSlave.nails = 11,$cash -= $modCost]]
| [[Streetwalker-style nails|Salon][$activeSlave.nails = 5,$cash -= $modCost]]
<</if>>

<<set $tannableSkin = ["lightened", "white", "fair", "pale", "light"]>>
<<set $lightenableSkin = ["dark", "olive", "black", "brown", "light brown", "tanned"]>>
<<set $bleachableSkin = ["lightened", "white", "fair", "light"]>>

$possessiveCap skin is $activeSlave.skin.

<<if ($tannableSkin.indexOf($activeSlave.skin) != -1)>>

	[[Tan|Salon][$activeSlave.skin = "tanned",$cash -= $modCost]]
<<elseif ($lightenableSkin.indexOf($activeSlave.skin) != -1)>>

	[[Lighten skin|Salon][$activeSlave.skin = "lightened",$cash -= $modCost]]
<</if>>
<<if ($bleachableSkin.indexOf($activeSlave.skin) != -1)>>

	[[Bleach skin|Salon][$activeSlave.skin = "pale",$cash -= $modCost]]
<</if>>
<<if $activeSlave.skin != "black">>

	[[Darken skin|Salon][$activeSlave.skin = "dark",$cash -= $modCost]]
<</if>>

<<if ($activeSlave.markings == "beauty mark")>>
	$pronounCap has a prominent mole on $possessive face, which
	<<if $activeSlave.face > 40>>
	qualifies as a beauty mark and enhances $possessive attractiveness due to $possessive facial beauty.
	<<elseif $activeSlave.face < -10>>
	makes $possessive even less attractive.
	<<else>>
	qualifies as a beauty mark since $pronoun's pretty, having no significant impact on $possessive beauty.
	<</if>>
	[[Remove it|Salon][$activeSlave.markings = "none",$cash -= $modCost]]
<</if>>
<<if ($activeSlave.markings == "birthmark")>>
	$pronounCap has a large birthmark, which
	<<if $activeSlave.prestige > 0>>
	enhances $possessive attractiveness due to $possessive prestige.
	<<else>>
	detracts from $possessive attractiveness.
	<</if>>
	[[Bleach it|Salon][$activeSlave.markings = "none",$cash -= $modCost]]
<</if>>

<<if $activeSlave.bald != 1>>

	$possessiveCap hair is $activeSlave.hColor.

	Dye $possessive hair:
		<<if $activeSlave.origHColor != $activeSlave.hColor>>
			[[Natural color|Salon][$activeSlave.hColor = $activeSlave.origHColor,$cash -= $modCost]] |
		<</if>>
		[[Blonde|Salon][$activeSlave.hColor = "blonde",$cash -= $modCost]]
		| [[Golden|Salon][$activeSlave.hColor = "golden",$cash -= $modCost]]
		| [[Platinum Blonde|Salon][$activeSlave.hColor = "platinum blonde",$cash -= $modCost]]
		| [[Strawberry-blonde|Salon][$activeSlave.hColor = "strawberry-blonde",$cash -= $modCost]]
		| [[Copper|Salon][$activeSlave.hColor = "copper",$cash -= $modCost]]
		| [[Ginger|Salon][$activeSlave.hColor = "ginger",$cash -= $modCost]]
		| [[Red|Salon][$activeSlave.hColor = "red",$cash -= $modCost]]
		| [[Green|Salon][$activeSlave.hColor = "green",$cash -= $modCost]]
		| [[Blue|Salon][$activeSlave.hColor = "blue",$cash -= $modCost]]
		| [[Pink|Salon][$activeSlave.hColor = "pink",$cash -= $modCost]]
		| [[Dark Brown|Salon][$activeSlave.hColor = "dark brown",$cash -= $modCost]]
		| [[Brown|Salon][$activeSlave.hColor = "brown",$cash -= $modCost]]
		| [[Auburn|Salon][$activeSlave.hColor = "auburn",$cash -= $modCost]]
		| [[Burgundy|Salon][$activeSlave.hColor = "burgundy",$cash -= $modCost]]
		| [[Chocolate|Salon][$activeSlave.hColor = "chocolate brown",$cash -= $modCost]]
		| [[Chestnut|Salon][$activeSlave.hColor = "chestnut",$cash -= $modCost]]
		| [[Hazel|Salon][$activeSlave.hColor = "hazel",$cash -= $modCost]]
		| [[Black|Salon][$activeSlave.hColor = "black",$cash -= $modCost]]
		| [[Grey|Salon][$activeSlave.hColor = "grey",$cash -= $modCost]]
		| [[Silver|Salon][$activeSlave.hColor = "silver",$cash -= $modCost]]
		| [[White|Salon][$activeSlave.hColor = "white",$cash -= $modCost]]

	$possessiveCap hair is $activeSlave.hStyle.

	<<if $activeSlave.hLength > 1>>
	Style $possessive hair:
		[[Neat|Salon][$activeSlave.hStyle = "neat",$cash -= $modCost]]
		 | [[Shaved|Salon][$activeSlave.hStyle = "shaved",$activeSlave.hLength = 0,$cash -= $modCost]]
		 | [[Trimmed short|Salon][$activeSlave.hStyle = "trimmed",$activeSlave.hLength = 10,$cash -= $modCost]]
		 | [[Buzzcut|Salon][$activeSlave.hStyle = "buzzcut",$activeSlave.hLength = 1,$cash -= $modCost]]
		 | [[Up|Salon][$activeSlave.hStyle = "up",$cash -= $modCost]]
		 | [[In a ponytail|Salon][$activeSlave.hStyle = "ponytail",$cash -= $modCost]]
		 | [[In a bun|Salon][$activeSlave.hStyle = "bun",$cash -= $modCost]]
		 | [[Curled|Salon][$activeSlave.hStyle = "curls",$cash -= $modCost]]
		 | [[Permed|Salon][$activeSlave.hStyle = "permed",$cash -= $modCost]]
		 | [[Luxurious|Salon][$activeSlave.hStyle = "luxurious",$cash -= $modCost]]
		 | [[Dreadlocks|Salon][$activeSlave.hStyle = "dreadlocks",$cash -= $modCost]]
		 | [[Cornrows|Salon][$activeSlave.hStyle = "cornrows",$cash -= $modCost]]
		 | [[Braided|Salon][$activeSlave.hStyle = "braided",$cash -= $modCost]]
		 | [[In tails|Salon][$activeSlave.hStyle = "tails",$cash -= $modCost]]
		 | [[Afro|Salon][$activeSlave.hStyle = "afro",$cash -= $modCost]]
		 | [[Shaved sides|Salon][$activeSlave.hStyle = "strip",$cash -= $modCost]]
	<<else>>
		//$possessiveCap hair is too short to style meaningfully//
	<</if>>

    //General hairstyles will conform to hair length and clothing choices.//

	$possessiveCap hair is $activeSlave.hLength cm long.

	<<if $activeSlave.hLength == 1>>
		[[Apply hair growth stimulating treatment|Salon][$activeSlave.hLength = 1,$cash -= $modCost]]
	<<elseif $activeSlave.hLength < 150>>
		[[Extensions|Salon][$activeSlave.hLength += 10,$cash -= $modCost]]
	<<else>>
		//$possessiveCap hair is extremely long//
	<</if>>

	Cut $possessive hair:
	<<if $activeSlave.hLength > 5>>
		[[Very short|Salon][$activeSlave.hLength = 5,$cash -= $modCost]]
		<<if $activeSlave.hLength > 10>>
			| [[Short|Salon][$activeSlave.hLength = 10,$cash -= $modCost]]
		<</if>>
		<<if $activeSlave.hLength > 30>>
			| [[Shoulder length|Salon][$activeSlave.hLength = 30,$cash -= $modCost]]
		<</if>>
		<<if $activeSlave.hLength > 60>>
			| [[Long|Salon][$activeSlave.hLength = 60,$cash -= $modCost]]
		<</if>>
		<<if $activeSlave.hLength > 100>>
			| [[Very long|Salon][$activeSlave.hLength = 100,$cash -= $modCost]]
		<</if>>
	<<else>>
		//$possessiveCap hair is already very short//
	<</if>>

<<else>>

	<<if $activeSlave.hStyle == "bald">>
		$pronounCap is completely bald.

	<<else>>
		$pronounCap is wearing a $activeSlave.hColor wig.

		Change $possessive wig color:
			[[Blonde|Salon][$activeSlave.hColor = "blonde",$cash -= $modCost]]
			| [[Golden|Salon][$activeSlave.hColor = "golden",$cash -= $modCost]]
			| [[Platinum Blonde|Salon][$activeSlave.hColor = "platinum blonde",$cash -= $modCost]]
			| [[Strawberry-blonde|Salon][$activeSlave.hColor = "strawberry-blonde",$cash -= $modCost]]
			| [[Copper|Salon][$activeSlave.hColor = "copper",$cash -= $modCost]]
			| [[Ginger|Salon][$activeSlave.hColor = "ginger",$cash -= $modCost]]
			| [[Red|Salon][$activeSlave.hColor = "red",$cash -= $modCost]]
			| [[Green|Salon][$activeSlave.hColor = "green",$cash -= $modCost]]
			| [[Blue|Salon][$activeSlave.hColor = "blue",$cash -= $modCost]]
			| [[Pink|Salon][$activeSlave.hColor = "pink",$cash -= $modCost]]
			| [[Dark Brown|Salon][$activeSlave.hColor = "dark brown",$cash -= $modCost]]
			| [[Brown|Salon][$activeSlave.hColor = "brown",$cash -= $modCost]]
			| [[Auburn|Salon][$activeSlave.hColor = "auburn",$cash -= $modCost]]
			| [[Burgundy|Salon][$activeSlave.hColor = "burgundy",$cash -= $modCost]]
			| [[Chocolate|Salon][$activeSlave.hColor = "chocolate brown",$cash -= $modCost]]
			| [[Chestnut|Salon][$activeSlave.hColor = "chestnut",$cash -= $modCost]]
			| [[Hazel|Salon][$activeSlave.hColor = "hazel",$cash -= $modCost]]
			| [[Black|Salon][$activeSlave.hColor = "black",$cash -= $modCost]]
			| [[Grey|Salon][$activeSlave.hColor = "grey",$cash -= $modCost]]
			| [[Silver|Salon][$activeSlave.hColor = "silver",$cash -= $modCost]]
			| [[White|Salon][$activeSlave.hColor = "white",$cash -= $modCost]]
		<</if>>

	<<if $activeSlave.hStyle != "bald">>
	$possessiveCap wig is in $activeSlave.hStyle style.
	<<else>>
	$pronounCap is not wearing a wig.
	<</if>>

	Change $possessive wig style:
		<<if $activeSlave.hStyle != "bald">>
			<<if $activeSlave.hLength == 0>><<set $activeSlave.hLength = 10>><</if>>
		<</if>>
		<<if $activeSlave.bald == 1 && $activeSlave.hStyle != "bald">>
			[[Remove her wig|Salon][$activeSlave.hStyle = "bald",$activeSlave.hLength = 0,$cash -= $modCost]]
		<</if>>
		 | [[In a ponytail|Salon][$activeSlave.hStyle = "ponytail",$cash -= $modCost]]
		 | [[In a bun|Salon][$activeSlave.hStyle = "bun",$cash -= $modCost]]
		 | [[Curled|Salon][$activeSlave.hStyle = "curls",$cash -= $modCost]]
		 | [[Permed|Salon][$activeSlave.hStyle = "permed",$cash -= $modCost]]
		 | [[Luxurious|Salon][$activeSlave.hStyle = "luxurious",$cash -= $modCost]]
		 | [[Dreadlocks|Salon][$activeSlave.hStyle = "dreadlocks",$cash -= $modCost]]
		 | [[Cornrows|Salon][$activeSlave.hStyle = "cornrows",$cash -= $modCost]]
		 | [[Braided|Salon][$activeSlave.hStyle = "braided",$cash -= $modCost]]
		 | [[In tails|Salon][$activeSlave.hStyle = "tails",$cash -= $modCost]]
		 | [[Afro|Salon][$activeSlave.hStyle = "afro",$cash -= $modCost]]

//General hairstyles will conform to hair length and clothing choices.//

	$possessiveCap wig hair is $activeSlave.hLength cm long.

    Set hair length to
	<<if $activeSlave.hLength != 10>>[[10cm|Salon][$activeSlave.hLength = 10,$cash -= $modCost]]<</if>>
	<<if $activeSlave.hLength != 30>>[[30cm|Salon][$activeSlave.hLength = 30,$cash -= $modCost]]<</if>>
	<<if $activeSlave.hLength != 60>>[[60cm|Salon][$activeSlave.hLength = 60,$cash -= $modCost]]<</if>>
	<<if $activeSlave.hLength != 90>>[[90cm|Salon][$activeSlave.hLength = 90,$cash -= $modCost]]<</if>>
	<<if $activeSlave.hLength != 120>>[[120cm|Salon][$activeSlave.hLength = 120,$cash -= $modCost]]<</if>>
	<<if $activeSlave.hLength != 150>>[[150cm|Salon][$activeSlave.hLength = 150,$cash -= $modCost]]<</if>>

<</if>>

<<if $activeSlave.pubicHStyle != "bald" && $activeSlave.pubicHStyle != "hairless" && $activeSlave.physicalAge >= 12>>

    $possessiveCap pubic hair, if present, is $activeSlave.pubicHColor.

    Dye $possessive pubic hair:
		[[Blonde|Salon][$activeSlave.pubicHColor = "blonde",$cash -= $modCost]]
		| [[Golden|Salon][$activeSlave.pubicHColor = "golden",$cash -= $modCost]]
		| [[Platinum blonde|Salon][$activeSlave.pubicHColor = " platinum blonde",$cash -= $modCost]]
		| [[Strawberry-blonde|Salon][$activeSlave.pubicHColor = "strawberry-blonde",$cash -= $modCost]]
		| [[Copper|Salon][$activeSlave.pubicHColor = "copper",$cash -= $modCost]]
		| [[Ginger|Salon][$activeSlave.pubicHColor = "ginger",$cash -= $modCost]]
		| [[Red|Salon][$activeSlave.pubicHColor = "red",$cash -= $modCost]]
		| [[Green|Salon][$activeSlave.pubicHColor = "green",$cash -= $modCost]]
		| [[Blue|Salon][$activeSlave.pubicHColor = "blue",$cash -= $modCost]]
		| [[Pink|Salon][$activeSlave.pubicHColor = "pink",$cash -= $modCost]]
		| [[Dark Brown|Salon][$activeSlave.pubicHColor = "dark brown",$cash -= $modCost]]
		| [[Brown|Salon][$activeSlave.pubicHColor = "brown",$cash -= $modCost]]
		| [[Auburn|Salon][$activeSlave.pubicHColor = "auburn",$cash -= $modCost]]
		| [[Burgundy|Salon][$activeSlave.pubicHColor = "burgundy",$cash -= $modCost]]
		| [[Chocolate|Salon][$activeSlave.pubicHColor = "chocolate brown",$cash -= $modCost]]
		| [[Chestnut|Salon][$activeSlave.pubicHColor = "chestnut",$cash -= $modCost]]
		| [[Hazel|Salon][$activeSlave.pubicHColor = "hazel",$cash -= $modCost]]
		| [[Black|Salon][$activeSlave.pubicHColor = "black",$cash -= $modCost]]
		| [[Grey|Salon][$activeSlave.pubicHColor = "grey",$cash -= $modCost]]
		| [[Silver|Salon][$activeSlave.pubicHColor = "silver",$cash -= $modCost]]
		| [[White|Salon][$activeSlave.pubicHColor = "white",$cash -= $modCost]]

	$possessiveCap pubic hair is $activeSlave.pubicHStyle.

    Style $possessive pubic hair:
		[[Waxed|Salon][$activeSlave.pubicHStyle = "waxed",$cash -= $modCost]]
		 | [[Landing strip|Salon][$activeSlave.pubicHStyle = "in a strip",$cash -= $modCost]]
		 | [[Neat|Salon][$activeSlave.pubicHStyle = "neat",$cash -= $modCost]]
		 | [[Bushy in the front|Salon][$activeSlave.pubicHStyle = "bushy in the front and neat in the rear",$cash -= $modCost]]
		 | [[Bushy|Salon][$activeSlave.pubicHStyle = "bushy",$cash -= $modCost]]

<<else>>
	$possessiveCap body is completely hairless.
<</if>>

<<if $activeSlave.underArmHStyle != "bald" && $activeSlave.underArmHStyle != "hairless" && $activeSlave.physicalAge >= 12>>

	$possessiveCap armpit hair is $activeSlave.underArmHColor.

    Dye $possessive armpit hair:
		[[Blonde|Salon][$activeSlave.underArmHColor = "blonde",$cash -= $modCost]]
		| [[Golden|Salon][$activeSlave.underArmHColor = "golden",$cash -= $modCost]]
		| [[Platinum blonde|Salon][$activeSlave.underArmHColor = " platinum blonde",$cash -= $modCost]]
		| [[Strawberry-blonde|Salon][$activeSlave.underArmHColor = "strawberry-blonde",$cash -= $modCost]]
		| [[Copper|Salon][$activeSlave.underArmHColor = "copper",$cash -= $modCost]]
		| [[Ginger|Salon][$activeSlave.underArmHColor = "ginger",$cash -= $modCost]]
		| [[Red|Salon][$activeSlave.underArmHColor = "red",$cash -= $modCost]]
		| [[Green|Salon][$activeSlave.underArmHColor = "green",$cash -= $modCost]]
		| [[Blue|Salon][$activeSlave.underArmHColor = "blue",$cash -= $modCost]]
		| [[Pink|Salon][$activeSlave.underArmHColor = "pink",$cash -= $modCost]]
		| [[Dark Brown|Salon][$activeSlave.underArmHColor = "dark brown",$cash -= $modCost]]
		| [[Brown|Salon][$activeSlave.underArmHColor = "brown",$cash -= $modCost]]
		| [[Auburn|Salon][$activeSlave.underArmHColor = "auburn",$cash -= $modCost]]
		| [[Burgundy|Salon][$activeSlave.underArmHColor = "burgundy",$cash -= $modCost]]
		| [[Chocolate|Salon][$activeSlave.underArmHColor = "chocolate brown",$cash -= $modCost]]
		| [[Chestnut|Salon][$activeSlave.underArmHColor = "chestnut",$cash -= $modCost]]
		| [[Hazel|Salon][$activeSlave.underArmHColor = "hazel",$cash -= $modCost]]
		| [[Black|Salon][$activeSlave.underArmHColor = "black",$cash -= $modCost]]
		| [[Grey|Salon][$activeSlave.underArmHColor = "grey",$cash -= $modCost]]
		| [[Silver|Salon][$activeSlave.underArmHColor = "silver",$cash -= $modCost]]
		| [[White|Salon][$activeSlave.underArmHColor = "white",$cash -= $modCost]]

	$possessiveCap armpit hair is $activeSlave.underArmHStyle.

    Style $possessive armpit hair:
		[[Waxed|Salon][$activeSlave.underArmHStyle = "waxed",$cash -= $modCost]]
		 | [[Shaved|Salon][$activeSlave.underArmHStyle = "shaved",$cash -= $modCost]]
		 | [[Neat|Salon][$activeSlave.underArmHStyle = "neat",$cash -= $modCost]]
		 | [[Bushy|Salon][$activeSlave.underArmHStyle = "bushy",$cash -= $modCost]]

<<else>>
	$possessiveCap underarms are completely hairless.
<</if>>


code:
:: Scheduled Event

<<set $showEncyclopedia = 0>>

<<if $expired == 1>>
	<<set $expiree = 0>>
	<<include "Remove activeSlave">>
	<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].indenture == 0>>
		<<set $expiree = $slaves[$i]>>
		<<break>>
	<</if>>
	<</for>>
<</if>>
<<set $expired = 0>>

<<if $retired == 1>>
	<<set $retiree = 0>>
	<<include "Remove activeSlave">>
	<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].indenture < 0>>
	<<if $slaves[$i].actualAge >= $retirementAge && $PhysicalRetirementAgePolicy != 1>>
		<<set $retiree = $slaves[$i]>>
		<<break>>
	<</if>>
	<<if $slaves[$i].physicalAge >= $retirementAge && $PhysicalRetirementAgePolicy == 1>>
		<<set $retiree = $slaves[$i]>>
		<<break>>
	<</if>>
	<<if $SexMilestoneRetirement == 1>>
		<<if $slaves[$i].oralCount + $slaves[$i].analCount + $slaves[$i].vaginalCount + $slaves[$i].penetrativeCount + $slaves[$i].mammaryCount >= $retirementSex>>
		<<set $retiree = $slaves[$i]>>
		<<break>>
		<</if>>
	<</if>>
	<<if $MilkMilestoneRetirement == 1>>
		<<if $slaves[$i].milk >= $retirementMilk>>
		<<set $retiree = $slaves[$i]>>
		<<break>>
		<</if>>
	<</if>>
	<<if $BirthsMilestoneRetirement == 1>>
		<<if $slaves[$i].births >= $retirementBirths>>
		<<set $retiree = $slaves[$i]>>
		<<break>>
		<</if>>
	<</if>>
	<<if $KillsMilestoneRetirement == 1>>
		<<if $slaves[$i].pitkills >= $retirementKills>>
		<<set $retiree = $slaves[$i]>>
		<<break>>
		<</if>>
	<</if>>
	<</if>>
	<</for>>
<</if>>
<<set $retired = 0>>

/* birth scheduled event */
<<if $birthed == 1>>
	<<set $birthee = 1>>
<</if>>
<<set $birthed = 0>>

/* burst scheduled event */
<<if $burst == 1>>
	<<set $burstee = 1>>
<</if>>
<<set $burst = 0>>

<<if $week == 30>>
	<<set $fcnn.push("...is where I'll be when the bombs hit. Survival is my first...")>>
	<<set $fcnn.push("...time to prepare for major shortages is now, since there's no likelihood...")>>
	<<set $fcnn.push("...construction of shelters accelerated last quarter, due to fears...")>>
	<<set $fcnn.push("...major drought across the entire hemisphere shows no signs of...")>>
	<<set $fcnn.push("...medical organization offered no explanation, stating that...")>>
<<elseif $week == 50>>
	<<set $fcnn.push("...tested a thermonuclear device of some five megatons last night...")>>
	<<set $fcnn.push("...heavy fighting for the third week in the capital city of...")>>
	<<set $fcnn.push("...economic recovery looking increasingly unlikely in the event of...")>>
	<<set $fcnn.push("...complete exhaustion of safe water reserves across...")>>
	<<set $fcnn.push("...climate refugees streamed across the border despite...")>>
<<elseif $week == 70>>
	<<set $fcnn.push("...second low-order nuclear detonation in the city of...")>>
	<<set $fcnn.push("...total societal collapse induced by rising sea levels declared today in...")>>
	<<set $fcnn.push("...likelihood of containing Influenza-M was downgraded to a lower...")>>
	<<set $fcnn.push("...threatened immediate use of chemical weapons should those forces not withdraw...")>>
	<<set $fcnn.push("...relief organizations unable to deal with casualties from nuclear exchange between...")>>
<<elseif $week == 90>>
	<<set $fcnn = ["FCNN service has been temporarily suspended. Please stand by."]>>
<</if>>

<<if $rivalOwner == -1>>
	<<goto "P rival initiation">>
<<elseif $PC.labor == 1>>
	<<goto "SE Player Birth">>
<<elseif ($independenceDay == 1) && (Math.trunc(($week-23)/52) == ($week-23)/52)>>
	<<goto "SE independence day">>
<<elseif ($weddingPlanned > 0)>>
	<<set $seed = 0>>
	<<for $i = 0; $i < $slaves.length; $i++>>
	<<if ($slaves[$i].ID == $weddingSlaveID)>>
		<<set $activeSlave = $slaves[$i]>>
		<<set $seed = 1>>
		<<goto "SE wedding">>
	<</if>>
	<</for>>
	<<if $seed == 0>>
		<<set $weddingPlanned = 0, $cash += 10000>>
		<<goto "Scheduled Event">>
	<</if>>
<<elseif $playerBred == 1 && ($PC.preg == 0 || $PC.preg == -1)>>
	<<goto "P insemination">>
<<elseif ($retiree != 0)>>
	<<goto "SE retirement">>
<<elseif ($expiree != 0)>>
	<<goto "SE expiration">>
<<elseif ($burstee != 0)>>
	<<set $burst = 0>>
	<<goto "SE Burst">>
<<elseif ($birthee != 0)>>
	<<set $birthed = 0>>
	<<goto "SE Birth">>
<<elseif ($recruiterEugenics == 0 and $recruiterProgress >= 13)>>
	<<goto "SE recruiter success">>
<<elseif ($recruiterEugenics == 1 and $recruiterProgress >= (13 + ($IntelligenceEugenicsSMR+$HeightEugenicsSMR+$FaceEugenicsSMR)*6))>>
	<<goto "SE recruiter success">>
<<elseif ($customSlaveOrdered == 1)>>
	<<goto "SE custom slave delivery">>
<<elseif ($huskSlaveOrdered == 1)>>
	<<goto "SE husk slave delivery">>
<<elseif ($Lurcher != 0) && ($CoursingAssociation != 0) && (Math.trunc($week/4) is ($week/4)) && ($coursed != 1)>>
	<<goto "SE coursing">>
<<elseif ((($fighterIDs.length > 1) && ($pitBG == 0)) || (($fighterIDs.length > 0) && ($Bodyguard != 0) && ($pitBG == 1))) && ($pitFought == 0)>>
	<<if $pitLethal == 1>><<goto "SE lethal pit">><<else>><<goto "SE nonlethal pit">><</if>>
<<elseif ($bioreactorPerfectedID != 0) && ($bioreactorsAnnounced != 1)>>
	<<goto "P bioreactor perfected">>
<<elseif ($TSS.schoolPresent == 1) && ($TSS.schoolProsperity <= -10)>>
	<<goto "RES Failure">>
<<elseif ($GRI.schoolPresent == 1) && ($GRI.schoolProsperity <= -10)>>
	<<goto "RES Failure">>
<<elseif ($SCP.schoolPresent == 1) && ($SCP.schoolProsperity <= -10)>>
	<<goto "RES Failure">>
<<elseif ($LDE.schoolPresent == 1) && ($LDE.schoolProsperity <= -10)>>
	<<goto "RES Failure">>
<<elseif ($TGA.schoolPresent == 1) && ($TGA.schoolProsperity <= -10)>>
	<<goto "RES Failure">>
<<elseif ($TFS.schoolPresent == 1) && ($TFS.schoolProsperity <= -10)>>
	<<goto "RES Failure">>
<<elseif ($TFS.schoolPresent == 1) && ($organFarmUpgrade != 0) && ($TFS.farmUpgrade == 0)>>
	<<goto "TFS Farm Upgrade">>
<<elseif ($nicaea == 1) && ($organFarmUpgrade != 0) && ($TFS.farmUpgrade == 0)>>
	<<goto "TFS Farm Upgrade">>
<<elseif $arcologies[0].FSChattelReligionist != "unset">>
	<<if $nicaeaHeld == 1>>
		<<if $plot == 1>><<goto "Nonrandom Event">><<else>><<goto "Random Nonindividual Event">><</if>>
	<<elseif ($nicaeaAnnounceable == 1) && ($nicaeaAnnounced != 1)>>
		<<goto "SE nicaea announcement">>
	<<elseif $nicaeaPreparation == 1>>
		<<if $nicaeaInvolvement != 0>>
			<<goto "SE nicaea preparation">>
		<<else>>
			<<set $nicaeaPreparation = 0>>
			<<if $plot == 1>><<goto "Nonrandom Event">><<else>><<goto "Random Nonindividual Event">><</if>>
		<</if>>
	<<elseif $nicaeaInvolvement >= 0>>
		<<set $nicaeaRollA = random(-1,0), $nicaeaRollB = random(-1,0), $nicaeaRollC = random(-1,0)>>
		<<set $nicaeaFocus = either("owners", "slaves")>>
		<<set $nicaeaAssignment = either("whore", "serve the public", "please you")>>
		<<set $nicaeaAchievement = either("devotion", "trust", "slaves")>>
		<<goto "SE nicaea council">>
	<<else>>
		<<if $plot == 1>><<goto "Nonrandom Event">><<else>><<goto "Random Nonindividual Event">><</if>>
	<</if>>
<<elseif $plot == 1>>
	<<goto "Nonrandom Event">>
<<else>>
	<<goto "Random Nonindividual Event">>
<</if>>

repo_name: pillarofsalt/fc


code:
:: Schoolroom [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $returnTo = "Schoolroom", $showEncyclopedia = 1, $encyclopedia = "Schoolroom", $schoolroomSlaves = $SchlRiIDs.length>>

<<if $schoolroomName != "the Schoolroom">>
	<<set $schoolroomNameCaps = $schoolroomName.replace("the ", "The ")>>
<</if>>

$schoolroomNameCaps is well-equipped, with wall screens to display lessons. These are currently
<<switch $schoolroomDecoration>>
<<case "Roman Revivalist">>
	showing the story of a famous Roman slave who sacrificed her life for the life of <<if def $PC.customTitle>>her $PC.customTitle<<elseif $PC.title != 0>>her master<<else>>her mistress<</if>>.
<<case "Egyptian Revivalist">>
	showing an interpretation of Egyptian history that attributes many great monuments to the enlightened use slave labor.
<<case "Edo Revivalist">>
	showing an interpretation of Japanese cultural history that emphasizes a serf's duty to her social superiors.
<<case "Arabian Revivalist">>
	showing an interpretation of Arabian cultural history that focuses on thriving slave markets and vibrant harems.
<<case "Chinese Revivalist">>
	showing an interpretation of Chinese cultural history that focuses on concubinage, palace etiquette, and social order.
<<case "Chattel Religionist">>
	displaying a passage from the holy book that supports slavery.
<<case "Degradationist">>
	displaying a rote recitation of a slave's proper acceptance of her subhuman status.
<<case "Repopulation Focus">>
	reviewing a number a of sexual positions to accommodate a heavily pregnant girl.
<<case "Eugenics">>
	reviewing ways to better your owner's standing intermixed with exagerated pregnancy horror stories focused on slave pregnancy.
<<case "Asset Expansionist">>
	reviewing techniques that allow two slaves with huge breasts to inspect and moisturize each others' hard to reach areas.
<<case "Transformation Fetishist">>
	offering a brief primer on surgical recovery, with practical techniques to make it quicker.
<<case "Gender Radicalist">>
	going over how to keep one's asspussy ready for intercourse at any time, including how to schedule regular enemata and pre-lubrication.
<<case "Gender Fundamentalist">>
	going over the trifecta that is the standard approach of sex slaves: a blowjob, followed by vaginal, finished with anal.
<<case "Physical Idealist">>
	offering a brief primer on the arcology's nutritional system which will allow slaves to double check their own protein intake.
<<case "Supremacist">>
	reviewing the scientific evidence for $arcologies[0].FSSupremacistRace superiority.
<<case "Subjugationist">>
	reviewing the scientific evidence for $arcologies[0].FSSubjugationistRace inferiority.
<<case "Paternalist">>
	reviewing a lesson on time-management skills, and the students are taking notes on their own tablets.
<<case "Pastoralist">>
	reviewing how to help fellow slaves with huge, lactating breasts.
<<case "Maturity Preferentialist">>
	going over daily sets of exercises designed to keep mature slaves' holes as tight as possible.
<<case "Youth Preferentialist">>
	reviewing social cues that young slaves who have been enslaved through their entire adulthood might not understand.
<<case "Body Purist">>
	offering a brief primer on the arcology's nutritional system which will allow slaves to double check their own caloric intake.
<<case "Slimness Enthusiast">>
	offering a brief primer on the arcology's nutritional system which will allow slaves to double check their own caloric intake.
<<default>>
	reviewing the often complex subject of how to address citizens other that one's owner.
<</switch>>

<<if $schoolroomSlaves > 2>>
	$schoolroomNameCaps is busy with slaves, repeating their lessons out loud to drill the instruction home. A few girls are maintaining uncomfortable positions in the corner as punishment for poor work.
<<elseif $schoolroomSlaves > 0>>
	$schoolroomNameCaps sparsely populated, the few students repeating their lessons out loud to drill the instruction home. One girl is maintaining an uncomfortable position in the corner as punishment for poor work.
<<elseif $Schoolteacher != 0>>
	$Schoolteacher.slaveName is alone in $schoolroomName, and has nothing to do but work on her lesson plans.
<<else>>
	None of your slaves are learning in $schoolroomName.
	[[Decommission the schoolroom|Main][$schoolroom = 0, $schoolroomUpgradeSkills = 0, $schoolroomUpgradeLanguage = 0, $schoolroomUpgradeRemedial = 0, $schoolroomDecoration = "standard"]]
<</if>>

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

$schoolroomNameCaps has room to house $schoolroom slaves while they learn.
[[Expand the schoolroom|Schoolroom][$cash -= _Tmult0, $schoolroom += 5]] //Costs ¤_Tmult0//

<<if $schoolroomUpgradeSkills == 1>>
	$schoolroomNameCaps provides slaves with some intermediate skills, including a solid foundation in oral sex, efficient and safe prostitution, and the rudiments of courtesanship.
<<else>>
	<<set _Tmult1 = Math.trunc(10000*$upgradeMultiplierArcology)>>
	$schoolroomNameCaps inculcates the basic skills necessary to a sex slave. [[Upgrade the curriculum to cover some intermediate skills|Schoolroom][$cash -= _Tmult1, $schoolroomUpgradeSkills = 1]] //Costs ¤_Tmult1//
<</if>>

<<set _Tmult2 = Math.trunc(5000*$upgradeMultiplierArcology)>>
<<if $schoolroomUpgradeLanguage == 1>>
	$schoolroomNameCaps boasts state of the art linguistic interfaces that allow it to teach the basics of the arcology's lingua franca with increased success.
<<else>>
	$schoolroomNameCaps includes only basic language classes in its curriculum. [[Install advanced linguistic interfaces to efficiently teach the arcology's lingua franca|Schoolroom][$cash -= _Tmult2, $schoolroomUpgradeLanguage = 1]] //Costs ¤_Tmult2//
<</if>>

<<if $schoolroomUpgradeRemedial == 1>>
	$schoolroomNameCaps has been upgraded with advanced teaching tools to help even the stupidest slave learn at an acceptable pace. Intelligent slaves won't learn much faster as a result, but idiots will benefit a great deal.
<<else>>
	$schoolroomNameCaps teaches idiots using standard methods. [[Purchase specialized materials to help stupid slaves learn good|Schoolroom][$cash -= _Tmult2, $schoolroomUpgradeRemedial = 1]] //Costs ¤_Tmult2//
<</if>>

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

<<if $schoolroomSlaves > 0>>

''Bring a slave out of $schoolroomName:''
	<<set $Flag = 1>>
	<<include "Slave Summary">>
<</if>>

<<if $schoolroom <= $schoolroomSlaves>>

''$schoolroomNameCaps is full and cannot hold any more slaves''
<<elseif ($slaves.length > $schoolroomSlaves)>>

''Send a slave to study in $schoolroomName:''
	<<set $Flag to 0>>
	<<include "Slave Summary">>
<</if>>
<<unset $Flag>>

Rename $schoolroomName: <<textbox "$schoolroomName" $schoolroomName "Schoolroom">> //Use a noun or similar short phrase//


code:
:: Schoolroom Report [nobr]

<<set _idleBonus = 0, _FLsFetish = 0, _DL = $SchlRiIDs.length, $schoolroomSlaves = _DL, _SL = $slaves.length, _FLs = -1>>

<<SlaveSort $SchlRiIDs>>

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

<<if $Schoolteacher != 0>>
	<<for _FLs = 0; _FLs < _SL; _FLs++>>
	<<if $slaves[_FLs].ID == $Schoolteacher.ID>>
		<<break>>
	<</if>>
	<</for>>
	<<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++>>
	<</if>>
	<<if ($slaves[_FLs].trust < -30)>>
	<<set $slaves[_FLs].trust++>>
	<</if>>
	<<set $slaves[_FLs].devotion += _devBonus>>
	<<if $slaves[_FLs].fetishStrength <= 95>>
	<<if $slaves[_FLs].fetish != "dom">>
		<<fetishChangeChance $slaves[_FLs]>>
		<<if $fetishChangeChance > 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 $Schoolteacher = $slaves[_FLs], $i = _FLs>>
	    $Schoolteacher.slaveName is serving as your schoolteacher.<<if $Schoolteacher.relationship == -3>> As your wife, she tries her best to teach her pupils how to please you.<</if>>
	<<if (_FLsFetish == 1)>>
		She's allowed and even expected to use her students for her own sexual gratification, and in their own way her students are complicit, offering sexual favors for an easier time in the classroom. Before long, she's running a hungry eye over the tits and asses of new trainees; she now @@color:lightcoral;more dominant.@@
	<<elseif (_FLsFetish == 2)>>
		Every new student in class is a new target for her personal educational attention. @@color:lightsalmon;She becomes more dominant.@@
	<</if>>
	<<if $schoolteacherCareers.includes($Schoolteacher.career)>>
		She has experience with students and learning from her life before she was a slave, making her more effective.
	<</if>>
	<<if ($Schoolteacher.visualAge > 35)>>
		Her age earns her the respect of her students.
		<<set _idleBonus++>>
	<</if>>
	<<if ($Schoolteacher.intelligence > 0)>>
		She's intelligent enough to be a good teacher.
		<<set _idleBonus++>>
	<</if>>
	<<if ($Schoolteacher.intelligenceImplant == 1)>>
		Since she's educated herself, she understands her students.
		<<set _idleBonus++>>
	<</if>>
	<<if ($Schoolteacher.face > 1)>>
		Her students want to be just like their beautiful teacher.
		<<set _idleBonus++>>
	<</if>>
	<<if ($schoolroomSlaves > 0)>>
	<<for _dI = 0; _dI < _DL; _dI++>>
	<<set _i = $SchlRiIDs[_dI].Index>>
	<<if $familyTesting == 1>>
		<<if $slaves[_i].mother == $Schoolteacher.ID>>
			She makes sure to spend extra time teaching her daughter, $slaves[_i].slaveName.
			<<set $slaves[_i].trust++>>
		<</if>>
		<<if $slaves[_i].father == $Schoolteacher.ID>>
			She makes sure to spend extra time teaching her daughter, $slaves[_i].slaveName.
			<<set $slaves[_i].trust++>>
		<</if>>
		<<if $slaves[_i].ID == $Schoolteacher.father>>
			She makes sure to spend extra time teaching her father, $slaves[_i].slaveName.
			<<set $slaves[_i].trust++>>
		<</if>>
		<<if $slaves[_i].ID == $Schoolteacher.mother>>
			She makes sure to spend extra time teaching her mother, $slaves[_i].slaveName.
			<<set $slaves[_i].trust++>>
		<</if>>
		<<if areSisters($slaves[_i], $Schoolteacher) == 1>>
			She makes sure to spend extra time teaching her twin, $slaves[_i].slaveName.
			<<set $slaves[_i].trust++>>
		<<elseif areSisters($slaves[_i], $Schoolteacher) == 2>>
			She makes sure to spend extra time teaching her sister, $slaves[_i].slaveName.
			<<set $slaves[_i].trust++>>
		<<elseif areSisters($slaves[_i], $Schoolteacher) == 3>>
			She makes sure to spend extra time teaching her half-sister, $slaves[_i].slaveName.
			<<set $slaves[_i].trust++>>
		<</if>>
	<<else>>
	<<if $Schoolteacher.relationTarget == $slaves[_i].ID>>
		She makes sure to spend extra time teaching her $slaves[_i].relation, $slaves[_i].slaveName.
		<<set $slaves[_i].trust++>>
	<</if>>
	<</if>> /*closes extended family mode */
	<<if $Schoolteacher.relationshipTarget == $slaves[_i].ID>>
		She dedicates most of her attention to her <<if $Schoolteacher.relationship == 1>>friend<<elseif $Schoolteacher.relationship == 2>>best friend<<elseif $Schoolteacher.relationship == 3>>friend with benefits<<elseif $Schoolteacher.relationship == 4>>lover<<elseif $Schoolteacher.relationship == 5>>slave wife<</if>>, $slaves[_i].slaveName making sure she understands that day's lesson.
		<<set $slaves[_i].devotion += 2, $slaves[_i].trust += 2>>
	<</if>>
	<<if $Schoolteacher.rivalryTarget == $slaves[_i].ID>>
		Ever since her <<if $Schoolteacher.rivalry == 1>>growing rival<<elseif $Schoolteacher.rivalry == 2>>rival<<elseif $Schoolteacher.rivalry == 3>>bitter rival<</if>>, was enrolled, she began stalking the classroom carrying a large paddle, much to $slaves[_i].slaveName terror.
		<<set $slaves[_i].devotion -= 4, $slaves[_i].trust -= 4>>
		<<if random(1,100) > 35>>
			<<set $Schoolteacher.rivalry++, $slaves[_FLs].rivalry++, $slaves[_i].rivalry++>>
		<</if>>
	<</if>>
	<</for>>
	<</if>>
	<<if ($schoolroomSlaves < $schoolroom)>>
		<<set _seed = random(1,10)+(($schoolroom-$schoolroomSlaves)*(random(150,170)+(_idleBonus*10)))>>
		<<set $cash += _seed>>

    Since she doesn't have enough students to occupy all her time, $schoolroomName takes in citizens' slaves on a contract basis and she teaches them too, earning @@color:yellowgreen;¤_seed.@@

	<</if>>
	<<if ($schoolroomSlaves > 0)>>
<</if>>
<</if>>

<<if ($schoolroomSlaves > 0)>>
	    <<if ($schoolroomSlaves == 1)>>''There is one slave studying in $schoolroomName.''<<else>>''There are $schoolroomSlaves slaves studying in $schoolroomName.''<</if>>
<</if>>

<<if ($Schoolteacher != 0)>>
	<<if $showEWD != 0>>

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

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

		<</if>>
		/* 000-250-006 */
		''__@@color:pink;$slaves[_FLs].slaveName@@__'' is serving as your schoolteacher.

		<<if $slaves[$i].choosesOwnClothes == 1>>
		<<include "SA chooses own clothes">>
		<<if ($slaves[$i].devotion <= 20)>>
			<<set $slaves[$i].devotion -= 5>>
		<<else>>
			<<set $slaves[$i].devotion++>>
		<</if>>
		<</if>>
		<<include "SA diet">>
		<<include "SA long term effects">>
		<<include "SA drugs">>
		<<include "SA relationships">>
		<<include "SA rivalries">>

<<include "SA devotion">>
	<<else>>
		<<silently>>
		<<if $slaves[$i].choosesOwnClothes == 1>>
		<<include "SA chooses own clothes">>
		<<if ($slaves[$i].devotion <= 20)>>
			<<set $slaves[$i].devotion -= 5>>
		<<else>>
			<<set $slaves[$i].devotion++>>
		<</if>>
		<</if>>
		<<include "SA diet">>
		<<include "SA long term effects">>
		<<include "SA drugs">>
		<<include "SA relationships">>
		<<include "SA rivalries">>
		<<include "SA devotion">>
		<</silently>>
	<</if>>
	<<set $Schoolteacher = $slaves[_FLs]>>
<</if>>

<<if ($schoolroomSlaves > 0)>>
	<<set _restedSlaves = 0>>
<<for _dI = 0; _dI < _DL; _dI++>>
	<<set _i = $SchlRiIDs[_dI].Index, $i = _i>>
	<<set $slaves[_i].devotion += _devBonus>>
	<<if ($slaves[_i].health < -80)>>
	<<set $slaves[_i].health += 20>>
	<<elseif ($slaves[_i].health < -40)>>
	<<set $slaves[_i].health += 10>>
	<<elseif ($slaves[_i].health < 0)>>
	<<set $slaves[_i].health += 7>>
	<<elseif ($slaves[_i].health < 90)>>
	<<set $slaves[_i].health += 3>>
	<</if>>
	/% Education done? Has to be here before we run the SA's or there will be double entries for slave %/
	<<if ($slaves[_i].intelligenceImplant == 1)>>
	<<if ($slaves[_i].voice == 0) || ($slaves[_i].accent <= 1) || (($schoolroomUpgradeLanguage == 0) && ($slaves[_i].accent <= 2))>>
	<<if ($slaves[_i].oralSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[_i].oralSkill > 10))>>
	<<if ($slaves[_i].whoreSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[_i].whoreSkill > 10))>>
	<<if ($slaves[_i].entertainSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[_i].entertainSkill > 10))>>
	<<if ($slaves[_i].analSkill > 10) || ($slaves[_i].anus < 1)>>
	<<if ($slaves[_i].vaginalSkill > 10) || ($slaves[_i].vagina < 1)>>
		<<removeJob $slaves[_i] "schoolroom">>
		<<set _restedSlaves++, _dI--, _DL-->>
		<<continue>>
	<</if>>
	<</if>>
	<</if>>
	<</if>>
	<</if>>
	<</if>>
	<</if>>
	<<if $showEWD != 0>>

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

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

		<</if>>
		/* 000-250-006 */
		''__@@color:pink;$slaves[$i].slaveName@@__'' is studying in $schoolroomName.

    She <<include "SA take classes">>

		<<if $slaves[_i].choosesOwnClothes == 1>>
		<<include "SA chooses own clothes">>
		<<if ($slaves[$i].devotion <= 20)>>
			<<set $slaves[_i].devotion -= 5>>
		<<else>>
			<<set $slaves[_i].devotion++>>
		<</if>>
		<</if>>
		<<include "SA diet">>
		<<include "SA long term effects">>
		<<include "SA drugs">>
		<<include "SA relationships">>
		<<include "SA rivalries">>

<<include "SA devotion">>
	<<else>>
		<<silently>>
		<<include "SA take classes">>
		<<if $slaves[_i].choosesOwnClothes == 1>>
		<<include "SA chooses own clothes">>
		<<if ($slaves[_i].devotion <= 20)>>
			<<set $slaves[_i].devotion -= 5>>
		<<else>>
			<<set $slaves[_i].devotion++>>
		<</if>>
		<</if>>
		<<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>>
		@@color:green;learned@@ all they can, and will be released from the schoolroom before the end of the week.
	<</if>>
	<<if $schoolroomDecoration != "standard">>
		$schoolroomNameCaps's $schoolroomDecoration atmosphere @@color:hotpink;has a minor impact on the students.@@
	<</if>>
<</if>>
<<if $schoolroomSlaves || $Schoolteacher>>

<</if>>


code:
:: Schoolteacher Select

<<nobr>>
<<set $nextButton = "Back">>
<<set $nextLink = "Schoolroom">>
<<set $showEncyclopedia = 0>>

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

She will help teach your slaves.
	<<break>>
<</if>>
<</for>>
<<if ($Schoolteacher == 0)>>
	You have not selected a Schoolteacher.
<</if>>

''Appoint a Schoolteacher from your devoted slaves:''
<<include "Slave Summary">>

[[None|Schoolteacher Workaround][$Schoolteacher = 0]]
<</nobr>>


code:
:: Schoolteacher Workaround

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

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

<<goto "Schoolroom">>