From 408aa82196d41539af5f61fd74d890f494bed23e Mon Sep 17 00:00:00 2001
From: Pregmodder <pregmodder@gmail.com>
Date: Sun, 19 Feb 2017 20:12:27 -0500
Subject: [PATCH] Fixed e-e family mod and moved it to widgets to prevent
 passage bloat.

---
 src/pregmod/pregmodWidgets.tw             | 745 ++++++++++++++++++++++
 src/uncategorized/longSlaveDescription.tw | 739 +--------------------
 2 files changed, 746 insertions(+), 738 deletions(-)

diff --git a/src/pregmod/pregmodWidgets.tw b/src/pregmod/pregmodWidgets.tw
index 5fcde86e88b..e449c745de7 100644
--- a/src/pregmod/pregmodWidgets.tw
+++ b/src/pregmod/pregmodWidgets.tw
@@ -878,3 +878,748 @@ extremely pale -5
 <</switch>>
 
 <</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>>
+	She's @@color:lightgreen;your daughter,@@ you knocked yourself up and gave birth to $object.
+<</if>>
+
+<<if $activeSlave.father == -1 && $activeSlave.mother != -1>>
+	She's @@color:lightgreen;your daughter;@@ 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>>
+	She's @@color:lightgreen;your daughter;@@ 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>>
+				$pronounCap maternal @@color:lightgreen;grandmother is $slaves[$j].slaveName.@@
+			<</if>>
+		<</for>>
+	<<elseif $PC.ID == $activeSlave.mother && $slaves[$i].ID == $PC.mother>>
+		$pronounCap 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>>
+				$pronounCap maternal @@color:lightgreen;grandfather is $slaves[$j].slaveName.@@
+			<</if>>
+		<</for>>
+	<<elseif $PC.ID == $activeSlave.mother && $slaves[$i].ID == $PC.father>>
+		$pronounCap 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>>
+				$pronounCap paternal @@color:lightgreen;grandmother is $slaves[$j].slaveName.@@
+			<</if>>
+		<</for>>
+	<<elseif $PC.ID == $activeSlave.father && $slaves[$i].ID == $PC.mother>>
+		$pronounCap 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>>
+				$pronounCap paternal @@color:lightgreen;grandfather is $slaves[$j].slaveName.@@
+			<</if>>
+		<</for>>
+	<<elseif $PC.ID == $activeSlave.father && $slaves[$i].ID == $PC.father>>
+		$pronounCap 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>>
+		She 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>>
+		He 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 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 = []>>
+
+<<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>>
+			<<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>>
\ No newline at end of file
diff --git a/src/uncategorized/longSlaveDescription.tw b/src/uncategorized/longSlaveDescription.tw
index b4c54c335dc..b0d222638dc 100644
--- a/src/uncategorized/longSlaveDescription.tw
+++ b/src/uncategorized/longSlaveDescription.tw
@@ -1258,744 +1258,7 @@ when a dick is pushed inside <<if $activeSlave.vagina >= -1>>either of its lower
 <</if>>
 <<if $familyTesting == 1>>
 
-/*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>>
-	She's @@color:lightgreen;my daughter,@@ I knocked myself up and gave birth to $object.
-<</if>>
-
-<<if $activeSlave.father == -1 && $activeSlave.mother != -1>>
-	She's @@color:lightgreen;your daughter;@@ 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>>
-	She's @@color:lightgreen;your daughter;@@ 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>>
-				$pronounCap maternal @@color:lightgreen;grandmother is $slaves[$j].slaveName.@@
-			<</if>>
-		<</for>>
-	<<elseif $PC.ID == $activeSlave.mother && $slaves[$i].ID == $PC.mother>>
-		$pronounCap 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>>
-				$pronounCap maternal @@color:lightgreen;grandfather is $slaves[$j].slaveName.@@
-			<</if>>
-		<</for>>
-	<<elseif $PC.ID == $activeSlave.mother && $slaves[$i].ID == $PC.father>>
-		$pronounCap 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>>
-				$pronounCap paternal @@color:lightgreen;grandmother is $slaves[$j].slaveName.@@
-			<</if>>
-		<</for>>
-	<<elseif $PC.ID == $activeSlave.father && $slaves[$i].ID == $PC.mother>>
-		$pronounCap 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>>
-				$pronounCap paternal @@color:lightgreen;grandfather is $slaves[$j].slaveName.@@
-			<</if>>
-		<</for>>
-	<<elseif $PC.ID == $activeSlave.father && $slaves[$i].ID == $PC.father>>
-		$pronounCap 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 > 1>>
-		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 > 0>>
-		is @@color:lightgreen;your aunt along with $children[0].slaveName.@@
-	<</if>>
-<<else>>
-<<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>>
-<<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 > 1>>
-		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 > 0>>
-		is @@color:lightgreen;your uncle along with $children[0].slaveName.@@
-	<</if>>
-<<else>>
-<<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>>
-<<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 > 1>>
-	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 > 0>>
-	is @@color:lightgreen;your niece along with $children[0].slaveName.@@ 
-<<else>>
-<<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>>
-		She 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 > 1>>
-	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 > 0>>
-	is @@color:lightgreen;your nephew along with $children[0].slaveName.@@ 
-<<else>>
-<<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>>
-		He 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 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 > 1>>
-	$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 areSisters($activeSlave, $PC) == 1>>
-	$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 > 1>>
-	@@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 > 0>>
-	is @@color:lightgreen;your sister along with $children[0].slaveName.@@	
-<</if>>
-<<elseif areSisters($activeSlave, $PC) == 2 && $activeSlave.vagina > -1>>
-	is @@color:lightgreen;your sister.@@
-<</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 > 1>>
-	@@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 > 0>>
-	is @@color:lightgreen;your brother along with $children[0].slaveName.@@
-<</if>>
-<<elseif areSisters($activeSlave, $PC) == 2 && $activeSlave.dick > 0 && $activeSlave.vagina == -1>>
-	is @@color:lightgreen;your brother.@@
-<</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 > 1>>
-	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 > 0>>
-	is @@color:lightgreen;your half-sister along with $children[0].slaveName.@@	
-<</if>>	
-<<elseif areSisters($activeSlave, $PC) == 3 && $activeSlave.vagina > -1>>
-	is @@color:lightgreen;your half-sister.@@
-<</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 > 1>>
-	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 > 0>>
-	is @@color:lightgreen;your half-brother along with $children[0].slaveName.@@
-<</if>>	
-<<elseif areSisters($activeSlave, $PC) == 3 && $activeSlave.dick > 0 && $activeSlave.vagina == -1>>
-	is @@color:lightgreen;your half-brother.@@
-<</if>>
-<<set $children = []>>
-
-<<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>>
-			<<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 = []>>
+<<Family>>
 
 <<if $activeSlave.relationship >= 3 && ($activeSlave.mother > 0 || $activeSlave.father > 0 || $activeSlave.daughters > 0 || $activeSlave.sisters > 0)>>
 	<<for $i to 0; $i < $slaves.length; $i++>>
-- 
GitLab