From 9f4dfc174059e629340e4042f455fb14ad795f80 Mon Sep 17 00:00:00 2001
From: Pregmodder <pregmodder@gmail.com>
Date: Sat, 30 Dec 2017 22:41:47 -0500
Subject: [PATCH] fixes and saServeYourOtherSlaves.tw

---
 src/uncategorized/costs.tw                  |   2 +-
 src/uncategorized/costsReport.tw            |   2 +-
 src/uncategorized/nextWeek.tw               |   2 +-
 src/uncategorized/saServeYourOtherSlaves.tw | 210 +++++++++-----------
 4 files changed, 95 insertions(+), 121 deletions(-)

diff --git a/src/uncategorized/costs.tw b/src/uncategorized/costs.tw
index c5afc23f3f7..7a187ac5035 100644
--- a/src/uncategorized/costs.tw
+++ b/src/uncategorized/costs.tw
@@ -481,7 +481,7 @@
 <<elseif $PC.preg >= 16>>
 	<<set $costs += 100>>
 <</if>>
-<<if PC.staminaPills == 1>>
+<<if $PC.staminaPills == 1>>
 	<<set $costs += 50>>
 <</if>>
 
diff --git a/src/uncategorized/costsReport.tw b/src/uncategorized/costsReport.tw
index 474d2e05ec9..ae5adffad95 100644
--- a/src/uncategorized/costsReport.tw
+++ b/src/uncategorized/costsReport.tw
@@ -23,7 +23,7 @@
 <<elseif $PC.preg >= 16>>
 	<br>Increased living expenses due to being pregnant: <<print cashFormat(100)>>
 <</if>>
-<<if PC.staminaPills == 1>>
+<<if $PC.staminaPills == 1>>
 	<br>Your stamina pills: <<print cashFormat(50)>>
 <</if>>
 
diff --git a/src/uncategorized/nextWeek.tw b/src/uncategorized/nextWeek.tw
index bb22bd0e541..5cce543fc7e 100644
--- a/src/uncategorized/nextWeek.tw
+++ b/src/uncategorized/nextWeek.tw
@@ -246,7 +246,7 @@
 <<set $events = [], $RESSevent = [], $RESSTRevent = [], $RETSevent = [], $RECIevent = [], $RecETSevent = [], $REFIevent = [], $REFSevent = [], $PESSevent = [], $PETSevent = [], $FSAcquisitionEvents = [], $FSNonconformistEvents = [], $qualifiedNicknames = [], $REAnalCowgirlSubIDs = [], $REButtholeCheckinIDs = [], $recruit = [], $RETasteTestSubIDs = [], $devotedSlaves = [], $rebelSlaves = [], $REBoobCollisionSubIDs = [], $REIfYouEnjoyItSubIDs = [], $RESadisticDescriptionSubIDs = [], $REShowerForceSubIDs = [], $RESimpleAssaultIDs = [], $RECockmilkInterceptionIDs = [], $REInterslaveBeggingIDs = [], $bedSlaves = [], $qualifiedFS = []>>
 
 /% Slave Objects using 0 instead of null. Second most memory eaten up. %/
-<<set $activeSlave = 0, $domSlave = 0, $eventSlave = 0, $RERelationshipSlave = 0, $slaveWithoutBonuses = 0, $subSlave = 0, $milfSlave = 0, $milkTap = 0, $relation = 0>>
+<<set $activeSlave = 0, $eventSlave = 0, $RERelationshipSlave = 0, $slaveWithoutBonuses = 0, $subSlave = 0, $milfSlave = 0, $milkTap = 0, $relation = 0>>
 
 /% Slave Objects that never get zeroed so null them here. Second most memory eaten up. %/
 <<set $assayedSlave = null, $beforeGingering = null, $mother = null, $daughter = null, $devMother = null, $devDaughter = null, $alphaTwin = null, $betaTwin = null, $youngerSister = null, $olderSister = null, $recruiterMother = null, $recruiterSister = null, $sibling = null, $recruiterSlave = null>>
diff --git a/src/uncategorized/saServeYourOtherSlaves.tw b/src/uncategorized/saServeYourOtherSlaves.tw
index 1291c2a4c64..c66e2db8be4 100644
--- a/src/uncategorized/saServeYourOtherSlaves.tw
+++ b/src/uncategorized/saServeYourOtherSlaves.tw
@@ -50,12 +50,13 @@
 <<if $slaves[$i].amp != 1 && !canWalk($slaves[$i])>>
 	Since she's forced to crawl around, she's especially vulnerable.
 <</if>>
-<<if $dormitoryPopulation+$roomsPopulation > 10+$subSlaves>> /*rework me to be percent based */
-	<<if $subSlaves > 5>>
-		Since there are so many other slaves servicing your stock, she sees limited action.
-	<<elseif $subSlaves > 3>>
+<<if ($dormitoryPopulation+$roomsPopulation-$subSlaves) > 5>>
+	<<set _load = ($subSlave/($dormitoryPopulation+$roomsPopulation-$subSlaves))>>
+	<<if _load <= .2>>
+		Since there are enough other slaves servicing your stock alongside her, she sees limited action.
+	<<elseif _load <= .5>>
 		With her servicing sisters, her workload is reasonable and she isn't overworked.
-	<<elseif $subSlaves > 1>>
+	<<elseif _load <= .8>>
 		While she may have support in servicing your stock, she is overwhelmed by their collective need.
 		<<set $slaves[$i].tired = 1>>
 		<<if $slaves[$i].sexualFlaw == "self hating">>
@@ -75,9 +76,8 @@
 			With so many other slaves using her body, her @@.hotpink;burning libido is finally sated.@@
 			<<set $slaves[$i].deovtion += 2>>
 		<</if>>
-	<</if>>
 	<<else>>
-		Since she is the only slave servicing your stock, she is used to the @@.red;point of exhaustion.@@
+		Since <<if $subSlave == 1>>she is the only slave<<else>>there are so few other slaves<</if>> servicing your stock, she is used to the @@.red;point of exhaustion.@@
 		<<set $slaves[$i].tired = 1, $slaves[$i].health -= 10>>
 		<<if $averageDick > 5>>
 			<<if canDoVaginal($slaves[$i]) && $slaves[$i].vagina > 0 && $slaves[$i].vagina < 4>>
@@ -366,35 +366,39 @@ is serving ''$slaves[_dom].slaveName'' this week.
 		Since $slaves[_dom].slaveName loves to fuck, $slaves[$i].slaveName spends the week getting fucked. $slaves[_dom].slaveName's _domRace body atop $slaves[$i].slaveName's enthusiastic _subRace form is a frequent sight as the two of them share pleasure. @@.hotpink;$slaves[_dom].slaveName enjoys having an extra outlet for her sexual needs.@@
 	<</if>>
 	<<if canPenetrate($slaves[_dom])>>
-		<<set _fuckCount = random(9,12)>>
+		<<set _fuckCount = random(15,25)>>
 		<<SimpleSlaveSlaveFucking $slaves[$i] $slaves[_dom] _fuckCount>>
 	<<elseif canPenetrate($slaves[$i]) && ((canDoVaginal($slaves[_dom]) && $slaves[_dom].vagina > 0) || (canDoAnal($slaves[_dom]) && $slaves[_dom].anus > 0))>> /* yes, that means she rides her */
-		<<set _fuckCount = random(9,12)>>
+		<<set _fuckCount = random(15,25)>>
 		<<SimpleSlaveSlaveFucking $slaves[_dom] $slaves[$i] _fuckCount>>
 	<<else>>
-		<<set _oralUse = random(9,12)>>
+		<<set _oralUse = random(15,25)>>
 	<</if>>
 <<elseif ($slaves[_dom].dick > 0) && canPenetrate($slaves[_dom])>>
 	<<if ($slaves[$i].devotion < -20)>>
-		$slaves[_dom].slaveName doesn't get to use her still-functional cock as much as she would like; it often stands stiff and untended while she's being used. Not this week: $slaves[$i].slaveName spends the week with $slaves[_dom].slaveName's <<if $seeRace == 1>>$slaves[_dom].race <</if>>dick between her <<if $seeRace == 1>>$slaves[$i].race <</if>>lips, whenever she feels like forcing it into $slaves[$i].slaveName's unwilling mouth. @@.hotpink;$slaves[_dom].slaveName loves having someone to facefuck whenever she wants.@@
+		$slaves[_dom].slaveName doesn't get to use her still-functional cock as much as she would like; it often stands stiff and untended while she's being used. Not this week: $slaves[$i].slaveName spends the week with $slaves[_dom].slaveName's _domRace dick thrusting in and out of her _subRace body, whenever she feels like forcing it into $slaves[$i].slaveName's unwilling holes. @@.hotpink;$slaves[_dom].slaveName loves having someone to fuck whenever she wants.@@
 	<<elseif ($slaves[$i].devotion <= 50)>>
-		$slaves[_dom].slaveName doesn't get to use her still-functional cock as much as she would like; it often stands stiff and untended while she's being used. Not this week: $slaves[$i].slaveName spends the week with $slaves[_dom].slaveName's <<if $seeRace == 1>>$slaves[_dom].race <</if>>dick between her <<if $seeRace == 1>>$slaves[$i].race <</if>>lips, whenever she feels like putting it into $slaves[$i].slaveName's compliant mouth. @@.hotpink;$slaves[_dom].slaveName loves having someone to suck her off at last.@@
+		$slaves[_dom].slaveName doesn't get to use her still-functional cock as much as she would like; it often stands stiff and untended while she's being used. Not this week: $slaves[$i].slaveName spends the week with $slaves[_dom].slaveName's _domRace dick thrusting in and out of her _subRace body, whenever she feels like putting it into $slaves[$i].slaveName's compliant holes. @@.hotpink;$slaves[_dom].slaveName loves having someone to stick her dick in at last.@@
 	<<else>>
-		$slaves[_dom].slaveName doesn't get to use her still-functional cock as much as she would like; it often stands stiff and untended while she's being used. Not this week: $slaves[$i].slaveName spends the week with $slaves[_dom].slaveName's <<if $seeRace == 1>>$slaves[_dom].race <</if>>dick between her <<if $seeRace == 1>>$slaves[$i].race <</if>>lips, whenever she feels like receiving an enthusiastic blowjob. @@.hotpink;$slaves[_dom].slaveName loves having someone to tend to her prick at last.@@
+		$slaves[_dom].slaveName doesn't get to use her still-functional cock as much as she would like; it often stands stiff and untended while she's being used. Not this week: $slaves[$i].slaveName spends the week with $slaves[_dom].slaveName's _domRace dick thrusting in and out of her _subRace body, whenever she feels like having an enthusiastic fuck. @@.hotpink;$slaves[_dom].slaveName loves having someone to tend to her prick at last.@@
 	<</if>>
-	<<set _oralUse = random(9,12)>>
-	<<set $slaves[_dom].penetrativeCount += _oralUse, $penetrativeTotal += _oralUse>>
-<<elseif canWalk($slaves[_dom]) && ($slaves[_dom].attrXX > 85)>>
+	<<set _fuckCount = random(9,12)>>
+	<<SimpleSlaveSlaveFucking $slaves[$i] $slaves[_dom] _fuckCount>>
+<<elseif ($slaves[_dom].amp != 1) && ($slaves[_dom].attrXX > 85) && ($slaves[$i].dick == 0) && ($slaves[$i].vagina > -1)>>
 	<<if ($slaves[$i].devotion < -20)>>
-		Since $slaves[_dom].slaveName loves girls, $slaves[$i].slaveName finds herself groped, fingered, and toyed with. She spends the week trying to avoid $slaves[_dom].slaveName's playful <<if $seeRace == 1>>$slaves[_dom].race <</if>>hands, but they rove across her <<if $seeRace == 1>>$slaves[$i].race <</if>>body anyway. @@.hotpink;$slaves[_dom].slaveName enjoys having a nice little toy right at hand,@@ even if she does have to be forced.
+		Since $slaves[_dom].slaveName loves girls, $slaves[$i].slaveName finds herself groped, fingered, and toyed with. She spends the week trying to avoid $slaves[_dom].slaveName's playful _domRace hands, but they rove across her _subRace body anyway. @@.hotpink;$slaves[_dom].slaveName enjoys having a nice little toy right at hand,@@ even if she does have to be forced.
 	<<elseif ($slaves[$i].devotion <= 50)>>
-		Since $slaves[_dom].slaveName loves girls, $slaves[$i].slaveName finds herself groped, fingered, and toyed with. She spends the week accepting the attention of  $slaves[_dom].slaveName's playful <<if $seeRace == 1>>$slaves[_dom].race <</if>>hands. They rove across her <<if $seeRace == 1>>$slaves[$i].race <</if>>body, eliciting embarrassed arousal. @@.hotpink;$slaves[_dom].slaveName enjoys having a nice little toy right at hand,@@ even if she is a little hesitant.
+		Since $slaves[_dom].slaveName loves girls, $slaves[$i].slaveName finds herself groped, fingered, and toyed with. She spends the week accepting the attention of  $slaves[_dom].slaveName's playful _domRace hands. They rove across her _subRace body, eliciting embarrassed arousal. @@.hotpink;$slaves[_dom].slaveName enjoys having a nice little toy right at hand,@@ even if she is a little hesitant.
 	<<else>>
-		Since $slaves[_dom].slaveName loves girls, $slaves[$i].slaveName finds herself with a frank and open lover for the week. She spends the week accepting the attention of  $slaves[_dom].slaveName's adoring <<if $seeRace == 1>>$slaves[_dom].race <</if>>hands. They rove across her <<if $seeRace == 1>>$slaves[$i].race <</if>>body, knowing just where to touch and where to press. @@.hotpink;$slaves[_dom].slaveName enjoys having a compliant girlfriend,@@ and they spend as much time together as they can.
+		Since $slaves[_dom].slaveName loves girls, $slaves[$i].slaveName finds herself with a frank and open lover for the week. She spends the week accepting the attention of  $slaves[_dom].slaveName's adoring_domRace hands. They rove across her _subRace body, knowing just where to touch and where to press. @@.hotpink;$slaves[_dom].slaveName enjoys having a compliant girlfriend,@@ and they spend as much time together as they can.
 	<</if>>
-	<<set _oralUse = random(9,12)>>
-	<<set $slaves[_dom].oralCount += _oralUse, $oralTotal += _oralUse>>
-<<elseif ($slaves[$i].devotion < -20) && ($slaves[$i].dick > 0) && canWalk($slaves[_dom]) && ($slaves[_dom].attrXY > 85)>>
+	<<if canPenetrate($slaves[_dom])>>
+		<<set _fuckCount = random(9,12)>>
+		<<SimpleSlaveSlaveFucking $slaves[$i] $slaves[_dom] _fuckCount>>
+	<<else>>
+		<<set _oralUse = random(9,12)>>
+	<</if>>
+<<elseif ($slaves[$i].dick > 0) && ($slaves[_dom].amp != 1) && ($slaves[_dom].attrXY > 85)>>
 	<<if canPenetrate($slaves[$i])>>
 		<<if ($slaves[$i].devotion < -20)>>
 			Since $slaves[_dom].slaveName loves hard cocks, $slaves[$i].slaveName finds herself forced to get hard and fuck. She spends the week trying to avoid $slaves[_dom].slaveName's constant demands. @@.hotpink;$slaves[_dom].slaveName enjoys having a nice dick right at hand,@@ even if it does have to be forced to stand up for her.
@@ -403,6 +407,14 @@ is serving ''$slaves[_dom].slaveName'' this week.
 		<<else>>
 			Since $slaves[_dom].slaveName loves hard cocks, $slaves[$i].slaveName finds herself asked to get hard and fuck constantly. She spends the week doing her best to satisfy $slaves[_dom].slaveName's constant demands. @@.hotpink;$slaves[_dom].slaveName enjoys having a nice dick right at hand,@@ and won't leave it alone.
 		<</if>>
+	<<elseif $slaves[$i].dick > 6 && $slaves[$i].balls > 0>>
+		<<if ($slaves[$i].devotion < -20)>>
+			Since $slaves[_dom].slaveName loves cocks, even big soft ones, $slaves[$i].slaveName finds herself being sucked, groped, and cruelly taunted for her inability to get hard. She spends the week trying to avoid $slaves[_dom].slaveName's abuse of her poor oversized penis. @@.hotpink;$slaves[_dom].slaveName enjoys having a nice dick right at hand,@@ even if it's only good for taunting and torture.
+		<<elseif ($slaves[$i].devotion <= 50)>>
+			Since $slaves[_dom].slaveName loves cocks, even big soft ones, $slaves[$i].slaveName finds herself being sucked, groped, and toyed with. She spends the week complying with $slaves[_dom].slaveName's amusements. @@.hotpink;$slaves[_dom].slaveName enjoys having a nice dick right at hand,@@ even if it's only good as a body pillow.
+		<<else>>
+			Since $slaves[_dom].slaveName loves cocks, even big soft ones, $slaves[$i].slaveName finds herself being sucked, groped, and played with until she comes. She spends the week enjoying with $slaves[_dom].slaveName's little games. @@.hotpink;$slaves[_dom].slaveName enjoys having a nice dick right at hand,@@ even if it's only good as a body pillow that occasionally discharges blobs of semen.
+		<</if>>
 	<<else>>
 		<<if ($slaves[$i].devotion < -20)>>
 			Since $slaves[_dom].slaveName loves cocks, even soft ones, $slaves[$i].slaveName finds herself being sucked, groped, and cruelly taunted for her impotence. She spends the week trying to avoid $slaves[_dom].slaveName's abuse of her poor useless penis. @@.hotpink;$slaves[_dom].slaveName enjoys having a nice dick right at hand,@@ even if it's only good for taunting and torture.
@@ -412,16 +424,16 @@ is serving ''$slaves[_dom].slaveName'' this week.
 			Since $slaves[_dom].slaveName loves cocks, even soft ones, $slaves[$i].slaveName finds herself being sucked, groped, and played with until she comes. She spends the week enjoying with $slaves[_dom].slaveName's little games. @@.hotpink;$slaves[_dom].slaveName enjoys having a nice dick right at hand,@@ even if it's only good as a soft, dripping toy.
 		<</if>>
 	<</if>>
-	<<set _penetrativeUse = random(9,12)>>
-	<<set $slaves[_dom].oralCount += _penetrativeUse, $oralTotal += _penetrativeUse>>
-<<elseif !canWalk($slaves[$i])>>
-	$slaves[_dom].slaveName doesn't have any special desires, so she simply uses the helpless $slaves[$i].slaveName for comfort and convenience. $slaves[$i].slaveName finds her helpless <<if $seeRace == 1>>$slaves[$i].race <</if>>torso being used as a bath toy, a bedwarmer, and for sexual convenience. @@.hotpink;$slaves[_dom].slaveName enjoys the ease and companionship.@@
-	<<set _oralUse = random(9,12)>>
-	<<set $slaves[_dom].oralCount += _oralUse, $oralTotal += _oralUse>>
+	<<set _fuckCount = random(9,12)>>
+	<<SimpleSlaveSlaveFucking $slaves[_dom] $slaves[$i] _fuckCount>>
+<<elseif $slaves[$i].amp == 1>>
+	$slaves[_dom].slaveName doesn't have any special desires, so she simply uses the helpless $slaves[$i].slaveName for comfort and convenience. $slaves[$i].slaveName finds her helpless _subRace torso being used as a bath toy, a bedwarmer, and for sexual convenience. @@.hotpink;$slaves[_dom].slaveName enjoys the ease and companionship.@@
+	<<set _fuckCount = random(9,12)>>
+	<<SimpleSlaveSlaveFucking $slaves[$i] $slaves[_dom] _fuckCount>>
 <<else>>
-	$slaves[_dom].slaveName doesn't have any special desires $slaves[$i].slaveName can satisfy, so she simply uses $slaves[$i].slaveName for comfort and convenience. $slaves[$i].slaveName washes her superior's <<if $seeRace == 1>>$slaves[_dom].race <</if>>body thoroughly and uses her own <<if $seeRace == 1>>$slaves[$i].race <</if>>body to warm $slaves[_dom].slaveName's bed at night. @@.hotpink;$slaves[_dom].slaveName enjoys the ease and companionship.@@
-	<<set _oralUse = random(9,12)>>
-	<<set $slaves[_dom].oralCount += _oralUse, $oralTotal += _oralUse>>
+	$slaves[_dom].slaveName doesn't have any special desires $slaves[$i].slaveName can satisfy, so she simply uses $slaves[$i].slaveName for comfort and convenience. $slaves[$i].slaveName washes her superior's _domRace body thoroughly and uses her own _subRace body to warm $slaves[_dom].slaveName's bed at night. @@.hotpink;$slaves[_dom].slaveName enjoys the ease and companionship.@@
+	<<set _fuckCount = random(9,12)>>
+	<<SimpleSlaveSlaveFucking $slaves[$i] $slaves[_dom] _fuckCount>>
 <</if>>
 
 <<set $slaves[$i].oralCount += _oralUse, $oralTotal += _oralUse>>
@@ -432,7 +444,6 @@ is serving ''$slaves[_dom].slaveName'' this week.
 <<set _cervixPump = _vaginalUse>>
 <<set $slaves[$i].need -= ((_penetrativeUse+_vaginalUse+_analUse)*5)>>
 
-<<if $slaves[$i].need>>
 <<if $slaves[$i].fetishKnown>>
 	<<switch $slaves[$i].fetish>>
 	<<case "submissive" "masochist">>
@@ -472,7 +483,6 @@ is serving ''$slaves[_dom].slaveName'' this week.
 		<<set $slaves[$i].need = 0>>
 	<</switch>>
 <</if>>
-<</if>>
 
 <<if $slaves[$i].cervixImplant == 1 && _cervixPump > 0 && canDoVaginal($slaves[$i])>>
 	She notices her @@.lime;belly has swollen@@ from all the vaginal sex she had throughout the week.
@@ -497,106 +507,70 @@ is serving ''$slaves[_dom].slaveName'' this week.
 	<</if>>
 <</if>>
 
-<<if $slaves[_dom].dick > 0>>
 <<if $slaves[$i].behavioralFlaw == "hates men">>
-<<if $slaves[$i].devotion > 20>>
-	Spending so much time in close proximity to a slave with a dick @@.green;reconciles her to getting fucked by them.@@
-<<set $slaves[$i].behavioralFlaw = "none">>
-<</if>>
-<</if>>
-<</if>>
-<<if $slaves[_dom].vagina != -1>>
-<<if $slaves[$i].behavioralFlaw == "hates women">>
-<<if $slaves[$i].devotion > 20>>
-	Spending so much time in close proximity to a slave with a pussy @@.green;reconciles her to sex with girls.@@
-<<set $slaves[$i].behavioralFlaw = "none">>
-<</if>>
-<</if>>
+	<<if $slaves[_dom].dick > 0 && $slaves[$i].devotion > 20>>
+		Spending so much time in close proximity to a slave with a dick @@.green;reconciles her to getting fucked by them.@@
+		<<set $slaves[$i].behavioralFlaw = "none">>
+	<</if>>
+<<elseif $slaves[$i].behavioralFlaw == "hates women">>
+	<<if $slaves[_dom].vagina != -1 && $slaves[$i].devotion > 20>>
+		Spending so much time in close proximity to a slave with a pussy @@.green;reconciles her to sex with girls.@@
+		<<set $slaves[$i].behavioralFlaw = "none">>
+	<</if>>
 <</if>>
 
 <<if $slaves[$i].relationship == 0>>
-	<<if $slaves[$i].rivalryTarget != $slaves[_dom].ID>>
-	<<if $slaves[$i].devotion >= 10>>
-	<<if $slaves[_dom].relationship == 0>>
-	<<if random(1,100) > 50>>
-		$slaves[$i].slaveName and $slaves[_dom].slaveName enjoy spending time together and @@.lightgreen;strike up a friendship.@@
-		<<set $slaves[_dom].relationship = 1>>
-		<<set $slaves[_dom].relationshipTarget = $slaves[$i].ID>>
-		<<set $slaves[$i].relationship = 1>>
-		<<set $slaves[$i].relationshipTarget = $slaves[_dom].ID>>
-	<<else>>
-		$slaves[$i].slaveName and $slaves[_dom].slaveName find they enjoy their sexual relationship and @@.lightgreen;become friends with benefits.@@
-		<<set $slaves[_dom].relationship = 3>>
-		<<set $slaves[_dom].relationshipTarget = $slaves[$i].ID>>
-		<<set $slaves[$i].relationship = 3>>
-		<<set $slaves[$i].relationshipTarget = $slaves[_dom].ID>>
-	<</if>>
-	<</if>>
-	<</if>>
+	<<if $slaves[$i].rivalryTarget != $slaves[_dom].ID && $slaves[$i].devotion >= 10 && $slaves[_dom].relationship == 0>>
+		<<if random(1,100) > 50>>
+			$slaves[$i].slaveName and $slaves[_dom].slaveName enjoy spending time together and @@.lightgreen;strike up a friendship.@@
+			<<set $slaves[_dom].relationship = 1, $slaves[_dom].relationshipTarget = $slaves[$i].ID, $slaves[$i].relationship = 1, $slaves[$i].relationshipTarget = $slaves[_dom].ID>>
+		<<else>>
+			$slaves[$i].slaveName and $slaves[_dom].slaveName find they enjoy their sexual relationship and @@.lightgreen;become friends with benefits.@@
+			<<set $slaves[_dom].relationship = 3, $slaves[_dom].relationshipTarget = $slaves[$i].ID, $slaves[$i].relationship = 3, $slaves[$i].relationshipTarget = $slaves[_dom].ID>>
+		<</if>>
 	<</if>>
 <<elseif $slaves[$i].relationship > 0>>
-	<<if $slaves[$i].relationshipTarget == $slaves[_dom].ID>>
-	<<if $slaves[$i].devotion >= -20>>
-	$slaves[$i].slaveName likes getting fucked by $slaves[_dom].slaveName and @@.hotpink;appreciates@@ having it as her job.
-	<<set $slaves[$i].devotion += 1>>
-	<</if>>
+	<<if $slaves[$i].relationshipTarget == $slaves[_dom].ID && $slaves[$i].devotion >= -20>>
+		$slaves[$i].slaveName likes getting fucked by $slaves[_dom].slaveName and @@.hotpink;appreciates@@ having it as her job.
+		<<set $slaves[$i].devotion += 1>>
 	<</if>>
 	<<if $slaves[$i].relationship < 3>>
-	<<if $slaves[$i].relationshipTarget == $slaves[_dom].ID>>
-	<<if $slaves[$i].devotion >= 10>>
-		$slaves[$i].slaveName and $slaves[_dom].slaveName find that they enjoy having sex just as much as they like being friends, and become @@.lightgreen;friends with benefits.@@
-		<<set $slaves[_dom].relationship = 3>>
-		<<set $slaves[$i].relationship = 3>>
-	<<elseif $slaves[$i].devotion <= 20>>
-		$slaves[$i].slaveName and $slaves[_dom].slaveName's relationship is @@.lightsalmon;damaged@@ by $slaves[_dom].slaveName having the right to use $slaves[$i].slaveName.
-		<<set $slaves[_dom].relationship -= 1>>
-		<<set $slaves[$i].relationship -= 1>>
-	<</if>>
-	<</if>>
+		<<if $slaves[$i].relationshipTarget == $slaves[_dom].ID>>
+			<<if $slaves[$i].devotion >= 10>>
+				$slaves[$i].slaveName and $slaves[_dom].slaveName find that they enjoy having sex just as much as they like being friends, and become @@.lightgreen;friends with benefits.@@
+				<<set $slaves[_dom].relationship = 3>>
+				<<set $slaves[$i].relationship = 3>>
+			<<elseif $slaves[$i].devotion <= 20>>
+				$slaves[$i].slaveName and $slaves[_dom].slaveName's relationship is @@.lightsalmon;damaged@@ by $slaves[_dom].slaveName having the right to use $slaves[$i].slaveName.
+				<<set $slaves[_dom].relationship--, $slaves[$i].relationship-->>
+			<</if>>
+		<</if>>
 	<<elseif $slaves[$i].relationship < 4>>
-	<<if $slaves[$i].relationshipTarget == $slaves[_dom].ID>>
-	<<if $slaves[$i].devotion >= 10>>
-		$slaves[$i].slaveName and $slaves[_dom].slaveName don't have to be encouraged to have sex, but with extra time for it, they become @@.lightgreen;lovers.@@
-		<<set $slaves[_dom].relationship += 1>>
-		<<set $slaves[$i].relationship += 1>>
-	<</if>>
-	<</if>>
+		<<if $slaves[$i].relationshipTarget == $slaves[_dom].ID && $slaves[$i].devotion >= 10>>
+			$slaves[$i].slaveName and $slaves[_dom].slaveName don't have to be encouraged to have sex, but with extra time for it, they become @@.lightgreen;lovers.@@
+			<<set $slaves[_dom].relationship++, $slaves[$i].relationship++>>
+		<</if>>
 	<</if>>
 <</if>>
 
 <<if $slaves[$i].rivalry == 0>>
-	<<if $slaves[$i].relationshipTarget != $slaves[_dom].ID>>
-	<<if $slaves[$i].devotion <= 50>>
-	<<if $slaves[_dom].rivalry == 0>>
-	<<if random(1,100) > 50>>
-	$slaves[$i].slaveName resents $slaves[_dom].slaveName for using her and the two @@.lightsalmon;start to dislike each other.@@
-	<<set $slaves[_dom].rivalry = 1>>
-	<<set $slaves[_dom].rivalryTarget = $slaves[$i].ID>>
-	<<set $slaves[$i].rivalry = 1>>
-	<<set $slaves[$i].rivalryTarget = $slaves[_dom].ID>>
-	<</if>>
-	<</if>>
-	<</if>>
+	<<if $slaves[$i].relationshipTarget != $slaves[_dom].ID && $slaves[$i].devotion <= 50 && $slaves[_dom].rivalry == 0 && random(1,100) > 50>>
+		$slaves[$i].slaveName resents $slaves[_dom].slaveName for using her and the two @@.lightsalmon;start to dislike each other.@@
+		<<set $slaves[_dom].rivalry = 1, $slaves[_dom].rivalryTarget = $slaves[$i].ID, $slaves[$i].rivalry = 1, $slaves[$i].rivalryTarget = $slaves[_dom].ID>>
 	<</if>>
 <<else>>
-	<<if $slaves[$i].rivalryTarget == $slaves[_dom].ID>>
-	<<if $slaves[$i].devotion <= 50>>
-	$slaves[$i].slaveName resents subordinating herself to $slaves[_dom].slaveName and @@.mediumorchid;dislikes@@ having it as her job.
-	<<set $slaves[$i].devotion -= 2>>
-	<</if>>
-	<</if>>
-	<<if $slaves[$i].rivalry < 3>>
-	<<if $slaves[$i].rivalryTarget == $slaves[_dom].ID>>
-	<<if $slaves[$i].devotion <= 50>>
-	$slaves[$i].slaveName hates being used by her rival $slaves[_dom].slaveName so much that their @@.lightsalmon;feud worsens.@@
-	<<set $slaves[_dom].rivalry += 1>>
-	<<set $slaves[$i].rivalry += 1>>
-	<<elseif $slaves[$i].devotion > 50>>
-	$slaves[$i].slaveName serves $slaves[_dom].slaveName so devotedly that they @@.lightgreen;work out@@ some of their differences through sex.
-	<<set $slaves[_dom].rivalry -= 1>>
-	<<set $slaves[$i].rivalry -= 1>>
-	<</if>>
-	<</if>>
+	<<if $slaves[$i].rivalryTarget == $slaves[_dom].ID && $slaves[$i].devotion <= 50>>
+		$slaves[$i].slaveName resents subordinating herself to $slaves[_dom].slaveName and @@.mediumorchid;dislikes@@ having it as her job.
+		<<set $slaves[$i].devotion -= 2>>
+	<</if>>
+	<<if $slaves[$i].rivalry < 3 && $slaves[$i].rivalryTarget == $slaves[_dom].ID>>
+		<<if $slaves[$i].devotion <= 50>>
+			$slaves[$i].slaveName hates being used by her rival $slaves[_dom].slaveName so much that their @@.lightsalmon;feud worsens.@@
+			<<set $slaves[_dom].rivalry++, $slaves[$i].rivalry++>>
+		<<elseif $slaves[$i].devotion > 50>>
+			$slaves[$i].slaveName serves $slaves[_dom].slaveName so devotedly that they @@.lightgreen;work out@@ some of their differences through sex.
+			<<set $slaves[_dom].rivalry--, $slaves[$i].rivalry-->>
+		<</if>>
 	<</if>>
 <</if>>
 
-- 
GitLab