code:
:: tattoo description widgets [widget nobr]

/* Tattoo Descriptions */

<<widget "shouldersTatDescription">>
<<if $activeSlave.shouldersTat != 0>>
	<<switch $activeSlave.shouldersTat>>
	<<case "tribal patterns">>
		Tribal tattoos encircle both $his shoulders in swirling patterns.
	<<case "flowers">>
		A gorgeous flower tattoo covers each shoulder.
	<<case "counting">>
		A '¤' tattoo counting $his earnings and acquirements cover $his shoulders.
	<<case "advertisements">>
		<<if $activeSlave.vagina < 0>>
			'Two Hole Whore' is tattooed on each of $his shoulders.
		<<else>>
			'Three Hole Whore' is tattooed on each of $his shoulders.
		<</if>>
	<<case "rude words">>
		'Dickholster' is tattooed on $his left shoulder, and 'Fuckmeat' is tattooed on $his right.
	<<case "degradation">>
		'Hurt Me' is tattooed on $his left shoulder, and 'Rape Me' on $his right.
	<<case "Asian art">>
		Beautiful, colorful tattoos cover $his upper body: a line of wind-whipped waves lashing against mountains runs across $his collarbone and around both shoulders.
	<<case "scenes">>
		<<if $activeSlave.vagina < 0>>
			A stylized rendition of a dick plunging into an open mouth is tattooed on $his left shoulder, and a similar image of a dick entering an anus on $his right.
		<<else>>
			A stylized rendition of a dick going into a pussy is tattooed on $his left shoulder, and a similar image of a dick entering an anus on $his right.
		<</if>>
	<<case "bovine patterns">>
		$His shoulders are flecked with tattoos of bovine blotches.
	<<case "sacrilege">>
		Tattoos depicting demonic nude figures adorn $his shoulders.
	<<case "sacrament">>
		Tattoos depicting saintly nude figures adorn $his shoulders.
	<<case "possessive">>
		A rendition of your face inside a heart is tattooed onto $his left shoulder, and the words 'I love my <<if $PC.title == 1>>Master<<else>>Mistress<</if>>' inside an identical heart are tattooed on $his right.
	<<case "paternalist">>
		'Love Me' is tattooed on $his left shoulder, and 'Teach Me' on $his right.
	<<default>>
		$activeSlave.shouldersTat
	<</switch>>
<</if>>
<</widget>>

<<widget "lipsTatDescription">>
<<if $activeSlave.lipsTat != 0>>
	<<switch $activeSlave.lipsTat>>
	<<case "tribal patterns">>
		$His face is tattooed with tribal patterns that make $him seem mysterious and exotic.
	<<case "flowers">>
		$His minimal facial tattoos are limited to a cute flower on each cheek.
	<<case "counting">>
		<<if $activeSlave.oralCount == 0>>
			There is a horizontal line tattooed across the $his cheeks for symbols counting $his oral totals to be inscribed under, once $he has some.
		<<elseif $activeSlave.oralCount < 500>>
			Tiny dick, pussy, and anus symbols are tattooed all over $his cheeks, one for every thing $he's sucked.
		<<else>>
			Tiny dick, pussy, and anus symbols are tattooed all over $his face, forehead, and neck, one for every thing $he's sucked.
		<</if>>
	<<case "advertisements">>
		$His facial tattoos include 'Facefuck Me' across $his forehead, 'Cock' to the left of $his mouth, and 'Sucker' to the right of it.
	<<case "rude words">>
		$His facial tattoos include 'Sex Slave' across $his forehead, 'Face' to the left of $his mouth, and 'Pussy' to the right of it.
	<<case "degradation">>
		'$desc' is tattooed across $his forehead.
	<<case "Asian art">>
		$He has a blossoming cherry tree tattooed on one temple; its pink petals are dappled across $his cheeks.
	<<case "bovine patterns">>
		$His face is subtly tattooed to give $him a somewhat bovine appearance.
	<<case "permanent makeup">>
		<<if $activeSlave.makeup == 0>>
			$His face appears to bear very heavy, slutty makeup, but on closer inspection, the makeup is actually tattooed on.
		<<else>>
			$His normal makeup is difficult to distinguish from the underlying very heavy slutty makeup that is tattooed on.
		<</if>>
	<<case "sacrilege">>
		$His face is subtly tattooed to give $him a decidedly demonic appearance.
	<<case "sacrament">>
		$His face is subtly tattooed to give $him a decidedly angelic appearance.
	<<case "possessive">>
		'Property of <<PlayerName>>' is tattooed across $his forehead.
	<<case "paternalist">>
		'Beloved $desc' is tattooed across one of $his cheeks.
	<<default>>
		$activeSlave.lipsTat
	<</switch>>
<</if>>
<</widget>>

<<widget "boobsTatDescription">>
<<if $activeSlave.boobsTat != 0>>
	<<switch $activeSlave.boobsTat>>
	<<case "tribal patterns">>
		$His chest and breasts are tattooed with tribal patterns that focus attention on $his nipples.
	<<case "flowers">>
		$His chest is tattooed with a pattern of flowering vines that delicately outlines $his breasts.
	<<case "counting">>
		<<if $activeSlave.mammaryCount == 0>>
			There is a horizontal line tattooed across $his middle chest for symbols counting $his mammary encounters to be inscribed under, once $he has some.
		<<elseif $activeSlave.mammaryCount < 500>>
			Tiny dick, lips, breast, and even pussy symbols are tattooed all over $his cleavage, one for each of $his mammary encounters.
		<<else>>
			Tiny dick, lips, breast, and even pussy symbols cover $his breasts, cleavage, and sides, one for each of $his mammary encounters.
		<</if>>
	<<case "advertisements">>
		'Fuck Me!' is tattooed across $his chest in such large letters that the word is visible a long way off.
	<<case "rude words">>
		'Fuckslave' is tattooed across $his chest in such large letters that the word is visible a long way off.
	<<case "degradation">>
		'<<if $PC.title == 1>>Master<<else>>Mistress<</if>>'s' is tattooed across the top of $his right breast; 'Bitch' is tattooed across the top of $his left.
	<<case "Asian art">>
		An octopus is tattooed on $his upper chest; its tentacles reach down to envelop $his breasts, their tips reaching for but not quite reaching each nipple.
	<<case "scenes">>
		$His chest is tattooed with lewd scenes; each of $his breasts shows a phallus receiving a titfuck while each of $his collarbones shows a woman deepthroating a large phallus.
	<<case "bovine patterns">>
		$His chest is tattooed to look like a Holstein cow's, with $his udders left bare to draw attention to them.
	<<case "sacrilege">>
		Each of $his breasts is tattooed with a depiction of a pentagram, with $his nipples forming the center.
	<<case "sacrament">>
		Each of $his breasts is tattooed with a depiction of a crucifix, with $his nipples forming the center.
	<<case "possessive">>
		Your personal symbol is tattooed above $his left breast, '<<PlayerName>>' above $his right, leaving the rest of $his chest and breasts bare.
	<<case "paternalist">>
		'<<if $PC.title == 1>>Master<<else>>Mistress<</if>>'s' is tattooed across the top of $his right breast; 'Darling' is tattooed across the top of $his left.
	<<default>>
		$activeSlave.boobsTat
	<</switch>>
<</if>>
<</widget>>

<<widget "armsTatDescription">>
<<if $activeSlave.amp != 1>>
<<if $activeSlave.armsTat != 0>>
	<<switch $activeSlave.armsTat>>
	<<case "tribal patterns">>
		$His tribal tattoos run down $his arms.
	<<case "flowers">>
		$His floral tattoos run down $his arms to end in a pretty bloom on the back of each hand.
	<<case "counting">>
		<<if $activeSlave.oralCount == 0>>
			There are horizontal lines tattooed around $his forearms, creating a blank space to permanently tally future sexual exploits.
		<<elseif $activeSlave.oralCount < 500>>
			Tiny dick, pussy, and anus symbols are tattooed on $his forearms, one for each organ $he's manually pleasured.
		<<else>>
			Tiny dick, pussy, and anus symbols are tattooed all over both $his arms, one for each organ $he's manually pleasured.
		<</if>>
	<<case "advertisements">>
		$His right arm is tattooed with a price list for use if $he's whoring, and $his left with a simple tourist guide for use if $he's serving the public.
	<<case "rude words">>
		$His arms have helpful instructions on how to restrain $him for rape, including indications of the best anchor points at $his wrists.
	<<case "degradation">>
		<<if $activeSlave.dick > 0>>
			<<if $activeSlave.vagina > -1>>
				<<if $activeSlave.boobs > 600>>
					'Boobs Pussy Cock Asshole' is tattooed on $his left arm, and 'Suck Fuck Hurt Rape' is tattooed on $his right.
				<<else>>
					'Half Pussy & Half Cock' is tattooed on $his left arm, and 'All Whore' is tattooed on $his right.
				<</if>>
			<<elseif $activeSlave.boobs > 600>>
				'I didn't used to have boobs' is tattooed on $his left arm, and 'I didn't always take it up the ass' is tattooed on $his right.
			<<else>>
				'I promise to cum buckets' is tattooed on $his left arm, and 'If you fuck my butt' is tattooed on $his right.
			<</if>>
		<<else>>
			<<if ($activeSlave.boobs > 800) && ($activeSlave.lactation > 0)>>
				'Grade AAA Milker' is tattooed on $his left arm, and 'Grade AAA Breeder' is tattooed on $his right.
			<<elseif ($activeSlave.visualAge > 35)>>
				'Please let Mommy suck your cock' is tattooed on $his left arm, and 'Please rape Mommy's cunt' is tattooed on $his right.
			<<elseif ($activeSlave.visualAge < 25)>>
				'Teach me how to suck cock' is tattooed on $his left arm, and 'Teach me how to take dick' is tattooed on $his right.
			<<else>>
				'There are many sex slaves like me' is tattooed on $his left arm, and 'But this one is <<if $PC.title == 1>>Master<<else>>Mistress<</if>>'s' is tattooed on $his right.
			<</if>>
		<</if>>
	<<case "Asian art">>
		Tattoos of fierce dragons wind around both $his arms.
	<<case "scenes">>
		$His lewd tattoos cover $his arms; they include lots of little vignettes of sex, with dates to show when $he was first fucked like that.
	<<case "bovine patterns">>
		Tattoos of cow-like spots cover $his arms, but stop short of each of $his elbows.
	<<case "sacrilege">>
		Tattoos of swirling flames run down $his arms.
	<<case "sacrament">>
		Tattoos of swirling thorns run down $his arms, culminating in a stylized depiction of a bloody nail on the back of each hand.
	<<case "possessive">>
		$His arm tattoos depict notable moments during $his enslavement by you, culminating in a stylized rendition of your first initial on $his left hand and your second on the right.
	<<case "paternalist">>
		<<if $activeSlave.dick > 0>>
			<<if $activeSlave.vagina > -1>>
				<<if $activeSlave.boobs > 600>>
					'Boobs Pussy Cock Asshole' is tattooed on $his left arm, and 'Caress Pleasure Stroke Stretch' is tattooed on $his right.
				<<else>>
					'Half Pussy & Half Cock' is tattooed on $his left arm, and 'All Loved' is tattooed on $his right.
				<</if>>
			<<elseif $activeSlave.boobs > 600>>
				'I didn't used to have boobs' is tattooed on $his left arm, and 'And now I do!' is tattooed on $his right.
			<<else>>
				'I promise to cum buckets' is tattooed on $his left arm, and 'If you treat me right' is tattooed on $his right.
			<</if>>
		<<else>>
			<<if ($activeSlave.boobs > 800) && ($activeSlave.lactation > 0)>>
				'Please drink' is tattooed on $his left arm, and 'All my milk' is tattooed on $his right.
			<<elseif ($activeSlave.visualAge > 35)>>
				'Please let Mommy worship your cock' is tattooed on $his left arm, and 'Please pleasure Mommy's pussy' is tattooed on $his right.
			<<elseif ($activeSlave.visualAge < 25)>>
				'Please teach me how to suck cock' is tattooed on $his left arm, and 'Please teach me how to fuck' is tattooed on $his right.
			<<else>>
				'There are many sex slaves like me' is tattooed on $his left arm, and 'But <<if $PC.title == 1>>Master<<else>>Mistress<</if>> loves me' is tattooed on $his right.
			<</if>>
		<</if>>
	<<default>>
		$activeSlave.armsTat
	<</switch>>
<</if>>
<</if>>
<</widget>>

<<widget "backTatDescription">>
<<if $activeSlave.backTat != 0>>
	<<switch $activeSlave.backTat>>
	<<case "tribal patterns">>
		$He has a totem of $his spirit animal tattooed across $his back.
	<<case "flowers">>
		$His back is covered in hundreds of beautiful flower tattoos; one could spend half an hour examining them all.
	<<case "counting">>
		$His back is tattooed with tick marks to count the days of $his sexual
		<<if $activeSlave.weekAcquired == 0>>
			enlsavement to you. There are a lot of them.
		<<else>>
			<<set $seed = (($week-$activeSlave.weekAcquired)*7)+random(-3,3)>>
			<<if $seed < 10>>
				slavery here. There are only a few.
			<<else>>
				slavery here: $seed of them.
			<</if>>
		<</if>>
	<<case "advertisements">>
		$He has an ad for the arcology itself tattooed across $his back.
	<<case "rude words">>
		'Sex Slave' is tattooed across $his back; the tattoo uses the broad space to make each letter six inches tall, so that $his identity can be read from hundreds of meters off.
	<<case "degradation">>
		$He has
		<<if $activeSlave.dick > 0>>
			<<if $activeSlave.vagina > -1>>
				<<if $activeSlave.boobs > 600>>
					'Futa<<if $activeSlave.visualAge > 35>> MILF<</if>> Slave'
				<<else>>
					'<<if $activeSlave.visualAge > 35>>MILF <</if>>Hermaphrodite'
				<</if>>
			<<elseif $activeSlave.boobs > 600>>
				'Shemale<<if $activeSlave.visualAge > 35>> MILF<</if>> Slave'
			<<else>>
				'Dickgirl<<if $activeSlave.visualAge > 35>> MILF<</if>> Slave'
			<</if>>
		<<else>>
			<<if ($activeSlave.boobs > 800) && ($activeSlave.lactation > 0)>>
				'Slave Cow'
			<<elseif ($activeSlave.visualAge > 35)>>
				'MILF Slave'
			<<elseif ($activeSlave.visualAge < 25)>>
				'Slave Girl'
			<<else>>
				'Sex Slave'
			<</if>>
		<</if>>
		tattooed across $his back in gothic script.
	<<case "Asian art">>
		An Asian dragon is tattooed in a circle across $his back; the dragon has subtle features that, according to traditional meanings, relate it to $his personality.
	<<case "scenes">>
		<<if $activeSlave.vagina == -1>>
			A line-art rendition of $activeSlave.slaveName herself cumming copiously while riding a dick is tattooed across $his entire back.
		<<elseif $activeSlave.lactation > 0>>
			A line-art rendition of $activeSlave.slaveName herself nursing a pair of $his fellow slaves is tattooed across $his entire back.
		<<elseif $activeSlave.vaginalSkill >= 100>>
			A line-art rendition of $activeSlave.slaveName herself performing reverse cowgirl and spreading $his pussy is tattooed across $his entire back.
		<<elseif $PC.vagina == 1>>
			A line-art rendition of $activeSlave.slaveName herself eating pussy is tattooed across $his entire back.
		<<else>>
			A line-art rendition of $activeSlave.slaveName herself deepthroating a cock is tattooed across $his entire back.
		<</if>>
	<<case "bovine patterns">>
		$His back is tattooed to resemble the dappled flank of a cow.
	<<case "sacrilege">>
		$He has a pair of blackened wings tattooed across $his entire back.
	<<case "sacrament">>
		$He has a pair of pure white wings tattooed across $his entire back.
	<<case "possessive">>
		An abridged and stylized version of $his slave contract is tattooed across $his entire back.
	<<case "paternalist">>
		$He has your name and the location of your penthouse tattooed on $his upper back, so kind citizens can return $him to you if $he wanders off.
	<<default>>
		$activeSlave.backTat
	<</switch>>
<</if>>
<</widget>>

<<widget "stampTatDescription">>
<<if $activeSlave.fuckdoll == 0>>
	<<if $activeSlave.stampTat != 0>>
	<<switch $activeSlave.stampTat>>
		<<case "tribal patterns">>
			$He has a tribal-patterned tramp stamp.
		<<case "flowers">>
			$He has a floral-patterned tramp stamp.
		<<case "counting">>
			<<if $activeSlave.anus == 0>>
				$He has the dashed outline of a cock tattooed across $his lower back.
			<<else>>
				$He has the silhouette of the largest cock $he's ever had up $his anus tattooed across $his lower back.
			<</if>>
		<<case "advertisements">>
			$He has a tramp stamp which reads 'Fuck my ass!'
		<<case "rude words">>
			$He has a tramp stamp which reads 'Rear Entrance,' with an arrow pointing downward.
		<<case "degradation">>
			$He has a tramp stamp formed from gothic lettering that reads 'Anal Whore.'
		<<case "Asian art">>
			A traditional Asian household scene is tattooed on $his lower back, showing a rendition of $activeSlave.slaveName, dressed in rich silks, having sex with a <<if $PC.title == 1>>gentleman<<else>>lady<</if>>. The slave and the <<if $PC.title == 1>>gentleman<<else>>lady<</if>> are kissing passionately as <<if $PC.title == 1>>he<<else>>$he<</if>>
			<<if $activeSlave.vagina < 0>>
				penetrates the slave's anus.
			<<elseif $activeSlave.bellyPreg >= 1500 || $activeSlave.bellyImplant >= 1500>>
				embraces the slave's <<if $activeSlave.pregKnown == 1>>pregnant<<else>>rounded<</if>> belly.
			<<else>>
				penetrates the slave's vagina.
			<</if>>
		<<case "scenes">>
			$He has a tramp stamp which shows a cock entering an anus, recognizably hers.
		<<case "bovine patterns">>
			$He has an identifying barcode tattooed across $his lower back.
		<<case "sacrilege">>
			$He has a tramp stamp which reads 'Fuck my ass and be damned.'
		<<case "sacrament">>
			$He has a tramp stamp which reads 'Fuck my ass and be blessed.'
		<<case "possessive">>
			$He has a tramp stamp which reads '$PC.name's $desc.'
		<<case "paternalist">>
			$He has a tramp stamp which reads 'Fuck me slowly' with an arrow pointing downward.
		<<default>>
			$activeSlave.stampTat
	<</switch>>
	<</if>>
<</if>>
<</widget>>

<<widget "buttTatDescription">>
<<if $activeSlave.buttTat != 0>>
	<<switch $activeSlave.buttTat>>
	<<case "tribal patterns">>
		$His buttocks and hips are tattooed with tribal patterns that emphasize $his womanly curves.
	<<case "flowers">>
		$His hips are tattooed with a cute floral design.
	<<case "counting">>
		<<if $activeSlave.analCount == 0>>
			There is a horizontal line tattooed across the tops of $his buttocks for symbols counting $his anal exploits to be inscribed under, once $he has some.
		<<elseif $activeSlave.analCount < 500>>
			Tiny dick symbols are tattooed all over $his the tops of $his buttocks, one for every time $he's been assfucked.
		<<else>>
			Tiny dick symbols are tattooed all over $his entire buttocks, attesting to long anal slavery.
		<</if>>
	<<case "advertisements">>
		'Shove' is tattooed across $his left buttock; 'It In' is tattooed across $his right.
	<<case "rude words">>
		<<if $activeSlave.vagina > 0>>
			'No. 2'
		<<else>>
			'No. 1'
		<</if>>
		is tattooed across $his left buttock; 'Fuckhole' is tattooed across $his right.
	<<case "degradation">>
		'Treat it' is tattooed across $his left buttock; 'Like a Pussy' is tattooed across $his right.
	<<case "Asian art">>
		Each of $his buttocks bears a tattoo of a coiled dragon, advancing meaningfully towards $his anus.
	<<case "scenes">>
		<<if ($activeSlave.dick > 0) && ($activeSlave.balls > 0)>>
			$His buttocks are tattooed with lewd scenes; each of $his buttocks shows a smiling shemale offering $his anus, while each of $his thighs shows a rear view of a shemale simultaneously being sodomized and sodomizing.
		<<elseif ($activeSlave.dick > 0)>>
			$His buttocks are tattooed with lewd scenes; each of $his buttocks shows a gelding, legs together to conceal $his cock and display $his anus, while each of $his thighs shows a gelding being double penetrated in $his gaping anus.
		<<else>>
			$His buttocks are tattooed with lewd scenes; each of $his buttocks shows a woman being sodomized while each of $his thighs shows a woman being gangbanged in all $his holes.
		<</if>>
	<<case "bovine patterns">>
		$His buttocks are tattooed with large black splotches like those of a Holstein cow.
	<<case "sacrilege">>
		'It's not a sin' is tattooed across $his left buttock;
		<<if $activeSlave.vagina > -1>>
			'If I don't enjoy it'
		<<else>>
			'I'm a girl'
		<</if>> is tattooed across $his right.
	<<case "sacrament">>
		'This is my penance' is tattooed across $his left buttock;
		<<if $activeSlave.vagina > -1>>
			'Make me suffer.'
		<<else>>
			'As a slave.'
		<</if>> is tattooed across $his right.
	<<case "possessive">>
		'$PC.name made me their' is tattooed across $his left buttock; with '$desc' tattooed across $his right.
	<<case "paternalist">>
		'Treat it' is tattooed across $his left buttock; 'Gently' is tattooed across $his right.
	<<default>>
		$activeSlave.buttTat
	<</switch>>
<</if>>
<<if ($activeSlave.brand != 0) && ["left buttock", "right buttock", "buttocks", "left thigh", "right thigh", "thighs"].includes($activeSlave.brandLocation)>>
	<<brandDescription>>
<</if>>
<</widget>>

<<widget "vaginaTatDescription">>
<<if ($activeSlave.vaginaTat != 0)>>
	<<switch $activeSlave.vaginaTat>>
	<<case "tribal patterns">>
		$His abdomen is tattooed with tribal patterns that draw the eye down toward $his <<if $activeSlave.dick != 0>>cock<<elseif $activeSlave.vagina == -1>>featureless crotch<<else>>vagina<</if>>.
	<<case "flowers">>
		$His abdomen bears a tasteful tattoo of a <<if $activeSlave.dick != 0>>lily with a large stamen<<else>>blooming flower<</if>>.
	<<case "counting">>
		<<if $activeSlave.vaginalCount == 0>>
			$His abdomen reads 'count begins other side, sorry.'
		<<elseif $activeSlave.vaginalCount < 500>>
			Tiny dick symbols are tattooed all over $his abdomen, one for every time $he's been fucked.
		<<else>>
			Tiny dick symbols are tattooed all over $his abdomen, one for every time $he's been fucked. There are so many that they spread up to $his breasts and around $his sides.
		<</if>>
	<<case "advertisements">>
		$His abdomen reads <<if $activeSlave.vagina < 0>>'Rear Entrance Other Side.'<<else>>'Insert Cock' with an arrow pointing downward.<</if>>
	<<case "rude words">>
		$His abdomen reads <<if $activeSlave.vagina < 0>>'Useless, Rape Ass Instead' with an arrow pointing downward<<else>>'Fucktoy'<</if>>.
	<<case "degradation">>
		$His abdomen is tattooed with <<if $activeSlave.dick != 0>>a downward-pointing arrow which reads 'Bounces When Buttfucked.'<<else>>gothic script that reads '<<if $PC.dick == 1>><<if $PC.vagina == 1>>Futa<<else>>Cock<</if>><<else>>Cunt<</if>> Pleaser.'<</if>>
	<<case "Asian art">>
		$He has formal Asian characters tattooed across $his abdomen. To those who do not know the language, they look elegant, but roughly translated, they read
		<<if ($activeSlave.dick > 0) && canAchieveErection($activeSlave)>>
			'dick girl slut.'
		<<elseif $activeSlave.dick > 0>>
			'limp dick slut.'
		<<elseif $activeSlave.pregKnown == 1 && $activeSlave.bellyPreg >= 100>>
			'pregnant cow.'
		<<elseif $activeSlave.physicalAge > 35>>
			'horny old bitch.'
		<<else>>
			'sex slave.'
		<</if>>
	<<case "scenes">>
		$His abdomen is tattooed with lewd scenes. It entices with a depiction of <<if $activeSlave.dick != 0>><<if $activeSlave.balls != 0>>sodomy of a shemale<<else>>sodomy of a gelding<</if>><<elseif $activeSlave.vagina == -1>>sodomy of a null<<else>>loving intercourse<</if>>.
	<<case "bovine patterns">>
		$His abdomen is tattooed in a Holstein cow pattern.
	<<case "sacrilege">>
		$His abdomen is tattooed with a variety of heretical symbols.
	<<case "sacrament">>
		$His abdomen is tattooed with a variety of religious symbols.
	<<case "possessive">>
		$His abdomen is tattooed with
		<<if ($activeSlave.dick > 0) && canAchieveErection($activeSlave)>>
		'Dick girl slave
		<<elseif $activeSlave.dick > 0>>
		'Limp dick slave
		<<elseif $activeSlave.births > 5>>
		'Breeder slave
		<<elseif $activeSlave.actualAge > 35>>
		'MILF slave
		<<else>>
		'Sex slave
		<</if>>
		of <<if $PC.title == 1>>Master<<else>>Mistress<</if>> $PC.name.'
	<<case "paternalist">>
		$His abdomen is tattooed with a downward-pointing arrow which reads 'Let's come together.'
	<<default>>
		$activeSlave.vaginaTat
	<</switch>>
<</if>>
<</widget>>

<<widget "dickTatDescription">>
<<if ($activeSlave.dick != 0) && ($activeSlave.dickTat != 0)>>
	<<switch $activeSlave.dickTat>>
	<<case "tribal patterns">>
		$His cock is tattooed with tribal patterns.
	<<case "flowers">>
		$His cock is tattooed with a vine that wraps around its shaft.
	<<case "counting">>
		<<if $activeSlave.penetrativeCount == 0>>
			There is a horizontal line tattooed around the base of $his dick for symbols counting $his penetrative exploits to be inscribed under, once $he has some.
		<<elseif $activeSlave.penetrativeCount < 500>>
			Tiny anus, pussy and mouth symbols are tattooed all over $his dick, recounting $his penetrative exploits.
		<<else>>
			Tiny anus, pussy and mouth symbols are tattooed all over $his dick, recounting $his penetrative exploits. $He has so many that they radiate out across $his crotch, too.
		<</if>>
	<<case "advertisements">>
		$His cock reads 'Sissy Slut.'
	<<case "rude words">>
		$His cock reads 'Bitchstick.'
	<<case "degradation">>
		<<if $activeSlave.anus == 0>>
			$His cock reads '100% Virgin Anus.'
		<<else>>
			$His cock reads 'Comes When Assraped.'
		<</if>>
	<<case "Asian art">>
		$His cock has an Asian dragon rushing down each side to the tip.
	<<case "bovine patterns">>
		$His cock is tattooed to make it look a little like a bulls'.
	<<case "sacrilege">>
		$His cock is covered in tiny words, each derived from a sacrilegious text.
	<<case "sacrament">>
		$His cock is covered in tiny words, each derived from a sacred scripture.
	<<case "possessive">>
		$His cock has an identification barcode tattooed on its side.
	<<case "paternalist">>
		<<if $activeSlave.anus == 0>>
			$His cock reads 'Still an Ass Virgin.'
		<<else>>
			$His cock reads 'Comes When Stroked.'
		<</if>>
	<<default>>
		$activeSlave.dickTat
	<</switch>>
<</if>>
<</widget>>

<<widget "anusTatDescription">>
<<if $activeSlave.anusTat != 0>>
	<<switch $activeSlave.anusTat>>
	<<case "bleached">>
		$His anus is bleached.
	<<case "tribal patterns">>
		$His anus is bleached. It is tattooed with a tribal pattern that changes interestingly when $he relaxes or tightens $his sphincter.
	<<case "flowers">>
		$He has a huge blooming flower tattooed right over $his anus.
	<<case "counting">>
		<<if $activeSlave.analCount == 0>>
			$He has a dashed line tattooed around $his anus as a guideline for where $his anal count will be inscribed.
		<<elseif $activeSlave.analCount < 1000>>
			$He has fine rings tattooed around $his anus, one for each hundred cocks.
		<<else>>
			$He has thick and fine rings tattooed around $his anus, for each thousand and hundred cocks.
		<</if>>
	<<case "advertisements">>
		<<if ($activeSlave.vagina > -1)>>
		$He has a ring of text tattooed around $his anus which reads 'Second Pussy.'
		<<else>>
		$He has a ring of text tattooed around $his anus which reads 'Spit First.'
		<</if>>
	<<case "rude words">>
		<<if ($activeSlave.vagina > -1)>>
		$He has a ring of text tattooed around $his anus which reads 'Fucktoy's Favorite Fuckhole.'
		<<else>>
		$He has a ring of text tattooed around $his anus which reads 'Sissy Slut's Sodomy Slit.'
		<</if>>
	<<case "degradation">>
		$His anus is bleached. It is tattooed with gothic script in a ring around $his hole, reading '<<if $PC.title == 1>>Master<<else>>Mistress<</if>> Made Me An Anal Slut.'
	<<case "bovine patterns">>
		$His anus is tattooed to mimic the puffy, dark appearance of a cow's.
	<<case "sacrilege">>
		$He has a ring of Aramaic text tattooed around $his anus, which translates to horrible blasphemy.
	<<case "sacrament">>
		$He has a ring of Aramaic text tattooed around $his anus, which translates to a comforting blessing.
	<<case "possessive">>
		$He has a ring of numbers around $his anus, detailing the date $he was enslaved by you.
	<<case "paternalist">>
		$His anus is bleached. It is tattooed with text in a ring around $his hole, reading '<<if $PC.title == 1>>Master<<else>>Mistress<</if>> Helped Me Love Anal.'
	<<default>>
		$activeSlave.anusTat
	<</switch>>
<</if>>
<</widget>>

<<widget "legsTatDescription">>
<<if $activeSlave.legsTat != 0>>
	<<switch $activeSlave.legsTat>>
	<<case "tribal patterns">>
		$His tribal tattoos run down $his legs.
	<<case "flowers">>
		$His floral tattoos run down $his legs, with an especially beautiful bouquet of blooms sprayed across each thigh.
	<<case "counting">>
		$His thighs are used as space for tattoos that count the number of times $he's done various degrading but nonsexual things.
	<<case "advertisements">>
		$His thighs are used as simple ad space, promoting $arcologies[0].name and your business pursuits.
	<<case "rude words">>
		$His left thigh reads '$desc' and the right 'slut.'
	<<case "degradation">>
		<<if ($activeSlave.vagina < 0)>>
		$His left thigh reads 'I Used To Fuck,' and the right 'But Now I Get Fucked.'
		<<else>>
		$His left thigh reads 'My Life Is Sex,' and the right 'All I'm Good For.'
		<</if>>
	<<case "Asian art">>
		A komainu is tattooed across $his right leg while a shishi graces $his left, the fierce lions guarding the way to $his "temple".
	<<case "scenes">>
		$He has symmetrical tattoos on each thigh depicting $him being spitroasted.
	<<case "bovine patterns">>
		$His legs are covered in tattoos of spots, giving $him a noticeably bovine appearance.
	<<case "sacrilege">>
		$His legs are covered in tattoos of swirling flames.
	<<case "sacrament">>
		$His legs are covered in tattoos of swirling thorns.
	<<case "possessive">>
		$His left thigh is tattooed with a stylized representation of your initials, and the right with a depiction of your personal symbol.
	<<case "paternalist">>
		$His left thigh reads 'I Love My Life,' and the right 'Let Me Love Yours Too.'
	<<default>>
		$activeSlave.legsTat
	<</switch>>
<</if>>
<</widget>>

<<widget "customTatDescription">>
<<switch $args[0].customTat>>
	<<case "She has a famous corporate logo tattooed on the nape of her neck.">>
		<<print "$He has a famous corporate logo tattooed on the nape of $his neck.">>
	<<case "She has a small tattoo of a private military company's coat of arms on the nape of her neck.">>
		<<print "$He has a small tattoo of a private military company's coat of arms on the nape of $his neck.">>
	<<case "She has your tiny slaving emblem tattooed behind her left ear.">>
		<<print "$He has your tiny slaving emblem tattooed behind $his left ear.">>
	<<case "She has the geometric symbol of your old arcology engineering firm laser tattooed into the nape of her neck.">>
		<<print "$He has the geometric symbol of your old arcology engineering firm laser tattooed into the nape of $his neck.">>
	<<case "She has your custom emblem tattooed on her left breast.">>
		<<print "$He has your custom emblem tattooed on $his left breast.">>
	<<case "She has the number of times her father came in you while you were pregnant with her tattooed down her back.">>
		<<print "$He has the number of times $his father came in you while you were pregnant with $him tattooed down $his back.">>
	<<case "She has your name angrily tattooed on her right shoulder.">>
		<<print "$He has your name angrily tattooed on $his right shoulder.">>
	<<case "She has your custom emblem tattooed on her left breast. She got the tattoo after starring in a porno with you.">>
		<<print "$He has your custom emblem tattooed on $his left breast. $He got the tattoo after starring in a porno with you.">>
	<<case "She has your former gang's sign tattooed on her neck.">>
		<<print "$He has your former gang's sign tattooed on $his neck.">>
	<<case "She has your master's brand on her left breast.">>
		<<print "$He has your master's brand on $his left breast.">>
	<<case "She has your personal symbol tattooed on the back of her neck: it's invisible to the naked eye, but shows up starkly on medical imaging.">>
		<<print "$He has your personal symbol tattooed on the back of $his neck: it's invisible to the naked eye, but shows up starkly on medical imaging.">>
	<<case "She has your signature, surrounded by hearts, tattooed on the back of her neck.">>
		<<print "$He has your signature, surrounded by hearts, tattooed on the back of $his neck.">>
	<<case "She has your signature, surrounded by hearts, tattooed on the back of her neck. She got the tattoo when she was still free.">>
		<<print "$He has your signature, surrounded by hearts, tattooed on the back of $his neck. $He got the tattoo when $he was still free.">>
	<<case "She has a small tattoo of a losing hand of cards on the nape of her neck.">>
		<<print "$He has a small tattoo of a losing hand of cards on the nape of $his neck.">>
	<<case "She has a small tattoo of a poor hand of cards on the nape of her neck.">>
		<<print "$He has a small tattoo of a poor hand of cards on the nape of $his neck.">>
	<<case "She has a small tattoo of a winning hand of cards on the nape of her neck.">>
		<<print "$He has a small tattoo of a winning hand of cards on the nape of $his neck.">>
	<<case "She has your former digital calling card tattooed on her neck.">>
		<<print "$He has your former digital calling card tattooed on $his neck.">>
	<<case "She has the silhouette of an arcology tattooed on the nape of her neck.">>
		<<print "$He has the silhouette of an arcology tattooed on the nape of $his neck.">>
	<<default>>
		<<print $args[0].customTat>>
<</switch>>
<</widget>>

repo_name: deswes/fc


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 @@.lightgreen;is both your mother and father, $pronoun impregnated <<print $object>>self with you.@@
<<elseif $activeSlave.ID == $PC.mother>>
	$pronounCap @@.lightgreen;is your mother.@@
<<elseif $activeSlave.ID == $PC.father>>
	$pronounCap @@.lightgreen;is your father.@@
<</if>>

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

<<if $activeSlave.father == -1 && $activeSlave.mother != -1>>
	$pronounCap's @@.lightgreen;your child;@@ you knocked $possessive mother up.
<<elseif $activeSlave.father > 0>>
	<<set _efw = $slaveIndices[$activeSlave.father]>>
	$pronounCap was @@.lightgreen;fathered by $slaves[_efw].slaveName's@@ virile dick.
<</if>>

<<if $activeSlave.father != -1 && $activeSlave.mother == -1>>
	$pronounCap's @@.lightgreen;your child;@@ you gave birth to $object.
<<elseif $activeSlave.mother > 0>>
	<<set _efw = $slaveIndices[$activeSlave.mother]>>
	$pronounCap was @@.lightgreen;born from $slaves[_efw].slaveName's@@ fertile womb.
<</if>>

<<set _children = $slaves.filter(function(s) { return $activeSlave.ID == s.father; })>>
<<if _children.length > 2>>
	$pronounCap @@.lightgreen;fathered
	<<for _efw = 0; _efw < _children.length; _efw++>>
		<<if _efw < _children.length-1>>
			_children[_efw].slaveName,
		<<else>>
			and _children[_efw].slaveName.@@
		<</if>>
	<</for>>
<<elseif _children.length > 1>>
	$pronounCap @@.lightgreen;fathered a pair of your slaves: _children[0].slaveName, and _children[1].slaveName.@@
<<elseif _children.length > 0>>
	$pronounCap @@.lightgreen;fathered a single slave of yours: _children[0].slaveName.@@
<</if>>

<<set _children = $slaves.filter(function(s) { return $activeSlave.ID == s.mother; })>>
<<if _children.length > 2>>
	$pronounCap @@.lightgreen;gave birth to
	<<for _efw = 0; _efw < _children.length; _efw++>>
		<<if _efw < _children.length-1>>
			_children[_efw].slaveName,
		<<else>>
			and _children[_efw].slaveName.@@
		<</if>>
	<</for>>
<<elseif _children.length > 1>>
	$pronounCap @@.lightgreen;gave birth to a pair of your slaves: _children[0].slaveName, and _children[1].slaveName.@@
<<elseif _children.length > 0>>
	$pronounCap @@.lightgreen;gave birth to a single one of your slaves: _children[0].slaveName.@@
<</if>>

/*testtest maternal grandma passage - determines if the current slave has a maternal grandmother*/
<<set $i = $slaveIndices[$activeSlave.mother]>>
<<if def $i && $slaves[$i].ID != $activeSlave.ID>>
	<<set $j = $slaveIndices[$slaves[$i].mother]>>
	<<if def $j && $slaves[$j].ID != $activeSlave.ID && $slaves[$j].ID != $slaves[$i].ID>>
		$possessiveCap maternal @@.lightgreen;grandmother is $slaves[$j].slaveName.@@
	<</if>>
<<elseif $PC.ID == $activeSlave.mother>>
	<<set $i = $slaveIndices[$PC.mother]>>
	<<if def $i>>
		$possessiveCap maternal @@.lightgreen;grandmother is $slaves[$i].slaveName.@@
	<</if>>
<</if>>

/*testtest maternal grandpa passage - determines if the current slave has a maternal grandfather*/
<<set $i = $slaveIndices[$activeSlave.mother]>>
<<if def $i && $slaves[$i].ID != $activeSlave.ID>>
	<<set $j = $slaveIndices[$slaves[$i].father]>>
	<<if def $j && $slaves[$j].ID != $activeSlave.ID && $slaves[$j].ID != $slaves[$i].ID>>
		$possessiveCap maternal @@.lightgreen;grandfather is $slaves[$j].slaveName.@@
	<</if>>
<<elseif $PC.ID == $activeSlave.mother>>
	<<set $i = $slaveIndices[$PC.father]>>
	<<if def $i>>
		$possessiveCap maternal @@.lightgreen;grandfather is $slaves[$i].slaveName.@@
	<</if>>
<</if>>

/*testtest paternal grandma passage - determines if the current slave has a paternal grandmother*/
<<set $i = $slaveIndices[$activeSlave.father]>>
<<if def $i && $slaves[$i].ID != $activeSlave.ID>>
	<<set $j = $slaveIndices[$slaves[$i].mother]>>
	<<if def $j && $slaves[$j].ID != $activeSlave.ID && $slaves[$j].ID != $slaves[$i].ID>>
		$possessiveCap paternal @@.lightgreen;grandmother is $slaves[$j].slaveName.@@
	<</if>>
<<elseif $PC.ID == $activeSlave.father>>
	<<set $i = $slaveIndices[$PC.mother]>>
	<<if def $i>>
		$possessiveCap paternal @@.lightgreen;grandmother is $slaves[$i].slaveName.@@
	<</if>>
<</if>>

/*testtest paternal grandpa passage - determines if the current slave has a paternal grandfather*/
<<set $i = $slaveIndices[$activeSlave.father]>>
<<if def $i && $slaves[$i].ID != $activeSlave.ID>>
	<<set $j = $slaveIndices[$slaves[$i].father]>>
	<<if def $j && $slaves[$j].ID != $activeSlave.ID && $slaves[$j].ID != $slaves[$i].ID>>
		$possessiveCap paternal @@.lightgreen;grandfather is $slaves[$j].slaveName.@@
	<</if>>
<<elseif $PC.ID == $activeSlave.father>>
	<<set $i = $slaveIndices[$PC.father]>>
	<<if def $i>>
		$possessiveCap paternal @@.lightgreen;grandfather is $slaves[$i].slaveName.@@
	<</if>>
<</if>>

/*testtest PC grandparents passage - determines if the current slave is your grandparent*/
<<set _pcMother = $slaveIndices[$PC.mother]>>
<<set _pcFather = $slaveIndices[$PC.father]>>
<<if def _pcMother>>
	<<if def _pcFather && _pcMother == _pcFather>>
		<<if $activeSlave.ID == $slaves[_pcMother].mother && $activeSlave.ID == $slaves[_pcFather].father>>
			$pronounCap is @@.lightgreen;your sole grandparent.@@ $pronounCap impregnated <<print $object>>self with your mother/father who in turn impregnated themselves with you.
		<<elseif $activeSlave.ID == $slaves[_pcMother].mother>>
			$pronounCap is @@.lightgreen;your sole grandmother.@@ $pronounCap gave birth to $slaves[_pcMother].slaveName who in turn impregnated themselves with you.
		<<elseif $activeSlave.ID == $slaves[_pcFather].father>>
			$pronounCap is @@.lightgreen;your sole grandfather.@@ $pronounCap fathered $slaves[_pcFather].slaveName who in turn impregnated themselves with you.
		<</if>>
	<<elseif $activeSlave.ID == $slaves[_pcMother].mother>>
		$pronounCap is @@.lightgreen;your maternal grandmother.@@
	<<elseif $activeSlave.ID == $slaves[_pcMother].father>>
		$pronounCap is @@.lightgreen;your maternal grandfather.@@
	<</if>>
<<elseif def _pcFather>>
	<<if $activeSlave.ID == $slaves[_pcFather].mother>>
		$pronounCap is @@.lightgreen;your paternal grandmother.@@
	<<elseif $activeSlave.ID == $slaves[_pcFather].father>>
		$pronounCap is @@.lightgreen;your paternal grandfather.@@
	<</if>>
<</if>>

/*testtest grandchild passage - determines how many grandchildren the current slave has*/
<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if $activeSlave.ID == $slaves[$i].mother || $activeSlave.ID == $slaves[$i].father>>
		<<for $j = 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID>>
			<<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 $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	has @@.lightgreen;many grandchildren,
	<<for $j = 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 @@.lightgreen;two grandchildren, $children[0].slaveName, and $children[1].slaveName as your slaves.@@
<<elseif $children.length > 0>>
	has a @@.lightgreen;grandchild, $children[0].slaveName as your slave.@@
<</if>>
<</if>>
<<set $children = []>>

/*testtest PC aunt passage - determines how many aunts you have*/
<<for $i = 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 = 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID>>
			<<if $slaves[$j].genes == "XX">>
			<<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.genes == "XX" && $children.length > 0>>
	$pronounCap
	<<if $children.length > 2>>
		is @@.lightgreen;your aunt along with
		<<for $j = 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 @@.lightgreen;your aunt along with $children[0].slaveName.@@
	<<elseif $children.length > 0>>
		<<for $i = 0; $i < $slaves.length; $i++>>
			<<if $slaves[$i].ID != $activeSlave.ID && $activeSlave.genes == "XX">>
			<<if areSisters($slaves[$i], $activeSlave) == 1 || areSisters($slaves[$i], $activeSlave) == 2>>
			<<if $slaves[$i].ID == $PC.mother || $slaves[$i].ID == $PC.father>>
				$pronounCap is @@.lightgreen;your aunt.@@
			<</if>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
<</if>>
<<set $children = []>>

/*testtest PC uncle passage - determines how many uncles you have*/
<<for $i = 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 = 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID && $slaves[$j].dick > 0 && $slaves[$j].genes == "XY">>
			<<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.genes == "XY" && $children.length > 0>>
	$pronounCap
	<<if $children.length > 2>>
		is @@.lightgreen;your uncle along with
		<<for $j = 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 @@.lightgreen;your uncle along with $children[0].slaveName.@@
	<<elseif $children.length > 0>>
		<<for $i = 0; $i < $slaves.length; $i++>>
			<<if $slaves[$i].ID != $activeSlave.ID && $activeSlave.genes == "XY">>
			<<if areSisters($slaves[$i], $activeSlave) == 1 || areSisters($slaves[$i], $activeSlave) == 2>>
			<<if $slaves[$i].ID == $PC.mother || $slaves[$i].ID == $PC.father>>
				$pronounCap is @@.lightgreen;your uncle.@@
			<</if>>
			<</if>>
			<</if>>
		<</for>>
	<</if>>
<</if>>
<<set $children = []>>

/*testtest aunt passage - determines how many aunts a slave has*/
<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if $slaves[$i].ID == $activeSlave.mother || $slaves[$i].ID == $activeSlave.father>>
		<<for $j = 0; $j < $slaves.length; $j++>>
			<<if $slaves[$j].genes == "XX">>
			<<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 @@.lightgreen;many aunts,
	<<for $j = 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 @@.lightgreen;two aunts, $children[0].slaveName, and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	 has @@.lightgreen;an aunt, $children[0].slaveName.@@
<</if>>
<</if>>
<<set $children = []>>

/*testtest uncle passage - determines how many uncles a slave has*/
<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if $slaves[$i].ID == $activeSlave.mother || $slaves[$i].ID == $activeSlave.father>>
		<<for $j = 0; $j < $slaves.length; $j++>>
			<<if $slaves[$j].genes == "XY">>
			<<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 @@.lightgreen;many uncles,
	<<for $j = 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 @@.lightgreen;two uncles, $children[0].slaveName, and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	 has @@.lightgreen;an uncle, $children[0].slaveName.@@
<</if>>
<</if>>
<<set $children = []>>

/*testtest PC niece passage - determines how many nieces you have*/
<<for $i = 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 = 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID && $slaves[$j].ID != $activeSlave.ID && $slaves[$j].genes == "XX">>
			<<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.genes == "XX" && $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	is @@.lightgreen;your niece along with
	<<for $j = 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 @@.lightgreen;your niece along with $children[0].slaveName.@@
<<elseif $children.length > 0>>
<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID && $activeSlave.genes == "XX">>
	<<if areSisters($slaves[$i], $PC) == 1 || areSisters($slaves[$i], $PC) == 2>>
	<<if $slaves[$i].ID == $activeSlave.mother || $slaves[$i].ID == $activeSlave.father>>
		is @@.lightgreen;your niece.@@
	<</if>>
	<</if>>
	<</if>>
<</for>>
<</if>>
<</if>>
<<set $children = []>>

/* testtest niece passage - determines how many nieces a slave has*/
<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($slaves[$i], $activeSlave) == 1 || areSisters($slaves[$i], $activeSlave) == 2>>
		<<for $j = 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID && $slaves[$j].ID != $activeSlave.ID && $slaves[$j].genes == "XX">>
			<<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 $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	has @@.lightgreen;many nieces,
	<<for $j = 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 @@.lightgreen;two nieces, $children[0].slaveName, and $children[1].slaveName, who are your slaves.@@
<<elseif $children.length > 0>>
	has @@.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 = 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 = 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID && $slaves[$j].ID != $activeSlave.ID && $slaves[$i].genes == "XY">>
			<<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.genes == "XY" && $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	is @@.lightgreen;your nephew along with
	<<for $j = 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 @@.lightgreen;your nephew along with $children[0].slaveName.@@
<<elseif $children.length > 0>>
<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID && $activeSlave.genes == "XY">>
	<<if areSisters($slaves[$i], $PC) == 1 || areSisters($slaves[$i], $PC) == 2>>
	<<if $slaves[$i].ID == $activeSlave.mother || $slaves[$i].ID == $activeSlave.father>>
		is @@.lightgreen;your nephew.@@
	<</if>>
	<</if>>
	<</if>>
<</for>>
<</if>>
<</if>>
<<set $children = []>>

/* testtest nephew passage - determines how many nephews a slave has*/
<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $activeSlave.ID>>
	<<if areSisters($slaves[$i], $activeSlave) == 1 || areSisters($slaves[$i], $activeSlave) == 2>>
		<<for $j = 0; $j < $slaves.length; $j++>>
			<<if $slaves[$i].ID != $slaves[$j].ID && $slaves[$j].ID != $activeSlave.ID && $slaves[$j].genes == "XY">>
			<<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 $children.length > 0>>
	$pronounCap
<<if $children.length > 2>>
	has @@.lightgreen;many nephews,
	<<for $j = 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 @@.lightgreen;two nephews, $children[0].slaveName, and $children[1].slaveName, who are your slaves.@@
<<elseif $children.length > 0>>
	has @@.lightgreen;a nephew, $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 = areSisters($activeSlave, $PC)>>
<<if(_rel_num > 0)>>
	<<if ($activeSlave.genes == "XX")>>
		<<set _rel_type = "sister">>
	<<else>>
		<<set _rel_type = "brother">>
	<</if>>
	<<if (_rel_num == 1)>>
		<<set _rel_desc = "your twin">>
	<<elseif _rel_num == 2>>
		<<set _rel_desc = "your ">>
	<<elseif _rel_num == 3>>
		<<set _rel_desc = "your half-">>
	<</if>>
	<<for $i = 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>>
	@@.lightgreen;is _rel_desc _rel_type along with
	<<for $j = 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 @@.lightgreen;_rel_desc _rel_type with $children[0].slaveName.@@
<<else>>
	is @@.lightgreen;_rel_desc _rel_type.@@
<</if>>
<</if>>
<<set $children = []>>
*/

<<set _twins = [], _sisters = [], _brothers = [], _halfsisters = [], _halfbrothers = []>>
<<for _efw = 0; _efw < $slaves.length; _efw++>>
	<<set _sisterCheck = areSisters($slaves[_efw], $activeSlave)>>
	<<if _sisterCheck == 1>>
		<<run _twins.push($slaves[_efw])>>
	<</if>>
	<<if _sisterCheck == 2>>
		<<run ($slaves[_efw].genes == 'XX' ? _sisters : _brothers).push($slaves[_efw])>>
	<</if>>
	<<if _sisterCheck == 3>>
		<<run ($slaves[_efw].genes == 'XX' ? _halfsisters : _halfbrothers).push($slaves[_efw])>>
	<</if>>
<</for>>

/*testtest PC twin passages - determines how many twins you have but not implemented yet*/
<<if areSisters($activeSlave, $PC) == 1>>
	$pronounCap
	<<if _twins.length > 1>>
		@@.lightgreen;shared a cramped womb with you, <<print _twins.reduce(function(res, ch, i, arr) { return (res.slaveName || res) + (i == arr.length - 1 ? ' and ' : ', ') + ch.slaveName; })>>.@@
	<<elseif _twins.length > 0>>
		is @@.lightgreen;your twin along with _twins[0].slaveName.@@
	<<else>>
		is @@.lightgreen;your twin <<if $activeSlave.genes == "XX">>sister<<else>>brother<</if>>.@@
	<</if>>
<</if>>

/*testtest PC sister passages - determines how many sisters you have*/
<<if areSisters($activeSlave, $PC) < 3 && areSisters($activeSlave, $PC) > 0 && $activeSlave.genes == "XX">>
	$pronounCap
	<<if _sisters.length > 1>>
		@@.lightgreen;is your sister along with <<print _sisters.reduce(function(res, ch, i, arr) { return (res.slaveName || res) + (i == arr.length - 1 ? ' and ' : ', ') + ch.slaveName; })>>.@@
	<<elseif _sisters.length > 0>>
		is @@.lightgreen;your sister along with _sisters[0].slaveName.@@
	<<else>>
		is @@.lightgreen;your sister.@@
	<</if>>
<</if>>

/*testtest PC brother passages - determines how many brothers you have*/
<<if areSisters($activeSlave, $PC) < 3 && areSisters($activeSlave, $PC) > 0 && $activeSlave.genes == "XY">>
	$pronounCap
	<<if _brothers.length > 1>>
		@@.lightgreen;is your brother along with <<print _brothers.reduce(function(res, ch, i, arr) { return (res.slaveName || res) + (i == arr.length - 1 ? ' and ' : ', ') + ch.slaveName; })>>.@@
	<<elseif _brothers.length > 0>>
		is @@.lightgreen;your brother along with _brothers[0].slaveName.@@
	<<else>>
		is @@.lightgreen;your brother.@@
	<</if>>
<</if>>

/*testtest PC half-sister passages - determines how many half-sisters you have*/
<<if areSisters($activeSlave, $PC) == 3 && $activeSlave.genes == "XX">>
	$pronounCap
	<<if _halfsisters.length > 1>>
		@@.lightgreen;is your half-sister along with <<print _halfsisters.reduce(function(res, ch, i, arr) { return (res.slaveName || res) + (i == arr.length - 1 ? ' and ' : ', ') + ch.slaveName; })>>.@@
	<<elseif _halfsisters.length > 0>>
		is @@.lightgreen;your half-sister along with _halfsisters[0].slaveName.@@
	<<else>>
		is @@.lightgreen;your half-sister.@@
	<</if>>
<</if>>

/*testtest PC half-brother passages - determines how many half-brothers you have*/
<<if areSisters($activeSlave, $PC) == 3 && $activeSlave.genes == "XY">>
	$pronounCap
	<<if _halfbrothers.length > 1>>
		@@.lightgreen;is your half-brother along with <<print _halfbrothers.reduce(function(res, ch, i, arr) { return (res.slaveName || res) + (i == arr.length - 1 ? ' and ' : ', ') + ch.slaveName; })>>.@@
	<<elseif _halfbrothers.length > 0>>
		is @@.lightgreen;your half-brother along with _halfbrothers[0].slaveName.@@
	<<else>>
		is @@.lightgreen;your half-brother.@@
	<</if>>
<</if>>

/*testtest twins? - determines how many twins a slave has*/
<<if _twins.length > 0>>
	$pronounCap
	<<if _twins.length > 2>>
		@@.lightgreen;shared a cramped womb with <<print _twins.reduce(function(res, ch, i, arr) { return (res.slaveName || res) + (i == arr.length - 1 ? ' and ' : ', ') + ch.slaveName; })>>.@@
	<<elseif _twins.length > 1>>
		is a @@.lightgreen;one of a set of triplets; _twins[0].slaveName and _twins[1].slaveName@@ complete the trio.
	<<else>>
		is @@.lightgreen;twins with _twins[0].slaveName.@@
	<</if>>
<</if>>

/*testtest sister - determines how many sisters a slave has*/
<<if _sisters.length > 0>>
	<<if _sisters.length > 1>>
		@@.lightgreen;<<print _sisters.reduce(function(res, ch, i, arr) { return (res.slaveName || res) + (i == arr.length - 1 ? ' and ' : ', ') + ch.slaveName; })>> are $possessive sisters.@@
	<<else>>
		@@.lightgreen; _sisters[0].slaveName is $possessive sister.@@
	<</if>>
<</if>>

/*testtest brother - determines how many brothers a slave has*/
<<if _brothers.length > 0>>
	<<if _brothers.length > 1>>
		@@.lightgreen;<<print _brothers.reduce(function(res, ch, i, arr) { return (res.slaveName || res) + (i == arr.length - 1 ? ' and ' : ', ') + ch.slaveName; })>> are $possessive brothers.@@
	<<else>>
		@@.lightgreen;_brothers[0].slaveName is $possessive brother.@@
	<</if>>
<</if>>

/*testtest half-sister - determines how many half-sisters a slave has*/
<<set _children = $slaves.filter(function(s) { return s.ID != $activeSlave.ID && areSisters($activeSlave, s) == 3 && s.genes == "XX"; })>>
<<if _children.length > 2>>
	@@.lightgreen;
	<<for _efw = 0; _efw < _children.length; _efw++>>
		<<if _efw < _children.length-1>>
			_children[_efw].slaveName,
		<<else>>
			and _children[_efw].slaveName
		<</if>>
	<</for>>
	are half-sisters to $object.@@
<<elseif _children.length > 1>>
	@@.lightgreen;_children[0].slaveName and _children[1].slaveName are half-sisters to $object.@@
<<elseif _children.length > 0>>
	@@.lightgreen;_children[0].slaveName is a half-sister to $object.@@
<</if>>

/*testtest half-brother - determines how many half-brothers a slave has*/
<<set _children = $slaves.filter(function(s) { return s.ID != $activeSlave.ID && areSisters($activeSlave, s) == 3 && s.genes == "XY"; })>>
<<if _children.length > 2>>
	@@.lightgreen;
	<<for _efw = 0; _efw < _children.length; _efw++>>
		<<if _efw < _children.length-1>>
			_children[_efw].slaveName,
		<<else>>
			and _children[_efw].slaveName
		<</if>>
	<</for>>
	are half-brothers to $object.@@
<<elseif _children.length > 1>>
	@@.lightgreen;_children[0].slaveName and _children[1].slaveName are half-brothers to $object.@@
<<elseif _children.length > 0>>
	@@.lightgreen;_children[0].slaveName is a half-brother to $object.@@
<</if>>

<<if $cheatMode == 1>>
	$activeSlave.sisters sisters, $activeSlave.daughters daughters.
<</if>>

<</widget>>

<<widget PlayerFamily>>

<br><br>Your present family includes:

/*Player parents, lists both your parents, or just one.*/
<<for $i = 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 @@.lightgreen;$children[0].slaveName and $children[1].slaveName@@.
<<elseif $children.length > 0>>
	<br>You know one of your parents, @@.lightgreen;$children[0].slaveName@@.
<</if>>
<<set $children = []>>

/*Twins Test with aresisters*/
<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $PC.ID>>
		<<if areSisters($slaves[$i], $PC) == 1 && areSisters($slaves[$i], $slaves[$i]) == 1>>
			<<set $children.push($slaves[$i])>>
		<</if>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	<br>You are @@.lightgreen;twins with
	<<for $j = 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 twins with @@.lightgreen;$children[0].slaveName and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	<br>Your twin is @@.lightgreen;$children[0].slaveName.@@
<</if>>
<<set $children = []>>

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

/*Brother Test with aresisters*/
<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $PC.ID>>
		<<if areSisters($PC, $slaves[$i]) === 2 && areSisters($slaves[$i], $PC) === 2>>
			<<if $slaves[$i].genes == "XY">>
				<<set $children.push($slaves[$i])>>
			<</if>>
		<</if>>
	<</if>>
<</for>>
<<if $children.length > 2>>
	<br>You are @@.lightgreen;brothers with
	<<for $j = 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 brothers with @@.lightgreen;$children[0].slaveName and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	<br>Your brother is @@.lightgreen;$children[0].slaveName.@@
<</if>>
<<set $children = []>>

/*Half-Sister Test with aresisters */
<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $PC.ID>>
	<<if areSisters($slaves[$i], $PC) == 3 && areSisters($PC, $slaves[$i]) == 3>>
		<<if $slaves[$i].genes == "XX">>
			<<set $children.push($slaves[$i])>>
		<</if>>
	<</if>>
<</if>>
<</for>>
<<if $children.length > 2>>
	<br>You are half-sisters with @@.lightgreen;
	<<for $j = 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 @@.lightgreen;$children[0].slaveName and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	<br>You have one half-sister, @@.lightgreen;$children[0].slaveName.@@
<</if>>
<<set $children = []>>

/*Half-Brother Test with aresisters */
<<for $i = 0; $i < $slaves.length; $i++>>
	<<if $slaves[$i].ID != $PC.ID>>
	<<if areSisters($slaves[$i], $PC) == 3 && areSisters($PC, $slaves[$i]) == 3>>
		<<if $slaves[$i].genes == "XY">>
			<<set $children.push($slaves[$i])>>
		<</if>>
	<</if>>
<</if>>
<</for>>
<<if $children.length > 2>>
	<br>You are half-brothers with @@.lightgreen;
	<<for $j = 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-brothers with @@.lightgreen;$children[0].slaveName and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	<br>You have one half-brother, @@.lightgreen;$children[0].slaveName.@@
<</if>>
<<set $children = []>>

/*Player is Father, lists children you fathered*/
<<for $i = 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 @@.lightgreen;
	<<for $j = 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, @@.lightgreen;$children[0].slaveName, and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	<br>You are the father of one of your slaves, @@.lightgreen;$children[0].slaveName.@@
<</if>>
<<set $children = []>>

/*Player is Mother, lists birthed children*/
<<for $i = 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@@.lightgreen;
	<<for $j = 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, @@.lightgreen;$children[0].slaveName, and $children[1].slaveName.@@
<<elseif $children.length > 0>>
	<br>You are the mother of one of your slaves, @@.lightgreen;$children[0].slaveName.@@
<</if>>
<<set $children = []>>

<<if $cheatMode == 1>>
	$PC.sisters sisters, $PC.daughters daughters.
<</if>>

<</widget>>

<<widget "parentName">>
<<if $activeSlave[$args[0]] == $PC.ID>>You<</if>><<for _j = 0; _j < $slaves.length; _j++>><<if $slaves[_j].ID == $activeSlave[$args[0]]>><<print $slaves[_j].slaveName>><</if>><</for>>
<</widget>>

<<widget "listOfSlavesWithSameParent">>
<<if $activeSlave[$args[0]] != 0>>
<<set _printSeperator = false>>
<<if $activeSlave[$args[0]] == $PC[$args[0]]>>You<<set _printSeperator = true>><</if>><<for _j = 0; _j < $slaves.length; _j++>><<if $slaves[_j][$args[0]] == $activeSlave[$args[0]]>><<if _printSeperator>> | <</if>><<set _printSeperator = true>><<print $slaves[_j].slaveName>><</if>><</for>>
<</if>>
<</widget>>

<<widget "redisplayFamily">>
<<replace '#fatheredNames'>><<listOfSlavesWithParent "father" $activeSlave.ID>><</replace>>
<<replace '#motheredNames'>><<listOfSlavesWithParent "mother" $activeSlave.ID>><</replace>>
<<replace '#familySummary'>><<Family>><</replace>>
<<replace '#motherName'>><<parentName "mother">><</replace>>
<<replace '#fatherName'>><<parentName "father">><</replace>>
<<replace '#sameMotherNames'>><<listOfSlavesWithSameParent 'mother'>><</replace>>
<<replace '#sameFatherNames'>><<listOfSlavesWithSameParent 'father'>><</replace>>
/* <<run updateFamilyTree($activeSlave, $slaves, $PC)>> */
<<set _tSlaveList = [$activeSlave]>>
<<set _tSlaveList.push.apply(_tSlaveList, $slaves)>>
<<run renderFamilyTree(_tSlaveList, $activeSlave.ID)>>
<</widget>>

/* First parameter is e.g. "father" or "mother" and second parameter is the ID to match */
<<widget "listOfSlavesWithParent">>
<<if $args[1] != 0>>
<<set _printSeperator = false>>
<<if $args[1] == $PC[$args[0]]>>You<<set _printSeperator = true>><</if>><<for _j = 0; _j < $slaves.length; _j++>><<if $slaves[_j][$args[0]] == $args[1]>><<if _printSeperator>> | <</if>><<set _printSeperator = true>><<print $slaves[_j].slaveName>><</if>><</for>>
<</if>>
<</widget>>

<<widget "editFamily">>
<div id="editFamily"><div id="familyTable">
<br>''Mother:'' <span id="motherName"><<parentName "mother">></span>.
<<link "Reset">>
<<set $activeSlave.mother = 0>>
<<redisplayFamily>>
<</link>>
<<if $PC.vagina == 1 && (($PC.actualAge - $activeSlave.actualAge) >= $fertilityAge)>> | <<link "You">><<set $activeSlave.mother = $PC.ID>><<redisplayFamily>><</link>><</if>>
<<for _efw = 0; _efw < $slaves.length; _efw++>>
<<if $slaves[_efw].vagina > 0 && (($slaves[_efw].actualAge - $activeSlave.actualAge) >= $fertilityAge)>>
 |
<<set _id = $slaves[_efw].ID>>
<<set _slaveName = $slaves[_efw].slaveName>>
<<print "
<<link _slaveName>>
<<set $activeSlave.mother = " + _id + ">>
<<redisplayFamily>>
<</link>>
">>
<</if>>
<</for>>
<br>''Father:'' <span id="fatherName"><<parentName "father">></span>.
<<link "Reset">>
<<set $activeSlave.father = 0>>
<<redisplayFamily>>
<</link>>
<<if ($PC.dick == 1) && (($PC.actualAge - $activeSlave.actualAge) >= $potencyAge) >> | <<link "You">><<set $activeSlave.father = $PC.ID>><<redisplayFamily>><</link>><</if>>
<<for _efw = 0; _efw < $slaves.length; _efw++>>
<<if ($slaves[_efw].dick > 0) && ((($slaves[_efw].actualAge - $activeSlave.actualAge) >= $potencyAge))>>
 |
<<set _id = $slaves[_efw].ID>>
<<set _slaveName = $slaves[_efw].slaveName>>
<<print "
<<link _slaveName>>
<<set $activeSlave.father = " + _id + ">>
<<redisplayFamily>>
<</link>>
">>
<</if>>
<</for>>

<br>''Same mother as:'' <span id="sameMotherNames"><<listOfSlavesWithSameParent 'mother'>></span>.
<<link "Reset">>
<<set $activeSlave.mother = 0>>
<<redisplayFamily>>
<</link>>
 | <<link "You">>
<<if $PC.mother != 0>>
<<set $activeSlave.mother = $PC.mother>>
<<elseif $activeSlave.mother != 0>>
<<set $PC.mother = $activeSlave.mother>>
<<else>>
<<set $activeSlave.mother = -5 - 2*$activeSlave.ID>>
<<set $PC.mother = $activeSlave.mother>>
<</if>>
<<redisplayFamily>>
<</link>>
<<for _efw = 0; _efw < $slaves.length; _efw++>>
 |
<<set _slaveName = $slaves[_efw].slaveName>>

<<print "
<<link _slaveName>>
<<set _slave = $slaves[" + _efw + "]>>
<<if _slave.mother != 0>>
<<set $activeSlave.mother = _slave.mother>>
<<elseif $activeSlave.mother != 0>>
<<set _slave.mother = $activeSlave.mother>>
<<else>>
<<set $activeSlave.mother = -5 - 2*$activeSlave.ID>>
<<set _slave.mother = $activeSlave.mother>>
<</if>>
<<redisplayFamily>>
<</link>>
">>
<</for>>

<br>''Same father as:'' <span id="sameFatherNames"><<listOfSlavesWithSameParent 'father'>></span>.
<<link "Reset">>
<<set $activeSlave.father = 0>>
<<replace '#fatherName'>><</replace>>
<<replace '#sameFatherNames'>><</replace>>
<<redisplayFamily>>
<</link>>
| <<link "You">>
<<if $PC.father != 0>>
<<set $activeSlave.father = $PC.father>>
<<elseif $activeSlave.father != 0>>
<<set $PC.father = $activeSlave.father>>
<<else>>
<<set $activeSlave.father = -5 - 2*$activeSlave.ID -1>>
<<set $PC.father = $activeSlave.father>>
<</if>>
<<redisplayFamily>>
<</link>>

<<for _efw = 0; _efw < $slaves.length; _efw++>>
 |
<<set _slaveName = $slaves[_efw].slaveName>>
<<print "
<<link _slaveName>>
<<set _slave = $slaves[" + _efw + "]>>
<<if _slave.father != 0>>
<<set $activeSlave.father = _slave.father>>
<<elseif $activeSlave.father != 0>>
<<set _slave.father = $activeSlave.father>>
<<else>>
<<set $activeSlave.father = -5 - 2*$activeSlave.ID -1>>
<<set _slave.father = $activeSlave.father>>
<</if>>
<<redisplayFamily>>
<</link>>
">>
<</for>>

<br>''Mother of the children:'' <span id="motheredNames"><<listOfSlavesWithParent "mother" $activeSlave.ID>></span>.
<<link "Reset">>
<<for _efw = 0; _efw < $slaves.length; _efw++>>
<<if $slaves[_efw].mother == $activeSlave.ID>><<set $slaves[_efw].mother = 0>><</if>>
<</for>>
<<if $PC.mother == $activeSlave.ID>><<set $PC.mother = 0>><</if>>
<<redisplayFamily>>
<</link>>
<<if $activeSlave.vagina >= 0>>
<<if ($activeSlave.actualAge - $PC.actualAge) >= $fertilityAge>>
| <<link "You">>
<<set $PC.mother = $activeSlave.ID>>
<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina = 1>><</if>>
<<redisplayFamily>>
<</link>>
<</if>>

<<for _efw = 0; _efw < $slaves.length; _efw++>>
<<set _slaveName = $slaves[_efw].slaveName>>
<<set _slave = $slaves[_efw]>>
<<if ($activeSlave.actualAge - _slave.actualAge) >= $fertilityAge>>
 |
<<print "
<<link _slaveName>>
<<set _slave = $slaves[" + _efw + "]>>
<<set _slave.mother = $activeSlave.ID>>
<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina = 1>><</if>>
<<redisplayFamily>>
<</link>>
">>
<</if>>
<</for>>
<</if>>

<br>''Father of the children:'' <span id="fatheredNames"><<listOfSlavesWithParent "father" $activeSlave.ID>></span>.
<<link "Reset">>
<<for _efw = 0; _efw < $slaves.length; _efw++>>
<<if $slaves[_efw].father == $activeSlave.ID>><<set $slaves[_efw].father = 0>><</if>>
<</for>>
<<if $PC.father == $activeSlave.ID>><<set $PC.father = 0>><</if>>
<<redisplayFamily>>
<</link>>
<<if $activeSlave.dick > 0>>
<<if ($activeSlave.actualAge - $PC.actualAge) >= $fertilityAge>>
| <<link "You">>
<<set $PC.father = $activeSlave.ID>>
<<redisplayFamily>>
<</link>>
<</if>>

<<for _efw = 0; _efw < $slaves.length; _efw++>>

<<set _slaveName = $slaves[_efw].slaveName>>
<<set _slave = $slaves[_efw]>>
<<if ($activeSlave.actualAge - _slave.actualAge) >= $fertilityAge>>
 |
<<print "
<<link _slaveName>>
<<set _slave = $slaves[" + _efw + "]>>
<<set _slave.father = $activeSlave.ID>>
<<redisplayFamily>>
<</link>>
">>
<</if>>
<</for>>
<</if>>

<br>
    <span id="familySummary"><<Family>></span>
<br>
</div>
/*<div id="graph"></div>
<<run updateFamilyTree($activeSlave, $slaves, $PC)>>
<script>updateFamilyTree()</script>*/
<div id="familyTree"></div>
<<set _tSlaveList = [$activeSlave]>>
<<set _tSlaveList.push.apply(_tSlaveList, $slaves)>>
<<run renderFamilyTree(_tSlaveList, $activeSlave.ID)>>
</div>

<</widget>>