code:
:: Salon [nobr]

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

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

The Auto Salon

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

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

<<SlaveArt $activeSlave 3 0>>

	<<else>>

<<SlaveArt $activeSlave 3 0>>

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

/* EYES */

<<if $activeSlave.eyes > -3>> /* Begin eye check */

<<if $activeSlave.pupil == "">>
	<<set $activeSlave.pupil = "circular">>
<</if>>
<<if $activeSlave.sclerae == "">>
	<<set $activeSlave.sclerae = "white">>
<</if>>
<<if $activeSlave.origEye == "implant">>
	$He has artificial eyes, and $he
	<<if $activeSlave.eyewear == "none">>
		has no eyewear.
	<<else>>
		is wearing $activeSlave.eyewear. [[Remove|Salon][$activeSlave.eyewear = "none"]]
	<</if>>
	//Blurring options are annoying and impede performance on some assignments.//

	Give $him: [[Cosmetic glasses|Salon][$activeSlave.eyewear = "glasses",$cash -= $modCost]]

<<elseif $activeSlave.eyes < -1>>
	$He is blind, and
	<<if $activeSlave.eyewear == "none">>
		has no eyewear.
	<<else>>
		is wearing $activeSlave.eyewear. [[Remove|Salon][$activeSlave.eyewear = "none"]]
	<</if>>
	//Blurring options are annoying and impede performance on some assignments.//

	Give $him: [[Cosmetic glasses|Salon][$activeSlave.eyewear = "glasses",$cash -= $modCost]]
<<elseif $activeSlave.eyes > -1>>
	$His vision is normal, and $he
	<<if $activeSlave.eyewear == "none">>
		has no eyewear.
	<<else>>
		is wearing $activeSlave.eyewear. [[Remove|Salon][$activeSlave.eyewear = "none"]]
	<</if>>
	//Blurring options are annoying and impede performance on some assignments.//

	Give $him: [[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]]
<<else>>
	$He is nearsighted, and $he
	<<if $activeSlave.eyewear == "none">>
		has no eyewear.
	<<else>>
		is wearing $activeSlave.eyewear. [[Remove|Salon][$activeSlave.eyewear = "none"]]
	<</if>>
	//Nearsightedness will impede performance on some assignments.//

	Give $him: [[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]]

<</if>>

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

	Custom cosmetic lenses:
	<<if $activeSlave.origEye != "none">>
		$His eyes are $activeSlave.eyeColor.
		<<if $activeSlave.origEye != $activeSlave.eyeColor>>
			[[Remove lenses|Salon][$activeSlave.eyeColor = $activeSlave.origEye]] or //choose new ones://
		<<else>>
			//Choose $his cosmetic lenses:
		<</if>>
	<<else>>
		<<if $activeSlave.eyeColor == "empty">>
			$He has no eyes. //Choose what kind of eyes you want $him to have://
		<<else>>
			$His glass eyes are $activeSlave.eyeColor. [[Remove eyes|Salon][$activeSlave.eyeColor = "empty"]] or //choose new ones://
		<</if>>
	<</if>>

	Iris:
	[[Blue|Salon][$artificialEyeColor = "blue"]]
	| [[Black|Salon][$artificialEyeColor = "black"]]
	| [[Brown|Salon][$artificialEyeColor = "brown"]]
	| [[Green|Salon][$artificialEyeColor = "green"]]
	| [[Turquoise|Salon][$artificialEyeColor = "turquoise"]]
	| [[Sky-Blue|Salon][$artificialEyeColor = "sky-blue"]]
	| [[Hazel|Salon][$artificialEyeColor = "hazel"]]
	| [[Pale-Grey|Salon][$artificialEyeColor = "pale-grey"]]
	| [[White|Salon][$artificialEyeColor = "white"]]
	| [[Pink|Salon][$artificialEyeColor = "pink"]]
	| [[Amber|Salon][$artificialEyeColor = "amber"]]
	| [[Red|Salon][$artificialEyeColor = "red"]]
	| [[Yellow|Salon][$artificialEyeColor = "yellow"]]
	| [[Orange|Salon][$artificialEyeColor = "orange"]]

	Pupil:
	[[Circular|Salon][$artificialEyeShape = "circular"]]
	| [[Catlike|Salon][$artificialEyeShape = "catlike"]]
	| [[Serpent-Like|Salon][$artificialEyeShape = "serpent-like"]]
	| [[Devilish|Salon][$artificialEyeShape = "devilish"]]
	| [[Demonic|Salon][$artificialEyeShape = "demonic"]]
	| [[Hypnotic|Salon][$artificialEyeShape = "hypnotic"]]
	| [[Heart-Shaped|Salon][$artificialEyeShape = "heart-shaped"]]
	| [[Wide-Eyed|Salon][$artificialEyeShape = "wide-eyed"]]
	| [[Almond-Shaped|Salon][$artificialEyeShape = "almond-shaped"]]
	| [[Bright|Salon][$artificialEyeShape = "bright"]]
	| [[Teary|Salon][$artificialEyeShape = "teary"]]
	| [[Vacant|Salon][$artificialEyeShape = "vacant"]]
	| [[Star-Shaped|Salon][$artificialEyeShape = "star-shaped"]]
	| [[Goat-Like|Salon][$artificialEyeShape = "goat-like"]]

	Sclera:
	[[White|Salon][$artificialEyeFill = "white"]]
	| [[Blue|Salon][$artificialEyeFill = "blue"]]
	| [[Black|Salon][$artificialEyeFill = "black"]]
	| [[Brown|Salon][$artificialEyeFill = "brown"]]
	| [[Green|Salon][$artificialEyeFill = "green"]]
	| [[Turquoise|Salon][$artificialEyeFill = "turquoise"]]
	| [[Sky-Blue|Salon][$artificialEyeFill = "sky-blue"]]
	| [[Hazel|Salon][$artificialEyeFill = "hazel"]]
	| [[Pale-Grey|Salon][$artificialEyeFill = "pale-grey"]]
	| [[Pink|Salon][$artificialEyeFill = "pink"]]
	| [[Amber|Salon][$artificialEyeFill = "amber"]]
	| [[Red|Salon][$artificialEyeFill = "red"]]
	| [[Yellow|Salon][$artificialEyeFill = "yellow"]]
	| [[Orange|Salon][$artificialEyeFill = "orange"]]

	<<if $artificialEyeColor != "">>

		[[Give|Salon][$activeSlave.eyeColor = ($artificialEyeColor),$activeSlave.pupil = ($artificialEyeShape),$activeSlave.sclerae = ($artificialEyeFill),$cash -= $modCost, $artificialEyeColor = "", $artificialEyeShape = "", $artificialEyeFill = ""]] $him $artificialEyeColor <<if $activeSlave.origEye == "none">>glass eyes<<else>>lenses<</if>><<if $artificialEyeShape != "" || $artificialEyeFill != "">> with <<if $artificialEyeShape != "" >>$artificialEyeShape pupils<</if>><<if $artificialEyeShape != "" && $artificialEyeFill != "">> and <</if>><<if $artificialEyeFill != "" >>$artificialEyeFill sclerae<</if>><</if>>? //This will be applied in addition to eyewear choices.//
	<</if>>

<<else>>
	$His eyes are artificial and can't be set here.
<</if>>
<</if>> /*End eye check */

/* EARS */

<<if $activeSlave.earImplant == 1>>
	$He has artificial inner ear implants,
	<<if $activeSlave.earwear == "none">>
		which are unobstructed.
	<<else>>
		and is wearing $activeSlave.earwear. [[Remove|Salon][$activeSlave.earwear = "none"]]
	<</if>>
	//Muffling options are annoying and impede performance on some assignments.//

	Give $him: [[Hearing aids|Salon][$activeSlave.earwear = "hearing aids",$cash -= $modCost]]
	| [[Muffling ear plugs|Salon][$activeSlave.earwear = "muffling ear plugs",$cash -= $modCost]]
	| [[Deafening ear plugs|Salon][$activeSlave.earwear = "deafening ear plugs",$cash -= $modCost]]

<<elseif $activeSlave.hears < -1>>
	$He is deaf, and
	<<if $activeSlave.earwear == "none">>
		is wearing nothing on $his ears.
	<<else>>
		is wearing $activeSlave.earwear. [[Remove|Salon][$activeSlave.earwear = "none"]]
	<</if>>
	//Muffling options are annoying and impede performance on some assignments.//

	Give $him: [[Hearing aids|Salon][$activeSlave.earwear = "hearing aids",$cash -= $modCost]]
	| [[Muffling ear plugs|Salon][$activeSlave.earwear = "muffling ear plugs",$cash -= $modCost]]
	| [[Deafening ear plugs|Salon][$activeSlave.earwear = "deafening ear plugs",$cash -= $modCost]]
<<elseif $activeSlave.hears > -1>>
	$His hearing is normal, and $he
	<<if $activeSlave.earwear == "none">>
		has nothing in $his ears.
	<<else>>
		is wearing $activeSlave.earwear. [[Remove|Salon][$activeSlave.earwear = "none"]]
	<</if>>
	//Muffling options are annoying and impede performance on some assignments.//

	Give $him: [[Hearing aids|Salon][$activeSlave.earwear = "hearing aids",$cash -= $modCost]]
	| [[Muffling ear plugs|Salon][$activeSlave.earwear = "muffling ear plugs",$cash -= $modCost]]
	| [[Deafening ear plugs|Salon][$activeSlave.earwear = "deafening ear plugs",$cash -= $modCost]]
<<else>>
	$He is hearing impaired, and
	<<if $activeSlave.earwear == "none">>
		wears nothing to correct or worsen this.
	<<else>>
		is wearing $activeSlave.earwear. [[Remove|Salon][$activeSlave.earwear = "none"]]
	<</if>>
	//Hearing impairment will impede performance on some assignments.//

	Give $him: [[Hearing aids|Salon][$activeSlave.earwear = "hearing aids",$cash -= $modCost]]
	| [[Muffling ear plugs|Salon][$activeSlave.earwear = "muffling ear plugs",$cash -= $modCost]]
	| [[Deafening ear plugs|Salon][$activeSlave.earwear = "deafening ear plugs",$cash -= $modCost]]

<</if>>

/*End ear check */

/* HAIR */

<<if $activeSlave.bald != 1>>
	$His hair is $activeSlave.hColor.
	<<if $activeSlave.origHColor != $activeSlave.hColor>>
		[[Restore natural color|Salon][$activeSlave.hColor = $activeSlave.origHColor]] or //choose a new one://
	<<else>>
		//Choose a dye color before dyeing $his hair://
	<</if>>

	Colors:
		[[Blonde|Salon][$primaryHairColor = "blonde"]]
		| [[Golden|Salon][$primaryHairColor = "golden"]]
		| [[Platinum Blonde|Salon][$primaryHairColor = "platinum blonde"]]
		| [[Strawberry-Blonde|Salon][$primaryHairColor = "strawberry-blonde"]]
		| [[Copper|Salon][$primaryHairColor = "copper"]]
		| [[Ginger|Salon][$primaryHairColor = "ginger"]]
		| [[Red|Salon][$primaryHairColor = "red"]]
		| [[Deep Red|Salon][$primaryHairColor = "deep red"]]
		| [[Green|Salon][$primaryHairColor = "green"]]
		| [[Blue|Salon][$primaryHairColor = "blue"]]
		| [[Pink|Salon][$primaryHairColor = "pink"]]
		| [[Dark Brown|Salon][$primaryHairColor = "dark brown"]]
		| [[Brown|Salon][$primaryHairColor = "brown"]]
		| [[Auburn|Salon][$primaryHairColor = "auburn"]]
		| [[Burgundy|Salon][$primaryHairColor = "burgundy"]]
		| [[Chocolate|Salon][$primaryHairColor = "chocolate brown"]]
		| [[Chestnut|Salon][$primaryHairColor = "chestnut"]]
		| [[Hazel|Salon][$primaryHairColor = "hazel"]]
		| [[Black|Salon][$primaryHairColor = "black"]]
		| [[Grey|Salon][$primaryHairColor = "grey"]]
		| [[Silver|Salon][$primaryHairColor = "silver"]]
		| [[White|Salon][$primaryHairColor = "white"]]
		| [[Blue-Violet|Salon][$primaryHairColor = "blue-violet"]]
		| [[Blazing Red|Salon][$primaryHairColor = "blazing red"]]
		| [[Neon Green|Salon][$primaryHairColor = "neon green"]]
		| [[Neon Blue|Salon][$primaryHairColor = "neon blue"]]
		| [[Neon Pink|Salon][$primaryHairColor = "neon pink"]]

	Highlights:
		[[None|Salon][$secondaryHairColor = ""]]
		| [[Blonde|Salon][$secondaryHairColor = " with blonde highlights"]]
		| [[Black|Salon][$secondaryHairColor = " with black highlights"]]
		| [[Grey|Salon][$secondaryHairColor = " with grey highlights"]]
		| [[Silver|Salon][$secondaryHairColor = " with silver highlights"]]
		| [[White|Salon][$secondaryHairColor = " with white highlights"]]
		| [[Blazing Red|Salon][$secondaryHairColor = " with blazing red highlights"]]
		| [[Neon Green|Salon][$secondaryHairColor = " with neon green highlights"]]
		| [[Neon Blue|Salon][$secondaryHairColor = " with neon blue highlights"]]
		| [[Neon Pink|Salon][$secondaryHairColor = " with neon pink highlights"]]
		| [[Rainbow|Salon][$secondaryHairColor = " with rainbow highlights"]]

	<<if $primaryHairColor != 0>>

		[["Dye " + $his + " hair"|Salon][$activeSlave.hColor = ($primaryHairColor + $secondaryHairColor),$cash -= $modCost, $primaryHairColor = 0, $secondaryHairColor = ""]] $primaryHairColor $secondaryHairColor now?
	<</if>>

$His $activeSlave.hStyle hair is <<= lengthToEitherUnit($activeSlave.hLength)>> long. //General hairstyles will conform to hair length and clothing choices.//

	<<if $activeSlave.hLength > 1>>
		Style $his hair:
		[[Neat|Salon][$activeSlave.hStyle = "neat",$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]]
		| [[In a messy bun|Salon][$activeSlave.hStyle = "messy bun",$cash -= $modCost]]
		| [[Curled|Salon][$activeSlave.hStyle = "curled",$cash -= $modCost]]
		| [[Permed|Salon][$activeSlave.hStyle = "permed",$cash -= $modCost]]
		| [[Luxurious|Salon][$activeSlave.hStyle = "luxurious",$cash -= $modCost]]
		| [[Messy|Salon][$activeSlave.hStyle = "messy",$cash -= $modCost]]
		| [[Eary|Salon][$activeSlave.hStyle = "eary",$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>>
		//$His hair is too short to style meaningfully//
	<</if>>

	<<if $activeSlave.hLength > 1>>

		Cut and style $his hair:
		[[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]]
	<</if>>

	Cut or lengthen $his hair:
	<<if $activeSlave.hLength > 5>>
		[[Very short|Salon][$activeSlave.hLength = 5,$cash -= $modCost]]
	<</if>>
	<<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>>
	<<if $activeSlave.hLength == 1>>
		| [[Apply hair growth stimulating treatment|Salon][$activeSlave.hLength = 1,$cash -= $modCost]]
	<<elseif $activeSlave.hLength < 150>>
		| [[Apply extensions|Salon][$activeSlave.hLength += 10,$cash -= $modCost]]
	<</if>>

	Have $his hair carefully maintained at its current length:
	<<if $activeSlave.haircuts == 1>>
		[[Cease maintenance|Salon][$activeSlave.haircuts = 0]]
	<<else>>
		[[Begin maintenance|Salon][$activeSlave.haircuts = 1]]
	<</if>>
<<else>>
	<<if $activeSlave.hStyle == "bald">>
		$He is completely bald.
	<<else>>
		$His current wig is $activeSlave.hColor.
		<<if $activeSlave.hStyle != "bald">>
			[[Remove wig|Salon][$activeSlave.hStyle = "bald",$activeSlave.hLength = 0,$cash -= $modCost]] or //choose a new one://
		<<else>>
			//Choose a wig color://
		<</if>>

		Colors:
		[[Blonde|Salon][$primaryHairColor = "blonde"]]
		| [[Golden|Salon][$primaryHairColor = "golden"]]
		| [[Platinum Blonde|Salon][$primaryHairColor = "platinum blonde"]]
		| [[Strawberry-Blonde|Salon][$primaryHairColor = "strawberry-blonde"]]
		| [[Copper|Salon][$primaryHairColor = "copper"]]
		| [[Ginger|Salon][$primaryHairColor = "ginger"]]
		| [[Red|Salon][$primaryHairColor = "red"]]
		| [[Deep Red|Salon][$primaryHairColor = "deep red"]]
		| [[Green|Salon][$primaryHairColor = "green"]]
		| [[Blue|Salon][$primaryHairColor = "blue"]]
		| [[Pink|Salon][$primaryHairColor = "pink"]]
		| [[Dark Brown|Salon][$primaryHairColor = "dark brown"]]
		| [[Brown|Salon][$primaryHairColor = "brown"]]
		| [[Auburn|Salon][$primaryHairColor = "auburn"]]
		| [[Burgundy|Salon][$primaryHairColor = "burgundy"]]
		| [[Chocolate|Salon][$primaryHairColor = "chocolate brown"]]
		| [[Chestnut|Salon][$primaryHairColor = "chestnut"]]
		| [[Hazel|Salon][$primaryHairColor = "hazel"]]
		| [[Black|Salon][$primaryHairColor = "black"]]
		| [[Grey|Salon][$primaryHairColor = "grey"]]
		| [[Silver|Salon][$primaryHairColor = "silver"]]
		| [[White|Salon][$primaryHairColor = "white"]]
		| [[Blue-Violet|Salon][$primaryHairColor = "blue-violet"]]
		| [[Blazing Red|Salon][$primaryHairColor = "blazing red"]]
		| [[Neon Green|Salon][$primaryHairColor = "neon green"]]
		| [[Neon Blue|Salon][$primaryHairColor = "neon blue"]]
		| [[Neon Pink|Salon][$primaryHairColor = "neon pink"]]

		Highlights:
		[[None|Salon][$secondaryHairColor = ""]]
		| [[Blonde|Salon][$secondaryHairColor = " with blonde highlights"]]
		| [[Black|Salon][$secondaryHairColor = " with black highlights"]]
		| [[Grey|Salon][$secondaryHairColor = " with grey highlights"]]
		| [[Silver|Salon][$secondaryHairColor = " with silver highlights"]]
		| [[White|Salon][$secondaryHairColor = " with white highlights"]]
		| [[Blazing Red|Salon][$secondaryHairColor = " with blazing red highlights"]]
		| [[Neon Green|Salon][$secondaryHairColor = " with neon green highlights"]]
		| [[Neon Blue|Salon][$secondaryHairColor = " with neon blue highlights"]]
		| [[Neon Pink|Salon][$secondaryHairColor = " with neon pink highlights"]]
		| [[Rainbow|Salon][$secondaryHairColor = " with rainbow highlights"]]

		<<if $primaryHairColor != 0>>

			[[Change|Salon][$activeSlave.hColor = ($primaryHairColor + $secondaryHairColor),$cash -= $modCost, $primaryHairColor = 0, $secondaryHairColor = ""]] $his wig color to $primaryHairColor $secondaryHairColor
		<</if>>
	<</if>>

	<<if $activeSlave.hStyle != "bald">>

		$His $activeSlave.hStyle wig is <<= lengthToEitherUnit($activeSlave.hLength)>> long.

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

		<<if $activeSlave.hLength == 0>><<set $activeSlave.hLength = 10>><</if>>

		Set wig length to:
		<<if $activeSlave.hLength != 10>>[[lengthToEitherUnit(10)|Salon][$activeSlave.hLength = 10,$cash -= $modCost]]<</if>>
		<<if $activeSlave.hLength != 30>>[[lengthToEitherUnit(30)|Salon][$activeSlave.hLength = 30,$cash -= $modCost]]<</if>>
		<<if $activeSlave.hLength != 60>>[[lengthToEitherUnit(60)|Salon][$activeSlave.hLength = 60,$cash -= $modCost]]<</if>>
		<<if $activeSlave.hLength != 90>>[[lengthToEitherUnit(90)|Salon][$activeSlave.hLength = 90,$cash -= $modCost]]<</if>>
		<<if $activeSlave.hLength != 120>>[[lengthToEitherUnit(120)|Salon][$activeSlave.hLength = 120,$cash -= $modCost]]<</if>>
		<<if $activeSlave.hLength != 150>>[[lengthToEitherUnit(150)|Salon][$activeSlave.hLength = 150,$cash -= $modCost]]<</if>>
	<<else>>
		$He is not wearing a wig.
	<</if>>

	<<if $activeSlave.hStyle != "bald">>
		Set wig style:
	<<else>>
		Give $him a wig:
	<</if>>
	[[Ponytail|Salon][$activeSlave.hStyle = "ponytail",$cash -= $modCost]]
	| [[Bun|Salon][$activeSlave.hStyle = "bun",$cash -= $modCost]]
	| [[Messy Bun|Salon][$activeSlave.hStyle = "messy bun",$cash -= $modCost]]
	| [[Curled|Salon][$activeSlave.hStyle = "curled",$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]]
	| [[Tails|Salon][$activeSlave.hStyle = "tails",$cash -= $modCost]]
	| [[Afro|Salon][$activeSlave.hStyle = "afro",$cash -= $modCost]]
<</if>>

/* MAKEUP */

<<makeupDescription>>
<<if $activeSlave.makeup > 0>>
	[[Remove|Salon][$activeSlave.makeup = 0,$cash -= $modCost]]
<</if>>

Apply makeup:
[[Nice|Salon][$activeSlave.makeup = 1,$cash -= $modCost]]
| [[Gorgeous|Salon][$activeSlave.makeup = 2,$cash -= $modCost]]
| [[Slutty|Salon][$activeSlave.makeup = 4,$cash -= $modCost]]
| [[Color-coordinate with hair|Salon][$activeSlave.makeup = 3,$cash -= $modCost]]

[[Neon|Salon][$activeSlave.makeup = 5,$cash -= $modCost]]
| [[Neon, color-coordinate with hair|Salon][$activeSlave.makeup = 6,$cash -= $modCost]]

[[Metallic|Salon][$activeSlave.makeup = 7,$cash -= $modCost]]
| [[Metallic, color-coordinate with hair|Salon][$activeSlave.makeup = 8,$cash -= $modCost]]

/* NAILS */

<<nailsDescription>>

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

Treat nails:
[[Clip|Salon][$activeSlave.nails = 0,$cash -= $modCost]]
| [[Extend|Salon][$activeSlave.nails = 1,$cash -= $modCost]]
| [[Sharp, claw-like|Salon][$activeSlave.nails = 3,$cash -= $modCost]]
| [[Bright, glittery|Salon][$activeSlave.nails = 4,$cash -= $modCost]]
| [[Streetwalker-style|Salon][$activeSlave.nails = 5,$cash -= $modCost]]
| [[Color-coordinate with hair|Salon][$activeSlave.nails = 2,$cash -= $modCost]]

[[Neon|Salon][$activeSlave.nails = 6,$cash -= $modCost]]
| [[Neon, color-coordinate with hair|Salon][$activeSlave.nails = 7,$cash -= $modCost]]

[[Metallic|Salon][$activeSlave.nails = 8,$cash -= $modCost]]
| [[Metallic, color-coordinate with hair|Salon][$activeSlave.nails = 9,$cash -= $modCost]]
<</if>>

/* SKIN */

<<set $tannableSkin = ["natural", "lightened", "white", "fair", "pale", "light", "extremely pale"]>>
<<set $lightenableSkin = ["natural", "dark", "dark olive", "black", "brown", "dark brown", "tanned"]>>
<<set $bleachableSkin = ["natural", "lightened", "pale", "fair", "light"]>>
<<set $darkenableSkin = ["natural", "lightened", "white", "fair", "pale", "light", "extremely pale", "light olive", "tanned", "brown", "dark brown"]>>
<<set $dyedSkin = ["dyed red", "dyed green", "dyed blue", "dyed pink", "dyed gray", "tiger striped", "camouflage patterned"]>>

$His skin is $activeSlave.skin.

<<if ($dyedSkin.indexOf($activeSlave.skin) != -1)>>
	[[Remove coloring|Salon][$activeSlave.skin = $activeSlave.origSkin,$cash -= $modCost]]
<</if>>

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

	Change skin tone:
	<<set _needsSpacers = 0>>
	<<if ($bleachableSkin.indexOf($activeSlave.skin) != -1)>>
		<<if _needsSpacers == 1>> | <</if>>
		[[Bleach|Salon][$activeSlave.skin = "pale",$cash -= $modCost]]
		<<set _needsSpacers = 1>>
	<</if>>
	<<if ($lightenableSkin.indexOf($activeSlave.skin) != -1)>>
		<<if _needsSpacers == 1>> | <</if>>
		[[Lighten|Salon][$activeSlave.skin = "lightened",$cash -= $modCost]]
		<<set _needsSpacers = 1>>
	<</if>>
	<<if ($tannableSkin.indexOf($activeSlave.skin) != -1)>>
		<<if _needsSpacers == 1>> | <</if>>
		[[Tan|Salon][$activeSlave.skin = "tanned",$cash -= $modCost]]
		<<set _needsSpacers = 1>>
	<</if>>
	<<if ($darkenableSkin.indexOf($activeSlave.skin) != -1)>>
		<<if _needsSpacers == 1>> | <</if>>
		[[Darken|Salon][$activeSlave.skin = "dark",$cash -= $modCost]]
		<<set _needsSpacers = 1>>
	<</if>>
<</if>>

Dye or paint:
[[Red|Salon][$activeSlave.skin = "dyed red",$cash -= $modCost]]
| [[Green|Salon][$activeSlave.skin = "dyed green",$cash -= $modCost]]
| [[Blue|Salon][$activeSlave.skin = "dyed blue",$cash -= $modCost]]
| [[Pink|Salon][$activeSlave.skin = "dyed pink",$cash -= $modCost]]
| [[Gray|Salon][$activeSlave.skin = "dyed gray",$cash -= $modCost]]
| [[Tiger Stripes|Salon][$activeSlave.skin = "tiger striped",$cash -= $modCost]]
| [[Camouflage|Salon][$activeSlave.skin = "camouflage patterned",$cash -= $modCost]]

/* MARKS */

<<if ($activeSlave.markings == "beauty mark")>>

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

	$He has a large birthmark, which
	<<if $activeSlave.prestige > 0 || $activeSlave.pornPrestige > 1>>
		enhances $his attractiveness due to $his prestige.
	<<else>>
		detracts from $his attractiveness.
	<</if>>
	[[Bleach it|Salon][$activeSlave.markings = "none",$cash -= $modCost]]
<</if>>

/* EYEBROW HAIR */

<<if $activeSlave.eyebrowHStyle != "bald">>

$His <<if $activeSlave.eyebrowFullness != "natural" && $activeSlave.eyebrowHStyle != "natural">>$activeSlave.eyebrowFullness, $activeSlave.eyebrowHStyle<</if>> eyebrows
	<<if $activeSlave.eyebrowHStyle == "shaved">>
		would be $activeSlave.eyebrowHColor if present.
	<<else>>
		are $activeSlave.eyebrowHColor.
	<</if>>
	<<if $activeSlave.eyebrowHColor != $activeSlave.hColor>>
		[[Match the hair?|Salon][$activeSlave.eyebrowHColor = $activeSlave.hColor,$cash -= $modCost]]
	<</if>>

	Dye $his eyebrow hair:
		[[Blonde|Salon][$activeSlave.eyebrowHColor = "blonde",$cash -= $modCost]]
		| [[Golden|Salon][$activeSlave.eyebrowHColor = "golden",$cash -= $modCost]]
		| [[Platinum Blonde|Salon][$activeSlave.eyebrowHColor = "platinum blonde",$cash -= $modCost]]
		| [[Strawberry-Blonde|Salon][$activeSlave.eyebrowHColor = "strawberry-blonde",$cash -= $modCost]]
		| [[Copper|Salon][$activeSlave.eyebrowHColor = "copper",$cash -= $modCost]]
		| [[Ginger|Salon][$activeSlave.eyebrowHColor = "ginger",$cash -= $modCost]]
		| [[Red|Salon][$activeSlave.eyebrowHColor = "red",$cash -= $modCost]]
		| [[Deep Red|Salon][$primaryHairColor = "deep red"]]
		| [[Green|Salon][$activeSlave.eyebrowHColor = "green",$cash -= $modCost]]
		| [[Blue|Salon][$activeSlave.eyebrowHColor = "blue",$cash -= $modCost]]
		| [[Pink|Salon][$activeSlave.eyebrowHColor = "pink",$cash -= $modCost]]
		| [[Dark Brown|Salon][$activeSlave.eyebrowHColor = "dark brown",$cash -= $modCost]]
		| [[Brown|Salon][$activeSlave.eyebrowHColor = "brown",$cash -= $modCost]]
		| [[Auburn|Salon][$activeSlave.eyebrowHColor = "auburn",$cash -= $modCost]]
		| [[Burgundy|Salon][$activeSlave.eyebrowHColor = "burgundy",$cash -= $modCost]]
		| [[Chocolate|Salon][$activeSlave.eyebrowHColor = "chocolate brown",$cash -= $modCost]]
		| [[Chestnut|Salon][$activeSlave.eyebrowHColor = "chestnut",$cash -= $modCost]]
		| [[Hazel|Salon][$activeSlave.eyebrowHColor = "hazel",$cash -= $modCost]]
		| [[Black|Salon][$activeSlave.eyebrowHColor = "black",$cash -= $modCost]]
		| [[Grey|Salon][$activeSlave.eyebrowHColor = "grey",$cash -= $modCost]]
		| [[Silver|Salon][$activeSlave.eyebrowHColor = "silver",$cash -= $modCost]]
		| [[White|Salon][$activeSlave.eyebrowHColor = "white",$cash -= $modCost]]
		| [[Blue-Violet|Salon][$activeSlave.eyebrowHColor = "blue-violet",$cash -= $modCost]]
		| [[Blazing Red|Salon][$activeSlave.eyebrowHColor = "blazing red",$cash -= $modCost]]
		| [[Neon Green|Salon][$activeSlave.eyebrowHColor = "neon green",$cash -= $modCost]]
		| [[Neon Blue|Salon][$activeSlave.eyebrowHColor = "neon blue",$cash -= $modCost]]
		| [[Neon Pink|Salon][$activeSlave.eyebrowHColor = "neon pink",$cash -= $modCost]]

	Style $his eyebrow hair:
		[[Natural|Salon][$activeSlave.eyebrowHStyle = "natural",$cash -= $modCost]]
		| [[Shaved|Salon][$activeSlave.eyebrowHStyle = "shaved",$cash -= $modCost]]
		| [[Rounded|Salon][$activeSlave.eyebrowHStyle = "rounded",$cash -= $modCost]]
		| [[Straight|Salon][$activeSlave.eyebrowHStyle = "straight",$cash -= $modCost]]
		| [[High-Arched|Salon][$activeSlave.eyebrowHStyle = "high-arched",$cash -= $modCost]]
		| [[Curved|Salon][$activeSlave.eyebrowHStyle = "curved",$cash -= $modCost]]
		| [[Slanted Inwards|Salon][$activeSlave.eyebrowHStyle = "slanted inwards",$cash -= $modCost]]
		| [[Slanted Outwards|Salon][$activeSlave.eyebrowHStyle = "slanted outwards",$cash -= $modCost]]
		| [[Elongated|Salon][$activeSlave.eyebrowHStyle = "elongated",$cash -= $modCost]]
		| [[Shortened|Salon][$activeSlave.eyebrowHStyle = "shortened",$cash -= $modCost]]

	Shape $his eyebrow hair:
		[[Pencil-Thin|Salon][$activeSlave.eyebrowFullness = "pencil-thin",$cash -= $modCost]]
		| [[Thin|Salon][$activeSlave.eyebrowFullness = "thin",$cash -= $modCost]]
		| [[Threaded|Salon][$activeSlave.eyebrowFullness = "threaded",$cash -= $modCost]]
		| [[Natural|Salon][$activeSlave.eyebrowFullness = "natural",$cash -= $modCost]]
		| [[Tapered|Salon][$activeSlave.eyebrowFullness = "tapered",$cash -= $modCost]]
		| [[Thick|Salon][$activeSlave.eyebrowFullness = "thick",$cash -= $modCost]]
		| [[Bushy|Salon][$activeSlave.eyebrowFullness = "bushy",$cash -= $modCost]]

<<else>>

$His eyebrows are completely hairless.
<</if>>

/* PUBIC HAIR */

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

$His $activeSlave.pubicHStyle pubic hair
	<<if $activeSlave.pubicHStyle == "waxed">>
		would be $activeSlave.pubicHColor if present.
	<<else>>
		is $activeSlave.pubicHColor.
	<</if>>
	<<if $activeSlave.pubicHColor != $activeSlave.hColor>>
		[[Match the curtains?|Salon][$activeSlave.pubicHColor = $activeSlave.hColor,$cash -= $modCost]]
	<</if>>

	Dye $his 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]]
		| [[Deep Red|Salon][$primaryHairColor = "deep red"]]
		| [[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]]
		| [[Blue-Violet|Salon][$activeSlave.pubicHColor = "blue-violet",$cash -= $modCost]]
		| [[Blazing Red|Salon][$activeSlave.pubicHColor = "blazing red",$cash -= $modCost]]
		| [[Neon Green|Salon][$activeSlave.pubicHColor = "neon green",$cash -= $modCost]]
		| [[Neon Blue|Salon][$activeSlave.pubicHColor = "neon blue",$cash -= $modCost]]
		| [[Neon Pink|Salon][$activeSlave.pubicHColor = "neon pink",$cash -= $modCost]]

	Style $his 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]]
		| [[Very Bushy|Salon][$activeSlave.pubicHStyle = "very bushy",$cash -= $modCost]]

<<else>>

$His groin is completely hairless.
<</if>>

/* UNDERARM HAIR */

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

$His $activeSlave.underArmHStyle underarm hair
	<<if $activeSlave.underArmHStyle == "waxed">>
		would be $activeSlave.underArmHColor if present.
	<<else>>
		is $activeSlave.underArmHColor.
	<</if>>
	<<if $activeSlave.underArmHColor != $activeSlave.hColor>>
		[[Match the hair?|Salon][$activeSlave.underArmHColor = $activeSlave.hColor,$cash -= $modCost]]
	<</if>>

	Dye $his 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]]
		| [[Deep Red|Salon][$primaryHairColor = "deep red"]]
		| [[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]]
		| [[Blue-Violet|Salon][$activeSlave.underArmHColor = "blue-violet",$cash -= $modCost]]
		| [[Blazing Red|Salon][$activeSlave.underArmHColor = "blazing red",$cash -= $modCost]]
		| [[Neon Green|Salon][$activeSlave.underArmHColor = "neon green",$cash -= $modCost]]
		| [[Neon Blue|Salon][$activeSlave.underArmHColor = "neon blue",$cash -= $modCost]]
		| [[Neon Pink|Salon][$activeSlave.underArmHColor = "neon pink",$cash -= $modCost]]

	Style $his 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>>

$His underarms are completely hairless.
<</if>>


code:
:: Scheduled Event

<<set $showEncyclopedia = 0>>

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

<<if $retired == 1>>
	<<set $activeSlave = getSlave($retiree), $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].ID>>
		<<break>>
	<</if>>
	<<if $slaves[$i].physicalAge >= $retirementAge && $PhysicalRetirementAgePolicy == 1>>
		<<set $retiree = $slaves[$i].ID>>
		<<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].ID>>
		<<break>>
		<</if>>
	<</if>>
	<<if $MilkMilestoneRetirement == 1>>
		<<if $slaves[$i].milk >= $retirementMilk>>
		<<set $retiree = $slaves[$i].ID>>
		<<break>>
		<</if>>
	<</if>>
	<<if $CumMilestoneRetirement == 1>>
		<<if $slaves[$i].cum >= $retirementCum>>
		<<set $retiree = $slaves[$i].ID>>
		<<break>>
		<</if>>
	<</if>>
	<<if $BirthsMilestoneRetirement == 1>>
		<<if $slaves[$i].births >= $retirementBirths>>
		<<set $retiree = $slaves[$i].ID>>
		<<break>>
		<</if>>
	<</if>>
	<<if $KillsMilestoneRetirement == 1>>
		<<if $slaves[$i].pitKills >= $retirementKills>>
		<<set $retiree = $slaves[$i].ID>>
		<<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...")>>
	<<set $fcnn.push("...just ahead, FCNN Special Report: Immortality and You - Breakthroughs in 'Bodyswapping' technology and what they mean for...")>>
<<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...")>>
	<<set $fcnn.push("...released a statement today, explaining their refusal to intervene against the pillaging of several Free Cities in Northern...")>>
	<<set $fcnn.push("...denies allegations of ordering last week's combined arms assault on the arcology known as...")>>
	<<set $fcnn.push("...Coming Up: Ghost Cities - The truth about recent surge of depopulated metropolitan areas in...")>>
<<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...")>>
	<<set $fcnn.push("...guerilla fighting intensifies in escalating proxy war between 'Paternalist' and 'Degredationist' Free Cities in the region of...")>>
	<<set $fcnn.push("...Coming Up- FCNN Special Report about the unprecedented scale of slave insurrections across...")>>
	<<set $fcnn.push("...invasive plant growth epidemic contested by persistent droughts in eastern...")>>
<<elseif $week == 90>>
	<<set $fcnn = ["FCNN service has been temporarily suspended. Please stand by."]>>
<</if>>
<<if $TFS.schoolUpgrade == 3 && $week < 90 && $TFS.compromiseWeek == $week-1>>
	<<set $fcnn.push("...Ladies: Do you want dick so much that you want to HAVE a dick? If yes, join the Futanari Sisters today! Learn more at...")>>
<</if>>

<<if $secExp == 1>>
	<<include "attackGenerator">>
<</if>>

<<if $rivalOwner == -1>>
	<<goto "P rival initiation">>
<<elseif $slaveRebellion == 1 && $secExp == 1>>
	<<goto "rebellionOptions">>
<<elseif $citizenRebellion == 1 && $secExp == 1>>
	<<goto "rebellionOptions">>
<<elseif $attackThisWeek == 1 && $secExp == 1>>
	<<goto "attackOptions">>
<<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 _wedding = 0>>
	<<for $i = 0; $i < $slaves.length; $i++>>
	<<if ($slaves[$i].ID == $weddingSlaveID)>>
		<<set $activeSlave = $slaves[$i]>>
		<<set _wedding = 1>>
		<<goto "SE wedding">>
	<</if>>
	<</for>>
	<<if _wedding == 0>>
		<<set $weddingPlanned = 0, $cash += 10000>>
		<<goto "Scheduled Event">>
	<</if>>
<<elseif $playerBred == 1 && ($PC.preg == 0 || $PC.preg == -1) && $PC.pregWeek == 0 && $PC.vagina == 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 ($slaveDeath != 0)>>
	<<set $slaveDeath = 0>>
	<<goto "SE Death">>
<<elseif ($birthee != 0)>>
	<<set $birthed = 0>>
	<<goto "SE Birth">>
<<elseif ($FCTVshow == 1)>>
	<<set $FCTVshow = 0, $activeSlave = 0>>
	<<goto "SE FCTV Shows">>
<<elseif ($recruiterEugenics == 0 && $recruiterProgress >= 13)>>
	<<goto "SE recruiter success">>
<<elseif ($recruiterEugenics == 1 && $recruiterProgress >= (13 + ($IntelligenceEugenicsSMR+$HeightEugenicsSMR+$FaceEugenicsSMR)*6))>>
	<<goto "SE recruiter success">>
<<elseif ($customSlaveOrdered == 1)>>
	<<goto "SE custom slave delivery">>
<<elseif ($JFCOrder == 1)>>
	<<goto "JobFulfillmentCenterDelivery">>
<<elseif ($huskSlaveOrdered == 1)>>
	<<goto "SE husk slave delivery">>
<<elseif ($Lurcher != 0) && ($CoursingAssociation != 0) && (Math.trunc($week/4) == ($week/4)) && ($coursed != 1)>>
	<<goto "SE coursing">>
<<elseif ($RaidingMercenaries != 0) && ($week > ($raided + 6))>>
	<<goto "SE raiding">>
<<elseif ((($fighterIDs.length > 1) && ($pitBG == 0)) || (($fighterIDs.length > 0) && ($Bodyguard != 0) && ($pitBG == 1)) || (($pitAnimal > 0) && ($fighterIDs.length > 0))) && ($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 ($HA.schoolPresent == 1) && ($HA.schoolProsperity <= -10)>>
	<<goto "RES Failure">>
<<elseif ($TCR.schoolPresent == 1) && ($TCR.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">>

/* Nicea */
<<elseif ($nicaea == 1) && ($organFarmUpgrade != 0) && ($TFS.farmUpgrade == 0)>>
	<<goto "TFS Farm Upgrade">>
<<elseif ($nicaeaHeld != 1) && ($arcologies[0].FSChattelReligionist != "unset") && ($nicaeaAnnounceable == 1) && ($nicaeaAnnounced != 1)>>
	<<goto "SE nicaea announcement">>
<<elseif ($nicaeaHeld != 1) && ($arcologies[0].FSChattelReligionist != "unset") && ($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 ($nicaeaHeld != 1) && ($arcologies[0].FSChattelReligionist != "unset") && ($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">>

<<elseif (Math.trunc($week/24) == ($week/24)) && ($securityForceCreate == 1) && ($SFMODToggle == 1) && $OverallTradeShowAttendance >= 1>>
	<<goto "securityForceTradeShow">>
<<else>>
	<<goto "Nonrandom Event">>
<</if>>


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>>
<<schoolAssignmentFilter>>
$schoolroomNameCaps is well-equipped, with wallscreens 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 "Aztec Revivalist">>
	showing the reenactment of a legendary story of a slave who ascended by offering her blood to the gods, and was granted eternal life.
<<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 exaggerated 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.
<<case "Hedonistic">>
	exposing slaves to new, fascinating forms of pleasure; both for others and for themselves.
<<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 is 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>>

<<if $schoolroomSlaves > 0>>
	<<if $Schoolteacher != 0>><<set _X = 1>><<else>><<set _X = 0>><</if>>
	<<set _NewPop = $schoolroomSlaves+$dormitoryPopulation+_X>>
	<<link "Remove all slaves" "Schoolroom">>
		<<if $Schoolteacher != 0>>
			<<= assignJob($Schoolteacher, "rest")>>
		<</if>>
		<<for $schoolroomSlaves > 0>>
			<<= assignJob($slaves[$slaveIndices[$SchlRiIDs[0]]], "take classes")>>
		<</for>>
	<</link>>
	<<if _NewPop > $dormitory>>
		@@.red;Dormitory capacity will be exceeded.@@
	<</if>>
<</if>>

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

$schoolroomNameCaps has room to house $schoolroom slaves while they learn. Currently $schoolroomSlaves <<if $schoolroomSlaves == 1>>is<<else>>are<</if>> learning.
[[Expand the schoolroom|Schoolroom][$cash -= _Tmult0, $schoolroom += 5, $PC.engineering += .1]] //Costs <<print cashFormat(_Tmult0)>>//

<<if $schoolroomUpgradeSkills == 1>>
	$schoolroomNameCaps provides slaves with some intermediate skills, including a solid foundation in 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 <<print cashFormat(_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 <<print cashFormat(_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 <<print cashFormat(_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 ($schoolroom <= $schoolroomSlaves)>>
	''$schoolroomNameCaps is full and cannot hold any more slaves''
<<elseif ($slaves.length > $schoolroomSlaves)>>
	<<link "''Send a slave to study in $schoolroomName''">>
		<<replace #ComingGoing>>
			<<resetAssignmentFilter>>
			<<set $Flag = 0>>
			<<include "Slave Summary">>
		<</replace>>
	<</link>>
<</if>>

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

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

<<assignmentFilter>>

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

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


code:
:: Schoolroom Report [nobr]

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

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

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

	<<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].livingRules != "luxurious">>
		<<set $slaves[_FLs].livingRules = "luxurious">>
	<</if>>
	<<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 $Schoolteacher = $slaves[_FLs]>>
	    $Schoolteacher.slaveName is serving as your Schoolteacher.<<if $Schoolteacher.relationship == -3 && $Schoolteacher.devotion > 50>> As your loving 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 is now @@.lightcoral;more dominant.@@
	<<elseif (_FLsFetish == 2)>>
		Every new student in class is a new target for her personal educational attention. @@.lightsalmon;She becomes more dominant.@@
	<</if>>
	<<if setup.schoolteacherCareers.includes($Schoolteacher.career)>>
		She has experience with students and learning from her life before she was a slave, making her more effective.
		<<set _idleBonus++>>
	<<elseif $Schoolteacher.skillTE >= $masteredXP>>
		She has experience with students and learning from working for you, making her more effective.
		<<set _idleBonus++>>
	<<else>>
		<<set $slaves[_FLs].skillTE += random(1,Math.ceil(($Schoolteacher.intelligence+$Schoolteacher.intelligenceImplant)/15) + 8)>>
	<</if>>
	<<if ($Schoolteacher.visualAge > 35)>>
		Her age earns her the respect of her students.
		<<set _idleBonus++>>
	<</if>>
	<<if ($Schoolteacher.intelligence > 15)>>
		She's intelligent enough to be a good teacher.
		<<set _idleBonus++>>
	<</if>>
	<<if ($Schoolteacher.intelligenceImplant >= 15)>>
		Since she's educated herself, she understands her students.
		<<set _idleBonus++>>
	<</if>>
	<<if ($Schoolteacher.face > 40)>>
		Her students want to be just like their beautiful teacher.
		<<set _idleBonus++>>
	<</if>>
	<<for _dI = 0; _dI < _DL; _dI++>>
		<<set $i = $slaveIndices[$SchlRiIDs[_dI]]>>
		<<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's 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>>
		<<elseif $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>>
		<<elseif $familyTesting == 1 && totalRelatives($slaves[$i]) > 0>>
			<<if $slaves[$i].mother == $Schoolteacher.ID || $slaves[$i].father == $Schoolteacher.ID>>
				She makes sure to spend extra time teaching her daughter, $slaves[$i].slaveName.
				<<set $slaves[$i].trust++>>
			<<elseif $slaves[$i].ID == $Schoolteacher.mother>>
				She makes sure to spend extra time teaching her mother, $slaves[$i].slaveName.
				<<set $slaves[$i].trust++>>
			<<elseif $slaves[$i].ID == $Schoolteacher.father>>
				She makes sure to spend extra time teaching her father, $slaves[$i].slaveName.
				<<set $slaves[$i].trust++>>
			<<else>>
				<<switch areSisters($slaves[$i], $Schoolteacher)>>
				<<case 1>>
					She makes sure to spend extra time teaching her twin sister, $slaves[$i].slaveName.
					<<set $slaves[$i].trust++>>
				<<case 2>>
					She makes sure to spend extra time teaching her sister, $slaves[$i].slaveName.
					<<set $slaves[$i].trust++>>
				<<case 3>>
					She makes sure to spend extra time teaching her half-sister, $slaves[$i].slaveName.
					<<set $slaves[$i].trust++>>
				<</switch>>
			<</if>>
		<<elseif $Schoolteacher.relationTarget == $slaves[$i].ID && $familyTesting == 0>>
			She makes sure to spend extra time teaching her $slaves[$i].relation, $slaves[$i].slaveName.
			<<set $slaves[$i].trust++>>
		<</if>>
	<</for>>
	<<if (_DL < $schoolroom)>>
		<<set _seed = random(1,10)+(($schoolroom-_DL)*(random(150,170)+(_idleBonus*10)))>>
		<<set $cash += _seed>>

    Since she doesn't have enough students to occupy all of her time, $schoolroomName takes in citizens' slaves on a contract basis and she teaches them too, earning @@.yellowgreen;<<print cashFormat(_seed)>>.@@
	<</if>>
	<<if (_DL > 0)>>

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

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

<<if ($Schoolteacher != 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;$slaves[_FLs].slaveName@@__'' is serving as your Schoolteacher.

		<<= 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 $Schoolteacher = $slaves[_FLs]>>
<</if>>

<<set _restedSlaves = 0>>
<<for _dI = 0; _dI < _DL; _dI++>>
	<<set $i = $slaveIndices[$SchlRiIDs[_dI]]>>
	<<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>>
	<<if $slaves[$i].livingRules != "normal">>
		<<set $slaves[$i].livingRules = "normal">>
	<</if>>
	/% Education done? Has to be here before we run the SA's or there will be double entries for slave %/
	<<if $slaves[$i].fetish == "mindbroken">>
		<<= removeJob($slaves[$i], "learn in the schoolroom")>>
		<<set _restedSlaves++, _dI--, _DL-->>
		<<continue>>
	<<else>>
		<<if ($slaves[$i].intelligenceImplant >= 30)>>
		<<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 > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[$i].analSkill > 10))>>
		<<if ($slaves[$i].vaginalSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[$i].vaginalSkill > 10)) || ($slaves[$i].vagina < 0)>>

''__@@.pink;$slaves[$i].slaveName@@__'' can learn little from further classes, so @@.yellow;her assignment has defaulted to rest.@@
			<<= removeJob($slaves[$i], "learn in the schoolroom")>>
			<<set _restedSlaves++, _dI--, _DL-->>
			<<continue>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
		<</if>>
	<</if>>
	<<if $showEWD != 0>>

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

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

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

    She <<include "SA take classes">>

		<<= 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">>
		<<include "SA take classes">>
		<<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>>
	@@.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 @@.hotpink;has a minor impact on the students.@@
<</if>>
<<if _DL > 0 || $Schoolteacher != 0>>

<</if>>


code:
:: Schoolteacher Select [nobr]

<<set $nextButton = "Back", $nextLink = "Schoolroom", $showEncyclopedia = 1, $encyclopedia = "Schoolteacher">>
<<showallAssignmentFilter>>
<<if ($Schoolteacher != 0)>>
	''__@@.pink;<<= SlaveFullName($Schoolteacher)>>@@__'' is serving as your Schoolteacher.

She will help teach your slaves.
<<else>>
	You have not selected a Schoolteacher.
<</if>>

''Appoint a Schoolteacher from your devoted slaves:''

[[None|Schoolteacher Workaround][$i = -1]]

<<assignmentFilter>>

	<<showallAssignmentFilter>>
	<<include "Slave Summary">>
	<<resetAssignmentFilter>>


code:
:: Schoolteacher Workaround [silently]

<<if $Schoolteacher != 0>>
	<<= removeJob($Schoolteacher, "be the Schoolteacher")>>
<</if>>
<<if $i > -1>>
	<<= assignJob($slaves[$i], "be the Schoolteacher")>>
	<<set $slaves[$i].livingRules = "luxurious">>
	<<set $Schoolteacher = $slaves[$i]>>
<</if>>

<<goto "Schoolroom">>


code:
:: SE Birth [nobr]

/*
Refactoring this passage. Main idea for structure:

1. Making all checks about where and how slave give birth (health too).
2. Showing scene (widget with preparations)
3. Make calculation of birth process. All live babies will be added to slave property .curBabies as array. They will be in it as long as slave not give next birth. Enough time for any processing.
4. Showing scene of birth based on calculation (broodmother and normal is merged in one scene, just with variations).
5. Dealing with babies - they are in separate array, no need to mess with mother .pregType or .preg now.
6. Setting up postpartum
7. Dealing with mother critical states.

I need to break single passage to several widgets, as it's been overcomplicated monster with too many nested if's - true horror for me. :) At least for testing and bugfixing time, later it can be merged back, if needed for processing speed up.

*/
<<set $nextButton = "Continue">>
<<set $nextLink = "Scheduled Event">>

<<if $legendaryWombID != 0>>
	<<set $legendaryWombID = 0>>
<</if>>

<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].labor == 1>>
		<<if ndef $slaves[$i].laborCount>>
			<<set $slaves[$i].laborCount = 0>>
			<<if $slaves[$i].birthsTotal > 0 && $slaves[$i].laborCount == 0>>
				<<set $slaves[$i].laborCount = $slaves[$i].birthsTotal>> /*we do not have a way to know multiples birth count for backward compatibility code. :( */
			<</if>>
		<</if>>
		<<set $dispositionId = _.uniqueId('babyDisposition-')>>
		Birth report: @@.coral;$slaves[$i].slaveName <<if $slaves[$i].slaveSurname != 0>>$slaves[$i].slaveSurname<</if>>@@

		<<seBirthPreChek>>

		<<seBirthPreScene>>

		<<if $slaveDead != 1>>

			<<seBirthCalc>>

			<<seBirthMainScene>>

			<<seBirthBabies>>

			<<seBirthPostpartum>>

			<<seBirthCritical>>

			<<set $slaves[$i].labor = 0>>
			<<set $slaves[$i].induce = 0>>
			<<set $slaves[$i].laborCount++>>
		<<else>>
			<<set $activeSlave = $slaves[$i]>>
			<<include "Remove activeSlave">>
			<<set $slaveDead = 0>>
		<</if>>

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

<<set $reservedChildren = getIncubatorReserved($slaves)>>
<<set $reservedChildrenNursery = getNurseryReserved($slaves)>>

<<set $birthee = 0>>
<<set $birthed = 0>>


code:
:: SE coursing [nobr]

<<set $nextButton = "Continue", $nextLink = "Scheduled Event", $returnTo = "Scheduled Event", $coursed = 1, _seed = 0>>

<<set $Lurcher = getSlave($Lurcher.ID)>>

It's time to go coursing. You meet with fellow members of the Coursing Association while the automated maintenance drones clear the plaza and lay down the green, sharing a refine discussion of recent events over <<if $PC.refreshmentType == 0>>a $PC.refreshment<<elseif $PC.refreshmentType == 1>>glasses of $PC.refreshment<<elseif $PC.refreshmentType == 2>>plates of $PC.refreshment<<elseif $PC.refreshmentType == 3>>hits of $PC.refreshment<<elseif $PC.refreshmentType == 4>>shots of $PC.refreshment<<elseif $PC.refreshmentType == 5>>handfuls of $PC.refreshment<<elseif $PC.refreshmentType == 6>>tabs of $PC.refreshment<</if>>. Once the field is ready, the day's hares are led out and chained in a row along one side of the plaza, naked. You and the other members watch this process intently, since you won't get any more information on them than what you can learn by looking.

The rules have been explained to the hares: they're to be freed if they can reach the other side of the plaza without being caught and raped by the lurchers who will be released to chase them.

<<set $hare1 = 0, $hare2 = 0, $hare3 = 0>>

<<set _possibleOrigins = []>>
<<if $seeDicks != 100>>
	<<set _possibleOrigins.push("housewife")>>
	<<if $seePreg != 0>>
		<<set _possibleOrigins.push("heavily pregnant")>>
	<</if>>
	<<set _possibleOrigins.push("virgin")>>
	<<set _possibleOrigins.push("disobedient young")>>
<</if>>
<<if $seeDicks != 0>>
	<<set _possibleOrigins.push("huge balled")>>
	<<set _possibleOrigins.push("feminized")>>
	<<set _possibleOrigins.push("disobedient young dickgirl")>>
<</if>>

<<for _sec = 0; _sec < 3; _sec++>>

<<if _sec == 0>>
	The first hare
<<elseif _sec == 1>>
	The second hare
<<else>>
	The third and final hare
<</if>>

<<set $hareSpeed = 10>>
<<set $origin = _possibleOrigins.pluck()>> /* select random origin and remove from list to avoid using same origin multiple times */
<<if $origin == "virgin">>
	<<set $activeSlaveOneTimeMaxAge = 20>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate XX Slave">>
	<<set $activeSlave.anus = 1>>
	<<set $activeSlave.vagina = 0>>
	<<set $activeSlave.analCount += 1, $analTotal += 1>>
	<<set $activeSlave.preg = -1>>
	<<set $activeSlave.ovaries = 1>>
	<<set $activeSlave.vaginalSkill = 0>>
	<<set $activeSlave.oralSkill = 0>>
	<<set $activeSlave.analSkill = 0>>
	<<set $activeSlave.whoreSkill = 0>>
	<<set $activeSlave.weight = random(-50,50)>>
	is an appealingly young $activeSlave.race girl, and has V symbols drawn over her cunt and on her lower back, in the interests of fairness. She's a @@.pink;double virgin.@@<<if !canSee($Lurcher)>> To accommodate your blind lurcher, a bell is fastened around her neck.<</if>>
<<elseif $origin == "heavily pregnant">>
	<<set $activeSlaveOneTimeMinAge = $fertilityAge>>
	<<set $activeSlaveOneTimeMaxAge = 20>>
	<<set $one_time_age_overrides_pedo_mode = 1>> /% Old enough to be pregnant. %/
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate XX Slave">>
	<<set $activeSlave.anus = 1>>
	<<set $activeSlave.vagina = 1>>
	<<set $activeSlave.vaginalCount += 1, $vaginalTotal += 1>>
	<<set $activeSlave.preg = random(30,40)>>
	<<set $activeSlave.pregKnown = 1, $activeSlave.pregType = 1, $activeSlave.pregWeek = $activeSlave.preg>>
	<<run SetBellySize($activeSlave)>>
	<<set $activeSlave.ovaries = 1>>
	<<set $activeSlave.vaginalSkill = 0>>
	<<set $activeSlave.oralSkill = 0>>
	<<set $activeSlave.analSkill = 0>>
	<<set $activeSlave.whoreSkill = 0>>
	<<set $activeSlave.weight = random(-20,100)>>
	<<set $activeSlave.career = setup.youngCareers.random()>>
	is <<if $activeSlave.race == "asian" || $activeSlave.race == "indo-aryan" || $activeSlave.race == "amerindian">>an<<else>>a<</if>> $activeSlave.race girl, young and healthy but @@.pink;heavily pregnant.@@ She's probably been selected to be a hare as a joke, or because someone hates her. <<if !canSee($Lurcher)>> To accommodate your blind lurcher, a bell is attached to her popped navel.<</if>>
<<elseif $origin == "housewife">>
	<<set $activeSlaveOneTimeMinAge = 35>>
	<<set $activeSlaveOneTimeMaxAge = 39>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate XX Slave">>
	<<set $activeSlave.boobs += 800>>
	<<set $activeSlave.boobsImplant += 800>>
	<<set $activeSlave.butt += 1>>
	<<set $activeSlave.buttImplant += 1>>
	<<set $activeSlave.face = 55>>
	<<set $activeSlave.faceImplant += 20>>
	<<set $activeSlave.anus = 1>>
	<<set $activeSlave.vagina = 1>>
	<<set $activeSlave.analCount += 1, $analTotal += 1>>
	<<set $activeSlave.preg = -1>>
	<<set $activeSlave.ovaries = 1>>
	<<set $activeSlave.vaginalSkill = 35>>
	<<set $activeSlave.oralSkill = 100>>
	<<set $activeSlave.analSkill = 15>>
	<<set $activeSlave.whoreSkill = 35>>
	<<set $activeSlave.career = either("a housewife", "a trophy wife")>>
	<<set $activeSlave.weight = random(-50,100)>>
	is <<if $activeSlave.race == "asian" || $activeSlave.race == "indo-aryan" || $activeSlave.race == "amerindian">>an<<else>>a<</if>> $activeSlave.race woman, no longer young, but attractive enough in a fake sort of way. She has obviously been crying, and has probably been recently enslaved from a comfortable life, like that of a @@.pink;housewife or a trophy wife.@@<<if !canSee($Lurcher)>> To accommodate your blind lurcher, a bell is fastened around her neck.<</if>>
<<elseif $origin == "disobedient young">>
	<<set $activeSlaveOneTimeMaxAge = 25>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate XX Slave">>
	<<set $activeSlave.anus = 1>>
	<<set $activeSlave.vagina = 1>>
	<<set $activeSlave.analCount += 1, $analTotal += 1>>
	<<set $activeSlave.preg = -1>>
	<<set $activeSlave.ovaries = 1>>
	<<set $activeSlave.vaginalSkill = 15>>
	<<set $activeSlave.oralSkill = 15>>
	<<set $activeSlave.analSkill = 15>>
	<<set $activeSlave.whoreSkill = 15>>
	<<set $activeSlave.sexualFlaw = either("hates oral", "hates anal", "hates penetration", "idealistic")>>
	<<set $activeSlave.behavioralFlaw = either("arrogant", "bitchy", "hates men")>>
	<<set $activeSlave.energy = 10>>
	<<set $activeSlave.fetish = "none">>
	<<set $activeSlave.muscles = random(20,50)>>
	<<set $activeSlave.weight = random(-20,20)>>
	is a fit young $activeSlave.race girl, and is far more watchful and alert than her fellow hares. She may be a @@.pink;disobedient slave@@ here because she was difficult to train.<<if !canSee($Lurcher)>> To accommodate your blind lurcher, a bell is fastened around her neck.<</if>>
<<elseif $origin == "disobedient young dickgirl">>
	<<set $activeSlaveOneTimeMaxAge = 25>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate XY Slave">>
	<<set $activeSlave.anus = 2>>
	<<set $activeSlave.analCount += 1, $analTotal += 1>>
	<<set $activeSlave.dick = random(2,4)>>
	<<set $activeSlave.balls = random(2,4)>>
	<<set $activeSlave.oralSkill = 0>>
	<<set $activeSlave.analSkill = 0>>
	<<set $activeSlave.whoreSkill = 0>>
	<<set $activeSlave.sexualFlaw = either("hates oral", "hates anal", "hates penetration")>>
	<<set $activeSlave.behavioralFlaw = either("arrogant", "bitchy", "hates men")>>
	<<set $activeSlave.attrXY = 0>>
	<<set $activeSlave.attrXX = 70>>
	<<set $activeSlave.fetish = "none">>
	<<set $activeSlave.muscles = random(20,50)>>
	<<set $activeSlave.weight = random(-20,50)>>
	is a strong young $activeSlave.race girl with who retains her cock and balls, and looks determined. Perhaps she's a @@.pink;resistant dickgirl@@ who's been difficult to turn into a good girl.<<if !canSee($Lurcher)>> To accommodate your blind lurcher, a bell is fastened around her cock.<</if>>
<<elseif $origin == "huge balled">>
	<<set $activeSlaveOneTimeMaxAge = 25>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate XY Slave">>
	<<set $activeSlave.anus = 1>>
	<<set $activeSlave.analCount += 1, $analTotal += 1>>
	<<set $activeSlave.balls = 5>>
	<<set $activeSlave.dick = random(3,5)>>
	<<set $activeSlave.oralSkill = 0>>
	<<set $activeSlave.analSkill = 0>>
	<<set $activeSlave.whoreSkill = 0>>
	<<set $activeSlave.weight = random(-50,100)>>
	is <<if $activeSlave.race == "asian" || $activeSlave.race == "indo-aryan" || $activeSlave.race == "amerindian">>an<<else>>a<</if>> $activeSlave.race slave whose distinguishing characteristic is a dangling scrotum and a pair of @@.pink;huge balls.@@ This impediment bumps against her thighs as she's made ready.<<if !canSee($Lurcher)>> To accommodate your blind lurcher, a bell is fastened around her hefty testicles.<</if>>
<<elseif $origin == "feminized">>
	<<set $activeSlaveOneTimeMaxAge = 25>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate XY Slave">>
	<<set $activeSlave.boobs += 800>>
	<<set $activeSlave.boobsImplant += 800>>
	<<set $activeSlave.butt += 1>>
	<<set $activeSlave.buttImplant += 1>>
	<<set $activeSlave.face = Math.clamp($activeSlave.face+20,-100,100)>>
	<<set $activeSlave.faceImplant += 20>>
	<<set $activeSlave.anus = 3>>
	<<set $activeSlave.analCount += 1, $analTotal += 1>>
	<<set $activeSlave.balls = random(0,1)>>
	<<set $activeSlave.dick = random(1,2)>>
	<<set $activeSlave.oralSkill = 15>>
	<<set $activeSlave.analSkill = 35>>
	<<set $activeSlave.whoreSkill = 15>>
	<<set $activeSlave.attrXY = 100>>
	<<set $activeSlave.attrXX = 0>>
	<<set $activeSlave.weight = random(-100,200)>>
	is <<if $activeSlave.race == "asian" || $activeSlave.race == "indo-aryan" || $activeSlave.race == "amerindian">>an<<else>>a<</if>> $activeSlave.race bitch with a tiny dick who has been @@.pink;heavily feminized,@@ yet seems terrified and very new to slavery. Her fake tits and girly behavior must be from her life before she was a slave.<<if !canSee($Lurcher)>> To accommodate your blind lurcher, a bell is fastened around her neck.<</if>>
<</if>>

<<set $activeSlave.origin = "Your lurcher " + $Lurcher.slaveName + " caught her coursing; she was a " + $origin + " hare.">>
<<set $activeSlave.health = random(30,50)>>
<<set $activeSlave.devotion = random(-45,-25)>>
<<set $activeSlave.trust = random(-60,-75)>>
<<set $activeSlave.oldDevotion = $activeSlave.devotion>>

<<if $activeSlave.weight > 190>>
	She's practically all fat and no slave; she's half-expected to roll her way to the finish like an overfed slutty bowling ball.
	<<set $hareSpeed -= 5>>
<<elseif $activeSlave.weight > 160>>
	She's a catastrophically fat slut of a slave, and may stand a better chance of getting away rolling than running.
	<<set $hareSpeed -= 3>>
<<elseif $activeSlave.weight > 95>>
	She's a ridiculously fat slut of a slave with plenty of flesh to grab on to; her constant jiggling will be a sight to behold, however.
	<<set $hareSpeed -= 2>>
<<elseif $activeSlave.weight > 30>>
	She's chubby enough that her weight will reduce her speed.
	<<set $hareSpeed -= 1>>
<<elseif $activeSlave.weight < -95>>
	She's so skinny that it's not likely she's physically fit enough to be quick.
	<<set $hareSpeed -= 1>>
<</if>>
<<if $activeSlave.muscles > 30>>
	She's so heavily muscled that she's probably slower than she would be if she were merely fit.
	<<set $hareSpeed -= 1>>
<<elseif $activeSlave.muscles <= 5>>
	She's soft, and her legs show no sign of tone at all.
	<<set $hareSpeed -= 1>>
<</if>>
<<if $activeSlave.height >= 185>>
	She's tall enough that her height will probably slow her down.
	<<set $hareSpeed -= 1>>
<<elseif $activeSlave.height < 150>>
	She's short enough that her short legs will probably slow her down.
	<<set $hareSpeed -= 2>>
<</if>>
<<if $activeSlave.boobs >= 2000>>
	She has absurd tits that will destroy any chance she has of getting away.
	<<set $hareSpeed -= 1>>
<<elseif $activeSlave.boobs >= 800>>
	She has huge boobs that will make it painful for her to run hard.
	<<set $hareSpeed -= 1>>
<</if>>
<<if $activeSlave.butt >= 6>>
	She has a monstrous bottom that won't help her gait.
	<<set $hareSpeed -= 1>>
<</if>>
<<if $activeSlave.dick >= 5>>
	Her big cock is going to bounce around cruelly.
	<<set $hareSpeed -= 1>>
<</if>>
<<if ($activeSlave.balls >= 5) && ($activeSlave.scrotum > 0)>>
	Her balls are likely to hurt badly enough, running naked, to slow her down.
	<<set $hareSpeed -= 1>>
<</if>>
<<if $activeSlave.belly >= 60000>>
	She's so massively pregnant it'll be lucky if she even makes it anywhere.
	<<set $hareSpeed -= 10>>
<<elseif $activeSlave.belly >= 10000>>
	Her pregnant belly will probably stop her from running at all.
	<<set $hareSpeed -= 5>>
<<elseif $activeSlave.belly >= 5000>>
	She's visibly pregnant and likely to be cautious and unsure about running.
	<<set $hareSpeed -= 3>>
<<elseif $activeSlave.belly >= 1500>>
	There is a slight roundness to her middle, likely an early pregnancy that will distract her.
	<<set $hareSpeed -= 1>>
<</if>>

<<if _sec == 0>>
	<<set $hare1 = $activeSlave>>
	<<set $origin1 = $origin>>
	<<set $hareSpeed1 = $hareSpeed>>
<<elseif _sec == 1>>
	<<set $hare2 = $activeSlave>>
	<<set $origin2 = $origin>>
	<<set $hareSpeed2 = $hareSpeed>>
<<else>>
	<<set $hare3 = $activeSlave>>
	<<set $origin3 = $origin>>
	<<set $hareSpeed3 = $hareSpeed>>
<</if>>

<</for>>

You lead your lurcher $Lurcher.slaveName out on a leash, naked just like the hares.

<<if ($Lurcher.dick > 0)>>
	<<if canPenetrate($Lurcher) && ($Lurcher.energy > 60) && ($Lurcher.devotion > 20)>>
		<<if ($Lurcher.dick > 4)>>
			She's sporting an enormous half-erection, which has already been heavily lubricated to prevent permanent damage to the hares' holes. As you bring her up to the mark, she grabs its base and begins to slap it against her thigh, hard. The hares look around to see what the wet smacking noise is, and are understandably frightened; one of them begins to beg openly. Your fellow competitors @@.green;think this is hilarious.@@
			<<set $rep += 50>>
			<<set $phallus = "huge dick">>
		<<else>>
			She's ready to do her best. Since she's concentrating on the immediate challenge of catching rather than the secondary challenge of raping, she isn't hard yet, but she's not indifferent to the prospect of getting her dick wet. There's a bead of precum forming at her tip.
			<<set $phallus = "dick">>
		<</if>>
	<<elseif !canAchieveErection($Lurcher)>>
		There's no way she's going to be able to achieve an erection, so she's holding a lubricated dildo in one hand. This is technically permitted under the rules, but your fellow competitors and the crowd gathering to spectate @@.red;consider it poor form.@@
		<<set $rep -= 50>>
		<<set $phallus = "dildo">>
	<<elseif ($Lurcher.energy <= 60) || ($Lurcher.devotion <= 20)>>
		She looks nervous, and obviously doesn't find the situation arousing. She knows she's to catch a slave and rape her, but may not be able to get hard enough to do the deed properly. Your fellow competitors and the crowd gathering to spectate @@.red;are unimpressed@@ by her lack of spirit.
		<<set $rep -= 50>>
		<<set $phallus = "fingers">>
	<<else>>
		Her dick is not a fit instrument for sexual assault, so she's holding a lubricated dildo in one hand. This is technically permitted under the rules, but your fellow competitors and the crowd gathering to spectate @@.red;consider it poor form.@@
		<<set $rep -= 50>>
		<<set $phallus = "dildo">>
	<</if>>
<<elseif ($Lurcher.clit > 1) && ($Lurcher.energy > 60) && ($Lurcher.devotion > 20)>>
	She's gently masturbating as you bring her up to the mark, her enormous clit becoming engorged and stiff. Your fellow competitors and the gathering crowd of spectators @@.green;are fascinated,@@ realizing that she intends to attempt rape with it.
	<<set $rep += 50>>
	<<set $phallus = "clit">>
<<elseif $seeDicks != 0>>
	She's holding a lubricated dildo in one hand, since she's missing a natural phallus of her own. This is technically permitted under the rules, but your fellow competitors and the crowd gathering to spectate @@.red;consider it poor form.@@
	<<set $rep -= 50>>
	<<set $phallus = "dildo">>
<<else>>
	She's holding a lubricated dildo in one hand. As you bring her up to the mark, she begins to slap it against her thigh out of nervousness and eagerness to begin. The hares look around to see what the wet smacking noise is, and are understandably frightened; one of them begins to cry openly.
	<<set $phallus = "dildo">>
<</if>>

<<if canSee($Lurcher)>>$Lurcher.slaveName looks at you questioningly, wondering which of the hares she should try to chase down and molest<<else>>$Lurcher.slaveName looks at you questioningly, wondering which of the dingling bells she should try to chase down and molest<</if>>.

<<link "The first">>
	<<replace "#result">>
		<<set $activeSlave = clone($hare1), $origin = $origin1, $hareSpeed = $hareSpeed1>>
		<<include "SE coursing race">>
	<</replace>>
<</link>>

<<link "The second">>
	<<replace "#result">>
		<<set $activeSlave = clone($hare2), $origin = $origin2, $hareSpeed = $hareSpeed2>>
		<<set $hare2 = clone($hare1), $origin2 = $origin1, $hareSpeed2 = $hareSpeed1>>
		<<include "SE coursing race">>
	<</replace>>
<</link>>

<<link "The third">>
	<<replace "#result">>
		<<set $activeSlave = clone($hare3), $origin = $origin3, $hareSpeed = $hareSpeed3>>
		<<set $hare3 = clone($hare1), $origin3 = $origin1, $hareSpeed3 = $hareSpeed1>>
		<<include "SE coursing race">>
	<</replace>>
<</link>>