code:
:: FondleDick

<<nobr>>
You call her over so you can fondle her
<<if $activeSlave.dick == 1>>
	tiny dick.
<<elseif $activeSlave.dick is 2>>
	cute dick.
<<elseif $activeSlave.dick is 3>>
	dick
<<elseif $activeSlave.dick is 4>>
	big dick
<<elseif $activeSlave.dick is 5>>
	impressive dick
<<elseif $activeSlave.dick is 6>>
	huge dick
<<elseif $activeSlave.dick is 7>>
	gigantic dick
<<elseif $activeSlave.dick is 8>>
	titanic dick
<<elseif $activeSlave.dick is 9>>
	absurd dick
<<elseif $activeSlave.dick == 10>>
	inhuman dick
<<else>>
	hypertrophied dick
<</if>>

<<if $activeSlave.scrotum > 0>>
	and
	<<if $activeSlave.balls == 0>>
		soft scrotum.
	<<elseif $activeSlave.balls == 1>>
		tiny balls.
	<<elseif $activeSlave.balls is 2>>
		cute balls.
	<<elseif $activeSlave.balls is 3>>
		balls.
	<<elseif $activeSlave.balls is 4>>
		large balls.
	<<elseif $activeSlave.balls is 5>>
		huge balls.
	<<else>>
		monstrous balls.
	<</if>>
<<else>>
	and soft perineum.
<</if>>

<<if ($activeSlave.vaginaTat is "tribal patterns")>>
	The tattoos on her abdomen certainly draw attention there.
<</if>>

<<if ($activeSlave.vaginaPiercing > 1) && ($activeSlave.dick != 0)>>
	Metal glints all up and down her cock.
<<elseif ($activeSlave.vaginaPiercing == 1) && ($activeSlave.dick != 0)>>
	Metal glints at the head of her cock.
<</if>>

<<if ($activeSlave.fetish is "mindbroken")>>
	Like a doll, she dumbly remains still, watching your hands move towards her without any real interest. You gently trace your fingers along her
	<<if $activeSlave.dick == 1>>
		tiny dick
	<<elseif $activeSlave.dick is 2>>
		cute dick
	<<elseif $activeSlave.dick is 3>>
		dick
	<<elseif $activeSlave.dick is 4>>
		big dick
	<<elseif $activeSlave.dick is 5>>
		impressive dick
	<<elseif $activeSlave.dick is 6>>
		huge dick
	<<elseif $activeSlave.dick is 7>>
		gigantic dick
	<<elseif $activeSlave.dick is 8>>
		titanic dick
	<<elseif $activeSlave.dick is 9>>
		absurd dick
	<<elseif $activeSlave.dick == 10>>
		inhuman dick
	<<else>>
		hypertrophied dick
	<</if>> before taking it gently in one hand and tenderly stroking your hand along its shaft,
	<<if $activeSlave.balls > 0>>
		while simultaneously cupping her
	<<if $activeSlave.scrotum == 0>>
		soft skin beneath her base and her butthole
	<<elseif $activeSlave.balls == 1>>
		tiny balls
	<<elseif $activeSlave.balls is 2>>
		small balls
	<<elseif $activeSlave.balls is 3>>
		balls
	<<elseif $activeSlave.balls is 4>>
		big balls
	<<elseif $activeSlave.balls is 5>>
		lemon-sized balls
	<<elseif $activeSlave.balls < 10>>>>
		fist-sized balls
	<<else>>
		hypertrophied balls
	<</if>>
		with your other hand
	<</if>>. You firmly wrap your fingers, thumb and palm around her dick, rhythmically stroking along with both hands, starting slow but gradually increasing the speed of your movements. You occasionally squeeze the tip and head of her dick between your fingers and thumb.
	<<if !canAchieveErection($activeSlave)>>
		Her dick remains flaccid as it cannot get stiff and you continue tenderly stroking her soft dick but, she does not respond.
	<<else>>
		Her prick stiffens like a rod in your hands and you continue your expert strokes along the erect shaft but, except for the cockmilk leaking out of her dick, she does not respond.
	<</if>>
	Since she is mindbroken, her responses to you are purely physiological and your actions have no affect on her mentally. You leave your toy for one of your other slaves to clean and maintain.
<<elseif ($activeSlave.amp == 1)>>
	Since she's a quadruple amputee, she's yours to use as a human finger toy. While she's lying there helpless, you move your hands towards her. You gently trace your fingers along her
	<<if $activeSlave.dick == 1>>
		tiny dick
	<<elseif $activeSlave.dick is 2>>
		cute dick
	<<elseif $activeSlave.dick is 3>>
		dick
	<<elseif $activeSlave.dick is 4>>
		big dick
	<<elseif $activeSlave.dick is 5>>
		impressive dick
	<<elseif $activeSlave.dick is 6>>
		huge dick
	<<elseif $activeSlave.dick is 7>>
		gigantic dick
	<<elseif $activeSlave.dick is 8>>
		titanic dick
	<<elseif $activeSlave.dick is 9>>
		absurd dick
	<<elseif $activeSlave.dick == 10>>
		inhuman dick
	<<else>>
		hypertrophied dick
	<</if>> before taking it gently in one hand and tenderly stroking your hand along its shaft,
	<<if $activeSlave.balls > 0>>
		while simultaneously cupping her
	<<if $activeSlave.scrotum == 0>>
		soft skin beneath her base and her butthole
	<<elseif $activeSlave.balls == 1>>
		tiny balls
	<<elseif $activeSlave.balls is 2>>
		small balls
	<<elseif $activeSlave.balls is 3>>
		balls
	<<elseif $activeSlave.balls is 4>>
		big balls
	<<elseif $activeSlave.balls is 5>>
		lemon-sized balls
	<<elseif $activeSlave.balls < 10>>>>
		fist-sized balls
	<<else>>
		hypertrophied balls
	<</if>>
		with your other hand
		<</if>>. You firmly wrap your fingers, thumb and palm around her dick, rhythmically stroking along with both hands, starting slow but gradually increasing the speed of your movements. You occasionally squeeze the tip and head of her dick between your fingers and thumb.
	<<if !canAchieveErection($activeSlave)>>
		Her dick remains flaccid as it cannot get stiff and you continue tenderly stroking her soft dick but, except for the cockmilk leaking out of her dick, she does not respond.
	<<else>>
		Her prick stiffens like a rod in your hands and you continue your expert strokes along the erect shaft but, except for the cockmilk leaking out of her dick, she does not respond.
	<</if>> Soon, her movements indicate that she is orgasming. She shudders and leaks her cockmilk as she orgasms in your hand, looking at you as you stop moving your hands. You leave your toy for one of your other slaves to clean and maintain.
<<elseif ($activeSlave.fetish is "submissive") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
	She comes submissively over, smiling a little submissive smile, and points her dick towards you. You gently trace your fingers along her
	<<if $activeSlave.dick == 1>>
		tiny dick
	<<elseif $activeSlave.dick is 2>>
		cute dick
	<<elseif $activeSlave.dick is 3>>
		dick
	<<elseif $activeSlave.dick is 4>>
		big dick
	<<elseif $activeSlave.dick is 5>>
		impressive dick
	<<elseif $activeSlave.dick is 6>>
		huge dick
	<<elseif $activeSlave.dick is 7>>
		gigantic dick
	<<elseif $activeSlave.dick is 8>>
		titanic dick
	<<elseif $activeSlave.dick is 9>>
		absurd dick
	<<elseif $activeSlave.dick == 10>>
		inhuman dick
	<<else>>
		hypertrophied dick
	<</if>> before taking it gently in one hand and tenderly stroking your hand along its shaft,
	<<if $activeSlave.balls > 0>>
		while simultaneously cupping her
	<<if $activeSlave.scrotum == 0>>
		soft skin beneath her base and her butthole
	<<elseif $activeSlave.balls == 1>>
		tiny balls
	<<elseif $activeSlave.balls is 2>>
		small balls
	<<elseif $activeSlave.balls is 3>>
		balls
	<<elseif $activeSlave.balls is 4>>
		big balls
	<<elseif $activeSlave.balls is 5>>
		lemon-sized balls
	<<elseif $activeSlave.balls < 10>>>>
		fist-sized balls
	<<else>>
		hypertrophied balls
	<</if>>
		with your other hand
	<</if>>. You firmly wrap your fingers, thumb and palm around her dick, rhythmically stroking along with both hands, starting slow but gradually increasing the speed of your movements. You occasionally squeeze the tip and head of her dick between your fingers and thumb.
	<<if !canAchieveErection($activeSlave)>>
		Her dick remains flaccid as it cannot get stiff and you continue tenderly stroking her soft dick.
	<<else>>
		Her prick stiffens like a rod in your hands and you continue your expert strokes along the erect shaft.
	<</if>> Soon, her movements indicate that she is orgasming. She shudders and leaks her cockmilk as she orgasms in your hands and get cleaned up.
<<elseif  $activeSlave.devotion < -20>>
	She clearly dislikes the thought of getting her dick fondled by you. Her lower lip quivers with trepidation as she watches your hands move towards her. She has no choice but to obey if she wants to avoid punishment. She gasps and shakes as you gently trace along her
	<<if $activeSlave.dick == 1>>
		tiny dick
	<<elseif $activeSlave.dick is 2>>
		cute dick
	<<elseif $activeSlave.dick is 3>>
		dick
	<<elseif $activeSlave.dick is 4>>
		big dick
	<<elseif $activeSlave.dick is 5>>
		impressive dick
	<<elseif $activeSlave.dick is 6>>
		huge dick
	<<elseif $activeSlave.dick is 7>>
		gigantic dick
	<<elseif $activeSlave.dick is 8>>
		titanic dick
	<<elseif $activeSlave.dick is 9>>
		absurd dick
	<<elseif $activeSlave.dick == 10>>
		inhuman dick
	<<else>>
		hypertrophied dick
	<</if>> before taking it gently in one hand and tenderly stroking your hand along its shaft,
	<<if $activeSlave.balls > 0>>
		while simultaneously cupping her
	<<if $activeSlave.scrotum == 0>>
		soft skin beneath her base and her butthole
	<<elseif $activeSlave.balls == 1>>
		tiny balls
	<<elseif $activeSlave.balls is 2>>
		small balls
	<<elseif $activeSlave.balls is 3>>
		balls
	<<elseif $activeSlave.balls is 4>>
		big balls
	<<elseif $activeSlave.balls is 5>>
		lemon-sized balls
	<<elseif $activeSlave.balls < 10>>>>
		fist-sized balls
	<<else>>
		hypertrophied balls
	<</if>>
		with your other hand
	<</if>>. You firmly wrap your fingers, thumb and palm around her dick, rhythmically stroking along with both hands, starting slow but gradually increasing the speed of your movements. You occasionally squeeze the tip and head of her dick between your fingers and thumb.
	<<if !canAchieveErection($activeSlave)>>
		Her dick remains flaccid as it cannot get stiff and you continue tenderly stroking her soft dick.
	<<else>>
		Her prick stiffens like a rod in your hand and you continue your expert strokes along the erect shaft.
	<</if>> She grabs your wrist with her hands and tries to stop it from moving but is unable to and despite her resistant pulling against you. She bites her lip but she cannot help but moan. Soon she shudders and leaks her cockmilk as she orgasms in your hands. She looks at you shamefully as you stop moving your hands and get cleaned up.
<<elseif ($activeSlave.fetish is "masochist") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
	She hurriedly comes over to you, to stand between you and your desk. You lean over while she lies down upon it, face up, with her dick pointed towards you. She gasps when you slap her
	<<if $activeSlave.dick == 1>>
		tiny dick
	<<elseif $activeSlave.dick is 2>>
		cute dick
	<<elseif $activeSlave.dick is 3>>
		dick
	<<elseif $activeSlave.dick is 4>>
		big dick
	<<elseif $activeSlave.dick is 5>>
		impressive dick
	<<elseif $activeSlave.dick is 6>>
		huge dick
	<<elseif $activeSlave.dick is 7>>
		gigantic dick
	<<elseif $activeSlave.dick is 8>>
		titanic dick
	<<elseif $activeSlave.dick is 9>>
		absurd dick
	<<elseif $activeSlave.dick == 10>>
		inhuman dick
	<<else>>
		hypertrophied dick
	<</if>> with your hand. You firmly grab it and tightly squeeze it with your fingers, stroking your hand along its shaft,
	<<if $activeSlave.balls > 0>>
		while simultaneously slapping her
	<<if $activeSlave.balls == 1>>
		tiny balls
	<<elseif $activeSlave.balls is 2>>
		small balls
	<<elseif $activeSlave.balls is 3>>
		balls
	<<elseif $activeSlave.balls is 4>>
		big balls
	<<elseif $activeSlave.balls is 5>>
		lemon-sized balls
	<<elseif $activeSlave.balls < 10>>>>
		fist-sized balls
	<<else>>
		hypertrophied balls
	<</if>>
		with your other hand
	<</if>>. You firmly wrap your fingers, thumb and palm around her dick, rhythmically stroking along with both hands, starting slow but gradually increasing the speed of your movements. You occasionally squeeze and pinch the tip and head of her dick between your fingers and thumb.
	<<if !canAchieveErection($activeSlave)>>
		Her dick remains flaccid as it cannot get stiff and you continue tenderly stroking her soft dick.
	<<else>>
		Her prick stiffens like a rod in your hands and you continue your expert strokes along the erect shaft.
	<</if>> Your rough play leaves red marks on her breasts and nipples and she becomes even more aroused. Soon, her movements indicate that she is orgasming. She shudders and leaks her cockmilk as she orgasms in your hands and get cleaned up. She rubs the marks on her dick and balls with her hands, an ecstatic look on her $activeSlave.skin face. She looks at you longingly, hungry for more.
<<elseif  $activeSlave.devotion <= 20>>
	She obeys silently, standing in front of you as you move your hands towards her. You gently trace your fingers along her
	<<if $activeSlave.dick == 1>>
		tiny dick
	<<elseif $activeSlave.dick is 2>>
		cute dick
	<<elseif $activeSlave.dick is 3>>
		dick
	<<elseif $activeSlave.dick is 4>>
		big dick
	<<elseif $activeSlave.dick is 5>>
		impressive dick
	<<elseif $activeSlave.dick is 6>>
		huge dick
	<<elseif $activeSlave.dick is 7>>
		gigantic dick
	<<elseif $activeSlave.dick is 8>>
		titanic dick
	<<elseif $activeSlave.dick is 9>>
		absurd dick
	<<elseif $activeSlave.dick == 10>>
		inhuman dick
	<<else>>
		hypertrophied dick
	<</if>> before taking it gently in one hand and tenderly stroking your hand along its shaft,
	<<if $activeSlave.balls > 0>>
		while simultaneously cupping her
	<<if $activeSlave.scrotum == 0>>
		soft skin beneath her base and her butthole
	<<elseif $activeSlave.balls == 1>>
		tiny balls
	<<elseif $activeSlave.balls is 2>>
		small balls
	<<elseif $activeSlave.balls is 3>>
		balls
	<<elseif $activeSlave.balls is 4>>
		big balls
	<<elseif $activeSlave.balls is 5>>
		lemon-sized balls
	<<elseif $activeSlave.balls < 10>>>>
		fist-sized balls
	<<else>>
		hypertrophied balls
	<</if>>
		with your other hand
	<</if>>. You firmly wrap your fingers, thumb and palm around her dick, rhythmically stroking along with both hands, starting slow but gradually increasing the speed of your movements. You occasionally squeeze the tip and head of her dick between your fingers and thumb.
	<<if !canAchieveErection($activeSlave)>>
		Her dick remains flaccid as it cannot get stiff and you continue tenderly stroking her soft dick.
	<<else>>
		Her prick stiffens like a rod in your hands and you continue your expert strokes along the erect shaft.
	<</if>> She looks into your eyes furtively while she grabs your wrists with her hands, moving to match your hand movements. She moans and shudders, leaking her cockmilk as she orgasms in your hands. She dutifully looks at you as you stop moving your hands and get cleaned up.
<<else>>
	She devotedly comes over and gives you an impassioned kiss. She smiles and points her dick towards you. You gently trace your fingers along her
	<<if $activeSlave.dick == 1>>
		tiny dick
	<<elseif $activeSlave.dick is 2>>
		cute dick
	<<elseif $activeSlave.dick is 3>>
		dick
	<<elseif $activeSlave.dick is 4>>
		big dick
	<<elseif $activeSlave.dick is 5>>
		impressive dick
	<<elseif $activeSlave.dick is 6>>
		huge dick
	<<elseif $activeSlave.dick is 7>>
		gigantic dick
	<<elseif $activeSlave.dick is 8>>
		titanic dick
	<<elseif $activeSlave.dick is 9>>
		absurd dick
	<<elseif $activeSlave.dick == 10>>
		inhuman dick
	<<else>>
		hypertrophied dick
	<</if>> before taking it gently in one hand and tenderly stroking your hand along its shaft,
	<<if $activeSlave.balls > 0>>
		while simultaneously cupping her
	<<if $activeSlave.scrotum == 0>>
		soft skin beneath her base and her butthole
	<<elseif $activeSlave.balls == 1>>
		tiny balls
	<<elseif $activeSlave.balls is 2>>
		small balls
	<<elseif $activeSlave.balls is 3>>
		balls
	<<elseif $activeSlave.balls is 4>>
		big balls
	<<elseif $activeSlave.balls is 5>>
		lemon-sized balls
	<<elseif $activeSlave.balls < 10>>>>
		fist-sized balls
	<<else>>
		hypertrophied balls
	<</if>>
		with your other hand
	<</if>>. You firmly wrap your fingers, thumb and palm around her dick, rhythmically stroking along with both hands, starting slow but gradually increasing the speed of your movements. You occasionally squeeze the tip and head of her dick between your fingers and thumb.
	<<if !canAchieveErection($activeSlave)>>
		Her dick remains flaccid as it cannot get stiff and you continue tenderly stroking her soft dick.
	<<else>>
		Her prick stiffens like a rod in your hands and you continue your expert strokes along the erect shaft.
	<</if>> She begs you not to stop. Soon, she moans and her movements indicate that she is about to orgasm. She shudders and leaks her cockmilk as she orgasms in your hands. She looks at you passionately as you stop moving your hands and get cleaned up.
<</if>>
<</nobr>>


code:
:: Basenationalities Controls [nobr]

<<if $nationalities.length < 1>>
	//You cannot be a slave owner without a slave trade. Please add nationalities to continue.//
<<else>>
	<<link "Confirm customization">>
		<<unset $baseControlsFilter>>
		<<if $customWA == 0>>
			<<goto "Intro Summary">>
		<<else>>
			<<goto "Extreme Intro">>
		<</if>>
	<</link>>
<</if>>

/* Generates cloned array of $nationalities, removing duplicates */
<<set $nationalitiescheck = clone($nationalities)>>
<<for _i = 0; _i < $nationalitiescheck.length; _i++>>
	<<set _nation to $nationalitiescheck[_i]>>
		<<if $nationalitiescheck.count(_nation)>>
			<<set $nationalitiescheck.delete(_nation),$nationalitiescheck.push(_nation),$nationalitiescheck.sort()>>
		<</if>>
<</for>>

/* Prints distribution of $nationalities, using $nationalitiescheck to render array */
<<for _i = 0; _i < $nationalitiescheck.length; _i++>>
	<<set _nation to $nationalitiescheck[_i]>>
	<<print _nation>> @@color:orange;<<print (($nationalities.count(_nation)/$nationalities.length)*100).toFixed(2)>>%@@
<<if _i < $nationalitiescheck.length-1>> | <</if>>
<</for>>

/* Fine control tweaking of populations */
Adjust slave populations:

/* Filter controls */
Filter by Race:
<<for _i = 0; _i < $filterRaces.length; _i++>>
	<<set _race to $filterRaces[_i]>>
	<<if $baseControlsFilter == _race.toLowerCase().replace(/[ -]/g, '')>>
		<<print _race>>
	<<else>>
		<<print "
			<<link _race>>
				<<set $baseControlsFilter to $filterRaces[" + _i + "].toLowerCase().replace(/[ -]/g, '')>>
				<<replace '#PopControl'>><<include 'Basenationalities Controls'>><</replace>>
			<</link>>
		">>
	<</if>>
	<<if _i < $filterRaces.length-1>>
	|
	<</if>>
<</for>>

Filter by Region:
<<for _i = 0; _i < $filterRegions.length; _i++>>
	<<set _region to $filterRegions[_i]>>
	<<if $baseControlsFilter == _region.toLowerCase().replace(/[ -]/g, '')>>
		<<print _region>>
	<<else>>
		<<print "
			<<link _region>>
				<<set $baseControlsFilter to $filterRegions[" + _i + "].toLowerCase().replace(/[ -]/g, '')>>
				<<replace '#PopControl'>><<include 'Basenationalities Controls'>><</replace>>
			<</link>>
		">>
	<</if>>
	<<if _i < $filterRegions.length-1>>
	|
	<</if>>
<</for>>

/* Unfiltered pop controls */
<<if $baseControlsFilter == "all">>
	<<for _i = 0; _i < $basenationalities.length; _i++>>
		<<set _nation to $basenationalities[_i]>>
		<<print "
		_nation
			<<link '+'>>
				<<set $nationalities.push($basenationalities[" + _i + "])>>
				<<replace '#PopControl'>><<include 'Basenationalities Controls'>><</replace>>
			<</link>>
		">>
	<<if $nationalitiescheck.includes(_nation) > 0 >>
		<<print "
			<<link '–'>>
				<<set $nationalities.deleteAt(($nationalities.indexOf($basenationalities[" + _i + "])))>>
				<<replace '#PopControl'>><<include 'Basenationalities Controls'>><</replace>>
			<</link>>
		">>
		<</if>>
	<<if $nationalities.count(_nation) > 1 >>
		<<print "
			<<link '0'>>
				<<set $nationalities.delete($basenationalities[" + _i + "])>>
				<<replace '#PopControl'>><<include 'Basenationalities Controls'>><</replace>>
			<</link>>
		">>
	<</if>>
	<<if _i < $basenationalities.length-1>>
	|
	<</if>>
	<</for>>
<<else>>
/* Filtered pop controls */
	<<set _controlsNationality = State.variables[$baseControlsFilter+'Nationalities']>>
	<<for _i = 0; _i < _controlsNationality.length; _i++>>
		<<set _nation to _controlsNationality[_i]>>
		<<print "
		_nation
			<<link '+'>>
				<<set $nationalities.push(_controlsNationality[" + _i + "])>>
				<<replace '#PopControl'>><<include 'Basenationalities Controls'>><</replace>>
			<</link>>
		">>
	<<if $nationalitiescheck.includes(_nation) > 0 >>
		<<print "
			<<link '–'>>
				<<set $nationalities.deleteAt(($nationalities.indexOf(_controlsNationality[" + _i + "])))>>
				<<replace '#PopControl'>><<include 'Basenationalities Controls'>><</replace>>
			<</link>>
		">>
		<</if>>
	<<if $nationalities.count(_nation) > 1 >>
		<<print "
			<<link '0'>>
				<<set $nationalities.delete(_controlsNationality[" + _i + "])>>
				<<replace '#PopControl'>><<include 'Basenationalities Controls'>><</replace>>
			<</link>>
		">>
	<</if>>
	<<if _i < _controlsNationality.length-1>>
	|
	<</if>>
	<</for>>
<</if>>

repo_name: brankirk/fc


code:
:: BirthStorm

<<set $nextButton to "Back">>\
<<set $nextLink to "Slave Interact">>\
<<nobr>>
The remote surgery allows the removal of the pregnancy generator through conventional means, an injection to induce labor and the resulting birthing of the womb's contents. $activeSlave.slaveName's massive pregnant belly begins to shudder and writhe moments after being injected with the drug.  She drops to the ground with her legs spread to either side of her spasming bulk with a loud moan.  Her vaginal lips part as the first of her brood is born, followed by another, and another. After nearly a day of constant birthing
<<if $activeSlave.sexualFlaw is "breeder">>
	and the realization that you are taking away her ideal body, her perfect existance; her mind @@color:red;fundamentally breaks. The ordeal of constant birthing has had a massive effect on her health as well as completely destroyed her vagina@@.
    <<set $activeSlave.fetish to "mindbroken">>
<<elseif $activeSlave.fetish is "pregnancy" && $Nurse != 0>>
	and orgasming each time, $activeSlave.slaveName's mind would have broken. However, $Nurse.slaveName had the forsight to sedate her after witnessing her constant orgasming.  She awakes to find her belly deflated, no longer crammed full of life. She is @@color:mediumorchid;disappointed@@ that you would forbid her from such a pleasure, but @@color:mediumaquamarine;understands@@ why it was done. @@color:red;The ordeal of constant birthing has had a massive effect on her health as well as completely destroyed her vagina@@.
    <<set $activeSlave.trust += 5>>
    <<set $activeSlave.devotion -= 5>>
<<elseif $activeSlave.fetish is "pregnancy">>
	and orgasming each time $activeSlave.slaveName's mind is @@color:red;fundamentally broken.@@ Being under constant pleasure for so long has destroyed all but the part of her that feels pleasure.  With one final push the breeding device is expelled from her womb as the last spark of what was her mind is extinguished.  @@color:red;The ordeal of constant birthing has had a massive effect on her health as well as completely destroyed her vagina@@.
    <<set $activeSlave.fetish to "mindbroken">>
<<elseif $activeSlave.devotion <= 20>>
	@@color:mediumorchid;she hates you for destroying her body like this@@.  She is @@color:gold;terrified of your power@@ over her body.  @@color:red;The ordeal of constant birthing has had a massive effect on her health as well as completely destroyed her vagina@@.
    <<set $activeSlave.trust -= 40>>
    <<set $activeSlave.devotion -= 50>>
<<elseif $activeSlave.devotion <= 50>>
	she is dully obedient. She has been broken to slave life so thoroughly that even this is neither surprising nor affecting. She is @@color:gold;terrified of your power@@ over her body.  @@color:red;The ordeal of constant birthing has had a massive effect on her health as well as completely destroyed her vagina@@.
    <<set $activeSlave.trust -= 40>>
<<else>>
	@@color:hotpink;pleased by this stark development@@, since she is so attentive to your will. She also expects she'll be able to fuck better now without a massive belly getting in the way.  @@color:red;The ordeal of constant birthing has had a massive effect on her health as well as completely destroyed her vagina@@.
    <<set $activeSlave.devotion += 4>>
<</if>>
<<set $seed to random(-20,20)>>
<<if $Cash4Babies == 1>>
	Her babies sold for a total of @@color:yellowgreen;¤<<print 50*(50+$seed)>>@@.
	<<set $cash += 50*(50+$seed)>>
<</if>>
<<set $activeSlave.health -= 80>>
<<set $activeSlave.vagina to 10>>
<<set $activeSlave.preg to -3>>
<<set $activeSlave.pregType to 0>>
<<set $activeSlave.pregSource to 0>>
<<set $activeSlave.births += 50>>
<<set $activeSlave.birthsTotal += 50>>
<<set $birthsTotal += 50>>
<</nobr>>


code:
:: Breeder Proposal [nobr]

<<set $propPass = 0>>

You draft a proposal to the Societal Elite proposing the use of specially tested slaves as breeding stock. If they can pass the tests required to join the societal elite; even as slaves, their bodies can prove valuable to furthering eugenics. They will gain no additional rights, but their wombs will be used to birth elite children; helping stave off potential threats of inbreeding and adding possible missed beneficial traits into the Elite's gene pool.

Within the hour, you are called before The Societal Elite.

<<if $PC.dick == 0>>
	"Do you really think you are in any position to make such a request? You, a fertile woman and member of the Elite, who has not taken even the slightest interest in carrying one of our children, dares to even suggest using slaves as breeding stock? Well?"

<<link "Agree to being used as a breeder and save face">>
	<<replace "#result">>
		"Good choice girl. A selection of men will be provided to you, take your pick and bear our children."
		<<set $playerBred = 1>>
		<<set $propOutcome to -1>>
	<</replace>>
	<</link>>

<<link "Decline being used as a breeder and face the Societal Elites' wrath">>
	<<replace "#result">>
		"You'll regret this decision. We'll have our way one way or another."
		<<set $failedElite += 275>>
		<<set $propOutcome to -1>>
	<</replace>>
	<</link>>

<<else>>
	<<if $PC.dick == 1 && $PC.vagina == 1 && $failedElite > 50>>
		"We have read your proposal and propose the following: You are not well liked amoung us, and your medical records show you are quite capable of carrying a child. If you will carry our children, we will grant your proposal, otherwise, leave and never ask us this again."

<<link "Agree to being used as a breeder to complete the deal">>
	<<replace "#result">>
		"Your contributions will be appreciated. We shall convene to decide the qualifications for a slave to become a breeder. We will inform you of them when we send the list of eligible males to breed you."
		<<set $failedElite -= 50>>
		<<set $playerBred = 1>>
		<<set $propOutcome to 1>>
		<<InitStandards>>
	<</replace>>
	<</link>>

<<link "Decline being used as a breeder and withdraw your proposal">>
	<<replace "#result">>
		"Very well, if your masculinity is more valuable to you than your proposal, then so be it."
		<<set $propOutcome to -1>>
	<</replace>>
	<</link>>

	<<elseif $PC.dick == 1 && $PC.vagina == 1>>
		"We have read your proposal and agree. However, we shall set the standards for what shall qualify as breeding stock, not you. Our standards will be delivered to you shortly.

		Your medical records say you have working female sex organs, and we respect your choice to not use them. But have you considered carrying another member's child? It will be extremely lucrative for you and go a long way to furthering our objectives."

<<link "Agree to being used as a breeder">>
	<<replace "#result">>
		"Your contributions will be appreciated. We shall convene to decide the qualifications for a slave to become a breeder. We will inform you of them when we send the list of eligible males to breed you."
		<<set $playerBred = 1>>
		<<set $propOutcome to 1>>
		<<InitStandards>>
	<</replace>>
	<</link>>

<<link "Decline being used as a breeder">>
	<<replace "#result">>
		"Very well, if you wish to waste your gift, it is your prerogative.  We shall convene to decide the qualifications for a slave to become a breeder and inform you upon completion."
		<<set $propOutcome to 1>>
		<<InitStandards>>
	<</replace>>
	<</link>>

	<<else>>
		"We have read your proposal and agree. However, we shall set the standards for what shall qualify as breeding stock, not you. Our standards will be delivered to you shortly."
		<<set $propOutcome to 1>>
		<<InitStandards>>
	<</if>>
<</if>>


code:
:: BreedingTest [nobr]

<<set $nextButton to "Back">>
<<set $nextLink to "Slave Interact">>

<<UpdateStandards>>
<<BreedingStandards>>

<<BreedingEligibility>>


code:
:: economy widgets [widget nobr]

<<widget "BrothelStatistics">>
	<<if ($showEconomicDetails)>>
	<<if (!$facility || !$facility.brothel)>>

- No statistics for $brothelName gathered this week -

	<<else>>
		<<set _details = $args[0]>>
		<<set _b = $facility.brothel>>

			Items
			Revenue
			Expenses
			Net Income
			Rep. Change

			Total whoring income
			@@color:yellowgreen;¤<<= _b.whoreIncome.toFixedHTML(2)>>@@

			@@color:yellowgreen;¤<<= _b.whoreIncome.toFixedHTML(2)>>@@
			<<if (_b.rep > 0)>>@@color:green;+<<= _b.rep.toFixedHTML(1)>>@@<<elseif (_b.rep < 0)>>@@color:red;<<= _b.rep.toFixedHTML(1)>>@@<<else>>±<<= Number(0).toFixedHTML(1)>><</if>>

			Total whore living costs

			@@color:red;¤<<= _b.whoreCosts.toFixedHTML(2)>>@@
			@@color:red;¤-<<= _b.whoreCosts.toFixedHTML(2)>>@@

		<<if _details>>

			Whore details

				Whore
				Customers
				Revenue
				Expenses
				Net Income
				Rep. Change

			<<set _slaveDetails = _b.income.values()>>
			<<set _slaveInfo = _slaveDetails.next()>>
			<<for !_slaveInfo.done>>
				<<set _revenue = _slaveInfo.value.income + _slaveInfo.value.adsIncome, _netIncome = _revenue - _slaveInfo.value.cost>>

					<<if (_slaveInfo.value.customLabel)>>(@@color:yellow;''_slaveInfo.value.customLabel''@@) <</if>>_slaveInfo.value.slaveName
					<<if (_slaveInfo.value.customers <= 0)>>@@color:red;none@@<<else>>_slaveInfo.value.customers<</if>>
					@@color:yellowgreen;¤<<= _revenue.toFixedHTML(2)>>@@<<if (_slaveInfo.value.adsIncome > 0)>> (@@color:yellowgreen;¤<<= _slaveInfo.value.adsIncome.toFixedHTML(2)>>@@ due to advertising)<</if>>
					@@color:red;¤<<= _slaveInfo.value.cost.toFixedHTML(2)>>@@
					<<if (_netIncome > 0)>>@@color:yellowgreen;¤<<= _netIncome.toFixedHTML(2)>>@@<<elseif (_netIncome < 0)>>@@color:red;¤<<= _netIncome.toFixedHTML(2)>>@@<<else>>¤<<= _netIncome.toFixedHTML(2)>><</if>>
					<<if (_slaveInfo.value.rep > 0)>>@@color:green;+<<= _slaveInfo.value.rep.toFixedHTML(1)>>@@<<elseif (_slaveInfo.value.rep < 0)>>@@color:red;<<= _slaveInfo.value.rep.toFixedHTML(1)>>@@<<else>><</if>>

				<<set _slaveInfo = _slaveDetails.next()>>
			<</for>>

		<</if>>
		<<if (_b.adsIncome > 0)>>

			Additional income
			@@color:yellowgreen;¤<<= _b.adsIncome.toFixedHTML(2)>>@@

			@@color:yellowgreen;¤<<= _b.adsIncome.toFixedHTML(2)>>@@

		<</if>>

			Brothel maintenance

			@@color:red;¤<<= _b.maintenance.toFixedHTML(2)>>@@
			@@color:red;¤-<<= _b.maintenance.toFixedHTML(2)>>@@

		<<if (_b.adsCosts > 0)>>

			Advertising program

			@@color:red;¤<<= _b.adsCosts.toFixedHTML(2)>>@@
			@@color:red;¤-<<= _b.adsCosts.toFixedHTML(2)>>@@

		<</if>>

			Total
			@@color:yellowgreen;¤<<= _b.totalIncome.toFixedHTML(2)>>@@
			@@color:red;¤<<= _b.totalExpenses.toFixedHTML(2)>>@@
			<<if (_b.profit > 0)>>@@color:yellowgreen;¤<<= _b.profit.toFixedHTML(2)>>@@<<elseif (_b.profit < 0)>>@@color:red;¤<<= _b.profit.toFixedHTML(2)>>@@<<else>>¤<<= _b.profit.toFixedHTML(2)>><</if>>
			<<if (_b.rep > 0)>>@@color:green;+<<= _b.rep.toFixedHTML(1)>>@@<<elseif (_b.rep < 0)>>@@color:red;<<= _b.rep.toFixedHTML(1)>>@@<<else>>±<<= Number(0).toFixedHTML(1)>><</if>>

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


code:
:: extended family widgets [nobr widget]

<<widget "Family">>

/*testtest PC parent passage - determines if the current slave is your mother or father*/
<<if $activeSlave.ID == $PC.mother && $activeSlave.ID == $PC.father>>
	She @@color:lightgreen;is both your mother and father, $pronoun impregnated <<print $object>>self with you.@@
<<elseif $activeSlave.ID == $PC.mother>>
	$pronounCap @@color:lightgreen;is your mother.@@
<<elseif $activeSlave.ID == $PC.father>>
	$pronounCap @@color:lightgreen;is your father.@@
<</if>>

<<if $activeSlave.father == -1 && $activeSlave.mother == -1>>
	$pronounCap's @@color:lightgreen;your child;@@ you knocked yourself up and gave birth to $object.
<</if>>

<<if $activeSlave.father == -1 && $activeSlave.mother != -1>>
	$pronounCap's @@color:lightgreen;your child;@@ you knocked $possessive mother up.
<<elseif $activeSlave.father > 0>>
	<<for $i to 0; $i < $slaves.length; $i++>>
		<<if $slaves[$i].ID == $activeSlave.father>>
			$pronounCap was @@color:lightgreen;fathered by $slaves[$i].slaveName's@@ virile dick.
			<<break>>
		<</if>>
	<</for>>
<</if>>

<<if $activeSlave.father != -1 && $activeSlave.mother == -1>>
	$pronounCap's @@color:lightgreen;your child;@@ you gave birth to $object.
<<elseif $activeSlave.mother > 0>>
	<<for $i to 0; $i < $slaves.length; $i++>>
		<<if $slaves[$i].ID == $activeSlave.mother>>
			$pronounCap was @@color:lightgreen;born from $slaves[$i].slaveName's@@ fertile womb.
			<<break>>
		<</if>>
	<</for>>
<</if>>

<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $activeSlave.ID == $slaves[$i].father>>
		<<set $children.push($slaves[$i])>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	$pronounCap @@color:lightgreen;fathered
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	$pronounCap @@color:lightgreen;fathered a pair of your slaves: $children[0].slaveName, and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	$pronounCap @@color:lightgreen;fathered a single slave of yours: $children[0].slaveName.@@
<</if>>
<<set $children = []>>

<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $activeSlave.ID == $slaves[$i].mother>>
		<<set $children.push($slaves[$i])>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	$pronounCap @@color:lightgreen;gave birth to
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	$pronounCap @@color:lightgreen;gave birth to a pair of your slaves: $children[0].slaveName, and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	$pronounCap @@color:lightgreen;gave birth to a single of your slaves: $children[0].slaveName.@@
<</if>>
<<set $children = []>>

/*testtest maternal grandma passage - determines if the current slave has a maternal grandmother*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID && $slaves[$i].ID == $activeSlave.mother>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$j].ID != $activeSlave.ID && $slaves[$j].ID != $slaves[$i].ID && $slaves[$j].ID == $slaves[$i].mother>>
				$possessiveCap maternal @@color:lightgreen;grandmother is $slaves[$j].slaveName.@@
			<</if>>
		<</for>>
	<<elseif $PC.ID == $activeSlave.mother && $slaves[$i].ID == $PC.mother>>
		$possessiveCap maternal @@color:lightgreen;grandmother is $slaves[$i].slaveName.@@
	<</if>>
<</for>>

/*testtest maternal grandpa passage - determines if the current slave has a maternal grandfather*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID && $slaves[$i].ID == $activeSlave.mother>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$j].ID != $activeSlave.ID && $slaves[$j].ID != $slaves[$i].ID && $slaves[$j].ID == $slaves[$i].father>>
				$possessiveCap maternal @@color:lightgreen;grandfather is $slaves[$j].slaveName.@@
			<</if>>
		<</for>>
	<<elseif $PC.ID == $activeSlave.mother && $slaves[$i].ID == $PC.father>>
		$possessiveCap maternal @@color:lightgreen;grandfather is $slaves[$i].slaveName.@@
	<</if>>
<</for>>

/*testtest paternal grandma passage - determines if the current slave has a paternal grandmother*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID && $slaves[$i].ID == $activeSlave.father>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$j].ID != $activeSlave.ID && $slaves[$j].ID != $slaves[$i].ID && $slaves[$j].ID == $slaves[$i].mother>>
				$possessiveCap paternal @@color:lightgreen;grandmother is $slaves[$j].slaveName.@@
			<</if>>
		<</for>>
	<<elseif $PC.ID == $activeSlave.father && $slaves[$i].ID == $PC.mother>>
		$possessiveCap paternal @@color:lightgreen;grandmother is $slaves[$i].slaveName.@@
	<</if>>
<</for>>

/*testtest paternal grandpa passage - determines if the current slave has a paternal grandfather*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID && $slaves[$i].ID == $activeSlave.father>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$j].ID != $activeSlave.ID && $slaves[$j].ID != $slaves[$i].ID && $slaves[$j].ID == $slaves[$i].father>>
				$possessiveCap paternal @@color:lightgreen;grandfather is $slaves[$j].slaveName.@@
			<</if>>
		<</for>>
	<<elseif $PC.ID == $activeSlave.father && $slaves[$i].ID == $PC.father>>
		$possessiveCap paternal @@color:lightgreen;grandfather is $slaves[$i].slaveName.@@
	<</if>>
<</for>>

/*testtest PC grandparents passage - determines if the current slave is your grandparent*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if $activeSlave.ID == $slaves[$i].mother && $slaves[$i].ID == $PC.mother && $activeSlave.ID == $slaves[$i].father && $slaves[$i].ID == $PC.father>>
		$pronounCap is @@color:lightgreen;your grandparent.@@ $pronounCap impregnated <<print $object>>self with your mother/father who in turn impregnated themselves with you.
	<<elseif $activeSlave.ID == $slaves[$i].mother>>
		<<if $slaves[$i].ID == $PC.mother>>
			$pronounCap is @@color:lightgreen;your maternal grandmother.@@
		<<elseif $slaves[$i].ID == $PC.father>>
			$pronounCap is @@color:lightgreen;your paternal grandmother.@@
		<</if>>
	<<elseif $activeSlave.ID == $slaves[$i].father>>
		<<if $slaves[$i].ID == $PC.mother>>
			$pronounCap is @@color:lightgreen;your maternal grandfather.@@
		<<elseif $slaves[$i].ID == $PC.father>>
			$pronounCap is @@color:lightgreen;your paternal grandfather.@@
		<</if>>
	<</if>>
	<</if>>
<</for>>

/*testtest grandchild passage - determines how many grandchildren the current slave has*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if $activeSlave.ID == $slaves[$i].mother or $activeSlave.ID == $slaves[$i].father>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID>>
			<<if $slaves[$i].ID == $slaves[$j].mother or $slaves[$i].ID == $slaves[$j].father>>
				<<set $children.push($slaves[$j])>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
	<</if>>
<</for>>
<<if $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	has @@color:lightgreen;many grandchildren,
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName amongst your slaves.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	has @@color:lightgreen;two grandchildren, $children[0].slaveName, and $children[1].slaveName as your slaves.@@
<<elseif $children.length > 0>>
	has a @@color:lightgreen;grandchild, $children[0].slaveName as your slave.@@
<</if>>
<</if>>
<<set $children = []>>

/*testtest PC aunt passage - determines how many aunts you have*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($slaves[$i], $activeSlave) == 1 ||  areSisters($slaves[$i], $activeSlave) == 2>>
	<<if $slaves[$i].ID == $PC.mother || $slaves[$i].ID == $PC.father>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID >>
			<<if $slaves[$j].vagina > -1>>
			<<if areSisters($slaves[$j], $activeSlave) == 1 ||  areSisters($slaves[$j], $activeSlave) == 2>>
				<<set $children.push($slaves[$j])>>
			<</if>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
	<</if>>
	<</if>>
<</for>>
<<if $activeSlave.vagina > -1 && $children.length > 0>>
	$pronounCap
	<<if $children.length > 2>>
		is @@color:lightgreen;your aunt along with
		<<for $j to 0; $j < $children.length; $j++>>
			<<if $j < $children.length-1>>
				$children[$j].slaveName,
			<<else>>
				and $children[$j].slaveName.@@
			<</if>>
		<</for>>
	<<elseif $children.length > 1>>
		is @@color:lightgreen;your aunt along with $children[0].slaveName.@@
	<<elseif $children.length > 0>>
		<<for $i to 0; $i < $slaves.length; $i++>>
			<<if $slaves[$i].ID != $activeSlave.ID && $activeSlave.vagina > -1>>
			<<if areSisters($slaves[$i], $activeSlave) == 1 ||  areSisters($slaves[$i], $activeSlave) == 2>>
			<<if $slaves[$i].ID == $PC.mother || $slaves[$i].ID == $PC.father>>
				$pronounCap is @@color:lightgreen;your aunt.@@
			<</if>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
<</if>>
<<set $children = []>>

/*testtest PC uncle passage - determines how many uncles you have*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($slaves[$i], $activeSlave) == 1 ||  areSisters($slaves[$i], $activeSlave) == 2>>
	<<if $slaves[$i].ID == $PC.mother || $slaves[$i].ID == $PC.father>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID && $slaves[$j].dick > 0 && $slaves[$j].vagina == -1>>
			<<if areSisters($slaves[$j], $activeSlave) == 1 ||  areSisters($slaves[$j], $activeSlave) == 2>>
				<<set $children.push($slaves[$j])>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
	<</if>>
	<</if>>
<</for>>
<<if $activeSlave.dick > 0 && $activeSlave.vagina == -1 && $children.length > 0>>
	$pronounCap
	<<if $children.length > 2>>
		is @@color:lightgreen;your uncle along with
		<<for $j to 0; $j < $children.length; $j++>>
			<<if $j < $children.length-1>>
				$children[$j].slaveName,
			<<else>>
				and $children[$j].slaveName.@@
			<</if>>
		<</for>>
	<<elseif $children.length > 1>>
		is @@color:lightgreen;your uncle along with $children[0].slaveName.@@
	<<elseif $children.length > 0>>
		<<for $i to 0; $i < $slaves.length; $i++>>
			<<if $slaves[$i].ID != $activeSlave.ID && $activeSlave.dick > 0 && $activeSlave.vagina == -1>>
			<<if areSisters($slaves[$i], $activeSlave) == 1 ||  areSisters($slaves[$i], $activeSlave) == 2>>
			<<if $slaves[$i].ID == $PC.mother || $slaves[$i].ID == $PC.father>>
				$pronounCap is @@color:lightgreen;your uncle.@@
			<</if>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
<</if>>
<<set $children = []>>

/*testtest aunt passage - determines how many aunts a slave has*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if $slaves[$i].ID == $activeSlave.mother || $slaves[$i].ID == $activeSlave.father>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$j].vagina > -1>>
			<<if areSisters($slaves[$j], $slaves[$i]) == 1 || areSisters($slaves[$j], $slaves[$i]) == 2>>
				<<set $children.push($slaves[$j])>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
	<</if>>
<</for>>
<<if $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	has @@color:lightgreen;many aunts,
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	 has @@color:lightgreen;two aunts, $children[0].slaveName, and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	 has @@color:lightgreen;an aunt, $children[0].slaveName.@@
<</if>>
<</if>>
<<set $children = []>>

/*testtest uncle passage - determines how many uncles a slave has*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if $slaves[$i].ID == $activeSlave.mother || $slaves[$i].ID == $activeSlave.father>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$j].dick > 0 && $slaves[$j].vagina == -1>>
			<<if areSisters($slaves[$j], $slaves[$i]) == 1 || areSisters($slaves[$j], $slaves[$i]) == 2>>
				<<set $children.push($slaves[$j])>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
	<</if>>
<</for>>
<<if $activeSlave.vagina > -1 && $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	has @@color:lightgreen;many aunts,
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	 has @@color:lightgreen;two aunts, $children[0].slaveName, and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	 has @@color:lightgreen;an aunt, $children[0].slaveName.@@
<</if>>
<</if>>
<<set $children = []>>

/*testtest PC niece passage - determines how many nieces you have*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($slaves[$i], $PC) == 1 || areSisters($slaves[$i], $PC) == 2>>
	<<if $slaves[$i].ID == $activeSlave.mother || $slaves[$i].ID == $activeSlave.father>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID && $slaves[$j].vagina > -1>>
			<<if $slaves[$i].ID == $slaves[$j].mother || $slaves[$i].ID == $slaves[$j].father>>
				<<set $children.push($slaves[$j])>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
	<</if>>
	<</if>>
<</for>>
<<if $activeSlave.vagina > -1 && $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	is @@color:lightgreen;your niece along with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			 and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	is @@color:lightgreen;your niece along with $children[0].slaveName.@@
<<elseif $children.length > 0>>
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID && $activeSlave.vagina > -1>>
	<<if areSisters($slaves[$i], $PC) == 1 || areSisters($slaves[$i], $PC) == 2>>
	<<if $slaves[$i].ID == $activeSlave.mother || $slaves[$i].ID == $activeSlave.father>>
		$pronounCap is @@color:lightgreen;your niece.@@
	<</if>>
	<</if>>
	<</if>>
<</for>>
<</if>>
<</if>>
<<set $children = []>>

/* testtest niece passage - determines how many nieces a slave has*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($slaves[$i], $activeSlave) > 0>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID && $slaves[$j].vagina > -1>>
			<<if $slaves[$i].ID == $slaves[$j].mother || $slaves[$i].ID == $slaves[$j].father>>
				<<set $children.push($slaves[$j])>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
	<</if>>
<</for>>
<<if $activeSlave.vagina > -1 && $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	has @@color:lightgreen;many nieces,
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName, who are your slaves.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	has @@color:lightgreen;two nieces, $children[0].slaveName, and $children[1].slaveName, who are your slaves.@@
<<elseif $children.length > 0>>
	has @@color:lightgreen;a niece, $children[0].slaveName, who is your slave.@@
<</if>>
<</if>>
<<set $children = []>>

/*testtest PC nephew passage - determines how many nephews you have*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($slaves[$i], $PC) == 1 || areSisters($slaves[$i], $PC) == 2>>
	<<if $slaves[$i].ID == $activeSlave.mother || $slaves[$i].ID == $activeSlave.father>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID && $slaves[$i].dick > 0 && $slaves[$i].vagina == -1>>
			<<if $slaves[$i].ID == $slaves[$j].mother || $slaves[$i].ID == $slaves[$j].father>>
				<<set $children.push($slaves[$j])>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
	<</if>>
	<</if>>
<</for>>
<<if $activeSlave.dick > 0 && $activeSlave.vagina == -1 && $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	is @@color:lightgreen;your nephew along with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			 and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	is @@color:lightgreen;your nephew along with $children[0].slaveName.@@
<<elseif $children.length > 0>>
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID && $activeSlave.dick > 0 && $activeSlave.vagina == -1>>
	<<if areSisters($slaves[$i], $PC) == 1 || areSisters($slaves[$i], $PC) == 2>>
	<<if $slaves[$i].ID == $activeSlave.mother || $slaves[$i].ID == $activeSlave.father>>
		$pronounCap is @@color:lightgreen;your nephew.@@
	<</if>>
	<</if>>
	<</if>>
<</for>>
<</if>>
<</if>>
<<set $children = []>>

/* testtest nephew passage - determines how many nephews a slave has*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($slaves[$i], $activeSlave) > 0>>
		<<for $j to 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID && $slaves[$j].dick > 0 && $slaves[$j].vagina == -1>>
			<<if $slaves[$i].ID == $slaves[$j].mother || $slaves[$i].ID == $slaves[$j].father>>
				<<set $children.push($slaves[$j])>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
	<</if>>
<</for>>
<<if $activeSlave.vagina > -1 && $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	has @@color:lightgreen;many nieces,
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName, who are your slaves.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	has @@color:lightgreen;two nieces, $children[0].slaveName, and $children[1].slaveName, who are your slaves.@@
<<elseif $children.length > 0>>
	has @@color:lightgreen;a niece, $children[0].slaveName, who is your slave.@@
<</if>>
<</if>>
<<set $children = []>>

/*testtest PC sibling passages - determines how many siblings you have*/
<<set $children = []>>
<<set _rel_num to areSisters($activeSlave, $PC)>>
<<if(_rel_num > 0)>>
	<<if ($activeSlave.vagina > -1)>>
		<<set _rel_type to "sister">>
	<<else>>
		<<set _rel_type to "brother">>
	<</if>>
	<<if (_rel_num == 1)>>
		<<set _rel_desc to "your twin">>
	<<elseif _rel_num == 2>>
		<<set _rel_desc to "your ">>
	<<elseif _rel_num == 3>>
		<<set _rel_desc to "your half-">>
	<</if>>
	<<for $i to 0; $i < $slaves.length; $i++>>
		<<if $slaves[$i].ID != $activeSlave.ID>>
			<<if _rel_num == areSisters($activeSlave, $slaves[$i]) && ($activeSlave.vagina > -1) == ($slaves[$i].vagina > -1)>>
				<<set console.log('sisters', $slaves[$i].birthName)>>
				<<set $children.push($slaves[$i])>>
			<</if>>
		<</if>>
	<</for>>
	$pronounCap
<<if $children.length > 1>>
	@@color:lightgreen;is _rel_desc _rel_type along with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 0>>
	is @@color:lightgreen;_rel_desc _rel_type with $children[0].slaveName.@@
<<else>>
	is @@color:lightgreen;_rel_desc _rel_type.@@
<</if>>
<</if>>
<<set $children = []>>

/*testtest PC twin passages - determines how many twins you have but not implemented yet
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($activeSlave, $PC) == 1 && areSisters($slaves[$i], $activeSlave) == 1>>
		<<set $children.push($slaves[$i])>>
	<</if>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	$pronounCap @@color:lightgreen;shared a cramped womb with you
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			, $children[$j].slaveName
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	$pronounCap is @@color:lightgreen;your twin along with $children[0].slaveName.@@
<<elseif $children.length > 0>>
	$pronounCap is @@color:lightgreen;your twin sister.@@
<</if>>
<<set $children = []>>

testtest PC sister passages - determines how many sisters you have
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($activeSlave, $PC) == 2 && areSisters($slaves[$i], $activeSlave) < 3 && areSisters($slaves[$i], $activeSlave) > 0 && $slaves[$i].vagina > -1>>
		<<set $children.push($slaves[$i])>>
	<</if>>
	<</if>>
<</for>>
<<if $activeSlave.vagina > -1 && $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	@@color:lightgreen;is your sister along with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	is @@color:lightgreen;your sister along with $children[0].slaveName.@@
<<elseif $children.length > 0>>
	is @@color:lightgreen;your sister.@@
<</if>>
<</if>>
<<set $children = []>>

testtest PC brother passages - determines how many brothers you have
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($activeSlave, $PC) == 2 && areSisters($slaves[$i], $activeSlave) < 2 && areSisters($slaves[$i], $activeSlave) > 0 && $slaves[$i].dick > 0 && $slaves[$i].vagina == -1>>
		<<set $children.push($slaves[$i])>>
	<</if>>
	<</if>>
<</for>>
<<if $activeSlave.dick > 0 && $activeSlave.vagina == -1 && $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	@@color:lightgreen;is your brother along with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	is @@color:lightgreen;your brother along with $children[0].slaveName.@@
<<elseif $children.length > 0>>
	is @@color:lightgreen;your brother.@@
<</if>>
<</if>>
<<set $children = []>>

testtest PC half-sister passages - determines how many half-sisters you have
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($activeSlave, $PC) == 3 && areSisters($slaves[$i], $PC) == 3 && $slaves[$i].vagina > -1>>
		<<set $children.push($slaves[$i])>>
	<</if>>
	<</if>>
<</for>>
<<if $activeSlave.vagina > -1 && $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	is @@color:lightgreen;your half-sister along with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	is @@color:lightgreen;your half-sister along with $children[0].slaveName.@@
<<elseif $children.length > 0>>
	is @@color:lightgreen;your half-sister.@@
<</if>>
<</if>>
<<set $children = []>>

testtest PC half-brother passages - determines how many half-brothers you have
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($activeSlave, $PC) == 3 && areSisters($slaves[$i], $PC) == 3 && $slaves[$i].dick > 0 && $slaves[$i].vagina == -1>>
		<<set $children.push($slaves[$i])>>
	<</if>>
	<</if>>
<</for>>
<<if $activeSlave.dick > 0 && $activeSlave.vagina == -1 && $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	is @@color:lightgreen;your half-brother along with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	is @@color:lightgreen;your half-brother along with $children[0].slaveName.@@
<<elseif $children.length > 0>>
	is @@color:lightgreen;your half-brother.@@
<</if>>
<</if>>
<<set $children = []>>
*/

/*testtest twins? - determines how many twins a slave has*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
		<<if areSisters($activeSlave, $slaves[$i]) == 1>>
			<<set $children.push($slaves[$i])>>
		<</if>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	$pronounCap @@color:lightgreen;shared a cramped womb with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	$pronounCap is a @@color:lightgreen;one of a set of triplets; $children[0].slaveName, and $children[1].slaveName@@ complete the trio.
<<elseif $children.length > 0>>
	$pronounCap is @@color:lightgreen;twins with $children[0].slaveName.@@
<</if>>
<<set $children = []>>

/*testtest sister - determines how many sisters a slave has*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
		<<if areSisters($activeSlave, $slaves[$i]) == 2 && $slaves[$i].vagina > -1>>
			<<set $children.push($slaves[$i])>>
		<</if>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	$pronounCap is @@color:lightgreen;sisters with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	$pronounCap is @@color:lightgreen;sisters with $children[0].slaveName and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	$pronounCap is @@color:lightgreen;sisters with $children[0].slaveName.@@
<</if>>
<<set $children = []>>

/*testtest brother - determines how many brothers a slave has*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
		<<if areSisters($activeSlave, $slaves[$i]) == 2 && $slaves[$i].dick > 0 && $slaves[$i].vagina == -1>>
			<<set $children.push($slaves[$i])>>
		<</if>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	$pronounCap is @@color:lightgreen;brothers with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	$pronounCap is @@color:lightgreen;brothers with $children[0].slaveName and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	$pronounCap is @@color:lightgreen;brothers with $children[0].slaveName.@@
<</if>>
<<set $children = []>>

/*testtest half-sister - determines how many half-sisters a slave has*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
		<<if areSisters($activeSlave, $slaves[$i]) == 3 && $slaves[$i].vagina > -1>>
			<<set $children.push($slaves[$i])>>
		<</if>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	$pronounCap is @@color:lightgreen;half-sisters with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	$pronounCap is a @@color:lightgreen;half-sister to $children[0].slaveName and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	$pronounCap is a @@color:lightgreen;half-sister to $children[0].slaveName.@@
<</if>>
<<set $children = []>>

/*testtest half-brother - determines how many half-brothers a slave has*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
		<<if areSisters($activeSlave, $slaves[$i]) == 3 && $slaves[$i].dick > 0 && $slaves[$i].vagina == -1>>
			<<set $children.push($slaves[$i])>>
		<</if>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	$pronounCap is @@color:lightgreen;half-brothers with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	$pronounCap is a @@color:lightgreen;half-brother to $children[0].slaveName and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	$pronounCap is a @@color:lightgreen;half-brother to $children[0].slaveName.@@
<</if>>
<<set $children = []>>

<</widget>>

<<widget PlayerFamily>>

<br><br>Your present family includes:

/*Player parents, lists both your parents, or just one.*/
<<for $i to 0; $i < $slaves.length; $i++>>
<<if $slaves[$i].ID == $PC.father || $slaves[$i].ID == $PC.mother>>
			<<set $children.push($slaves[$i])>>
<</if>>
<</for>>
	<<if $children.length > 1>>
		<br>Your parents are @@color:lightgreen;$children[0].slaveName and $children[1].slaveName@@.
	<<elseif $children.length > 0>>
		<br>You know one of your parents, @@color:lightgreen;$children[0].slaveName@@.
	<</if>>
<<set $children = []>>

/*Sister Test with aresisters*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $PC.ID>>
		<<if areSisters($PC, $slaves[$i]) === 2 && areSisters($slaves[$i], $PC) === 2>>
			<<set $children.push($slaves[$i])>>
		<</if>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	<br>You are @@color:lightgreen;sisters with
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	<br>You are sisters with @@color:lightgreen;$children[0].slaveName and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	<br>Your sister is @@color:lightgreen;$children[0].slaveName.@@
<</if>>
<<set $children = []>>

/*Half-Sister Test with aresisters */
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $PC.ID>>
	<<if areSisters($slaves[$i], $PC) == 3 && areSisters($PC, $slaves[$i]) == 3>>
			<<set $children.push($slaves[$i])>>
	<</if>>
<</if>>
<</for>>
<<if $children.length > 2>>
	<br>You are half-sisters with @@color:lightgreen;
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName@@.
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	<br>You are half-sisters with @@color:lightgreen;$children[0].slaveName and $children[1].slaveName@@.
<<elseif $children.length > 0>>
	<br>You have one half-sisters, @@color:lightgreen;$children[0].slaveName@@.
<</if>>
<<set $children = []>>

/*Player is Father, lists children you fathered*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $PC.ID == $slaves[$i].father>>
		<<set $children.push($slaves[$i])>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	<br>You are the father of @@color:lightgreen;
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName@@.
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	<br>You are the father of two of your slaves, @@color:lightgreen;$children[0].slaveName, and $children[1].slaveName@@.
<<elseif $children.length > 0>>
	<br>You are the father of one of your slaves, @@color:lightgreen;$children[0].slaveName@@.
<</if>>
<<set $children = []>>

/*Player is Mother, lists birthed children*/
<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $PC.ID == $slaves[$i].mother>>
		<<set $children.push($slaves[$i])>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	<br>You are the mother of@@color:lightgreen;
	<<for $j to 0; $j < $children.length; $j++>>
		<<if $j < $children.length-1>>
			$children[$j].slaveName,
		<<else>>
			and $children[$j].slaveName.@@
		<</if>>
	<</for>>
<<elseif $children.length > 1>>
	<br>You are the mother of two of your slaves, @@color:lightgreen;$children[0].slaveName, and $children[1].slaveName@@.
<<elseif $children.length > 0>>
	<br>You are the mother of one of your slaves, @@color:lightgreen;$children[0].slaveName@@.
<</if>>
<<set $children = []>>

<</widget>>


code:
:: FDick

/*CHECK*/
<<nobr>>
/*NON-AMPUTEE*/
<<if ($activeSlave.amp < 1)>>
	You direct $activeSlave.slaveName to lie down and ready herself as you step over to her an align your <<if $PC.vagina == 1>> vagina <<else>> ass <</if>> with the
	<<if ($activeSlave.vaginaPiercing > 1) && ($activeSlave.dick != 0)>>
		her pierced cock-head.
	<<elseif ($activeSlave.vaginaPiercing == 1) && ($activeSlave.dick != 0)>>
		her pierced cock .
	<<else>>
		her cock.
	<</if>>
	and lower yourself onto her

	<<if $activeSlave.dick == 1>>
		tiny dick.
	<<elseif $activeSlave.dick is 2>>
		cute dick.
	<<elseif $activeSlave.dick is 3>>
		dick
	<<elseif $activeSlave.dick is 4>>
		big dick
	<<elseif $activeSlave.dick is 5>>
		impressive dick
	<<elseif $activeSlave.dick is 6>>
		huge dick
	<<elseif $activeSlave.dick is 7>>
		gigantic dick
	<<elseif $activeSlave.dick is 8>>
		titanic dick
	<<elseif $activeSlave.dick is 9>>
		absurd dick
	<<elseif $activeSlave.dick == 10>>
		inhuman dick
	<<else>>
		hypertrophied dick
	<</if>>
	<<if $activeSlave.dick <= 6>>
	until you are sitting on her loins.
	<<else>>
	until feel that you can't take more of her inside you.
	<</if>>

	You reach back
	<<if $activeSlave.scrotum > 0>>
		and stroke her
		<<if $activeSlave.balls == 0>>
			soft scrotum.
		<<elseif $activeSlave.balls == 1>>
			tiny balls.
		<<elseif $activeSlave.balls is 2>>
			cute balls.
		<<elseif $activeSlave.balls is 3>>
			balls.
		<<elseif $activeSlave.balls is 4>>
			large balls.
		<<elseif $activeSlave.balls is 5>>
			huge balls.
		<<else>>
			monstrous balls.
		<</if>>
	<<else>>
		soft perineum.
	<</if>>

	<<if ($activeSlave.fetish is "mindbroken")>>
		Like a doll, she dumbly remains still, watching you without interest.
		You start moving up and on her shaft, until you climax and notice that so did $activeSlave.slaveName.
		Since she is mindbroken, her responses to you are purely physiological and your actions have no affect on her mentally. You leave your toy for one of your other slaves to clean and maintain.
	<<elseif $activeSlave.trust < -20>>
	Having followed your instructions as quickly as she could she lies as still as she can beneath you while you start moving on top of her. While she is too afraid to be an active participant on her, do her best to follow your instructions.
	She warns you that she is about to cum when feel yourself aproaching an orgasm and soon after, you can feel her unload inside of you, despite her fear.
	<<else>>
	You spend some time riding your slave and you both climax together.
	<</if>>
	/*AMPUTEE*/
<<else>>
	You step over to pick up $activeSlave.slaveName, lie her down and get her ready. Then you align your <<if $PC.vagina == 1>> vagina <<else>> ass <</if>> with
	<<if ($activeSlave.vaginaPiercing > 1) && ($activeSlave.dick != 0)>>
		her pierced cock-head.
	<<elseif ($activeSlave.vaginaPiercing == 1) && ($activeSlave.dick != 0)>>
		her pierced cock .
	<<else>>
		her cock.
	<</if>>
	and lower yourself onto her

	<<if $activeSlave.dick == 1>>
		tiny dick.
	<<elseif $activeSlave.dick is 2>>
		cute dick.
	<<elseif $activeSlave.dick is 3>>
		dick
	<<elseif $activeSlave.dick is 4>>
		big dick
	<<elseif $activeSlave.dick is 5>>
		impressive dick
	<<elseif $activeSlave.dick is 6>>
		huge dick
	<<elseif $activeSlave.dick is 7>>
		gigantic dick
	<<elseif $activeSlave.dick is 8>>
		titanic dick
	<<elseif $activeSlave.dick is 9>>
		absurd dick
	<<elseif $activeSlave.dick == 10>>
		inhuman dick
	<<else>>
		hypertrophied dick
	<</if>>
	<<if $activeSlave.dick <= 6>>
	until you are sitting on her loins.
	<<else>>
	until feel that you can't take more of her inside you.
	<</if>>

	You reach back

	<<if $activeSlave.scrotum > 0>>
		and stroke her
		<<if $activeSlave.balls == 0>>
			soft scrotum.
		<<elseif $activeSlave.balls == 1>>
			tiny balls.
		<<elseif $activeSlave.balls is 2>>
			cute balls.
		<<elseif $activeSlave.balls is 3>>
			balls.
		<<elseif $activeSlave.balls is 4>>
			large balls.
		<<elseif $activeSlave.balls is 5>>
			huge balls.
		<<else>>
			monstrous balls.
		<</if>>
	<<else>>
		soft perineum.
	<</if>>
	<<if ($activeSlave.fetish is "mindbroken")>>
		Like a broken doll, she dumbly remains still, watching you without interest.
		You start moving up and on her shaft, until you climax and notice that so did $activeSlave.slaveName.
		Since she is mindbroken, her responses to you are purely physiological and your actions have no affect on her mentally. You leave your toy for one of your other slaves to clean and maintain.
	<<else>>
		You ride Your helpless slave until you both climax.
	<</if>>
<</if>>
<<if ($PC.vagina == 1) && ($PC.preg == 0) && ($activeSlave.ballType == "human")>>
	<<if $activeSlave.diet is "cum production">>
		<<if random(1,100) < ($activeSlave.balls * 15 * 1.2)>>
			<<set $PC.preg = 1>>
			<<set $PC.pregSource = $activeSlave.ID>>
		<</if>>
	<<else>>
		<<if random(1,100) < ($activeSlave.balls * 15)>>
			<<set $PC.preg = 1>>
			<<set $PC.pregSource = $activeSlave.ID>>
		<</if>>
	<</if>>
<</if>>
Rumors spread that you @@color:red;enjoy taking it from slaves.@@
<<set $PC.degeneracy += 2>>
<</nobr>>


code:
:: FSelf [nobr]

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

<<set $CumSources = 0>>
<<set $CumSources = []>>

<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].assignment == "work in the dairy">>
		<<if $slaves[$i].balls > 0>>
			<<if ($slaves[$i].ballType == "human")>>
				<<set $CumSources.push($slaves[$i].ID)>>
			<</if>>
		<</if>>
	<</if>>
<</for>>
<<if $arcologies[0].FSPastoralistLaw == 1>>
	<<set $CumSources.push(0),$CumSources.push(0),$CumSources.push(0),$CumSources.push(0),$CumSources.push(0),$CumSources.push(0)>>
<</if>>

<<if $PCCumTap == 0>>

Taking the hose and attaching the delectable cockhead to it, you drag it over to your bed and make yourself comfortable. Teasing your pussylips with the perfect sized cock quickly gets you moist<<if $PC.dick == 1>> and hard<</if>>, itching for the fake dick inside you. You know yourself well, and it fits perfectly; as you thrust it into your cunt you can't help but buck with pleasure. Just as you reach your climax, you accidentally kick the tap on. Needless to say, you are quite surprised when your "lover" orgasms and begins releasing inside you, forcing you to lose your grip on the nozzle allowing it to free itself from you along with a torrent of cum. Panting and rubbing your tender belly, you quickly pull your clothes back on and head to clean yourself out. You can't help but notice your waist feels rather tight, it shot so much into you; that cum wasn't virile, right?
<<set $PC.preg = 1, $PC.pregSource = $CumSources.random(), $PCCumTap++>>

<<elseif $PCCumTap < 5>>

Taking the hose and attaching your favorite cockhead to it, you drag it over to your bed and make yourself comfortable. Teasing your pussylips with the dildo, even going as far as spurting a touch of cum across your belly, you drive it into your aching cunt. With every thrust, you jet a little more cum into your empty womb, bulging you more and more as your pleasure rises, until you reach your climax and unleash your lover's pent up load into yourself. Patting your bloated belly, you stagger to your feet and make for your private bath to relax while you drain. You giggle as you imagine you belly swelling even larger, be it with child or more cum.
<<set $PC.preg = 1, $PC.pregSource = $CumSources.random(), $PCCumTap++>>

<<elseif $PCCumTap < 10>>

Taking the hose and attaching your favorite cockhead to it, you drag it over to your bed and make yourself comfortable. Teasing your pussylips with the dildo, even going as far as spurting a touch of cum across your belly, you drive it into your aching cunt. With every thrust, you jet more cum into your empty womb, bulging you more and more as your pleasure rises, until you reach your climax and unleash your lover's pent up load into yourself. Patting your rounded belly, you stagger to your feet and make for your private bath to relax while you drain. You giggle as you cradle your bloated middle, you practically look pregnant already!
<<set $PC.preg = 1, $PC.pregSource = $CumSources.random(), $PCCumTap++>>

<<elseif $PCCumTap < 15>>

Taking the hose and attaching your favorite cockhead to it, you eagerly drag it to your bed and make yourself comfortable. You waste no time driving it into your aching cunt. With every thrust, you jet huge bursts of cum into your empty womb, swelling yourself more and more as your pleasure rises, until you reach your climax and unleash your lover's pent up load into yourself. Patting your huge belly, you struggle to your feet and waddle towards your private bath to relax while you drain. You giggle as you cradle your round middle, anyone who saw you like this would certainly say you were heavily pregnant!
<<set $PC.preg = 1, $PC.pregSource = $CumSources.random(), $PCCumTap++>>

<<elseif $PCCumTap < 20>>

Taking the hose and attaching your favorite cockhead to it, you eagerly drag it to your bed and make yourself comfortable. You waste no time driving it into your aching cunt. With every thrust, you jet huge bursts of cum into your empty womb, swelling yourself more and more as your pleasure rises, until you reach your climax and unleash your lover's pent up load into yourself. Patting your enormous belly, you struggle to even get off the bed, eventually making it to your feet so that you may slowly stagger to the bath. You moan lewdly as the pressure within your full belly sets another orgasm coursing through your body, making it jiggle delightfully. Anyone who saw you like this would swear you were about to give birth!
<<set $PC.preg = 1, $PC.pregSource = $CumSources.random(), $PCCumTap++>>

<<elseif $PCCumTap < 25>>

Taking the hose and attaching your favorite cockhead to it, you eagerly drag it to your bed and make yourself comfortable. You waste no time driving it into your aching cunt. With every thrust, you jet massive bursts of cum into your empty womb, swelling yourself more and more as your pleasure rises, until you reach your climax and unleash your lover's pent up load into yourself. Patting your taut, overfilled belly, you struggle to even get off the bed. After minutes of effort, several attempts ruined by aftershock orgasms, you manage to get on your feet. Cradling your massive cum-belly, you gingerly waddle to your waiting bath. You look like you are ready to burst with triplets, imagine what the public would say if they way you in this state.
<<set $PC.preg = 1, $PC.pregSource = $CumSources.random(), $PCCumTap++>>

<<else>>

Taking the hose and attaching your favorite cockhead to it, you eagerly drag it to your bed and make yourself comfortable. You waste no time driving it into your aching cunt. With every thrust, you jet massive bursts of cum into your empty womb, swelling yourself more and more as your pleasure rises, until you reach your climax and unleash your lover's pent up load into yourself. Patting your taut, overfilled belly, you roll over onto your back so that you may tease your<<if $PC.boobs > 0>> breasts,<</if>><<if $PC.dick > 0>> dick,<</if>> belly and pussy. You made sure to schedule this block for absolute privacy, so no one should disturb you while you play with your bloated body. Once you are exhausted and drained of your contents, you head for the showers and to get a servant to clean up your bed; from the slave you enjoyed with the cum hose, of course.
<<set $PC.preg = 1, $PC.pregSource = $CumSources.random()>>

<</if>>

<<set $CumSources = 0>>


code:
:: FSlaveSlaveDick

<<nobr>>

<<set $nextButton to "Back">>
<<set $nextLink to "Slave Interact">>

<<set $slaverapistx to 0>>
<<set $eligibility to 0>>

//Select a slave that will ride $activeSlave.slaveName.//

<</nobr>>

__Select an eligible slave:__
<<for $i to 0; $i < $slaves.length; $i++>>\
	<<if ($slaves[$i].pussy > -1)>>\

	<<if ($slaves[$i].vaginalAccessory != "chastity belt") {)>>\
	<<if ($slaves[$i].ID != $activeSlave.ID)>>\
		<<print "[[$slaves[$i].slaveName|FSlaveSlaveDick Consummate][$slaverapistx to $slaves[" + $i + "]]]">>
		<<set $eligibility to 1>>\
	<</if>>\
	<</if>>\
	<</if>>\
<</for>>\
<<if ($eligibility == 0)>>\
	//You have no slaves capable of this act.//
<</if>>\


code:
:: FSlaveSlaveDick Consummate

/% Needs work. A lot of fucking work %/

<<nobr>>

You take a look at the bound toy.

<<if $activeSlave.mother == $slaverapistx.ID>>
	<<if ($activeSlave.fetish is "perverted">>
		$activeSlave.slaveName seems paralyzed, looking at her mother standing above her with fascination with disbelief.
	<<else>>
		$activeSlave.slaveName looks with horror at her mother, knowing what will soon happen.
	<</if>>
<</if>>

<<if $slaverapistx.mother == $activeSlave.ID>>
	<<if ($activeSlave.fetish is "perverted">>
		$activeSlave.slaveName seems paralyzed, looking at her daughter with fascination with disbelief.
	<<else>>
		$activeSlave.slaveName looks with horror at her daughter, knowing what will soon happen.
	<</if>>
<</if>>

<<set $slaverapistx.vaginalCount += 1>>
<<set $vaginalTotal += 1>>

<<if ($activeSlave.fetish is "submissive") && ($activeSlave.fetishKnown == 1) && ($activeSlave.fetishStrength > 60) && ($activeSlave.devotion >= -20)>>
	Since $activeSlave.slaveName loves to submit to others it's not hard to get her ready.
	<<set  $activeSlave.devotion += 4>>
	<<if ($activeSlave.sub is -3)>>Her member remains limp despite the prospect of being dominated and abused, but a direct injection of vasodilators quickly fixes that for this special occasion.
	<<else>>Her helpless situation causes her member to spring instantly to attention.
	<</if>>

<<elseif ($activeSlave.attrXX > 65) && ($slaverapistx.attrKnown == 1) && ($slaverapistx.devotion >= -20)>>
	Since $activeSlave.slaveName likes pussy, she doesn't take much convincing.
	<<if ($activeSlave.sub is -3)>>Her member remains limp despite the prospect of pussy, but a direct injection of vasodilators quickly fixes that for this special occasion.
	<<else>>Her member springs instantly to attention at the prospect of pussy.
	<</if>>

<<elseif ($activeSlave.devotion > 50)>>
	Since $activeSlave.slaveName is devoted to you, she'll eagerly fuck anything you tell her to fuck.
	<<if ($activeSlave.sub is -3)>>She accepts a direct injection of vasodilators to counteract the hormones keeping her soft,
	<<else>>She quickly gets herself hard,
	<</if>>
	eying $slaverapistx.slaveName with an expression you can't exactly decypher.

<<elseif ($activeSlave.devotion > 20)>>
	Since $activeSlave.slaveName is broken to obedience, she accepts being tied down quietly.
	<<if ($activeSlave.sub is -3)>>She accepts a direct injection of vasodilators to counteract the hormones keeping her soft.
	<<else>>you hurriedly stroke her to get her hard.
	<</if>>

<<elseif ($activeSlave.devotion >= -20)>>
	Since $activeSlave.slaveName does not resist your will, she should comply reasonably well.
	<<if ($activeSlave.sub is -3)>>She accepts a direct injection of vasodilators to counteract the hormones keeping her soft,
	<<else>>You have to work hard to get her member up,
	<</if>>
	fear and disgust showing on her face as she absorbs the perversion of the natural order of things she's about to experience.

<<else>>
	Since $activeSlave.slaveName is unlikely to comply willingly, you simply restrain her and administer a massive dose of vasodilators, directly where they will do the most good. $activeSlave.slaveName writhes with the pain of the injection, which is compounded as she springs agonizingly erect.

<</if>>

<</nobr>>

<<nobr>>

Next, you see to $slaverapistx.slaveName.

<<if $activeSlave.mother == $slaverapistx.ID>>
	<<if ($slaverapistx.fetish is "perverted">>
		$slaverapistx.slaveName is well aware that she is about to rape her own daughter, but despite that seems to feel some arousal at the thought.
	<<else>>
		$slaverapistx.slaveName is well aware that she is about to rape her own daughter and is understandingly distrurbed.
	<</if>>
<</if>>

<<if $slaverapistx.mother == $activeSlave.ID>>
	<<if ($slaverapistx.fetish is "perverted">>
		$activeSlave.slaveName is well aware that she is about to rape her own mother, but despite that seems to feel some arousal at the thought.
	<<else>>
		$slaverapistx.slaveName is well aware that she is about to rape her own mother and is understandingly distrurbed.
	<</if>>
<</if>>

<<set $activeSlave.penetrativeCount += 1>>
<<set $penetrativeTotal += 1>>

<<if ($slaverapistx.fetish is "dominant") && ($slaverapistx.fetishStrength > 60) && ($slaverapistx.fetishKnown == 1) && (($slaverapistx.vagina == 0)>>
	She lowers her virgin pussy onto $activeSlave.slaveName waiting member, impaling herself slowly. This act @@color:lime; breaks in her pussy.@@
	<<set $slaverapistx.vagina to 1>>
	<<set  $slaverapistx.devotion += 4>>
	<<set  $slaverapistx.fetishStrength += 1>>

<<elseif  $slaverapistx.devotion > 20) && (($activeSlave.vagina == 0) >>
	She accepts your orders without comment and presents her virgin pussy to $slaverapistx.slaveName for fertilization. She gasps in shock when she feels her hot seed. @@color:hotpink;She is broken to slavery@@ by this application of her body, which naturally @@color:lime;will break in her pussy.@@
	<<set $activeSlave.vagina to 1>>
	<<set  $activeSlave.devotion += 10>>
<<elseif ($activeSlave.devotion >= -20) && (($activeSlave.vagina == 0)>>
	She is clearly unhappy at the idea of losing her pearl of great price to $slaverapistx.slaveName; this probably isn't what she imagined her first real sex would be like. Worse, she knows she's fertile and realizes she'll likely get pregnant. Nevertheless, @@color:hotpink;she is broken to slavery@@ by this application of her body, which naturally @@color:lime;will break in her pussy.@@
	<<set $activeSlave.vagina to 1>>
	<<set  $activeSlave.devotion += 4>>
<<elseif (($activeSlave.vagina == 0)>>
	As you anticipated, she refuses to give $slaverapistx.slaveName her virginity. You restrain her despite her @@color:mediumorchid;horrified tears@@ and @@color:gold;frightened begging.@@ Naturally, this cruel act @@color:lime;will break in her pussy.@@
	<<set  $activeSlave.devotion -= 5>>
	<<set  $activeSlave.trust -= 5>>
	<<set $activeSlave.vagina to 1>>

<<elseif ($activeSlave.amp == 1)>>
	You set her limbless torso lies on the bed, ready for $slaverapistx.slaveName.
<<elseif tooBigBreasts($activeSlave)>>
	She is lying on her back, with arms and legs tied. The weight of her tits pins her helplessly in place.
<<elseif tooBigButt($activeSlave)>>
	She is lying on her back, with arms and legs tied. Her huge ass pushes her pelivs further up, making it look as if she's trying to fuck air.
<<elseif tooBigDick($activeSlave)>>
	She is lying on her back, with arms and legs tied. Her huge cock is cleary going to be a challenge.
<<elseif tooBigBalls($activeSlave)>>
	She is lying on her back, with arms and legs tied. Her huge balls might get a bit in the way in this position.
<<else>>
	She is lying on her back, with arms and legs tied and her cock standing in attention.
<</if>>

<<if ($activeSlave.devotion < -20) && ($slaverapistx.devotion < -20)>>
	Since you have two restrained slaves, it's up to you to do all the work. Since $activeSlave.slaveName is already lying on the bed, you maneuver $slaverapistx.slaveName's pussy into place. The two slaves make no further moves until you deal $slaverapistx.slaveName a terrific swat across the ass and promise to give her more of the same until she gets going. $slaverapistx.slaveName starts lowering herself very slowly, pulling back every time $activeSlave.slaveName's dick prodding her womanhood. After watching the sad display for a while, you use your own weight to suddely push her onto $activeSlave.slaveName, hilting her in one, scream-enducing move. $slaverapistx.slaveName seems more cooperative after that and you only have to occasionaly prod them with an electrial jolt to keep them going at a faster pace. Both slaves @@color:mediumorchid;resent@@ what you made them do and @@color:gold;fear you@@ as a result.
	<<set  $activeSlave.devotion -= 5>>
	<<set  $slaverapistx.devotion -= 5>>
	<<set  $activeSlave.trust -= 5>>
	<<set  $slaverapistx.trust -= 5>>

<<elseif ($slaverapistx.devotion < -20)>>
	Since your dick slave is restrained, you order $slaverapistx.slaveName to kneel on the bed on top of $activeSlave.slaveName, and then maneuver her pussy into place. $slaverapistx.slaveName is uncooperative, so you push her down yourself and prod and slap her untill she starts to ride the cock with urgency. It doesn't take long for $activeSlave.slaveName to orgasm. She @@color:mediumorchid;resents@@ what you made her do and @@color:gold;fears you@@ as a result.
	<<set  $slaverapistx.devotion -= 5>>
	<<set  $slaverapistx.trust -= 5>>

<<elseif ($slaverapistx.fetish is "dominant") && ($slaverapistx.fetishStrength > 60) && ($slaverapistx.devotion > 20) && ($activeSlave.devotion < -20)>>
	You tie $activeSlave.slaveName on the bed with her dick defenseless and available, and then tell the randy $slaverapistx.slaveName that it's all hers. The slave life has so affected $slaverapistx.slaveName that she is quite eager to rape another slave for her pleasure. She begins playing with her immediately, fondling, pinching and licking while bouncing on the meaty shaft. Occasionaly she stops, denying $activeSlave.slaveName the immediate orgasm and teasing her, fully enjoying her dominant role. By the end of the day $activeSlave.slaveName's abused, pent-up penis has shot a massive load, to her @@color:gold;horror@@ and @@color:mediumorchid;resentment,@@ while $slaverapistx.slaveName is lying next to her on the bed in a state of obvious @@color:hotpink;satiation and bliss.@@
	<<set  $activeSlave.devotion -= 5>>
	<<set  $activeSlave.trust -= 5>>
	<<set  $slaverapistx.devotion += 4>>

<<elseif ($slaverapistx.energy > 95) && ($slaverapistx.devotion > 20) && ($activeSlave.devotion < -20)>>
	You arrange $activeSlave.slaveName on the bed with her cock defenseless and available, and then tell the randy $slaverapistx.slaveName that it's all hers. The slave life has so affected $slaverapistx.slaveName that she is quite eager to rape another slave, just for the perverted novelty of the act. She rides the hepless cock trough seveal orgasms. By the end of the day $slaverapistx.slaveName's cunt is dripping cum, to her obvious @@color:hotpink;satiation and bliss.@@  $activeSlave.slaveName is lying next to her on the bed in a state of @@color:gold;horror@@ and @@color:mediumorchid;resentment,@@
	<<set  $activeSlave.devotion -= 5>>
	<<set  $activeSlave.trust -= 5>>
	<<set  $slaverapistx.devotion += 4>>

<<elseif ($activeSlave.devotion <= 20) || ($slaverapistx.devotion <= 20)>>
	You tie $activeSlave.slaveName onto the bed and tell $slaverapistx.slaveName to get on with it. They fuck mechanically, gazing with roiling emotions into each others' eyes. They do seem to come to some sort of a nonverbal understanding on the necessity of getting it done, and there is no real unhappiness in either of them when they finish and disentangle themselves. As they clean themelves and exit, you notice $slaverapistx.slaveName's looking a little more longignly at $activeSlave.slaveName.

<<elseif ($activeSlave.devotion <= 50) || ($slaverapistx.devotion <= 50)>>
	You order $activeSlave.slaveName and $slaverapistx.slaveName to get on with it. They fuck mechanically at first, gazing with roiling emotions into each others' eyes. Eventually, they begin to enjoy the intimacy of the act, finding the shared pleasure between them comforting. They finish and resume life as slaves, the light of this intimacy diminishing, softening with $activeSlave.slaveName's dick and dripping away with the contents of $slaverapistx.slaveName's cum-filled pussy.

<<else>>
	The two slaves turn eagerly to the business of vanilla sex. They take their time, humping slowly and gazing into each others' eyes, chaning position often. After a little while, while in doggy position, $activeSlave.slaveName looks over $slaverapistx.slaveName's shoulder to where you're sitting, the invitation clear in her eyes. You come over and penetrate $activeSlave.slaveName with your <<if $PC.dick ==1>>dick<<else>>strap-on<</if>>. With the double stimulus of penetrating a tight vagina and being penetrated, she comes indecently hard. The two of them collapse into an exhausted, @@color:hotpink;happy@@ pile of slave flesh.
	<<set  $activeSlave.devotion += 8>>
	<<set  $slaverapistx.devotion += 4>>

<</if>>

Throughout the week, you keep $activeSlave.slaveName's dick intimate with $slaverapistx.slaveName's pussy. In the end, you are certain they got closer.

				/% Add pregnancy test? %/

<</nobr>>

<<for $i to 0; $i < $slaves.length; $i++>>
	<<if $slaverapistx.ID == $slaves[$i].ID>>
		<<set $slaves[$i] to $slaverapistx>>
		<<break>>
	<</if>>
<</for>>


code:
:: FSlaveSlaveVag

<<nobr>>

<<set $nextButton to "Back">>
<<set $nextLink to "Slave Interact">>

<<set $slaverapistx to 0>>
<<set $eligibility to 0>>

//Select a slave that will fuck $activeSlave.slaveName.//

<</nobr>>

__Select an eligible slave:__
<<for $i to 0; $i < $slaves.length; $i++>>\
	<<if canPenetrate($slaves[$i])>>\
	<<if ($slaves[$i].ID != $activeSlave.ID)>>\
		<<print "[[$slaves[$i].slaveName|FSlaveSlaveVag Consummate][$slaverapistx to $slaves[" + $i + "]]]">>
		<<set $eligibility to 1>>\
	<</if>>\
	<</if>>\
<</for>>\
<<if ($eligibility == 0)>>\
	//You have no slaves capable of this act.//
<</if>>\