code:
:: HG Select [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $showEncyclopedia = 1, $encyclopedia = "Head Girl">>
<<showallAssignmentFilter>>

Head Girl Management

<<set _HGName = "Your Head Girl">>
<<if ($HeadGirl != 0)>>
	<<set $HeadGirl = getSlave($HeadGirl.ID)>>
	<<if $surnameOrder != 1>>
		<<switch $HeadGirl.nationality>>
		<<case "Cambodian" "Chinese" "Hungarian" "Japanese" "Korean" "Mongolian" "Taiwanese" "Vietnamese">>
			<<if $HeadGirl.slaveSurname>>
				<<set _HGName = $HeadGirl.slaveSurname + " " + $HeadGirl.slaveName>>
			<<else>>
				<<set _HGName = $HeadGirl.slaveName>>
			<</if>>
		<<default>>
			<<set _HGName = $HeadGirl.slaveName>>
			<<if $HeadGirl.slaveSurname>><<set _HGName += " " + $HeadGirl.slaveSurname>><</if>>
		<</switch>>
	<<else>>
		<<set _HGName = $HeadGirl.slaveName>>
		<<if $HeadGirl.slaveSurname>><<set _HGName += " " + $HeadGirl.slaveSurname>><</if>>
	<</if>>
	''__@@.pink;_HGName@@__'' is serving as your Head Girl<<if $arcologies[0].FSEgyptianRevivalistLaw == 1>> and Consort; it is her role to serve and comfort you at your side, in addition to performing normal head girl duties<</if>>.

<</if>>

__Slave training__

//_HGName will prioritize enabled items in the following order.//

<<if $headGirlTrainsHealth>><<checkbox "$headGirlTrainsHealth" 0 1 checked>><<else>><<checkbox "$headGirlTrainsHealth" 0 1>><</if>>
Health

<<if $headGirlTrainsFlaws>><<checkbox "$headGirlTrainsFlaws" 0 1 checked>><<else>><<checkbox "$headGirlTrainsFlaws" 0 1>><</if>>
Flaws
<<if $headGirlSoftensFlaws>><<checkbox "$headGirlSoftensFlaws" 0 1 checked>><<else>><<checkbox "$headGirlSoftensFlaws" 0 1>><</if>>
Soften

<<if $headGirlTrainsParaphilias>><<checkbox "$headGirlTrainsParaphilias" 0 1 checked>><<else>><<checkbox "$headGirlTrainsParaphilias" 0 1>><</if>>
Paraphilias

<<if $headGirlTrainsObedience>><<checkbox "$headGirlTrainsObedience" 0 1 checked>><<else>><<checkbox "$headGirlTrainsObedience" 0 1>><</if>>
Obedience

<<if $headGirlTrainsSkills>><<checkbox "$headGirlTrainsSkills" 0 1 checked>><<else>><<checkbox "$headGirlTrainsSkills" 0 1>><</if>>
Skills

__Training methods__

_HGName will be
<<if ($HGSeverity > 0)>>
	''aggressive'' when punishing, with rape strongly encouraged. [[Moderate|HG Select][$HGSeverity = 0]]
<<elseif ($HGSeverity == 0)>>
	''moderate'' when punishing, carefully selecting appropriate consequences. [[Be aggressive|HG Select][$HGSeverity = 1]] | [[Restrict her|HG Select][$HGSeverity = -1]]
<<else>>
	''respectful'' when punishing, treating slaves decently. [[Be stricter|HG Select][$HGSeverity = 0]]
<</if>>

_HGName is
<<if $HGPiercings>>
	''allowed'' to use piercings as a tool to improve slaves' attitudes. [[Disallow|HG Select][$HGPiercings = 0]]
<<else>>
	''not allowed'' to use piercings as a tool to improve slaves' attitudes. [[Allow|HG Select][$HGPiercings = 1]]
<</if>>

__Behavior towards you__

_HGName
<<if ($HGFormality != 0)>>
	will be ''formal'': she will always call you <<if $PC.title == 1>>Master<<else>>Mistress<</if>>, just like any other slave.	[[Allow private informality|HG Select][$HGFormality = 0]]
<<else>>
	is allowed to be ''informal'': in private, she may call you <<if $PC.title == 1>>Sir<<else>>Ma'am<</if>>. [[Maintain complete formality|HG Select][$HGFormality = 1]]
<</if>>

<<if $seePreg != 0>>
<<if $HeadGirl != 0>>
<<if $universalRulesImpregnation == "HG">>

_HGName is responsible for impregnating fertile slaves.
	<<set $HGCum = 2+Math.trunc(($HeadGirl.balls/5)+($HeadGirl.energy/95)+($HeadGirl.health/95)+($HeadGirl.devotion/95)+($reproductionFormula*5))>>
	<<if canPenetrate($HeadGirl) && $HeadGirl.pubertyXY == 1>>
		To maximize the chances of impregnation, she will fuck fertile pussies frequently during the week. $HeadGirl.slaveName can service $HGCum slaves this way.
		<<if $HeadGirl.devotion > 95>>She loves you so much she'll fuck them until she's sore.<<else>>If she were more devoted to you, she might be able to drive herself to get hard and service one more.<</if>>
		<<if $HeadGirl.balls >= 120>>Her unreal balls produce nearly an endless supply of semen; her ability to impregnate is almost limitless.<<elseif $HeadGirl.balls >= 80>>Her inhuman balls produce so much semen she can easily impregnate twenty girls in one sitting.<<elseif $HeadGirl.balls >= 50>>Her giant balls produce so much semen she can easily impregnate twelve girls in one sitting.<<elseif $HeadGirl.balls >= 25>>Her oversized balls produce so much semen she can cum repeatedly in a single session.<<elseif $HeadGirl.balls >= 5>>Her big balls produce so much semen she can cum more before she's drained.<<else>>Bigger balls would let her cum more before she's drained.<</if>>
		<<if $HeadGirl.health > 95>>Her wonderful health lets her get hard and stay hard all the time.<<else>>If her health were perfect, she might be able to get hard more often.<</if>>
		<<if $HeadGirl.energy > 95>>Her nymphomania drives her to go above and beyond in this.<<else>>A more powerful sex drive could reduce her refractory period.<</if>>
	<<else>>
		However, $HeadGirl.slaveName cannot perform this duty.
	<</if>>
	[[Rescind her impregnation responsibility|HG Select][$universalRulesImpregnation = "none"]] | [[See to it yourself|HG Select][$universalRulesImpregnation = "PC"]]
<<else>>
	<<if canPenetrate($HeadGirl) && $HeadGirl.pubertyXY == 1>>

_HGName is capable of impregnating slaves, but it's not part of her responsibilities. [[Assign her to impregnate|HG Select][$universalRulesImpregnation = "HG"]]
	<</if>>
<</if>>
<</if>>
<</if>>

''Appoint a head girl from among your devoted slaves:''

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

<<assignmentFilter>>

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


code:
:: HG Workaround [silently]

<<if $HeadGirl != 0>>
	<<= removeJob($HeadGirl, "be your Head Girl")>>
<</if>>
<<if $i > -1>>
	<<= assignJob($slaves[$i], "be your Head Girl")>>
	<<set $HeadGirl = $slaves[$i]>>
<</if>>

<<set $HGTimeInGrade = 0>>

<<goto "Main">>


code:
:: Household Liquidator [nobr]

<<set $nextButton = "Back", $nextLink = "Buy Slaves", $returnTo = "Buy Slaves", $showEncyclopedia = 1, $encyclopedia = "Household Liquidations">>

<<if random(1,100) > 50>>

The household liquidator is offering a set of siblings for sale. As usual, you will only be permitted to inspect the older, but there is a guarantee that the younger will be similar.

<<set $oneTimeDisableDisability = 1>>
<<include "Generate New Slave">>
<<set $activeSlave.origin = "You bought her from the household liquidator.">>

<<set $activeSlave.devotion = random(-75,-25)>>
<<set $activeSlave.trust = random(-45,-25)>>
<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
<<set $activeSlave.oldTrust = $activeSlave.trust>>
<<set $activeSlave.health = random(-50,20)>>
<<if $familyTesting == 1>>
	<<set $activeSlave.mother = $missingParentID>>
	<<set $missingParentID-->>
	<<set $activeSlave.father = $missingParentID>>
	<<set $missingParentID-->>
	<<set $activeSlave.canRecruit = 0>>
<<else>>
	<<set $activeSlave.relation = "sister">>
	<<set $activeSlave.relationTarget = $activeSlave.ID + 1000>>
<</if>>

<<slaveCost $activeSlave>>

The price is <<print cashFormat($slaveCost*3)>>.

<<if $cash >= $slaveCost*3>>
	[[Buy their slave contract|Siblings Workaround][$cash -= $slaveCost*3,$nextButton = "Continue",$nextLink = "Main"]]
<<else>>
	//You lack the necessary funds to buy these slaves.//
<</if>>

[[Decline to purchase them and check out another set of slaves|Household Liquidator][$slavesSeen += 2]]

<<set $saleDescription = 1, $applyLaw = 1>><<include "Long Slave Description">>

<<elseif random(1,100) > 20>>

The household liquidator is offering a mother and her daughter for sale. As usual, you will only be permitted to inspect the mother, but there is a guarantee that the daughter will be similar.

/% Begin younger mothers submod. %/
<<set $activeSlaveOneTimeMinAge = $fertilityAge + $minimumSlaveAge>>
<<set $activeSlaveOneTimeMaxAge = 42>>
<<set $one_time_age_overrides_pedo_mode = 1>> /% Old enough to have a daughter who can be a slave. %/
/% End younger mothers submod. %/
<<set $oneTimeDisableDisability = 1>>
<<include "Generate XX Slave">>
<<set $activeSlave.origin = "You bought her from the household liquidator.">>

<<set $activeSlave.devotion = random(-75,-25)>>
<<set $activeSlave.trust = random(-45,-25)>>
<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
<<set $activeSlave.oldTrust = $activeSlave.trust>>
<<set $activeSlave.health = random(-50,20)>>
<<set $activeSlave.boobs += 100>>
<<set $activeSlave.butt += 1>>
<<if $activeSlave.vagina > -1>><<set $activeSlave.vagina += 1>><</if>>
<<set $activeSlave.birthsTotal = 1>>
<<if $familyTesting == 1>>
	<<set $activeSlave.canRecruit = 0>>
<<else>>
	<<set $activeSlave.relation = "mother">>
	<<set $activeSlave.relationTarget = $activeSlave.ID + 1000>>
<</if>>

<<slaveCost $activeSlave>>
<<if $slavesSeen > $slaveMarketLimit>><<set $slaveCost += Math.trunc($slaveCost*(($slavesSeen-$slaveMarketLimit)*0.1))>><</if>>

The price is <<print cashFormat($slaveCost*3)>>.<<if $slavesSeen > $slaveMarketLimit>> You have cast such a wide net for slaves this week that it is becoming more expensive to find more for sale. Your reputation helps determine your reach within the slave market.<</if>>

<<if $cash >= $slaveCost*3>>
	[[Buy their slave contract|Mother Daughter Workaround][$cash -= $slaveCost*3,"Continue",$nextLink = "Main"]]
<<else>>
	//You lack the necessary funds to buy these slaves.//
<</if>>

[[Decline to purchase them and check out another set of slaves|Household Liquidator][$slavesSeen += 2]]

<<set $saleDescription = 1>>
<<set $applyLaw = 1>>
<<include "Long Slave Description">>
<<set $saleDescription = 0>>

<<else>>

The household liquidator is offering something special: identical twins. The markup is huge, but the merchandise isn't something you see every day.

<<set $oneTimeDisableDisability = 1>>
<<include "Generate New Slave">>
<<set $activeSlave.origin = "You bought her from the household liquidator.">>

<<set $activeSlave.devotion = random(-75,-25)>>
<<set $activeSlave.trust = random(-45,-25)>>
<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
<<set $activeSlave.oldTrust = $activeSlave.trust>>
<<set $activeSlave.health = random(-50,20)>>
<<if $familyTesting == 1>>
	<<set $activeSlave.mother = $missingParentID>>
	<<set $missingParentID-->>
	<<set $activeSlave.father = $missingParentID>>
	<<set $missingParentID-->>
	<<set $activeSlave.canRecruit = 0>>
<<else>>
	<<set $activeSlave.relation = "twin">>
	<<set $activeSlave.relationTarget = $activeSlave.ID + 1000>>
<</if>>
<<slaveCost $activeSlave>>

The price is <<print cashFormat($slaveCost*4)>>.<<if $slavesSeen > $slaveMarketLimit>> You have cast such a wide net for slaves this week that it is becoming more expensive to find more for sale. Your reputation helps determine your reach within the slave market.<</if>>

<<if $cash >= $slaveCost*4>>
	[[Buy their slave contract|Twins Workaround][$cash -= $slaveCost*4,$nextButton = "Continue",$nextLink = "Main"]]
<<else>>
	//You lack the necessary funds to buy these slaves.//
<</if>>

[[Decline to purchase them and check out another set of slaves|Household Liquidator][$slavesSeen += 2]]

<<set $saleDescription = 1>>
<<set $applyLaw = 1>>
<<include "Long Slave Description">>
<<set $saleDescription = 0>>

<</if>>


code:
:: Increment Piercings

<<if $activeSlave.nipples != "fuckable">>
	<<if $activeSlave.nipplesPiercing < 2>>
		<<set $activeSlave.nipplesPiercing += 1>>
		<<set $cash -= $modCost>>
		<<set $degradation += 1>>
	<</if>>
<</if>>

<<if $activeSlave.clitPiercing < 2>>
	<<set $activeSlave.clitPiercing += 1>>
	<<set $cash -= $modCost>>
	<<set $degradation += 1>>
<</if>>

<<if $activeSlave.vagina != -1>>
	<<if $activeSlave.vaginaPiercing < 2>>
		<<set $activeSlave.vaginaPiercing += 1>>
		<<set $cash -= $modCost>>
		<<set $degradation += 1>>
	<</if>>
<</if>>

<<if $activeSlave.dick > 0>>
	<<if $activeSlave.dickPiercing < 2>>
		<<set $activeSlave.dickPiercing += 1>>
		<<set $cash -= $modCost>>
		<<set $degradation += 1>>
	<</if>>
<</if>>

<<if $activeSlave.anusPiercing < 2>>
	<<set $activeSlave.anusPiercing += 1>>
	<<set $cash -= $modCost>>
	<<set $degradation += 1>>
<</if>>

<<if $activeSlave.lipsPiercing < 2>>
	<<set $activeSlave.lipsPiercing += 1>>
	<<set $cash -= $modCost>>
	<<set $degradation += 1>>
<</if>>

<<if $activeSlave.tonguePiercing < 2>>
	<<set $activeSlave.tonguePiercing += 1>>
	<<set $cash -= $modCost>>
	<<set $degradation += 1>>
<</if>>

<<if $activeSlave.earPiercing < 2>>
	<<set $activeSlave.earPiercing += 1>>
	<<set $cash -= $modCost>>
	<<set $degradation += 1>>
<</if>>

<<if $activeSlave.nosePiercing < 2>>
	<<set $activeSlave.nosePiercing += 1>>
	<<set $cash -= $modCost>>
	<<set $degradation += 1>>
<</if>>

<<if $activeSlave.eyebrowPiercing < 2>>
	<<set $activeSlave.eyebrowPiercing += 1>>
	<<set $cash -= $modCost>>
	<<set $degradation += 1>>
<</if>>

<<if $activeSlave.navelPiercing < 2>>
	<<set $activeSlave.navelPiercing += 1>>
	<<set $cash -= $modCost>>
	<<set $degradation += 1>>
<</if>>

<<if $activeSlave.areolaePiercing < 1>>
	<<set $activeSlave.areolaePiercing += 1>>
	<<set $cash -= $modCost>>
	<<set $degradation += 1>>
<</if>>

<<if $activeSlave.corsetPiercing < 1>>
	<<set $activeSlave.corsetPiercing += 1>>
	<<set $cash -= $modCost>>
	<<set $degradation += 1>>
<</if>>

<<goto "Body Modification">>


code:
:: Industrial Dairy Assignment Scene [nobr]

<<set $nextButton = "Continue">>
<<set $nextLink = $returnTo>>

When $activeSlave.slaveName reports to the dairy, it's to the sight of an unoccupied milking machine waiting for her, its straps ready to immure her in what is to be her new home.

<<if $activeSlave.sexualFlaw == "self hating">> /* GETTING IN */

As she realizes her fate, a kind of peace comes over the self hating slut.
<<if !canTalk($activeSlave)>>
	She <<if ($activeSlave.amp != 1)>>mouths<<else>>gestures<</if>> her thanks dreamily.
<<else>>
	"Thank you, <<Master>>," she <<say>>s simply. "I de<<s>>erve thi<<s>>," she adds quietly, half to herself.
<</if>>
Then she falls silent and stares at the machine. Though she hates herself and looks forward to the release of being unable to do anything but get fucked, that doesn't mean she isn't afraid.
<<if ($activeSlave.amp != 1)>>
	<<if ($dairyStimulatorsSetting > 1)>>
		She gauges the size of the sodomizer with her hand, finding that it's wider than her fist, and then presses the fist against her own anus. Realizing what's about to happen, she gives a little shudder.
		<<if ($dairyPregSetting > 1) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
			She does the same with the dildo that will keep her pregnant and her pussy, and her lower lip starts to quiver.
		<</if>>
	<<else>>
		<<if ($dairyPregSetting > 1) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
			She gauges the size of the dildo that will keep her pregnant with her hand, finding that it's wider than her fist, and then presses the fist against her pussy. Realizing what's about to happen, she gives a little shudder.
		<</if>>
	<</if>>
	<<if ($dairyFeedersSetting > 1)>>
		Looking at the phallus that will feed her, she begins to cry softly.
	<</if>>
<</if>>

<<if ($activeSlave.amp != 1)>>
	She strips and climbs into the machine's embrace,
<<else>>
	Another slave helps her strip and lays her in the machine,
<</if>>
her tears pattering onto the uncaring metal. When she's in place, her shoulders slump as she gives up completely.
<<if !canTalk($activeSlave)>>
	She mouths 'Goodbye.'
<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>
	"'bye," she lisps.
<<else>>
	"'bye," she whispers.
<</if>>

<<elseif ($activeSlave.sexualFlaw == "breeder") && isFertile($activeSlave) && $activeSlave.mpreg != 1>>

As she realizes what's about to happen, she begins to cry openly. A curious mix of arousal, joy, and abject horror is obvious on her face, and she deals with the conflicting feelings by sobbing.
<<if !canTalk($activeSlave)>>
	She <<if ($activeSlave.amp != 1)>>mouths<<else>>gestures<</if>> her thanks shakily.
<<else>>
	"Th-thank you, <<Master>>," she <<say>>s through her tears. "I love you."
<</if>>
Then she falls silent and stares at the machine. She's probably imagined this a thousand times, but the prospect is still frightening.
<<if ($activeSlave.amp != 1)>>
	<<if ($dairyStimulatorsSetting > 1)>>
		She gauges the size of the sodomizer with her hand, finding that it's wider than her fist, and then presses the fist against her own anus. Realizing that her anus is about to be permanently gaped, she looks doubtful, but then visibly reassures herself. She'll need both her mouth and her ass to eat enough.
	<</if>>
	<<if ($dairyFeedersSetting > 1)>>
		Looking at the phallus that will feed her, she inserts a finger into its faux urethra, measuring how fast it can pour nutrition in her.
	<</if>>
	She strokes the dildo that will keep her pregnant like a lover, which, of course, it's about to be.
<</if>>

<<if ($activeSlave.amp != 1)>>
	She strips and climbs into the machine's embrace, shaking with nerves.
<<else>>
	Another slave helps her strip and lays her in the machine. She shakes with nerves.
<</if>>
<<if $activeSlave.pregKnown == 1>>
	She cranes around to look at her already-pregnant belly, and looks impatient.
	<<if !canTalk($activeSlave)>>
		She mouths 'hurry up, I need room.'
	<<else>>
		"Hurry up, I need the room," she whispers.
	<</if>>
<<else>>
	She cranes around to look at her belly, and looks impatient.
	<<if !canTalk($activeSlave)>>
		She mouths 'come on, I'm ready.'
	<<else>>
		"Come on, I'm ready," she whispers.
	<</if>>
<</if>>

<<elseif $activeSlave.devotion > 95>> /* GETTING IN */

As she realizes her fate, the worshipful slave squares her shoulders, steeling herself. "<<Master>>," she <<if !canTalk($activeSlave)>>signs<<else>><<say>>s<</if>>, "I will do my best to <<s>>erve you." She steps over to the machine.
She looks it over clinically, getting herself into the right mindset.
<<if ($activeSlave.amp != 1)>>
	<<if ($dairyStimulatorsSetting > 1)>>
	She gauges the size of the massive phallus that will soon penetrate her anus. It's broader than her fist. "I think I can take this. It'll be tough, but I'll need all the hydration I can get."
	<</if>>
	<<if ($dairyPregSetting > 1) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
	She considers the enormous dildo that will fill her with cum when she's fertile, and switch to ejaculating drugs when she conceives. "I'll be a mother to a whole generation of <<s>>lave<<s>>," she <<say>>s proudly, taking strength from it.
	<</if>>
	<<if ($dairyFeedersSetting > 1)>>
	She moves her hand to the dildo that will occupy her throat, feeding her. "I will need my mouth to take in as much food as I can," she <<if !canTalk($activeSlave)>>signs<<else>><<say>>s<</if>>. "I won't be able to talk. <<s>>o, I'll <<s>>ay it one la<<s>>t time, <<Master>>: I love you."
	<</if>>
<</if>>

<<if ($activeSlave.amp != 1)>>
	She strips and climbs into the machine's embrace.
<<else>>
	Another slave helps her strip and lays her in the machine.
<</if>>
She does not hesitate or glance back at you. You stand by as the straps automatically tighten, robbing her of the ability to move. "<<Master>>," she <<if !canTalk($activeSlave)>>signs<<else>><<say>>s quietly<</if>>, "I will try to be <<s>>trong enough to <<s>>tand up to thi<<s>>. But if I'm not, and I forget too much, plea<<s>>e leave me in here <<s>>o I can be u<<s>>eful."

<<elseif $activeSlave.devotion > 60>>

As she realizes her fate, the tears come quickly. "<<Master>>," she <<if !canTalk($activeSlave)>>signs<<else>><<say>>s quietly<</if>>, "i<<s>> thi<<s>> for me?" You nod, and she steps over to the machine. She lightly traces its gleaming metal, looking wistful.
<<if ($activeSlave.amp != 1)>>
	<<if ($dairyStimulatorsSetting > 1)>>
	She gently touches the head of the massive phallus that will soon penetrate her anus. It's broader than her fist. "M-my butthole i<<s>>n't going to be any good for anal after thi<<s>>."
	<</if>>
	<<if ($dairyPregSetting > 1) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
	She considers the enormous dildo that will fill her with cum when she's fertile, and switch to ejaculating drugs when she conceives. "I gue<<ss>> that thing won't have any trouble reaching my cervix."
	<</if>>
	<<if ($dairyFeedersSetting > 1)>>
	She moves her hand to the dildo that will occupy her throat, feeding her. "I-I won't be able to t-talk m-much," she <<if !canTalk($activeSlave)>>signs<<else>><<say>>s<</if>> sadly. "<<S>>-<<s>>o, I'll <<s>>ay it one la<<s>>t time, <<Master>>: I love you."
	<</if>>
<</if>>

<<if ($activeSlave.amp != 1)>>
	She strips and climbs into the machine's embrace.
<<else>>
	Another slave helps her strip and lays her in the machine.
<</if>>
"<<Master>>," she <<if !canTalk($activeSlave)>>signs<<else>>gasps out<</if>>, the tears coming fast now. "C-can you
<<if ($activeSlave.amp != 1)>>
	h-hold my h-hand while it a-activate<<s>>? Plea<<s>>e?" You take her hand as the straps automatically tighten, robbing her of the ability to move. She grips your hand tightly.
<<else>>
	<<S>>-<<s>>tay with me while it activate<<s>>? Plea<<s>>e?" You stand by as the straps automatically tighten, robbing her of the ability to move.
<</if>>

<<elseif $activeSlave.devotion > 20>>

She desperately tries to be brave and obey, but as her fate dawns on her, her courage and conditioning fail her.
<<if ($activeSlave.amp != 1)>>
	She tries to wriggle away from the machine, so
<<else>>
	She turns and tries to run, so
<</if>>
<<if ($Milkmaid == 0)>>
	you are
<<else>>
	$Milkmaid.slaveName is
<</if>>
obliged to
<<if ($activeSlave.amp != 1)>>
	subdue her and strap her,
<<else>>
	place her,
<</if>>
begging and sobbing, into the machine's embrace.
"Plea<<s>>e, <<Master>>!" she <<if !canTalk($activeSlave)>>signs<<else>>begs<</if>>. "Plea<<s>>e no!
<<if ($dairyStimulatorsSetting > 1)>>
	I-it'll fuck my b-butthole so wide I'll be u<<s>>ele<<ss>> for anal!
<</if>>
<<if ($dairyPregSetting > 2) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
	My w-womb c-c-can't take it! I'll b-bur<<s>>t! And m-my c-c-cunt will be ruined from the dildo and birthing!
<<elseif ($dairyPregSetting > 1) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
	M-my c-c-cunt will be <<s>>-<<s>>o <<s>>tretched from the dildo and birthing!
<</if>>
I'll d-do anything!"

<<else>>

She starts to weep as soon as she realizes her fate.
<<if $activeSlave.trust >= -20>>
	She is afraid of you, but not afraid enough that she will not resist this.
<</if>>
<<if ($activeSlave.amp == 1)>>
	She tries to wriggle away from the machine, so
<<else>>
	She turns and tries to run, so
<</if>>
<<if ($Milkmaid == 0)>>
	you are
<<else>>
	$Milkmaid.slaveName is
<</if>>
obliged to
<<if ($activeSlave.amp != 1)>>
	subdue her and strap her,
<<else>>
	place her,
<</if>>
begging and sobbing, into the machine's embrace.

"Plea<<s>>e, <<Master>>!" she <<if !canTalk($activeSlave)>>signs<<else>>begs<</if>>. "Plea<<s>>e no!
<<if ($dairyStimulatorsSetting > 1)>>
	I-it'll fuck my b-butthole so loo<<s>>e I'll be u<<s>>ele<<ss>> for anal! I p-promi<<s>>e I'll be a good little bitch from now on!
<</if>>
<<if ($dairyPregSetting > 2) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
	My w-womb c-c-can't take that many babie<<s>>! I'll b-bur<<s>>t! M-my c-c-cunt can't t-take that dildo either! I d-don't want to g-get p-pregnant over and over...
<<elseif ($dairyPregSetting > 1) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
	M-my c-c-cunt can't t-take that dildo! I d-don't want to g-get p-pregnant over and over...
<</if>>
I'll d-do anything!"

<</if>> /* CLOSES DEVOTION */

<<if $activeSlave.lactation > 0>>
	A big soft cup attaches itself <<if $activeSlave.nipples == "fuckable">>over<<else>>to<</if>> each of her nipples.
	<<if ($activeSlave.nipples == "inverted")>>
		She gasps with pain as suction unceremoniously hauls her inverted nipples down into the cups.
	<</if>>
<</if>>
<<if $activeSlave.balls > 0>>
	<<if $activeSlave.dick > 0>>
		The first drugs hiss into her,
		<<if $activeSlave.dick > 8>>
			and her eyes roll back as much of her blood volume rushes into her dick, though it remains soft.
		<<elseif $activeSlave.dick > 6>>
			and she goes limp as much of her blood volume rushes to bring her to half mast.
		<<else>>
			bringing her to a full erection.
		<</if>>
		She gasps as the warm, wet receptacle surrounds her cock.
	<<else>>
		<<if $activeSlave.lactation > 0>>Another<<else>>A big soft<</if>> cup is placed against her little front cumhole.
	<</if>>
<</if>>
A visor lowers onto her face to keep her mind at least minimally stimulated. It will display garish hardcore pornography featuring
<<if ($dairyFeedersSetting > 1)>>
	throatfucking, cum swallowing,
<</if>>
<<if ($dairyPregSetting > 1) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
	bareback vaginal sex, pregnancy, childbirth,
<</if>>
<<if ($activeSlave.balls > 0)>>
	cumming cocks, anal stimulation,
<</if>>
<<if ($activeSlave.lactation > 0)>>
	breast expansion, women being milked,
<</if>>
and brutal sodomy.

<<if ($activeSlave.anus < 3) || (($activeSlave.vagina < 3) && ($activeSlave.vagina > -1))>>
	<<set $activeSlave.anus = 3>>
	<<if $activeSlave.vagina > -1>><<set $activeSlave.vagina = 3>><</if>>
	The machine detects that she requires the attention of the preparatory raper before it can penetrate her successfully, and holds her in place while the raper slides along its track in the ceiling. It comes to rest above the slave's defenseless body and extends its implements towards her. She can't see or hear it, but she senses that something's happening and shivers.
	<<if ($dairyPregSetting > 1) && ($dairyPregSetting > 1) && isFertile($activeSlave) && ($activeSlave.vagina < 3) && $activeSlave.mpreg != 1>>
		Her pussy is nowhere near ready to accept the passage of drugs and cum in and new slaves out. The new machine lubes her thoroughly and then <<if $activeSlave.vagina == 0>>takes her virginity<<else>>starts to fuck her<</if>> with a reasonably sized dildo.
	<</if>>
	<<if ($dairyStimulatorsSetting > 1) && ($activeSlave.anus < 3)>>
		She'll be drinking through her mouth almost constantly, but that won't be enough. She'll have to absorb hydration and nutrition from both ends to keep up with the outflow she'll produce. <<if ($dairyPregSetting > 1) && ($dairyPregSetting > 1) && isFertile($activeSlave) && ($activeSlave.vagina < 3) && $activeSlave.mpreg != 1>>It<<else>>The new machine<</if>> fills her ass with lube and then penetrates her <<if $activeSlave.anus == 0>>her virgin anus<<else>>her rectum<</if>> gently.
	<</if>>
	She's worked in gradually, but every time she's loosened just slightly, the now-inadequate dildo is replaced by a larger one, and eventually more than one.
	<<if ($dairyPregSetting > 1) && isFertile($activeSlave) && ($activeSlave.vagina < 3) && $activeSlave.mpreg != 1>>
		<<if ($dairyStimulatorsSetting > 1) && ($activeSlave.anus < 3)>>
			She goes from a dildo in the pussy and a dildo in the ass, through numerous interesting combinations of double penetration, until she's got two porn star sized dildos sliding in and out of her pussy and two more fucking her ass.
		<<else>>
			Her womanhood goes from a normal dildo to a big dildo to two dildos, and so on, until she's taking the equivalent of two porn star cocks.
		<</if>>
	<<else>>
		Her asshole goes from a normal dildo to a big dildo to two dildos, and so on, until she's taking the equivalent of two porn star cocks up the butt.
	<</if>>
	This is a long process, and though
	<<if $activeSlave.devotion > 95>>
		she started out getting off on it,
	<<elseif $activeSlave.devotion > 60>>
		she did her best to enjoy herself for a while,
	<<elseif $activeSlave.devotion > 20>>
		she tried to relax and make it easier on herself at the start,
	<<else>>
		she cried and tried to break loose for a while,
	<</if>>
	she's slumped against the machine from sheer exhaustion by the end.	Its work completed, the preparatory raper withdraws and lets the milking machine begin its work. It's only been a few hours since $activeSlave.slaveName's ordeal began, but now she's ready to begin giving back. The machine revives her with a hit of pharmaceuticals.

<</if>>

<<if ($dairyPregSetting > 1) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
	Her vagina goes first. She relaxes her loose cunt for the elephantine dildo, but despite her best efforts, it forces a gasp out of her as it slides in. It remains stationary for now, but $activeSlave.slaveName know it's just the beginning, and she already feels full to bursting.
	<<if $activeSlave.devotion > 95>>
		She takes more deep breaths, doing her best to remain calm.
	<<elseif $activeSlave.devotion > 60>>
		Terrified, she cries harder.
	<<elseif $activeSlave.devotion > 20>>
		Terrified, she cries harder.
	<<else>>
		Terrified, she starts to scream and cry.
	<</if>>
<<elseif ($dairyPregSetting > 0) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
	<<if $activeSlave.devotion > 95>>
		She moans with pleasure
	<<elseif $activeSlave.devotion > 60>>
		She gasps
	<<elseif $activeSlave.devotion > 20>>
		She moans with fear
	<<else>>
		She moans with anguish
	<</if>>
	as the machine inserts a warm, lubricated dildo into her vagina.
<</if>>
<<if ($dairyStimulatorsSetting > 1)>>
	Her anus is next. An auxiliary dildo the size of the largest human cocks goes first, assraping her so hard she'd probably be injured if she wasn't already very loose.
	<<if $activeSlave.devotion > 95>>
		She relaxes and does her best to enjoy herself, her cheeks flushing with arousal. Once her sphincter is well stretched, the machine withdraws the dildo, and before her anus can begin to close, the machine replaces it with the main instrument. Despite the preparation, it's so huge that she moans with fear she feels the head touch her buttocks. The moan becomes a long low groan as her butthole accommodates the enormous thing. When it's all the way in, the dildo begins to withdraw for its first stroke, and she <<if !canTalk($activeSlave)>>signs<<else>>whispers<</if>>, "<<Master>>, it's <<s>>-<<s>>o b-big." She relaxes and recollects herself, and then adds, "I can do thi<<s>>."
	<<elseif $activeSlave.devotion > 60>>
		She tries to <<if $activeSlave.analSkill > 10>>apply her anal training<<else>>relax<</if>>, but it fucks her butt so mercilessly that she eventually gives up and relaxes completely. This is what the machine was aiming for; it withdraws the dildo, and before her sphincter can close, it replaces it with the main instrument. Despite the preparation, it's so huge that she begins to scream in terror as she feels the head touch her buttocks. Her yelling becomes a drawn-out shriek as her butthole accommodates the enormous thing. When she finally runs out of breath and slumps within her restraints, the dildo begins to withdraw for its first stroke, and she <<if !canTalk($activeSlave)>>signs<<else>>whispers<</if>>, "<<Master>>, it's too b-big. It hu-hurt<<s>>."
	<<elseif $activeSlave.devotion > 20>>
		Crying, she tries to <<if $activeSlave.analSkill > 10>>apply her anal training<<else>>relax<</if>>, but it fucks her butt so mercilessly that she eventually gives up and relaxes completely. This is what the machine was aiming for; it withdraws the dildo, and before her sphincter can close, it replaces it with the main instrument. Despite the preparation, it's so huge that she begins to beg desperately as she feels the head touch her buttocks. Her whining becomes a drawn-out shriek as her butthole accommodates the enormous thing. When she finally runs out of breath and slumps within her restraints, the dildo begins to withdraw for its first stroke, and she is racked with sobs.
	<<else>>
		She obviously thinks this is what her butt will suffer, and doesn't like it. She's tragically wrong. When she finally relaxes, the machine withdraws the dildo, and before her sphincter can close, it replaces it with the main instrument. She screams with the horror of realization and begins to beg desperately as she feels its head touch her buttocks. Her cries become a drawn-out shriek as her butthole accommodates the enormous thing. When she finally runs out of breath and slumps within her restraints, the dildo begins to withdraw for its first stroke, and she is racked with weeping.
	<</if>>
	<<if ($dairyPregSetting > 1) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
		The dildo in her vagina begins to fuck her as well. Between her terribly broadened holes, her stretched perineum is barely visible at all.
	<</if>>
<<elseif ($dairyStimulatorsSetting > 0)>>
	<<if $activeSlave.devotion > 95>>
		She groans as the machine pushes a big dildo up her butt and begins to sodomize her powerfully.
	<<elseif $activeSlave.devotion > 60>>
		She sobs as the machine pushes a big dildo up her butt and begins to sodomize her powerfully.
	<<elseif $activeSlave.devotion > 20>>
		She sobs as the machine pushes a big dildo up her butt and begins to sodomize her powerfully.
	<<else>>
		She cries as the machine pushes a big dildo up her butt and begins to sodomize her powerfully.
	<</if>>
<</if>>
<<if ($dairyFeedersSetting > 1)>>
	<<if $activeSlave.devotion > 95>>
		A manipulator prods her jaw open and a phallus slides into her throat, working around for a while to find the optimal position for maximum penetration where she can still breathe through her nose. There is a hiss as the food begins rushing through the phallus and down her throat.
	<<elseif $activeSlave.devotion > 60>>
		She tries to say something, but she left it too late. A manipulator forces her jaw open and a phallus slides into her throat, working around for a while to find the optimal position for maximum penetration where she can still breathe through her nose. There is a hiss as the food begins rushing through the phallus and down her throat.
	<<elseif $activeSlave.devotion > 20>>
		Her crying is abruptly cut off as a manipulator forces her jaw open and a phallus slides into her throat, working around for a while to find the optimal position for maximum penetration where she can still breathe through her nose.
	<<else>>
		She cries hopelessly, "I'm n-never going t-to leave h-here, am I, M-" Her noise is abruptly cut off as a manipulator forces her jaw open and a phallus slides into her throat, working around for a while to find the optimal position for maximum penetration where she can still breathe through her nose.
	<</if>>
<<elseif ($dairyFeedersSetting > 0)>>
	<<if $activeSlave.devotion > 95>>
		The machine gives her a phallus to suck on.
	<<elseif $activeSlave.devotion > 60>>
		She tries to say something, but she left it too late. The machine gives her a phallus to suck on.
	<<elseif $activeSlave.devotion > 20>>
		Her crying is abruptly cut off as the machine gives her a phallus to suck on.
	<<else>>
		She cries hopelessly, "I'm n-never going t-to leave h-here, am I, M-" Her noise is abruptly cut off as the machine forces a phallus into her mouth.
	<</if>>
<</if>>

With its various applicators inserted and working, the machine begins to ejaculate necessary fluids into her body. You cannot see much direct evidence, but the inrush of fluids is clear from the draining reservoirs scattered around the machine.
<<if ($dairyStimulatorsSetting > 1)>>
	The gargantuan phallus fucking her butthole ejaculates industrial lubricant, hydration, nutrition, and medication, to be absorbed by her lower intestines.
<<elseif ($dairyStimulatorsSetting > 0)>>
	The phallus fucking her ass ejaculates hydration, nutrition, and medication, to be absorbed by her colon.
<</if>>
<<if ($dairyPregSetting > 1) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
	The dildo in her vagina ejaculates cum, fertility drugs, and medication designed to cause uncontrollable natural lubrication, so it will not damage her too severely.
<<elseif ($dairyPregSetting > 0) && isFertile($activeSlave) && $activeSlave.mpreg != 1>>
	The dildo in her vagina ejaculates cum and fertility drugs.
<</if>>
<<if ($dairyFeedersSetting > 0)>>
	There is a hiss as still more fluid containing hydration, nutrition, and medication begins rushing through the phallus in her mouth and down her throat.
<</if>>
Finally, multiple drug injectors attach themselves to her and begin to use hypersonic jets to drive pharmaceuticals into her without needles.
<<if $activeSlave.devotion > 95>>
	Her eyes fly wide as she hears and feels the number of injections. She knows these drugs are not without side effects, and she's being injected with a normal day's dose every minute. She musters her resolve and relaxes again, relying on her knowledge that you want her to accept this fate.
<<elseif $activeSlave.devotion > 60>>
	Her eyes fly wide and she stiffens with fear as she hears and feels the number of injections. She knows these drugs are not without side effects, and she's being injected with a normal day's dose every minute. She visibly tries to accept it, knowing that you want her to submit to this fate.
<<elseif $activeSlave.devotion > 20>>
	The tears streaming out of her eyes come faster as she hears and feels the number of injections. She knows these drugs are not without side effects, and she's being injected with a normal day's dose every minute.
<<else>>
	She begins to struggle desperately as she hears and feels the number of injections. She knows these drugs are not without side effects, and she's being injected with a normal day's dose every minute.
<</if>>

Fluids begin to come out of her. The drugs are strong, and despite everything she experiences an orgasm so powerful that it's clear why the straps that bind her are reinforced.
<<if $activeSlave.balls > 0>>
	<<if $activeSlave.dick > 0>>The anal dildo fucks her even harder<<else>>If she had a dick, it would be caressed by a nice warm receptacle, but she doesn't. The milker is forced to rape her ass without mercy to force her to cum<</if>>, and she tries to scream around the dildo in her mouth. <<if $activeSlave.scrotum > 0>>Her balls tighten as she<<else>>She<</if>> shoots rope after rope of semen into the machine.
<</if>>
<<if ($activeSlave.vagina > -1)>>
	She gives the machine a nice gush of femcum.
<</if>>
<<if ($activeSlave.lactation > 0)>>
	The cups sucking her nipples work away ceaselessly, her milk whitening the clear piping running into the machine.
<</if>>
The machine continues fucking her despite her climax.
<<if $activeSlave.devotion > 95>>
	Though it's difficult to tell, it's possible she's smiling around the dildo in her mouth. She may be such a well-broken sex slave that she can stand up to a life of nothing but drugs, milking, and an endless string of orgasms. To ease her acclimation to her new life, the drug cocktail is adjusted as her orgasm fades,
<<elseif $activeSlave.devotion > 60>>
	Despite her attempt to be brave, tears begin to leak out from behind her visor as she realizes that there will be no respite from the penetration. The drug cocktail is adjusted as her orgasm fades,
<<elseif $activeSlave.devotion > 20>>
	To ease her acclimation to her new life, the drug cocktail is adjusted as her orgasm fades,
<<else>>
	To allow her some rest despite her terror, the drug cocktail is adjusted as her orgasm fades,
<</if>>
to put her to sleep. She slumps against the machine as she drops off.
<<if ($activeSlave.amp != 1)>>Her painfully tight grip on your hand finally loosens<</if>>.
<<if ($dairyStimulatorsSetting > 1)>>
	Her anus has not yet stretched to take the necessary full power setting, so she is gently sodomized as she sleeps to get her sphincter used to its permanent occupier.
<</if>>
<<if ($activeSlave.belly < 1500)>>
	Her belly has already begun to distend from the mass of fluid ejaculated down her throat and into her stomach, <<if $activeSlave.ovaries == 1>>inside her womanhood and into her womb, and <</if>>up her butt and into her lower intestine.
<</if>>

Silence returns to the dairy.


code:
:: Init Rules

<<silently>>
<<set $defaultRules = []>>

<<set _activeRule = emptyDefaultRule()>>
<<set _activeRule.name = "Obedient Slaves">>
<<set _activeRule.condition.function = "between">>
<<set _activeRule.condition.data = { attribute: "devotion", value: [20, null] }>>
<<set _activeRule.set.removalAssignment = "rest">>
<<set $defaultRules.push(_activeRule)>>

/*
<<set _activeRule = {
	ID: 2,
	name: "Disobedient Slaves",
	condition: {
		id: "<=",
		first: {
			id: "(name)",
			name: "devotion"
		},
		second: {
			id: "(number)",
			value: 20
		}
	},
	releaseRules: "no default setting",
	clitSetting: "no default setting",
	clitSettingXY: "no default setting",
	clitSettingXX: "no default setting",
	clitSettingEnergy: "no default setting",
	speechRules: "no default setting",
	clothes: "no default setting",
	collar: "no default setting",
	shoes: "no default setting",
	virginAccessory: "no default setting",
	aVirginAccessory: "no default setting",
	vaginalAccessory: "no default setting",
	aVirginDickAccessory: "no default setting",
	dickAccessory: "no default setting",
	bellyAccessory: "no default setting",
	aVirginButtplug: "no default setting",
	buttplug: "no default setting",
	eyeColor: "no default setting",
	makeup: "no default setting",
	nails: "no default setting",
	hColor: "no default setting",
	hLength: "no default setting",
	haircuts: "no default setting",
	hStyle: "no default setting",
	pubicHColor: "no default setting",
	pubicHStyle: "no default setting",
	nipplesPiercing: "no default setting",
	areolaePiercing: "no default setting",
	clitPiercing: "no default setting",
	vaginaLube: "no default setting",
	vaginaPiercing: "no default setting",
	dickPiercing: "no default setting",
	anusPiercing: "no default setting",
	lipsPiercing: "no default setting",
	tonguePiercing: "no default setting",
	earPiercing: "no default setting",
	nosePiercing: "no default setting",
	eyebrowPiercing: "no default setting",
	navelPiercing: "no default setting",
	corsetPiercing: "no default setting",
	boobsTat: "no default setting",
	buttTat: "no default setting",
	vaginaTat: "no default setting",
	dickTat: "no default setting",
	lipsTat: "no default setting",
	anusTat: "no default setting",
	shouldersTat: "no default setting",
	armsTat: "no default setting",
	legsTat: "no default setting",
	backTat: "no default setting",
	stampTat: "no default setting",
	curatives: "no default setting",
	livingRules: "spare",
	relationshipRules: "no default setting",
	standardPunishment: "no default setting",
	standardReward: "no default setting",
	diet: "no default setting",
	dietCum: "no default setting",
	dietMilk: "no default setting",
	muscles: "no default setting",
	XY: "no default setting",
	XX: "no default setting",
	gelding: "no default setting",
	preg: "no default setting",
	growth: {
		boobs: "no default setting",
		butt: "no default setting",
		lips: "no default setting",
		dick: "no default setting",
		balls: "no default setting"
	},
	aphrodisiacs: "no default setting",
	autoSurgery: 0,
	autoBrand: 0,
	pornFameSpending: "no default setting",
	dietGrowthSupport: 0,
	eyewear: "no default setting",
	earwear: "no default setting",
	assignment: [],
	excludeAssignment: [],
	setAssignment: "no default setting",
	facility: [],
	excludeFacility: [],
	excludeSpecialSlaves: false,
	facilityRemove: false,
	removalAssignment: "rest",
	selectedSlaves: [],
	excludedSlaves: [],
	surgery: {
		eyes: "no default setting",
		lactation: "no default setting",
		prostate: "no default setting",
		cosmetic: "no default setting",
		accent: "no default setting",
		shoulders: "no default setting",
		shouldersImplant: "no default setting",
		boobs: "no default setting",
		hips: "no default setting",
		hipsImplant: "no default setting",
		butt: "no default setting",
		faceShape: "no default setting",
		lips: "no default setting",
		holes: "no default setting"
	},
	underArmHColor: "no default setting",
	underArmHStyle: "no default setting",
	eyebrowHColor: "no default setting",
	eyebrowHStyle: "no default setting",
	drug: "no default setting"
}>>
<<set $defaultRules.push(_activeRule)>>

<<set _activeRule = {
	ID: 3,
	name: "Unhealthy Slaves",
	condition: {
		id: "<",
		first: {
			id: "(name)",
			name: "health"
		},
		second: {
			id: "(number)",
			value: -10
		}
	},
	releaseRules: "no default setting",
	clitSetting: "no default setting",
	clitSettingXY: "no default setting",
	clitSettingXX: "no default setting",
	clitSettingEnergy: "no default setting",
	speechRules: "no default setting",
	clothes: "no default setting",
	collar: "no default setting",
	shoes: "no default setting",
	virginAccessory: "no default setting",
	aVirginAccessory: "no default setting",
	vaginalAccessory: "no default setting",
	dickAccessory: "no default setting",
	aVirginDickAccessory: "no default setting",
	bellyAccessory: "no default setting",
	aVirginButtplug: "no default setting",
	buttplug: "no default setting",
	eyeColor: "no default setting",
	makeup: "no default setting",
	nails: "no default setting",
	hColor: "no default setting",
	hLength: "no default setting",
	haircuts: "no default setting",
	hStyle: "no default setting",
	pubicHColor: "no default setting",
	pubicHStyle: "no default setting",
	nipplesPiercing: "no default setting",
	areolaePiercing: "no default setting",
	clitPiercing: "no default setting",
	vaginaLube: "no default setting",
	vaginaPiercing: "no default setting",
	dickPiercing: "no default setting",
	anusPiercing: "no default setting",
	lipsPiercing: "no default setting",
	tonguePiercing: "no default setting",
	earPiercing: "no default setting",
	nosePiercing: "no default setting",
	eyebrowPiercing: "no default setting",
	navelPiercing: "no default setting",
	corsetPiercing: "no default setting",
	boobsTat: "no default setting",
	buttTat: "no default setting",
	vaginaTat: "no default setting",
	dickTat: "no default setting",
	lipsTat: "no default setting",
	anusTat: "no default setting",
	shouldersTat: "no default setting",
	armsTat: "no default setting",
	legsTat: "no default setting",
	backTat: "no default setting",
	stampTat: "no default setting",
	curatives: "applied",
	livingRules: "no default setting",
	relationshipRules: "no default setting",
	standardPunishment: "no default setting",
	standardReward: "no default setting",
	diet: "no default setting",
	dietCum: "no default setting",
	dietMilk: "no default setting",
	muscles: "no default setting",
	XY: "no default setting",
	XX: "no default setting",
	gelding: "no default setting",
	preg: "no default setting",
	growth: {
		boobs: "no default setting",
		butt: "no default setting",
		lips: "no default setting",
		dick: "no default setting",
		balls: "no default setting"
	},
	aphrodisiacs: "no default setting",
	autoSurgery: 0,
	autoBrand: 0,
	pornFameSpending: "no default setting",
	dietGrowthSupport: 0,
	eyewear: "no default setting",
	earwear: "no default setting",
	assignment: [],
	excludeAssignment: [],
	setAssignment: "no default setting",
	facility: [],
	excludeFacility: [],
	excludeSpecialSlaves: false,
	facilityRemove: false,
	removalAssignment: "rest",
	selectedSlaves: [],
	excludedSlaves: [],
	surgery: {
		eyes: "no default setting",
		lactation: "no default setting",
		prostate: "no default setting",
		cosmetic: "no default setting",
		accent: "no default setting",
		shoulders: "no default setting",
		shouldersImplant: "no default setting",
		boobs: "no default setting",
		hips: "no default setting",
		hipsImplant: "no default setting",
		butt: "no default setting",
		faceShape: "no default setting",
		lips: "no default setting",
		holes: "no default setting"
	},
	underArmHColor: "no default setting",
	underArmHStyle: "no default setting",
	eyebrowHColor: "no default setting",
	eyebrowHStyle: "no default setting",
	drug: "no default setting"
}>>
<<set $defaultRules.push(_activeRule)>>
*/
<</silently>>


code:
:: JE slave dispute [nobr]

<<set $nextLink = "RIE Eligibility Check", $returnTo = "RIE Eligibility Check", $nextButton = "Continue", _event = $justiceEvents.pluck()>> /* pick a random event and remove it from the array so it will not occur again */

<<switch _event>>
<<case "slave deal">>
	<<set $contractCost = 5000>>
	<<set $activeSlaveOneTimeMinAge = 24>>
	<<set $activeSlaveOneTimeMaxAge = 42>>
	<<set $one_time_age_overrides_pedo_mode = 1>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate XX Slave">>
	<<set $activeSlave.origin = "She sold herself into slavery to buy medical care for her daughter.">>
	<<set $activeSlave.devotion = random(25,30)>>
	<<set $activeSlave.trust = $activeSlave.devotion-20>>
	<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
	<<set $activeSlave.health = random(0,20)>>
	<<set $activeSlave.earPiercing = 1>>
	<<set $activeSlave.vagina = random(1,2)>>
	<<set $activeSlave.ovaries = 1>>
	<<set $activeSlave.birthsTotal = 1>>
	<<set $activeSlave.shouldersTat = either("tribal patterns", "flowers")>>
	<<set $activeSlave.stampTat = either("tribal patterns", "flowers")>>
<<case "breeding deal">>
	<<set $contractCost = 40000>>
	<<set $activeSlaveOneTimeMinAge = $fertilityAge+3>>
	<<set $activeSlaveOneTimeMaxAge = 24>>
	<<set $one_time_age_overrides_pedo_mode = 1>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate XX Slave">>
	<<set $activeSlave.origin = "She was raised to be a mother.">>
	<<set $activeSlave.career = "a breeder">>
	<<set $activeSlave.devotion = random(10,25)>>
	<<set $activeSlave.trust = $activeSlave.devotion>>
	<<set $activeSlave.health = random(80,90)>>
	<<set $activeSlave.anus = 0>>
	<<set $activeSlave.vagina = 3>>
	<<set $activeSlave.analSkill = 0>>
	<<set $activeSlave.oralSkill = 0>>
	<<set $activeSlave.whoreSkill = 0>>
	<<set $activeSlave.vaginalSkill = 0>>
	<<set $activeSlave.entertainSkill = 0>>
	<<set $activeSlave.bellySag = 10>>
	<<set $activeSlave.bellySagPreg = 10>>
	<<set $activeSlave.birthsTotal = 3>>
	<<set $activeSlave.hips = 2>>
	<<set $activeSlave.boobs = random(4,6)*100>>
	<<if $seePreg == 1>>
		<<set $activeSlave.belly = 18000>>
	<</if>>
<<case "slave training">>
	<<set $contractCost = 10000>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate XY Slave">>
	<<set $activeSlave.origin = "You bought out a deal involving her training to be an expert gelded sex slave.">>
	<<set $activeSlave.devotion = random(30,40)>>
	<<set $activeSlave.trust = $activeSlave.devotion>>
	<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
	<<set $activeSlave.health = random(60,80)>>
	<<set $activeSlave.balls = 0>>
	<<set $activeSlave.anus = 2>>
	<<set $activeSlave.analSkill = 35>>
	<<set $activeSlave.oralSkill = 35>>
	<<set $activeSlave.whoreSkill = 35>>
	<<set $activeSlave.entertainSkill = 35>>
	<<set $activeSlave.nipplesPiercing = 1>>
	<<set $activeSlave.clitPiercing = 1>>
	<<set $activeSlave.dickPiercing = 1>>
	<<set $activeSlave.anusPiercing = 1>>
	<<set $activeSlave.lipsPiercing = 1>>
	<<set $activeSlave.tonguePiercing = 1>>
	<<set $activeSlave.earPiercing = 1>>
	<<set $activeSlave.nosePiercing = 1>>
	<<set $activeSlave.eyebrowPiercing = 1>>
	<<set $activeSlave.navelPiercing = 1>>
	<<set $activeSlave.boobsTat = either("advertisements", "degradation", "rude words")>>
	<<set $activeSlave.buttTat = either("advertisements", "degradation", "rude words")>>
	<<set $activeSlave.vaginaTat = either("advertisements", "degradation", "rude words")>>
	<<set $activeSlave.dickTat = either("advertisements", "degradation", "rude words")>>
	<<set $activeSlave.lipsTat = either("advertisements", "degradation", "rude words")>>
	<<set $activeSlave.anusTat = either("advertisements", "degradation", "rude words")>>
	<<set $activeSlave.shouldersTat = either("advertisements", "degradation", "rude words")>>
	<<set $activeSlave.armsTat = either("advertisements", "degradation", "rude words")>>
	<<set $activeSlave.legsTat = either("advertisements", "degradation", "rude words")>>
	<<set $activeSlave.stampTat = either("advertisements", "degradation", "rude words")>>
<<case "majority deal">>
	<<set $contractCost = 20000>>
	<<set $activeSlaveOneTimeMinAge = $minimumSlaveAge>>
	<<set $activeSlaveOneTimeMaxAge = 18>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate New Slave">>
	<<set $activeSlave.origin = "She was raised to be a slave, since she was mistakenly thought to be from good slave stock.">>
	<<set $activeSlave.career = "a slave">>
	<<set $activeSlave.devotion = random(10,15)>>
	<<set $activeSlave.trust = $activeSlave.devotion>>
	<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
	<<set $activeSlave.health = random(80,90)>>
	<<if $activeSlave.dick == 0>>
		<<set $activeSlave.vagina = 0>>
		<<set $activeSlave.ovaries = 1>>
	<<elseif $activeSlave.balls == 0>>
		<<set $activeSlave.balls = 1>>
	<</if>>
	<<set $activeSlave.anus = 0>>
	<<set $activeSlave.analSkill = 0>>
	<<set $activeSlave.oralSkill = 0>>
	<<set $activeSlave.whoreSkill = 0>>
	<<set $activeSlave.vaginalSkill = 0>>
	<<set $activeSlave.entertainSkill = 0>>
<<case "indenture deal">>
	<<set $contractCost = 7500>>
	<<set $activeSlaveOneTimeMinAge = 24>>
	<<set $activeSlaveOneTimeMaxAge = 42>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate New Slave">>
	<<set $activeSlave.origin = "She was enslaved after you manipulated her deal for indentured servitude.">>
	<<set $activeSlave.devotion = random(-10,-15)>>
	<<set $activeSlave.trust = $activeSlave.devotion+4>>
	<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
	<<set $activeSlave.health = random(-20,20)>>
	<<set $activeSlave.anus = 2>>
	<<if $activeSlave.vagina > -1>>
		<<set $activeSlave.vagina = 2>>
	<</if>>
	<<set $activeSlave.vaginalSkill = 15>>
	<<set $activeSlave.oralSkill = 15>>
	<<set $activeSlave.analSkill = 15>>
	<<set $activeSlave.whoreSkill = 0>>
	<<set $activeSlave.entertainSkill = 15>>
	<<set $activeSlave.boobs += 600>>
	<<set $activeSlave.boobsImplant = 600>>
	<<set $activeSlave.butt += 1>>
	<<set $activeSlave.buttImplant = 1>>
	<<set $activeSlave.lips += 10>>
	<<set $activeSlave.lipsImplant = 10>>
	<<set $activeSlave.lipsPiercing = 1>>
	<<set $activeSlave.tonguePiercing = 1>>
	<<set $activeSlave.earPiercing = 1>>
	<<set $activeSlave.nosePiercing = 1>>
	<<set $activeSlave.eyebrowPiercing = 1>>
	<<set $activeSlave.navelPiercing = 1>>
	<<set $activeSlave.nipplesPiercing = 1>>
	<<set $activeSlave.clitPiercing = 1>>
	<<set $activeSlave.stampTat = either("tribal patterns", "flowers")>>
<<default>>
	<<set $contractCost = 10000>>
	<<set $activeSlaveOneTimeMaxAge = 22>>
	<<set $oneTimeDisableDisability = 1>>
	<<include "Generate New Slave">>
	<<set $activeSlave.origin = "You bought out a deal for her sale after the seller took her virginity and the buyer no longer wanted her.">>
	<<if ndef $activeSlave.publicCount>><<set $activeSlave.publicCount = 10>><<else>><<set $activeSlave.publicCount += 10>><</if>>
	<<set $activeSlave.devotion = random(25,30)>>
	<<set $activeSlave.trust = $activeSlave.devotion-20>>
	<<set $activeSlave.oldDevotion = $activeSlave.devotion>>
	<<set $activeSlave.health = random(0,20)>>
	<<set $activeSlave.anus = 2>>
	<<if $activeSlave.dick == 0>>
		<<set $activeSlave.vagina = 2>>
		<<set $activeSlave.ovaries = 1>>
		<<if isFertile($activeSlave)>>
			<<= knockMeUp($activeSlave, 100, 2, -2, 1)>>
		<</if>>
	<</if>>
<</switch>>

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

<<SlaveArt $activeSlave 2 0>>

<<else>>

<<SlaveArt $activeSlave 2 0>>

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

<<if $assistantName == "your personal assistant">>Your personal assistant<<else>>$assistantName<</if>> breaks in on your sleep with an urgent message. You push a slave off you and sit up to take it. As the owner of the arcology, you perform some functions that would traditionally be the province of a government. In this anarcho-liberal polity, it's still necessary for people making deals to have someone to appeal to when disputes arise. Part of your agreement with your tenants is that you will perform this duty on deals between two tenants. The message is about just such a disagreement; they always seem to happen in the middle of the night, and they're always urgent.

<<switch _event>>
<<case "slave deal">>
	An older woman who has signed an enslavement contract with a slave trader is accusing her of not living up to the terms. The contract requires that the trader pay the medical costs of the woman's daughter in return for the woman's voluntary enslavement. The woman claims that the payments have not been made and the trader is still insisting on enslavement.

	The trader states that the daughter was thought to only have a minor condition, but has proven to be suffering from serious cancer. She protests that she will lose a great deal of money, and that there's no way she would have made the deal if the woman had been honest with her about how bad her daughter's condition was. The woman responds that she didn't know.
<<case "breeding deal">>
	A small-time slave breeder is accusing a customer of reneging on their agreement. For the last nine months, one of his best breeders has been busy growing his client's future slave and now
	<<if $seePreg == 1>>
		that she's ready to give birth,
		<<set $activeSlave.belly = 0>>
		<<set $activeSlave.pregWeek = -3>>
	<<else>>
		that it's born,
	<</if>>
	he's refusing to transfer the funds, placing the entire operation in jeopardy.

	The father<<if $seePreg == 1>>-to-be<</if>> claims that the child is not his and as such, the contract has not been fulfilled. Despite offers from the breeder to perform a paterntity test, he adamantly insists on using his private, and rather expensive, physician to run the test; a cost high enough to put them out of business anyway.
<<case "slave training">>
	One of your prominent tenants is accusing another of failing to train a slave for him according to the terms of a slave training contract. He highlights a part of the contract that requires that the slave be expert in "all common sexual skills." He self-righteously declares that the delivered slave has no vaginal skills to speak of, that he doesn't want her as a result, and requests that you release him from the contract.

	The trainer replies with some aspersion that the accuser is technically correct: the slave has no vaginal skills at all. This is, however, due to the fact that the slave has no vagina. He claims that the accuser verbally requested a gelded slave, though there's nothing about that either way in the contract. He protests that he did his best to train an expert gelding, and offers many lengthy videos to prove that he did.
<<case "majority deal">>
	A prominent citizen is accusing a slave school of lying to him about the pedigree of a girl about to reach her majority. She'll be enslaved once she's of age, and he owns the rights to her. He produces many messages from the school about her progress; they all reference her excellent bloodline. The slave's genes were sequenced recently for an unrelated treatment, and it appears she's not the child of the slaves the school stated she was. He angrily demands compensation for the effort he's put into planning for her.

	The school's representative is apologetic, but firm. The school readily admits an error, but he protests that they weren't aware of the confusion, either. They've offered to buy her back, with interest, but reject what they call an exorbitant demand for compensation. They produce the original pedigree, protesting that it shows that they were lied to, too. The slave does resemble the supposed parents closely; only an unusually invasive check would have disclosed the fraud.
<<case "indenture deal">>
	A slutty-looking girl appears, bearing a split lip and a black eye, accusing a slave trader of tricking her. She sends you a lengthy contract of indentured servitude. Nothing seems out of order, though indentured servants are becoming less common, since slave labor is usually cheaper and less limited. The angry accuser claims that the trader told her that she wouldn't be required to have sex while indentured. The promise doesn't seem to be in writing, but the girl bitterly insists that it was made. "And now," she almost shrieks, "he's making me be a whore. I got assfucked five times yesterday. Five!"

	The trader indignantly denies ever making any such commitment, and points out, correctly, that she has no proof. He protests that he only made the indentured servitude deal as a favor to her, and is angry that she's repaying his courtesy in not insisting on enslavement by this ingratitude. "I see here in the record that she was indeed used anally five times yesterday," he observes acidly. "But that's her job."
<<default>>
	A wealthy slaveowner, clearly nursing a ferocious hangover, is accusing a less prominent citizen of refusing to honor the terms of a sale they signed in the early hours of the morning. Already shaking your head, you pull up the security logs with his permission. You verify that yes, indeed, they're visible at a loud party hosted by the wealthy slaveowner, talking over a tablet for a long time before shaking hands and signing.

	The putative buyer protests that though the terms of sale don't show it, their conversation before the sale focused on the slave's virginity. The logs show that this, too, is true. And then, he rages, the slaveowner got even drunker, and brought the slave up to join the party, encouraging other guests to gangbang her. The logs show this too; the slave is definitely not a virgin any longer. The would-be buyer says he understands that he should have gotten the part about the virginity in writing and guaranteed up until he got his hands on her, but requests that you honor the spirit of the deal by letting him out of a contract to buy a now-ruined slave.
<</switch>>

<<switch _event>>
<<case "slave deal">>
	<<link "Privately inform both parties you'll settle this in favor of the most generous">>
		<<replace "#result">>
		You privately inform both parties you'll settle this in favor of the most generous. You instantly receive a single notice of escrow payment contingent on the case going the payer's way. You select the @@.yellowgreen;bigger of the two@@ and decide the matter before returning to bed in a good mood. However, the next day it becomes apparent that although she isn't stupid enough to make a public accusation of corruption, the older woman made use of her few remaining hours of freedom to @@.red;slander@@ your administration of justice.
		<<set $rep -= 100>>
		<<set $cash += random(150,200)*10>>
		<</replace>>
	<</link>>

<<link "Settle the dispute in favor of the older woman">>
		<<replace "#result">>
		You settle the dispute in favor of the slave-to-be. She is resigned, knowing that she's now owned by a woman who almost certainly hates her, but her daughter's treatments are assured. The story gets around quickly, @@.green;capturing the hearts@@ of more romantic citizens. The angry slave trader leaves the arcology, @@.red;reducing prosperity.@@
		<<set $arcologies[0].prosperity -= 5>>
		<<set $rep += 500>>
		<</replace>>
	<</link>>

<<link "Settle the dispute in favor of the slave trader">>
		<<replace "#result">>
		You settle the dispute in favor of the slave trader. The story of the mother's enslavement, along with the prompt death of the daughter due to inadequate treatment, gets around the Free Cities, @@.red;appalling@@ more romantic citizens. The trader lets it be known amongst her peers that you do not brook uppity behavior from poor bitches, and that slave traders can expect to do well in your arcology, @@.green;increasing prosperity.@@
		<<set $arcologies[0].prosperity += 5>>
		<<set $rep -= 500>>
		<</replace>>
	<</link>>

<<link "Offer to buy out the contract">>
		<<set $cash -= $contractCost>>
		<<replace "#result">>
		You offer to simply buy out the contract, taking the slave for yourself, letting the slave trader out of her side of the deal, and providing for the daughter's medical care. The trader lets it be known amongst her peers that you will make things right no matter the cost to yourself, @@.green;increasing prosperity.@@ The story of the mother willing to be enslaved gets around quickly, @@.green;capturing the hearts@@ of more romantic citizens. The mother, meanwhile, presents herself for enslavement, @@.hotpink;very grateful@@ that you've saved her daughter's life.

		<<set $arcologies[0].prosperity += 5>>
		<<set $rep += 500>>
		<<include "New Slave Intro">>
		<</replace>>
	<</link>> //This will cost <<print cashFormat($contractCost)>> and give you the slave//
<<case "breeding deal">>
	<<link "Privately inform both parties you'll settle this in favor of the most generous">>
		<<replace "#result">>
		You privately inform both parties you'll settle this in favor of the most generous. You instantly receive two notices of escrow payments contingent on the case going the payer's way. You select the @@.yellowgreen;bigger of the two,@@ a clear choice, and decide the matter before returning to bed in a good mood. However, the next day it becomes apparent that although he isn't stupid enough to make a public accusation of corruption, the loser is proclaiming that he is @@.red;not pleased@@ with your administration of justice.
		<<set $rep -= 100>>
		<<set $cash += random(150,200)*10>>
		<</replace>>
	<</link>>

<<link "Settle the dispute in favor of the accuser">>
		<<replace "#result">>
		You settle the dispute in favor of the wealthy accuser. While he is a little disapointed that he didn't get the slave he wanted, he speaks @@.green;positively@@ in public about how you helped protect his investements from potential mismanagement. Slave trading to and from your arcology is @@.red;somewhat lessened@@ however, since the breeder lets it be known that trading in your arcology is a risk.
		<<set $arcologies[0].prosperity -= 5>>
		<<set $rep += 500>>
		<</replace>>
	<</link>>

<<link "Settle the dispute in favor of the breeder">>
		<<replace "#result">>
		You settle the dispute in favor of the slave breeder, and against the prominent accuser, by declaring that the standard paternity test will suffice.
		<<if $seePreg == 1>>
			As if on queue, the girl's water breaks and soaks her pants. The call ends to the sight of her crotch bulging as her child is born into her clothing.
		<</if>>
		While he is satisfied with his future slave, he speaks @@.red;openly@@ in public about how you were so quick to use cheap services to settle the claim instead of listening to his requests. The breeder, however, passes a @@.green;good word@@ around the industry that slavers trading with your arcology can expect to be protected from abusive claims.
		<<set $arcologies[0].prosperity += 5>>
		<<set $rep -= 500>>
		<</replace>>
	<</link>>

<<link "Compromise on the compensation and offer to buy out the deal">>
		<<set $cash -= $contractCost>>
		<<replace "#result">>
		You offer to buy out the deal, paying the breeder and taking the slave yourself, and passing the child off to the buyer. The citizen gets what he wants and speaks @@.green;kindly@@ in public about how you helped smooth over a rather rough dispute. The breeder sends a @@.green;positive note@@ around the industry to the effect that slavers trading with your arcology can expect to be aided in times of need; though the loss of a star mother always stings.

		<<set $arcologies[0].prosperity += 3>>
		<<set $rep += 300>>
		<<include "New Slave Intro">>
		<</replace>>
	<</link>> //This will cost <<print cashFormat($contractCost)>> and give you the slave//
<<case "slave training">>
	<<link "Privately inform both parties you'll settle this in favor of the most generous">>
		<<replace "#result">>
		You privately inform both parties you'll settle this in favor of the most generous. You instantly receive two notices of escrow payments contingent on the case going the payer's way. You select the @@.yellowgreen;bigger of the two@@ and decide the matter before returning to bed in a good mood. However, the next day it becomes apparent that although he isn't stupid enough to make a public accusation of corruption, the loser is proclaiming that he is @@.red;not pleased@@ with your administration of justice.
		<<set $rep -= 100>>
		<<set $cash += random(150,200)*10>>
		<</replace>>
	<</link>>

<<link "Settle the dispute in favor of the accuser">>
		<<replace "#result">>
		You settle the dispute in favor of the wealthy accuser. He lets you know privately that he recently had a business deal go bad, so he's in a tough cash situation right now; he's so grateful for your assistance in this embarrassing situation that he talks @@.green;effusively@@ for days to anyone who will listen about your good administration of the arcology. Unfortunately, the furious trainer has packed up his equipment and his gelding and left for another arcology, somewhat @@.red;reducing prosperity.@@
		<<set $arcologies[0].prosperity -= 5>>
		<<set $rep += 500>>
		<</replace>>
	<</link>>

<<link "Settle the dispute in favor of the trainer">>
		<<replace "#result">>
		You settle the dispute in favor of the slave trainer. It transpires that the wealthy accuser was no longer wealthy at all, and was looking to get out of the deal; he's furious, and spends a long day @@.red;spewing invectives@@ against you to anyone who will listen before decamping back to the old world. The trainer, on the other hand, lets it be known that you support businessmen, who can trust you to look after their interests, @@.green;increasing prosperity.@@
		<<set $arcologies[0].prosperity += 5>>
		<<set $rep -= 500>>
		<</replace>>
	<</link>>

<<link "Offer to buy out the deal">>
		<<set $cash -= $contractCost>>
		<<replace "#result">>
		You offer to simply buy out the deal, paying the trainer and taking the slave yourself, and letting the buyer out of the payment. The trainer, on the other hand, lets it be known that you support businessmen, who can trust you to ensure they don't come out second best, @@.green;increasing prosperity.@@ The buyer lets you know privately that he recently had a business deal go bad, so he's in a tough cash situation right now; he's so grateful for your assistance in this embarrassing situation that he talks @@.green;effusively@@ for days to anyone who will listen about your discreet administration of the arcology. The slave, meanwhile, arrives at your penthouse, @@.hotpink;rather hopeful@@ that she's going to a good master.

		<<set $arcologies[0].prosperity += 5>>
		<<set $rep += 500>>
		<<include "New Slave Intro">>
		<</replace>>
	<</link>> //This will cost <<print cashFormat($contractCost)>> and give you the slave//
<<case "majority deal">>
	<<link "Privately inform both parties you'll settle this in favor of the most generous">>
		<<replace "#result">>
		You privately inform both parties you'll settle this in favor of the most generous. You instantly receive two notices of escrow payments contingent on the case going the payer's way. You select the @@.yellowgreen;bigger of the two@@ and decide the matter before returning to bed in a good mood. However, the next day it becomes apparent that although he isn't stupid enough to make a public accusation of corruption, the loser is proclaiming that he is @@.red;not pleased@@ with your administration of justice.
		<<set $rep -= 100>>
		<<set $cash += random(150,200)*10>>
		<</replace>>
	<</link>>

<<link "Settle the dispute in favor of the accuser">>
		<<replace "#result">>
		You settle the dispute in favor of the prominent accuser. He dabbles in slave breeding himself, and was looking forward to using the slave in question for breeding stock; like many breeders he cares deeply about his stable, and speaks @@.green;positively@@ in public about how you helped an innocent breeder protect his prize bloodlines. Slave trading to and from your arcology is @@.red;somewhat lessened@@ however, since the school lets it be known that trading in your arcology is a risk.
		<<set $arcologies[0].prosperity -= 5>>
		<<set $rep += 500>>
		<</replace>>
	<</link>>

<<link "Settle the dispute in favor of the trainer">>
		<<replace "#result">>
		You settle the dispute in favor of the school, and against the prominent accuser. He dabbles in slave breeding himself, and was looking forward to using the slave in question for breeding stock; like many breeders he cares deeply about his stable, and speaks @@.red;furiously@@ in public about how you denied an innocent breeder justice against those swindling slave schools. The school, however, passes a @@.green;good word@@ around the industry that schools trading with your arcology can expect to be protected from frivolous claims.
		<<set $arcologies[0].prosperity += 5>>
		<<set $rep -= 500>>
		<</replace>>
	<</link>>

<<link "Compromise on the compensation and offer to buy out the deal">>
		<<set $cash -= $contractCost>>
		<<replace "#result">>
		You offer to buy out the deal, paying the school and taking the slave yourself, and compromising on the demanded compensation. The citizen was looking forward to using the slave in question for breeding stock; like many breeders he cares deeply about his stable and is mollified by the moderate payment, and speaks @@.green;kindly@@ in public about how you helped an innocent breeder protect his prize bloodlines. The school sends a @@.green;positive note@@ around the industry to the effect that schools trading with your arcology can expect to have excessive claims sensibly reduced.

		<<set $arcologies[0].prosperity += 3>>
		<<set $rep += 300>>
		<<include "New Slave Intro">>
		<</replace>>
	<</link>> //This will cost <<print cashFormat($contractCost)>> and give you the slave//
<<case "indenture deal">>
	<<link "Privately inform both parties you'll settle this in favor of the most generous">>
		<<replace "#result">>
		You privately inform both parties you'll settle this in favor of the most generous. You instantly receive a single notice of escrow payment contingent on the case going the payer's way. You select the @@.yellowgreen;bigger of the two@@ and decide the matter before returning to bed in a good mood. However, the next day it becomes apparent that although she isn't stupid enough to make a public accusation, the whore has been @@.red;whispering@@ to her peers that you helped the trader cheat her into prostitution. Few citizens care, but there is a faint scent of corruption.
		<<set $rep -= 50>>
		<<set $cash += random(150,200)*10>>
		<</replace>>
	<</link>>

<<link "Settle the dispute in favor of the indentured whore">>
		<<replace "#result">>
		You settle the dispute in favor of the indentured whore, adding a requirement to the indentured servitude that she not be required to fuck against her will. The story of the brave prostitute and the conniving trader is @@.green;told and retold,@@ impressing the more credulous citizens. It also @@.red;raises doubts@@ among the wealthier, more business-minded residents about whether you can be depended on to promote their interests.
		<<set $arcologies[0].prosperity -= 5>>
		<<set $rep += 500>>
		<</replace>>
	<</link>>

<<link "Settle the dispute in favor of the indenture holder">>
		<<replace "#result">>
		You settle the dispute in favor of the owner of the indenture. No change in the contract is necessary, since it already says what it should: that he controls her for the required period. That's all. The story of your strictness in business disputes @@.green;impresses@@ some of the more commercially powerful citizens of the arcology, but is @@.red;hissed@@ by the stupider, more romantic residents, who see only a brave whore being beaten down by a conniving slave trader.
		<<set $arcologies[0].prosperity += 5>>
		<<set $rep -= 500>>
		<</replace>>
	<</link>>

<<link "Buy out the contract and enslave her">>
		<<set $cash -= $contractCost>>
		<<replace "#result">>
		You quietly contact the trader and suggest an alternative method of settling the dispute. He is surprised, but agrees readily, chuckling at how the "recalcitrant bitch" is going to be dealt with. To her horror, she finds that your near-total power over deals made in your arcology has been employed to saddle her with additional debts that, under her indentured servitude, she cannot hope to repay. It is then the work of ten minutes to demand payment, and when she cannot pay, demand her body for enslavement. The story of your cunning @@.green;impresses@@ the slave traders, but is @@.red;booed@@ by fairer-minded citizens.

		<<set $arcologies[0].prosperity += 5>>
		<<set $rep -= 100>>
		<<include "New Slave Intro">>
		<</replace>>
	<</link>> //This will cost <<print cashFormat($contractCost)>> and give you the slave//
<<default>>
	<<link "Privately inform both parties you'll settle this in favor of the most generous">>
		<<replace "#result">>
		You privately inform both parties you'll settle this in favor of the most generous. You instantly receive two notices of escrow payment contingent on the case going the payer's way. You select the @@.yellowgreen;bigger of the two@@ and decide the matter before returning to bed in a good mood. However, the next day it becomes apparent that although he isn't stupid enough to make a public accusation of corruption, the buyer is furious at paying virgin prices for a defiled slave, and is privately @@.red;slandering@@ your administration of justice.
		<<set $rep -= 100>>
		<<set $cash += random(150,200)*10>>
		<</replace>>
	<</link>>

<<link "Settle the dispute in favor of the prospective buyer">>
		<<replace "#result">>
		What's most important is the justice of the outcome. You settle the dispute in favor of the buyer, who would otherwise be forced to buy something he did not mean to pay for. He lets it be known far and wide that you are willing to stand up for what's right, no matter what and no matter who, @@.green;improving@@ your reputation. The angry seller, now afflicted with a devalued slave in addition to a bad headache, lets his group of friends know that social superiors have no advantage at justice here. They become more reticent about dealmaking in your arcology, @@.red;damaging@@ its prosperity.
		<<set $arcologies[0].prosperity -= 5>>
		<<set $rep += 500>>
		<</replace>>
	<</link>>

<<link "Settle the dispute in favor of the prominent slaveowner">>
		<<replace "#result">>
		A deal is a deal; buyer beware. You settle the dispute in favor of the slaveowner. He lets it be known amongst his peers that you do not let social inferiors insist on justice against their betters. Citizens of quality become more willing to consider dealmaking in your arcology, @@.green;increasing prosperity.@@ On the other hand, the angry buyer shows himself to be not a person to treat lightly, either; he maintains a @@.red;malicious@@ whispering campaign to the effect that your administration of justice is fatally biased.
		<<set $arcologies[0].prosperity += 5>>
		<<set $rep -= 500>>
		<</replace>>
	<</link>>

<<link "Offer to buy out the contract">>
		<<set $cash -= $contractCost>>
		<<replace "#result">>
		You offer to simply buy out the contract, taking the slave for yourself. This lets the buyer out of buying her, and the slaveowner gets his money; but it soon becomes apparent that what both of them were really looking for is an opportunity to put one over on the other. Neither is pleased to be denied a petty victory, but they both have the sense to keep their mouths shut. The poor slave, meanwhile, appears in the penthouse entryway, @@.hotpink;hopeful@@ that she's been lucky enough to end up in a less abusive situation.

		<<include "New Slave Intro">>
		<</replace>>
	<</link>> //This will cost <<print cashFormat($contractCost)>> and give you the slave//
<</switch>>


code:
:: Lab Report [nobr]

''Lab Report''

<<if ($researchLab.hired + $researchLab.menials) != 0>>
	<<if $researchLab.research == "none" && $researchLab.manufacture == "none">>
		Since the lab is currently not working on any projects it takes contract work and earns you @@.yellowgreen;<<print cashFormat((($researchLab.hired * 3 + $researchLab.menials) * $researchLab.aiModule * 20))>>.@@
		<<set $cash += (($researchLab.hired * 3 + $researchLab.menials) * $researchLab.aiModule * 20)>>
	<<elseif $researchLab.research != "none">>
		<<set $researchLab.productionTime -= (($researchLab.hired * 3) + ($researchLab.menials) * ($researchLab.aiModule))>>
		<<if $researchLab.productionTime <= 0>>
			Your lab staff have @@.green;completed@@ their research project, and
			<<switch $researchLab.research>>
			<<case "Basic prosthetics interface">>
				<<set $researchLab.basicPLimbInterface = 1>>
			<<case "Advanced prosthetics interface">>
				<<set $researchLab.advPLimbInterface = 1>>
			<<case "Basic prosthetic limbs">>
				<<set $researchLab.basicPLimb = 1>>
			<<case "Advanced sex limbs">>
				<<set $researchLab.advSexPLimb = 1>>
			<<case "Advanced beauty limbs">>
				<<set $researchLab.advGracePLimb = 1>>
			<<case "Advanced combat limbs">>
				<<set $researchLab.advCombatPLimb = 1>>
			<<case "Cybernetic limbs">>
				<<set $researchLab.cyberneticPLimb = 1>>
			<<case "Ocular implants">>
				<<set $researchLab.ocularImplant = 1>>
			<<case "Cochlear implants">>
				<<set $researchLab.cochlearImplant = 1>>
			<<case "Electrolarynx">>
				<<set $researchLab.electrolarynx = 1>>
			<<case "Erectile implant">>
				<<set $researchLab.erectileImplant = 1>>
			<</switch>>
			they are awaiting your next instruction.
			<<set $researchLab.productionTime = 0, $researchLab.research = "none">>
		<<else>>
			Your lab staff are currently researching @@.yellow;$researchLab.research@@.
		<</if>>
	<<elseif $researchLab.manufacture != "none">>
		<<set $researchLab.productionTime -= (($researchLab.hired * 3) + ($researchLab.menials) * ($researchLab.aiModule))>>
		<<if $researchLab.productionTime <= 0>>
			Your lab staff have @@.green;completed@@ their project, and
			<<switch $researchLab.manufacture>>
			<<case "Basic prosthetics interface">>
				<<set $stockpile.basicPLimbInterface += 1, $researchLab.productionTime = 50>>
			<<case "Advanced prosthetics interface">>
				<<set $stockpile.advPLimbInterface += 1, $researchLab.productionTime = 80>>
			<<case "Basic prosthetic limbs">>
				<<set $stockpile.basicPLimb += 1, $researchLab.productionTime = 20>>
			<<case "Advanced sex limbs">>
				<<set $stockpile.advSexPLimb += 1, $researchLab.productionTime = 100>>
			<<case "Advanced beauty limbs">>
				<<set $stockpile.advGracePLimb += 1, $researchLab.productionTime = 100>>
			<<case "Advanced combat limbs">>
				<<set $stockpile.advCombatPLimb += 1, $researchLab.productionTime = 100>>
			<<case "Cybernetic limbs">>
				<<set $stockpile.cyberneticPLimb += 1, $researchLab.productionTime = 150>>
			<<case "Ocular implants">>
				<<set $stockpile.ocularImplant += 1, $researchLab.productionTime = 80>>
			<<case "Cochlear implants">>
				<<set $stockpile.cochlearImplant += 1, $researchLab.productionTime = 60>>
			<<case "Electrolarynx">>
				<<set $stockpile.electrolarynx += 1, $researchLab.productionTime = 100>>
			<<case "Erectile implant">>
				<<set $stockpile.erectileImplant += 1, $researchLab.productionTime = 50>>
			<</switch>>

				they are starting work on another unit.
				<<link "Halt production">>
					<<set $researchLab.productionTime = 0, $researchLab.manufacture = "none">>
					<<replace "#haltproduction">>
						they are awaiting your next instruction.
					<</replace>>
				<</link>>

		<<else>>
			Your lab staff are currently working on @@.yellow;$researchLab.manufacture@@.
		<</if>>
	<</if>>
<</if>>